Mercurial > hg > octave-lyh

comparison scripts/control/system/sysout.m @ 3438:2e06c3941943

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2000-01-14 06:33:18 by jwe]
author jwe
date Fri, 14 Jan 2000 06:34:24 +0000
parents 65b3519ac3a1
children 3234a698073a
comparison
equal deleted inserted replaced
3437:3c609681b2bf 3438:2e06c3941943
70 70
71 ## now check output for each form: 71 ## now check output for each form:
72 [nn,nz,mm,pp] = sysdimensions(sys); 72 [nn,nz,mm,pp] = sysdimensions(sys);
73 if( mm > 0) 73 if( mm > 0)
74 disp("Input(s)") 74 disp("Input(s)")
75 disp(outlist(sysgetsignals(sys,"in")," ")); 75 disp(__outlist__(sysgetsignals(sys,"in")," "));
76 else 76 else
77 disp("Input(s): none"); 77 disp("Input(s): none");
78 endif 78 endif
79 if (pp > 0) 79 if (pp > 0)
80 disp("Output(s):") 80 disp("Output(s):")
81 disp(outlist(sysgetsignals(sys,"out"), ... 81 disp(__outlist__(sysgetsignals(sys,"out"), ...
82 " ",sysgetsignals(sys,"yd")) ); 82 " ",sysgetsignals(sys,"yd")) );
83 else 83 else
84 disp("Output(s): none"); 84 disp("Output(s): none");
85 endif 85 endif
86 if(sysgettsam(sys) > 0) 86 if(sysgettsam(sys) > 0)
114 xi = (nn+1):(nn+nz); 114 xi = (nn+1):(nn+nz);
115 xd = zeros(1,nn+nz); 115 xd = zeros(1,nn+nz);
116 if(!isempty(xi)) 116 if(!isempty(xi))
117 xd(xi) = 1; 117 xd(xi) = 1;
118 endif 118 endif
119 disp(outlist(sysgetsignals(sys,"st")," ",xd)); 119 disp(__outlist__(sysgetsignals(sys,"st")," ",xd));
120 else 120 else
121 disp("State(s): none"); 121 disp("State(s): none");
122 endif 122 endif
123 123
124 ## display matrix values? 124 ## display matrix values?