function [a,msg] = fgetasc(filename)
%FGETASC
%       [A,MSG] = FGETASC(FILENAME)
%

% Initial coding by A S Bozin
% Copyright 1997-2000 The MathWorks, Inc.
% $Revision: 1.5 $ $Date: 2000/06/14 16:11:55 $

   error('Missing MEX-file FGETASC.');
   return					   % Last card of FGETASC
