Mercurial > hg > octave-nkf

diff scripts/control/system/is_controllable.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 2618a0750ae6
children 93c65f2a5668
line wrap: on
line diff
--- a/scripts/control/system/is_controllable.m
+++ b/scripts/control/system/is_controllable.m
@@ -66,14 +66,13 @@
 
   deftol = 1;    # assume default tolerance
   if(nargin < 1 | nargin > 3)
-    usage("[retval,U] = %s\n\t%s", "is_controllable(a {, b, tol})", ...
-        "is_controllable(sys{,tol})");
+    print_usage ();
   elseif(isstruct(a))
     ## system structure passed.
     sys = sysupdate(a,"ss");
     [a,bs] = sys2ss(sys);
     if(nargin > 2)
-      usage("[retval,U] = is_controllable(sys{,tol})");
+      print_usage ();
     elseif(nargin == 2)
       tol = b;          % get tolerance
       deftol = 0;
@@ -82,7 +81,7 @@
   else
     ## a,b arguments sent directly.
     if(nargin < 2)
-      usage("[retval,U] = is_controllable(a {, b ,tol})");
+      print_usage ();
     else
       deftol = 1;
     endif