File: testdscr_lyap

package info (click to toggle)
scilab 2.4-1
  • links: PTS
  • area: non-free
  • in suites: potato, slink
  • size: 55,196 kB
  • ctags: 38,019
  • sloc: ansic: 231,970; fortran: 148,976; tcl: 7,099; makefile: 4,585; sh: 2,978; csh: 154; cpp: 101; asm: 39; sed: 5
file content (18 lines) | stat: -rw-r--r-- 298 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
// Copyright INRIA
n=3;
rand('seed',0)
rand('normal')
E=rand(n,1)*rand(1,n)
A=-rand(n,n)-eye
C=rand(n,n);
getf(SCI+'/demos/lmitool/dscr_lyap.sci','c')
[X,Y]=dscr_lyap(E,A,C)
A'*X+Y'*A+C'*C
E'*X-Y'*E
spec(E'*X)


getf(SCI+'/demos/lmitool/dscr_lyap2.sci','c') 
X=dscr_lyap2(E,A)
E'*X-Y'*E
spec(E'*X)