File: System-Observer.cosf

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 (309 lines) | stat: -rw-r--r-- 16,097 bytes parent folder | download
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
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
scicos_ver = 'scicos2.5.1'
scs_m=list()
scs_m(1)=list([600.456,434.56,-1.1167513,117.91139,540,405],..
['System-Observer','/usr/local/lib/scilab/demos/scicos/'],..
[0.0001;1.000D-06;1.000D-10;100001],29,..
['A=[-.3,3,1;0,0,2;0,0,0];B=[1;2;3];C=[1,1,2;0,2,3];D=0;x0=[-2;1;2]';
'K=ppol(A'',C'',-.7*ones(x0))'';';
emptystr()],list(),..
tlist(['scsopt','3D','Background','Link','ID','Cmap'],list(%t,1),18,[1,5],..
list([5,0],[4,0]),[0.8,0.8,0.8]),[],[],[])
scs_m_1=list()
scs_m_1(1)=list([600,450,0,0,600,450],'System',[],[],' ',list(),..
tlist(['scsopt','3D','Background','Link','ID','Cmap'],list(%t,30),[],[1,5],..
list([5,0],[4,0]),[0.8,0.8,0.8]),[],[],[])
scs_m_1(2)=list('Block',..
           list([111.67513,242.65823],[60,40],%t,..
           ['A';'B';'eye(A)';'zeros(B)';'x0'],7,8,[],[],..
           ['txt=[''xd=Ax+Bu'';''y=Cx+Du''];';
           'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'');']),..
           list(list('csslti',1),1,3,[],[],[-2;1;2],[],..
           [-0.3;0;0;3;0;0;1;2;0;1;2;3;1;0;0;0;1;0;0;0;1;0;0;0],[],'c',[],..
           [%f,%t],' ',list()),' ','CLSS_f')
scs_m_1(3)=list('Block',..
           list([272.08122,242.65823],[40,40],%t,'C',11,9,[],[],..
           ['[nin,nout]=model(2:3);';
           'if nin*nout==1 then gain=string(model(8)),else gain=''Gain'',end';
           'dx=sz(1)/5;';
           'dy=sz(2)/10;';
           'xx=orig(1)+      [1 4 1 1]*dx;';
           'yy=orig(2)+sz(2)-[1 5 9 1]*dy;';
           'xpoly(xx,yy,''lines'');';
           'w=sz(1)-2*dx;h=sz(2)-2*dy;';
           'xstringb(orig(1)+dx,orig(2)+dy,gain,w,h,''fill'');']),..
           list('gain',3,2,[],[],[],[],[1;0;1;2;2;3],[],'c',[],[%t,%f],' ',..
           list()),' ','GAIN_f')
scs_m_1(4)=list('Block',list([356.34518,252.65823],[20,20],%t,'1',9,[],[],[],[]),..
           list('output',-1,[],[],[],[],[],[],1,'c',[],[%f,%f],' ',list()),' ',..
           'OUT_f')
scs_m_1(5)=list('Block',..
           list([358.37563,165.18987],[20,20],%t,'2',12,[],[],[],[]),..
           list('output',-1,[],[],[],[],[],[],2,'c',[],[%f,%f],' ',list()),' ',..
           'OUT_f')
scs_m_1(6)=list('Block',list([30.456853,252.65823],[20,20],%t,'1',[],7,[],[],[]),..
           list('input',[],-1,[],[],[],[],[],1,'c',[],[%f,%f],' ',list()),' ',..
           'IN_f')
scs_m_1(7)=list('Link',[50.456853;103.1037],[262.65823;262.65823],'drawlink',' ',..
           [0,0],[1,1],[6,1],[2,1])
scs_m_1(8)=list('Link',[180.24656;225.38071],[262.65823;262.65823],'drawlink',..
           ' ',[0,0],[1,1],[2,1],[10,1])
scs_m_1(9)=list('Link',[320.65265;356.34518],[262.65823;262.65823],'drawlink',..
           ' ',[0,0],[1,1],[3,1],[4,1])
scs_m_1(10)=list('Block',..
            list([225.38071;262.65823],[1,1],%t,' ',8,[11;12],[],[]),..
            list('lsplit',1,[1;1],[],[],[],[],[],[],'c',[],[%t,%f],' ',list()),..
            ' ','SPLIT_f')
scs_m_1(11)=list('Link',[225.38071;263.50979],[262.65823;262.65823],'drawlink',..
            ' ',[0,0],[1,1],[10,1],[3,1])
scs_m_1(12)=list('Link',[225.38071;225.38071;358.37563],..
            [262.65823;175.18987;175.18987],'drawlink',' ',[0,0],[1,1],[10,2],..
            [5,1])
scs_m(2)=list('Block',..
         list([164.46701,304.17722],[40,40],%t,[],20,[16;30],[],[],..
         list(..
         ['thick=xget(''thickness'');xset(''thickness'',2);';
         'xx=orig(1)+      [2 4 4]*(sz(1)/7);';
         'yy=orig(2)+sz(2)-[2 2 6]*(sz(2)/10);';
         'xrects([xx;yy;[sz(1)/7;sz(2)/5]*ones(1,3)]);';
         'xx=orig(1)+      [1 2 3 4 5 6 3.5 3.5 3.5 4 5 5.5 5.5 5.5]*sz(1)/7;';
         'yy=orig(2)+sz(2)-[3 3 3 3 3 3 3   7   7   7 7 7   7   3  ]*sz(2)/10;';
         'xsegs(xx,yy,0);';
         'xset(''thickness'',thick)'],6)),list('super',-1,[-1;-1],[],[],[],' ',..
scs_m_1,[],'h',[],[%f,%f]),' ','SUPER_f')
scs_m_1=list()
scs_m_1(1)=list([600.456,442.4,0,0,600,450],'Observer',[],[],' ',list(),..
tlist(['scsopt','3D','Background','Link','ID','Cmap'],list(%t,1),4,[1,5],..
list([5,0],[4,0]),[0.8,0.8,0.8]),[],[],list())
scs_m_1(2)=list('Block',..
           list([210.15228,213.03797],[60,40],%t,..
           ['A-K*C';'[B,K]';'eye(A)';'zeros([B,K])';'zeros(x0)'],8,9,[],[],..
           list(..
           ['txt=[''xd=Ax+Bu'';''y=Cx+Du''];';
           'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'');'],3)),..
           list(list('csslti',1),3,3,[],[],[0;0;0],[],..
           [-0.4834511;-0.0556004;-0.0409687;2.9436631;-1.241927;-0.2360917;
           0.8237691;0.1093093;-0.3746219;1;2;3;0.1834511;0.0556004;0.0409687;
           -0.0635571;0.5931633;0.0975615;1;0;0;0;1;0;0;0;1;0;0;0;0;0;0;0;0;0],..
           [],'c',[],[%f,%t],' ',list()),' ','CLSS_f')
scs_m_1(3)=list('Block',..
           list([117.7665,213.03797],[40,40],%t,'2',[7;10],8,[],[],..
           list('xstringb(orig(1),orig(2),''Mux'',sz(1),sz(2),''fill'')',5)),..
           list(list('mux',1),[-1;-2],0,[],[],[],[],[],2,'c',[],[%t,%f],' ',..
           list()),' ','MUX_f')
scs_m_1(4)=list('Block',list([32.48731,229.70464],[20,20],%t,'1',[],7,[],[],[]),..
           list('input',[],-1,[],[],[],[],[],1,'c',[],[%f,%f],' ',list()),' ',..
           'IN_f')
scs_m_1(5)=list('Block',list([382.74112,223.03797],[20,20],%t,'1',9,[],[],[],[]),..
           list('output',-1,[],[],[],[],[],[],1,'c',[],[%f,%f],' ',list()),' ',..
           'OUT_f')
scs_m_1(6)=list('Block',..
           list([31.472081,206.20253],[20,20],%t,'2',[],10,[],[],[]),..
           list('input',[],-1,[],[],[],[],[],2,'c',[],[%f,%f],' ',list()),' ',..
           'IN_f')
scs_m_1(7)=list('Link',[52.48731;109.19507],[239.70464;239.70464],'drawlink',' ',..
           [0,0],[1,1],[4,1],[3,1])
scs_m_1(8)=list('Link',[166.33793;201.58086],[233.03797;233.03797],'drawlink',..
           ' ',[0,0],[1,1],[3,1],[2,1])
scs_m_1(9)=list('Link',[278.72371;382.74112],[233.03797;233.03797],'drawlink',..
           ' ',[0,0],[1,1],[2,1],[5,1])
scs_m_1(10)=list('Link',[51.472081;82.233503;82.233503;109.19507],..
            [216.20253;216.20253;226.37131;226.37131],'drawlink',' ',[0,0],[1,1],..
            [6,1],[3,2])
scs_m(3)=list('Block',..
         list([313.70558,317.51055],[40,40],%t,[],[27;17],29,[],[],..
         list(..
         ['thick=xget(''thickness'');xset(''thickness'',2);';
         'xx=orig(1)+      [2 4 4]*(sz(1)/7);';
         'yy=orig(2)+sz(2)-[2 2 6]*(sz(2)/10);';
         'xrects([xx;yy;[sz(1)/7;sz(2)/5]*ones(1,3)]);';
         'xx=orig(1)+      [1 2 3 4 5 6 3.5 3.5 3.5 4 5 5.5 5.5 5.5]*sz(1)/7;';
         'yy=orig(2)+sz(2)-[3 3 3 3 3 3 3   7   7   7 7 7   7   3  ]*sz(2)/10;';
         'xsegs(xx,yy,0);';
         'xset(''thickness'',thick)'],6)),list('super',[-1;-1],-1,[],[],[],' ',..
scs_m_1,[],'h',[],[%f,%f]),' ','SUPER_f')
scs_m(4)=list('Block',..
         list([479.18782,253.77637],[40,40],%t,..
         ['1 3 5 7 9 11 13 15';'1';'[]';'[600;400]';'-3';'3';'30';'20';'1'],31,..
         [],[],[],..
         list(..
         ['thick=xget(''thickness'');xset(''thickness'',2);';
         'xrect(orig(1)+sz(1)/10,orig(2)+(1-1/10)*sz(2),sz(1)*8/10,sz(2)*8/10);';
         'xx=[orig(1)+sz(1)/5,orig(1)+sz(1)/5;';
         'orig(1)+(1-1/5)*sz(1),orig(1)+sz(1)/5];';
         'yy=[orig(2)+sz(2)/5,orig(2)+sz(2)/5;';
         'orig(2)+sz(2)/5,orig(2)+(1-1/5)*sz(2)];';
         'xarrows(xx,yy);';
         't=(0:0.3:2*%pi)'';';
         'xx=orig(1)+(1/5+3*t/(10*%pi))*sz(1);';
         'yy=orig(2)+(1/4.3+(sin(t)+1)*3/10)*sz(2);';
         'xpoly(xx,yy,''lines'');';
         'xset(''thickness'',thick)'],32)),..
         list(list('scope',1),-1,[],[],[],[],..
         [-1;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;
         0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;
         0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;
         0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;
         0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;
         0;0;0;0;0;0;0],[0;-3;3;30],[1;1;20;1;3;5;7;9;11;13;15;-1;-1;600;400;1],..
         'c',[],[%t,%f],' ',list()),' ','SCOPE_f')
scs_m_1=list()
scs_m_1(1)=list([600,450,0,0,600,450],'foo',[],[],' ',list(),..
tlist(['scsopt','3D','Background','Link','ID','Cmap'],list(%t,30),[],[1,5],..
list([5,0],[4,0]),[0.8,0.8,0.8]),[],[],[])
scs_m_1(2)=list('Block',list([399,162],[20,20],%t,'1',[],[],6,[],[]),..
           list('output',[],[],1,[],[],[],[],1,'d',[],[%f,%f],' ',list()),' ',..
           'CLKOUT_f')
scs_m_1(3)=list('Block',..
           list([320,232],[40,40],%t,['0.03';'0'],[],[],7,4,..
           ['dt=model(8);';
           'txt=[''Delay'';string(dt)];';
           'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'');']),..
           list('evtdly',[],[],1,1,[],[],0.03,[],'d',0,[%f,%f],' ',list()),' ',..
           'EVTDLY_f')
scs_m_1(4)=list('Link',[340;340;380.71066],[226.28571;172;172],'drawlink',' ',..
           [0,0],[5,-1],[3,1],[5,1])
scs_m_1(5)=list('Block',list([380.71066;172],[1,1],%t,' ',[],[],4,[6;7]),..
           list('lsplit',[],[],1,[1;1],[],[],[],[],'d',[-1,-1],[%t,%f],' ',..
           list()),' ','CLKSPLIT_f')
scs_m_1(6)=list('Link',[380.71066;399],[172;172],'drawlink',' ',[0,0],[5,-1],..
           [5,1],[2,1])
scs_m_1(7)=list('Link',[380.71066;380.71066;340;340],..
           [172;301.9943;301.9943;277.71429],'drawlink',' ',[0,0],[5,-1],[5,2],..
           [3,1])
scs_m(5)=list('Block',..
         list([479.18782,360],[40,40],%t,[],[],[],[],6,..
         list(..
         ['wd=xget(''wdim'').*[1.016,1.12];';
         'thick=xget(''thickness'');xset(''thickness'',2);';
         'p=wd(2)/wd(1);p=1;';
         'rx=sz(1)*p/2;ry=sz(2)/2;';
         'xarcs([orig(1)+0.05*sz(1);';
         'orig(2)+0.95*sz(2);';
         '   0.9*sz(1)*p;';
         '   0.9*sz(2);';
         '   0;';
         '   360*64],scs_color(5));';
         'xset(''thickness'',1);';
         'xx=[orig(1)+rx    orig(1)+rx;';
         '    orig(1)+rx    orig(1)+rx+0.6*rx*cos(%pi/6)];';
         'yy=[orig(2)+ry    orig(2)+ry ;';
         '  orig(2)+1.8*ry  orig(2)+ry+0.6*ry*sin(%pi/6)];';
         'xsegs(xx,yy,scs_color(10));';
         'xset(''thickness'',thick);'],4)),list('csuper',[],[],[],1,[],' ',..
scs_m_1,[],'h',%f,[%f,%f]),' ','CLOCK_f')
scs_m(6)=list('Link',..
         [499.18782;499.18782;481.11675;439.49239;439.49239;8.0203046;8.0203046;
         55.279188;55.279188],..
         [354.28571;334.36709;334.36709;334.36709;410.6962;410.6962;284.24051;
         284.24051;246.79024],'drawlink',' ',[0,0],[5,-1],[5,1],[14,1])
scs_m(7)=list('Block',..
         list([28.426396,304.17722],[60,40],%t,['1';'1';'0'],[],19,[],[],..
         list(..
         ['txt=[''sinusoid'';''generator''];';
         'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'');'],30)),..
         list('gensin',[],1,[],[],[],[],[1;1;0],[],'c',[],[%f,%t],' ',list()),..
         ' ','GENSIN_f')
scs_m(8)=list('Text',..
         list([158.37563,360],[41.624365,15.949367],%t,['System';'2';'2'],[],[],..
         [],[],[]),..
         list('text',[],[],[],[],[],[],'System',[2;2],'c',[],[%f,%f],' ',list()),..
         ' ','TEXT_f')
scs_m(9)=list('Text',..
         list([221.3198,334.93671],[7.106599,13.670886],%t,['y';'2';'1'],[],[],..
         [],[],[]),..
         list('text',[],[],[],[],[],[],'y',[2;1],'c',[],[%f,%f],' ',list()),' ',..
         'TEXT_f')
scs_m(10)=list('Text',..
          list([218.27411,297.34177],[8.1218274,13.670886],%t,['x';'2';'1'],[],..
          [],[],[],[]),..
          list('text',[],[],[],[],[],[],'x',[2;1],'c',[],[%f,%f],' ',list()),' ',..
          'TEXT_f')
scs_m(11)=list('Text',..
          list([98.477157,305.31646],[7.106599,13.670886],%t,['u';'2';'1'],[],[],..
          [],[],[]),..
          list('text',[],[],[],[],[],[],'u',[2;1],'c',[],[%f,%f],' ',list()),' ',..
          'TEXT_f')
scs_m(12)=list('Text',..
          list([375.63452,340.63291],[25.380711,13.670886],%t,['est. x';'2';'1'],..
          [],[],[],[],[]),..
          list('text',[],[],[],[],[],[],'est. x',[2;1],'c',[],[%f,%f],' ',list()),..
          ' ','TEXT_f')
scs_m(13)=list('Text',..
          list([436.95652,255.79982],[23.350254,13.670886],%t,['error';'2';'1'],..
          [],[],[],[],[]),..
          list('text',[],[],[],[],[],[],'error',[2;1],'c',[],[%f,%f],' ',list()),..
          ' ','TEXT_f')
scs_m(14)=list('Block',..
          list([25.279188,201.07595],[60,40],%t,..
          ['1';'zeros([0;C(:,1)])';'[.1*ones(C(:,1));0.1]'],[],24,6,[],..
          list(..
          ['txt=[''random'';''generator''];';
          'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'')'],32)),..
          list('rndblk',[],3,1,[],[],[0;0;0;0],[0;0;0;0.1;0.1;0.1;0],1,'d',[],..
          [%f,%f],' ',list()),' ','RAND_f')
scs_m(15)=list('Block',..
          list([249.64467,322.51055],[16.666667,16.666667],%t,'[1;1;1]',..
          [23;16;0],17,[],[],[]),..
          list(list('plusblk',2),[-1;-1;-1],-1,[],[],[],[],[],[],'c',[],[%t,%f],..
          ' ',list()),' ','SUM_f')
scs_m(16)=list('Link',[213.03843;249.64467],[330.84388;330.84388],'drawlink',' ',..
          [0,0],[1,1],[2,1],[15,2])
scs_m(17)=list('Link',[263.16493;305.13416],[330.84388;330.84388],'drawlink',' ',..
          [0,0],[1,1],[15,1],[3,2])
scs_m(18)=list('Block',..
          list([116.64975,315.84388],[16.666667,16.666667],%t,'[1;1;1]',..
          [22;26;0],20,[],[],[]),..
          list(list('plusblk',2),[-1;-1;-1],-1,[],[],[],[],[],[],'c',[],[%t,%f],..
          ' ',list()),' ','SUM_f')
scs_m(19)=list('Link',[96.997825;106.49746],[324.17722;324.17722],'drawlink',' ',..
          [0,0],[1,1],[7,1],[25,1])
scs_m(20)=list('Link',[130.17001;155.89558],[324.17722;324.17722],'drawlink',' ',..
          [0,0],[1,1],[18,1],[2,1])
scs_m(21)=list('Block',..
          list([135.93909,201.07595],[40,40],%t,'2',24,[22;23],[],[],..
          list('xstringb(orig(1),orig(2),''Demux'',sz(1),sz(2),''fill'')',31)),..
          list(list('demux',1),0,[-1;-2],[],[],[],[],[],2,'c',[],[%t,%f],' ',..
          list()),' ','DEMUX_f')
scs_m(22)=list('Link',[184.51051;196.85279;196.85279;122.2194;122.2194],..
          [227.74262;227.74262;272.8481;272.8481;315.84388],'drawlink',' ',[0,0],..
          [1,1],[21,1],[18,1])
scs_m(23)=list('Link',[184.51051;255.21433;255.21433],..
          [214.40928;214.40928;322.51055],'drawlink',' ',[0,0],[1,1],[21,2],..
          [15,1])
scs_m(24)=list('Link',[93.850616;127.36766],[221.07595;221.07595],'drawlink',' ',..
          [0,0],[1,1],[14,1],[21,1])
scs_m(25)=list('Block',..
          list([106.49746;324.17722],[0.3333333,0.3333333],%t,[],19,[26;27],[],..
          [],[]),..
          list('lsplit',-1,[-1;-1;-1],[],[],[],[],[],[],'c',[],[%t,%f],' ',..
          list()),' ','SPLIT_f')
scs_m(26)=list('Link',[106.49746;116.64975],[324.17722;324.17722],'drawlink',' ',..
          [0,0],[1,1],[25,1],[18,2])
scs_m(27)=list('Link',[106.49746;106.49746;290.25381;290.25381;305.13415],..
          [324.17722;394.74683;394.74683;344.17722;344.17722],'drawlink',' ',..
          [0,0],[1,1],[25,2],[3,1])
scs_m(28)=list('Block',..
          list([394.72964,258.77637],[20;30],%t,'[1;-1]',[29;30],31,[],[],..
          list(..
          ['[x,y,typ]=standard_inputs(o) ';
          'sgn=o(3)(8)';
          'for k=1:size(x,''*'')';
          '  if sgn(k)>0 then';
          '    xstring(orig(1)+sz(1)/8 ,y(k)-4,''+'')';
          '  else';
          '    xstring(orig(1)+sz(1)/8 ,y(k)-4,''-'')';
          '  end';
          'end';
          'xx=sz(1)*[.8 .4 0.75 .4 .8]+orig(1)';
          'yy=sz(2)*[.8 .8 .5 .2 .2]+orig(2)';
          'xpoly(xx,yy,''lines'')'],32)),..
          list(list('sum',2),[-1;-1],-1,[],[],[],[],[1;-1],[],'c',[],[%t,%f],' ',..
          list()),' ','BIGSOM_f')
scs_m(29)=list('Link',[362.27701;380.65402;380.65402;386.15821],..
          [337.51055;337.51055;278.77637;278.77637],'drawlink',' ',[0,0],[1,1],..
          [3,1],[28,1])
scs_m(30)=list('Link',[213.03844;239.89774;239.89774;386.15821],..
          [317.51055;317.51055;268.77637;268.77637],'drawlink',' ',[0,0],[1,1],..
          [2,2],[28,2])
scs_m(31)=list('Link',[423.30107;470.61639],[273.77637;273.77637],'drawlink',' ',..
          [0,0],[1,1],[28,1],[4,1])