Mercurial > octave-nkf

comparison scripts/control/hinf/h2norm.m @ 7151:aeeb646f6538

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-11-09 19:34:17 by jwe]
author jwe
date Fri, 09 Nov 2007 19:35:52 +0000
parents a1dbe9d80eee
children
comparison
equal deleted inserted replaced
7150:68a1b616b7df 7151:aeeb646f6538
51 51
52 if (nargin != 1) 52 if (nargin != 1)
53 print_usage (); 53 print_usage ();
54 elseif (! isstruct (sys)) 54 elseif (! isstruct (sys))
55 error ("Sys must be in system data structure"); 55 error ("Sys must be in system data structure");
56 end 56 endif
57 dflg = is_digital (sys); 57 dflg = is_digital (sys);
58 58
59 if (! is_stable (sys)) 59 if (! is_stable (sys))
60 warning ("h2norm: unstable input system; returning Inf"); 60 warning ("h2norm: unstable input system; returning Inf");
61 h2gain = Inf; 61 h2gain = Inf;