Mercurial > octave

comparison scripts/control/is_controllable.m @ 3236:98e15955107e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1999-03-05 07:17:10 by jwe]
author jwe
date Fri, 05 Mar 1999 07:19:35 +0000
parents 28aba52a2368
children 2e74d8aa1a20
comparison
equal deleted inserted replaced
3235:41602f25d19f 3236:98e15955107e
35 # is_observable, is_stabilizable, is_detectable, krylov, krylovb 35 # is_observable, is_stabilizable, is_detectable, krylov, krylovb
36 36
37 # Written by A. S. Hodel (scotte@eng.auburn.edu) August, 1993. 37 # Written by A. S. Hodel (scotte@eng.auburn.edu) August, 1993.
38 # Updated by A. S. Hodel (scotte@eng.auburn.edu) Aubust, 1995 to use krylovb 38 # Updated by A. S. Hodel (scotte@eng.auburn.edu) Aubust, 1995 to use krylovb
39 # Updated by John Ingram (ingraje@eng.auburn.edu) July, 1996 for packed systems 39 # Updated by John Ingram (ingraje@eng.auburn.edu) July, 1996 for packed systems
40 # $Revision: 1.16 $
41 40
42 deftol = 1; # assume default tolerance 41 deftol = 1; # assume default tolerance
43 if(nargin < 1 | nargin > 3) 42 if(nargin < 1 | nargin > 3)
44 usage("[retval,U] = %s\n\t%s", "is_controllable(a {, b ,tol})", ... 43 usage("[retval,U] = %s\n\t%s", "is_controllable(a {, b ,tol})", ...
45 "is_controllable(sys{,tol})"); 44 "is_controllable(sys{,tol})");