File: dt_ility.sci

package info (click to toggle)
scilab 2.6-4
  • links: PTS
  • area: non-free
  • in suites: woody
  • size: 54,632 kB
  • ctags: 40,267
  • sloc: ansic: 267,851; fortran: 166,549; sh: 10,005; makefile: 4,119; tcl: 1,070; cpp: 233; csh: 143; asm: 135; perl: 130; java: 39
file content (30 lines) | stat: -rw-r--r-- 448 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
 
function [m1,m2,u2,sl2]=dt_ility(sl,tol)
//dual of st_ility
//detectability means m1=0;
//m1=dimension of unstable,unobservable subspace
//m2=dimension of unobservable subspace; m2>=m1
//sl2=ss2ss(sl,u2)
//!
// Copyright INRIA
[LHS,RHS]=argn(0)
if RHS==2 then
[n1,n2,u1,sl1]=st_ility(sl',tol);
else
[n1,n2,u1,sl1]=st_ility(sl');
end
[nx,nx]=size(sl(2));
u2=[u1(:,n1+1:nx),u1(:,n2+1:n1),u1(:,1:n2)];
sl2=ss2ss(sl,u2);
m1=nx-n1;m2=nx-n2;