comparison scripts/control/is_detectable.m @ 3346:8dd4718801fd

[project @ 1999-11-09 18:18:12 by jwe]
author jwe
date Tue, 09 Nov 1999 18:18:37 +0000
parents f7e4a95916f2
children 69b167451491
comparison
equal deleted inserted replaced
3345:c7ed52f51470 3346:8dd4718801fd
14 # 14 #
15 # You should have received a copy of the GNU General Public License 15 # You should have received a copy of the GNU General Public License
16 # along with Octave; see the file COPYING. If not, write to the Free 16 # along with Octave; see the file COPYING. If not, write to the Free
17 # Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111 USA. 17 # Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111 USA.
18 18
19 ## -*- texinfo -*-
20 ## @deftypefn {Function File } { [@var{retval}, @var{U}] =} is_detectable (@var{a}, @var{c}@{, @var{tol}@})
21 ## @deftypefnx {Function File } { [@var{retval}, @var{U}] =} is_detectable (@var{sys}@{, @var{tol}@})
22 ## Test for detactability (observability of unstable modes) of (@var{a},@var{c}).
23 ##
24 ## Returns 1 if the system @var{a} or the pair (@var{a},@var{c})is
25 ## detectable, 0 if not.
26 ##
27 ## @strong{See} @code{is_stabilizable} for detailed description of arguments and
28 ## computational method.
29 ##
30 ## Default: tol = 10*norm(a,'fro')*eps
31 ##
32 ## @end deftypefn
33
34 ## See also: size, rows, columns, length, is_matrix, is_scalar, is_vector.
35
19 function [retval,U] = is_detectable (a,c,tol) 36 function [retval,U] = is_detectable (a,c,tol)
20
21 # [retval,U] = is_detectable (a,c,tol)
22 # usage: is_detectable (a , c {,tol})
23 # or is_detectable (sys {,tol})
24 #
25 # Default: tol = 10*norm(a,'fro')*eps
26 #
27 # Returns 1 if the system, a, is detectable, 1 if the pair (a, c) is
28 # detectable, or 0 if not.
29 #
30 # See also: size, rows, columns, length, is_matrix, is_scalar, is_vector.
31
32 # Written by A. S. Hodel (scotte@eng.auburn.edu) August 1993. 37 # Written by A. S. Hodel (scotte@eng.auburn.edu) August 1993.
33 # Updated by John Ingram (ingraje@eng.auburn.edu) July 1996. 38 # Updated by John Ingram (ingraje@eng.auburn.edu) July 1996.
34 39
35 if( nargin < 1) 40 if( nargin < 1)
36 usage("[retval,U] = is_detectable(a , c {, tol})"); 41 usage("[retval,U] = is_detectable(a , c {, tol})");