0001 function [varargout] = resp(varargin)
0002
0003
0004
0005
0006
0007
0008
0009
0010
0011
0012 pl = varargin{1};
0013 if ~isa(pl, 'plist')
0014 error('### iirResp needs an input plist.')
0015 end
0016
0017 filt = find(pl, 'filter');
0018 if isempty(filt)
0019 error('### input parameter list must contain a ''filter'' parameter.');
0020 end
0021
0022
0023 b = resp(filt, pl);
0024
0025
0026 if nargout == 0
0027 plot(b)
0028 end
0029
0030 if nargout == 1
0031 varargout{1} = b;
0032 end
0033 if nargout > 1
0034 error('incorrect output arguments');
0035 end
0036
0037
0038
0039
0040
0041