Mercurial > hg > octave-lyh

comparison scripts/control/system/sysscale.m @ 6046:34f96dd5441b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-10-10 16:10:25 by jwe]
author jwe
date Tue, 10 Oct 2006 16:10:31 +0000
parents 370f785718be
children 93c65f2a5668
comparison
equal deleted inserted replaced
6045:421d8a903df7 6046:34f96dd5441b
58 ## modified by John Ingram 7-15-96 58 ## modified by John Ingram 7-15-96
59 59
60 function sys = sysscale (sys, outscale, inscale, outname, inname) 60 function sys = sysscale (sys, outscale, inscale, outname, inname)
61 61
62 if( (nargin < 3) || (nargin > 5) ) 62 if( (nargin < 3) || (nargin > 5) )
63 usage("retsys = sysscale(Asys,output_list,input_list{,inname,outname})"); 63 print_usage ();
64 elseif (!isstruct(sys)) 64 elseif (!isstruct(sys))
65 error("sys must be a structured system"); 65 error("sys must be a structured system");
66 endif 66 endif
67 67
68 [nn,nz,mm,pp] = sysdimensions(sys); 68 [nn,nz,mm,pp] = sysdimensions(sys);