home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l455 / 9.ddi / IDENT.DI$ / ZPSD.M < prev    next >
Encoding:
Text File  |  1993-03-11  |  163 b   |  8 lines
  1. function [zepo,Kg]=zpsd(th,ku,ky)
  2. %ZPSD    See TH2ZP
  3.  
  4. % *** Set up default values ***
  5. if nargin<3,ky=[];end
  6. if nargin<2,ku=[];end
  7. [zepo,Kg] = th2zp(th,ku,ky);
  8.