Mercurial > hg > octave-lyh

comparison scripts/control/system/sysdup.m @ 5443:ec8c33dcd1bf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-09-08 01:40:57 by jwe]
author jwe
date Thu, 08 Sep 2005 01:40:58 +0000
parents 4c8a2e4e0717
children 34f96dd5441b
comparison
equal deleted inserted replaced
5442:636886245488 5443:ec8c33dcd1bf
72 Asys = sysupdate(Asys,"ss"); 72 Asys = sysupdate(Asys,"ss");
73 [nn,nz,mm,pp] = sysdimensions(Asys); 73 [nn,nz,mm,pp] = sysdimensions(Asys);
74 [aa,bb,cc,dd] = sys2ss(Asys); 74 [aa,bb,cc,dd] = sys2ss(Asys);
75 75
76 ## check for signal names 76 ## check for signal names
77 if(is_signal_list(input_list) | isstr(input_list)) 77 if(is_signal_list(input_list) | ischar(input_list))
78 input_list = sysidx(Asys,"in",input_list); 78 input_list = sysidx(Asys,"in",input_list);
79 endif 79 endif
80 if(is_signal_list(output_list) | isstr(output_list)) 80 if(is_signal_list(output_list) | ischar(output_list))
81 output_list = sysidx(Asys,"out",output_list); 81 output_list = sysidx(Asys,"out",output_list);
82 endif 82 endif
83 83
84 ## first duplicate inputs 84 ## first duplicate inputs
85 if(isvector(input_list)) 85 if(isvector(input_list))