Home > classes > @plist > pzmresp.m

pzmresp

PURPOSE ^

PZMRESP shadow function for the pzmodel/resp.

SYNOPSIS ^

function a = pzmresp(pl, varargin)

DESCRIPTION ^

 PZMRESP shadow function for the pzmodel/resp.

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

 DESCRIPTION: PZMRESP shadow function for the pzmodel/resp.
              A parameter called 'pzmodel' is extracted and passed with the
              remaining parameter list to pzmodel/resp.

 CALL:        resp_pzm = pzmresp(pl)

 VERSION:     $Id: pzmresp.m,v 1.4 2008/02/14 08:29:09 mauro Exp $

 HISTORY:     19-04-2007 M Hewitson
                 Creation

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

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function a = pzmresp(pl, varargin)
0002 % PZMRESP shadow function for the pzmodel/resp.
0003 %
0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0005 %
0006 % DESCRIPTION: PZMRESP shadow function for the pzmodel/resp.
0007 %              A parameter called 'pzmodel' is extracted and passed with the
0008 %              remaining parameter list to pzmodel/resp.
0009 %
0010 % CALL:        resp_pzm = pzmresp(pl)
0011 %
0012 % VERSION:     $Id: pzmresp.m,v 1.4 2008/02/14 08:29:09 mauro Exp $
0013 %
0014 % HISTORY:     19-04-2007 M Hewitson
0015 %                 Creation
0016 %
0017 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0018 
0019 VERSION  = '$Id: pzmresp.m,v 1.4 2008/02/14 08:29:09 mauro Exp $';
0020 CATEGORY = 'Signal Processing';
0021 
0022 %%%%%   Check if this is a call for parameters   %%%%%
0023 if nargin == 2
0024   if isa(pl, 'plist') && ischar(varargin{1})
0025     in = char(varargin{1});
0026     if strcmp(in, 'Params')
0027       a = plist;
0028       return
0029     elseif strcmp(in, 'Version')
0030       a = VERSION;
0031       return
0032     elseif strcmp(in, 'Category')
0033       a = CATEGORY;
0034       return
0035     end
0036   end
0037 end
0038 
0039 pzm = find(pl, 'pzmodel');
0040 if isempty(pzm) || ~isa(pzm, 'pzmodel')
0041   error('### no pzmodel found in parameter list.')
0042 end
0043 
0044 if nargout == 0
0045   resp(pzm, pl);
0046 else
0047   a = resp(pzm, pl);
0048 end
0049 
0050 % END

Generated on Mon 31-Mar-2008 13:54:54 by m2html © 2003