Mercurial > hg > octave-nkf
annotate scripts/control/is_observable.m @ 26:e90ea9cbd4de
[project @ 1993-08-10 20:56:55 by jwe]
Initial revision
author | jwe |
---|---|
date | Tue, 10 Aug 1993 20:56:55 +0000 |
parents | |
children | 3cccff82b7a6 |
rev | line source |
---|---|
26 | 1 function retval = is_observable (a,c,tol) |
2 | |
3 # usage: is_observable (a,c{,tol}) | |
4 # | |
5 # returns 1 the pair(a,c) is observable, then return value is the | |
6 # dimension of x. 0therwise, returns a value of 0 | |
7 # | |
8 # See also: size, rows, columns, length, is_matrix, is_scalar, is_vector | |
9 | |
10 if (nargin == 2) | |
11 retval = is_controllable(a',c'); | |
12 elseif (nargin == 3) | |
13 retval = iscontrollable(a',c',tol); | |
14 else | |
15 error ("usage: is_observable (a,c{,tol})"); | |
16 endif | |
17 | |
18 endfunction |