File: fourplan.sci

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 (10 lines) | stat: -rw-r--r-- 343 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
 
function [P11,P12,P21,P22]=fourplan(P,r)
//returns the four plants associated with the augmented plant P.
// r is the size of P22 and P=[P11,P12;P21,P22].
// Copyright INRIA
[A,B1,B2,C1,C2,D11,D12,D21,D22]=smga(P,r);
dom=P(7);
P11=syslin(dom,A,B1,C1,D11);
P12=syslin(dom,A,B2,C1,D12);
P21=syslin(dom,A,B1,C2,D21);
P22=syslin(dom,A,B2,C2,D22);