Mercurial > hg > octave-nkf

comparison scripts/control/sys2tf.m @ 3228:dbcc24961c44

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1998-12-09 18:42:12 by jwe]
author jwe
date Wed, 09 Dec 1998 18:42:13 +0000
parents ba1c7cdc6090
children 28aba52a2368
comparison
equal deleted inserted replaced
3227:e090571062ee 3228:dbcc24961c44
29 # (INNAME), and the output name (OUTNAME) 29 # (INNAME), and the output name (OUTNAME)
30 30
31 # Written by R. Bruce Tenison (June 24, 1994) btenison@eng.auburn.edu 31 # Written by R. Bruce Tenison (June 24, 1994) btenison@eng.auburn.edu
32 # modified to make sys2tf by A. S. Hodel Aug 1995 32 # modified to make sys2tf by A. S. Hodel Aug 1995
33 # modified again for updated system format by John Ingram July 1996 33 # modified again for updated system format by John Ingram July 1996
34 # $Revision: 1.2 $ 34 # $Revision: 2.0.0.0 $
35 35
36 if(nargin != 1) 36 if(nargin != 1)
37 usage("[num,den,tsam,inname,outname] = sys2tf(Asys)"); 37 usage("[num,den,tsam,inname,outname] = sys2tf(Asys)");
38 endif 38 endif
39 39
48 Asys = sysupdate(Asys,"tf"); # just in case 48 Asys = sysupdate(Asys,"tf"); # just in case
49 49
50 num = Asys.num; 50 num = Asys.num;
51 den = Asys.den; 51 den = Asys.den;
52 52
53 tsam = Asys.tsam; 53 tsam = sysgettsam(Asys);
54 inname = Asys.inname; 54 inname = sysgetsignals(Asys,"in");
55 outname = Asys.outname; 55 outname = sysgetsignals(Asys,"out");
56 56
57 endfunction 57 endfunction
58 58