PZMRESP shadow function for the pzmodel/resp. A parameter called 'pzmodel' is extracted and passed with the remaining parameter list to pzmodel/resp. M Hewitson 19-04-07 $Id: pzmresp.html,v 1.1 2007/06/08 14:15:06 hewitson Exp $
0001 function a = pzmresp(pl) 0002 0003 % PZMRESP shadow function for the pzmodel/resp. A parameter called 0004 % 'pzmodel' is extracted and passed with the remaining parameter list to 0005 % pzmodel/resp. 0006 % 0007 % M Hewitson 19-04-07 0008 % 0009 % $Id: pzmresp.html,v 1.1 2007/06/08 14:15:06 hewitson Exp $ 0010 % 0011 0012 pzm = find(pl, 'pzmodel'); 0013 if isempty(pzm) || ~isa(pzm, 'pzmodel') 0014 error('### no pzmodel found in parameter list.') 0015 end 0016 0017 a = resp(pzm, pl); 0018 0019 % END