Home > classes > @plist > resp.m

resp

PURPOSE ^

RESP shadows miir/iirResp.

SYNOPSIS ^

function [varargout] = resp(varargin)

DESCRIPTION ^

 RESP shadows miir/iirResp.

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

 DESCRIPTION: RESP shadows miir/iirResp.
              The parameter with key 'filter' is extracted and
              used to call miir/resp.

 CALL:                    resp(plist);
              filt_resp = resp(plist);

 VERSION:     $Id: resp.m,v 1.3 2008/01/02 17:58:51 ingo Exp $

 HISTORY:     12-04-2007 M Hewitson
                 Creation

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function [varargout] = resp(varargin)
0002 % RESP shadows miir/iirResp.
0003 %
0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0005 %
0006 % DESCRIPTION: RESP shadows miir/iirResp.
0007 %              The parameter with key 'filter' is extracted and
0008 %              used to call miir/resp.
0009 %
0010 % CALL:                    resp(plist);
0011 %              filt_resp = resp(plist);
0012 %
0013 % VERSION:     $Id: resp.m,v 1.3 2008/01/02 17:58:51 ingo Exp $
0014 %
0015 % HISTORY:     12-04-2007 M Hewitson
0016 %                 Creation
0017 %
0018 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0019 
0020 VERSION  = '$Id: resp.m,v 1.3 2008/01/02 17:58:51 ingo Exp $';
0021 
0022 %%%%%   'Params' && 'Version' Call   %%%%%
0023 if nargin == 2
0024   if isa(varargin{1}, 'plist') && strcmp(varargin{2}, 'Params')
0025     varargout{1} = plist();
0026     return
0027   elseif isa(varargin{1}, 'plist') && strcmp(varargin{2}, 'Version')
0028     varargout{1} = VERSION;
0029     return
0030   end
0031 end
0032 
0033 
0034 pl = varargin{1};
0035 if ~isa(pl, 'plist')
0036   error('### iirResp needs an input plist.')
0037 end
0038 
0039 filt = find(pl, 'filter');
0040 if isempty(filt)
0041   error('### input parameter list must contain a ''filter'' parameter.');
0042 end
0043 
0044 % compute response
0045 b = resp(filt, pl);
0046 
0047 % Outputs
0048 if nargout == 0
0049   plot(b)
0050 end
0051 
0052 if nargout == 1
0053   varargout{1} = b;
0054 end
0055 if nargout > 1
0056   error('incorrect output arguments');
0057 end
0058 
0059 
0060 
0061 
0062 
0063 % END

Generated on Tue 22-Jan-2008 10:39:13 by m2html © 2003