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
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
|
scicos_ver = "scicos2.7.3"
scs_m=scicos_diagram()
scs_m.props=tlist(..
["params","wpar","title","tol","tf","context","void1","options","void2","void3",..
"doc"],[600.456,442.4,-1.1167513,117.91139,540,405],..
["Controller","/usr/local/src/scilab/demos/scicos/"],..
[0.0001;0.000001;1.000E-10;100001;0;0],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))'';";
"L=-ppol(A,B,-.7*ones(x0));";
"";
""],[],..
tlist(["scsopt","3D","Background","Link","ID","Cmap"],list(%t,33),[8,1],[1,5],..
list([5,0],[4,0]),[0.8,0.8,0.8]),[],[],[])
scs_m_1=scicos_diagram()
scs_m_1.props=tlist(..
["params","wpar","title","tol","tf","context","void1","options","void2","void3",..
"doc"],[600.456,450,-2.7794924,50.956177,437.4,328.05],"System",[0;0;0;0;0;0],..
100000," ",[],..
tlist(["scsopt","3D","Background","Link","ID","Cmap"],list(%t,33),[8,1],[1,5],..
list([5,0],[4,0]),[0.8,0.8,0.8]),[],[],list())
scs_m_1.objs(1)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein",..
"peout","gr_i","id","in_implicit","out_implicit"],..
[111.67513,242.65823],[60,40],%t,..
["A";"B";"eye(A)";"zeros(B)";"x0"],6,7,[],[],..
["txt=[''xd=Ax+Bu'';''y=Cx+Du''];";
"xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'');"],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate",..
"rpar","ipar","blocktype","firing","dep_ut","label","nzcross",..
"nmode","equations"],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]," ",0,0,list()),"CLSS_f",list())
scs_m_1.objs(2)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein",..
"peout","gr_i","id","in_implicit","out_implicit"],..
[272.08122,242.65823],[40,40],%t,"C",10,8,[],[],..
["[nin,nout]=(model.in,model.out);";
"if nin*nout==1 then gain=string(model.rpar),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'');"],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate",..
"rpar","ipar","blocktype","firing","dep_ut","label","nzcross",..
"nmode","equations"],"gain",3,2,[],[],[],[],[1;0;1;2;2;3],[],"c",..
[],[%t,%f]," ",0,0,list()),"GAIN_f",list())
scs_m_1.objs(3)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein",..
"peout","gr_i","id","in_implicit","out_implicit"],..
[356.34518,252.65823],[20,20],%t,"1",8,[],[],[],[],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate",..
"rpar","ipar","blocktype","firing","dep_ut","label","nzcross",..
"nmode","equations"],"output",-1,[],[],[],[],[],[],1,"c",[],..
[%f,%f]," ",0,0,list()),"OUT_f",list())
scs_m_1.objs(4)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein",..
"peout","gr_i","id","in_implicit","out_implicit"],..
[358.37563,165.18987],[20,20],%t,"2",11,[],[],[],[],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate",..
"rpar","ipar","blocktype","firing","dep_ut","label","nzcross",..
"nmode","equations"],"output",-1,[],[],[],[],[],[],2,"c",[],..
[%f,%f]," ",0,0,list()),"OUT_f",list())
scs_m_1.objs(5)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein",..
"peout","gr_i","id","in_implicit","out_implicit"],..
[30.456853,252.65823],[20,20],%t,"1",[],6,[],[],[],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate",..
"rpar","ipar","blocktype","firing","dep_ut","label","nzcross",..
"nmode","equations"],"input",[],-1,[],[],[],[],[],1,"c",[],..
[%f,%f]," ",0,0,list()),"IN_f",list())
scs_m_1.objs(6)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[50.456853;103.1037],[262.65823;262.65823]," ",[0,0],[1,1],..
[5,1,0],[1,1,1])
scs_m_1.objs(7)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[180.24656;211.02761],[262.65823;262.65823]," ",[0,0],[1,1],..
[1,1,0],[9,1,1])
scs_m_1.objs(8)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[320.65265;356.34518],[262.65823;262.65823]," ",[0,0],[1,1],..
[2,1,0],[3,1,1])
scs_m_1.objs(9)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein",..
"peout","gr_i","id","in_implicit","out_implicit"],..
[211.02761;262.65823],[0.3333333,0.3333333],%t,[],7,[10;11],[],..
[],[],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate",..
"rpar","ipar","blocktype","firing","dep_ut","label","nzcross",..
"nmode","equations"],"lsplit",-1,[-1;-1;-1],[],[],[],[],[],[],..
"c",[],[%t,%f]," ",0,0,list()),"SPLIT_f",list())
scs_m_1.objs(10)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[211.02761;263.50979],[262.65823;262.65823]," ",[0,0],[1,1],..
[9,1,0],[2,1,1])
scs_m_1.objs(11)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[211.02761;211.02761;358.37563],[262.65823;175.18987;175.18987],..
" ",[0,0],[1,1],[9,2,0],[4,1,1])
scs_m.objs(1)=mlist(..
["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout","gr_i","id",..
"in_implicit","out_implicit"],[164.46701,304.17722],[40,40],%t,[],25,[14;28],[],..
[],..
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)"],15),"",[],[]),mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar","ipar",..
"blocktype","firing","dep_ut","label","nzcross","nmode","equations"],..
"super",-1,[-1;-1],[],[],[]," ",scs_m_1,[],"h",[],[%f,%f],"",0,0,..
list()),"SUPER_f",[])
scs_m_1=scicos_diagram()
scs_m_1.props=tlist(..
["params","wpar","title","tol","tf","context","void1","options","void2","void3",..
"doc"],[600.456,450,0,0,486,364.5],"Observer",[0;0;0;0;0;0],100000," ",[],..
tlist(["scsopt","3D","Background","Link","ID","Cmap"],list(%t,33),[8,1],[1,5],..
list([5,0],[4,0]),[0.8,0.8,0.8]),[],[],list())
scs_m_1.objs(1)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein",..
"peout","gr_i","id","in_implicit","out_implicit"],..
[210.15228,213.03797],[60,40],%t,..
["A-K*C";"[B,K]";"eye(A)";"zeros([B,K])";"zeros(x0)"],7,8,[],[],..
["txt=[''xd=Ax+Bu'';''y=Cx+Du''];";
"xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'');"],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate",..
"rpar","ipar","blocktype","firing","dep_ut","label","nzcross",..
"nmode","equations"],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]," ",0,0,list()),..
"CLSS_f",list())
scs_m_1.objs(2)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein",..
"peout","gr_i","id","in_implicit","out_implicit"],..
[117.7665,213.03797],[40,40],%t,"2",[6;9],7,[],[],..
"xstringb(orig(1),orig(2),''Mux'',sz(1),sz(2),''fill'')","",[],..
[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate",..
"rpar","ipar","blocktype","firing","dep_ut","label","nzcross",..
"nmode","equations"],list("mux",1),[-1;-2],0,[],[],[],[],[],2,..
"c",[],[%t,%f]," ",0,0,list()),"MUX_f",list())
scs_m_1.objs(3)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein",..
"peout","gr_i","id","in_implicit","out_implicit"],..
[32.48731,229.70464],[20,20],%t,"1",[],6,[],[],[],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate",..
"rpar","ipar","blocktype","firing","dep_ut","label","nzcross",..
"nmode","equations"],"input",[],-1,[],[],[],[],[],1,"c",[],..
[%f,%f]," ",0,0,list()),"IN_f",list())
scs_m_1.objs(4)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein",..
"peout","gr_i","id","in_implicit","out_implicit"],..
[382.74112,223.03797],[20,20],%t,"1",8,[],[],[],[],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate",..
"rpar","ipar","blocktype","firing","dep_ut","label","nzcross",..
"nmode","equations"],"output",-1,[],[],[],[],[],[],1,"c",[],..
[%f,%f]," ",0,0,list()),"OUT_f",list())
scs_m_1.objs(5)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein",..
"peout","gr_i","id","in_implicit","out_implicit"],..
[31.472081,206.20253],[20,20],%t,"2",[],9,[],[],[],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate",..
"rpar","ipar","blocktype","firing","dep_ut","label","nzcross",..
"nmode","equations"],"input",[],-1,[],[],[],[],[],2,"c",[],..
[%f,%f]," ",0,0,list()),"IN_f",list())
scs_m_1.objs(6)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[52.48731;109.19507],[239.70464;239.70464]," ",[0,0],[1,1],..
[3,1,0],[2,1,1])
scs_m_1.objs(7)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[166.33793;201.58086],[233.03797;233.03797]," ",[0,0],[1,1],..
[2,1,0],[1,1,1])
scs_m_1.objs(8)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[278.72371;382.74112],[233.03797;233.03797]," ",[0,0],[1,1],..
[1,1,0],[4,1,1])
scs_m_1.objs(9)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[51.472081;82.233503;82.233503;109.19507],..
[216.20253;216.20253;226.37131;226.37131]," ",[0,0],[1,1],..
[5,1,0],[2,2,1])
scs_m.objs(2)=mlist(..
["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout","gr_i","id",..
"in_implicit","out_implicit"],[313.70558,317.51055],[40,40],%t,[],[23;15],24,[],..
[],..
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)"],15),"",[],[]),mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar","ipar",..
"blocktype","firing","dep_ut","label","nzcross","nmode","equations"],..
"super",[-1;-1],-1,[],[],[]," ",scs_m_1,[],"h",[],[%f,%f],"",0,0,..
list()),"SUPER_f",[])
scs_m.objs(3)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id","in_implicit","out_implicit"],[479.18782,258.77637],..
[40,40],%t,..
["1 3 5 7 9 11 13 15";"1";"[]";"[600;400]";"-3";"3";"30";"20";"0"],..
27,[],34,[],..
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)"],30),"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
"equations"],list("scope",1),-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;0],"c",[],[%t,%f]," ",0,0,..
list()),"SCOPE_f",list())
scs_m_1=scicos_diagram()
scs_m_1.props=tlist(..
["params","wpar","title","tol","tf","context","void1","options","void2","void3",..
"doc"],[600,450,0,0,600,450],"foo",[0;0;0;0;0;0],100000," ",[],..
tlist(["scsopt","3D","Background","Link","ID","Cmap"],list(%t,33),[8,1],[1,5],..
list([5,0],[4,0]),[0.8,0.8,0.8]),[],[],[])
scs_m_1.objs(1)=mlist("Deleted")
scs_m_1.objs(2)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein",..
"peout","gr_i","id","in_implicit","out_implicit"],[399,162],..
[20,20],%t,"1",[],[],6,[],[],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate",..
"rpar","ipar","blocktype","firing","dep_ut","label","nzcross",..
"nmode","equations"],"output",[],[],1,[],[],[],[],1,"d",[],..
[%f,%f]," ",0,0,list()),"CLKOUT_f",list())
scs_m_1.objs(3)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein",..
"peout","gr_i","id","in_implicit","out_implicit"],[320,232],..
[40,40],%t,["0.03";"0"],[],[],7,4,..
["dt=model.rpar;";
"txt=[''Delay'';string(dt)];";
"xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'');"],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate",..
"rpar","ipar","blocktype","firing","dep_ut","label","nzcross",..
"nmode","equations"],"evtdly",[],[],1,1,[],[],0.03,[],"d",0,..
[%f,%f]," ",0,0,list()),"EVTDLY_f",list())
scs_m_1.objs(4)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[340;340;380.71066],[226.28571;172;172]," ",[0,0],[5,-1],[3,1,0],..
[5,1,1])
scs_m_1.objs(5)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein",..
"peout","gr_i","id","in_implicit","out_implicit"],..
[380.71066;172],[1,1],%t," ",[],[],4,[6;7],[],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate",..
"rpar","ipar","blocktype","firing","dep_ut","label","nzcross",..
"nmode","equations"],"lsplit",[],[],1,[1;1],[],[],[],[],"d",..
[-1,-1],[%t,%f]," ",0,0,list()),"CLKSPLIT_f",list())
scs_m_1.objs(6)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[380.71066;399],[172;172]," ",[0,0],[5,-1],[5,1,0],[2,1,1])
scs_m_1.objs(7)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[380.71066;380.71066;340;340],[172;301.9943;301.9943;277.71429],..
" ",[0,0],[5,-1],[5,2,0],[3,1,1])
scs_m.objs(4)=mlist(..
["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout","gr_i","id",..
"in_implicit","out_implicit"],[479.18782,360],[40,40],%t,[],[],[],[],5,..
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);"],[]),"",[],[]),mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar","ipar",..
"blocktype","firing","dep_ut","label","nzcross","nmode","equations"],..
"csuper",[],[],[],1,[]," ",scs_m_1,[],"h",%f,[%f,%f],"",0,0,list()),..
"CLOCK_f",[])
scs_m.objs(5)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[499.18782;499.18782;499.18782],[354.28571;334.36709;334.36709],..
" ",[0,0],[5,-1],[4,1,0],[32,1,1])
scs_m.objs(6)=tlist(["Text","graphics","model","void","gui"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id"],[158.37563,360],[41.624365,15.949367],%t,..
["System";"2";"2"],[],[],[],[],[],""),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label"],"text",[],[],[],[],..
[],[],"System",[2;2],"c",[],[%f,%f],"")," ","TEXT_f")
scs_m.objs(7)=tlist(["Text","graphics","model","void","gui"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id"],[221.3198,334.93671],[7.106599,13.670886],%t,..
["y";"2";"1"],[],[],[],[],[],""),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label"],"text",[],[],[],[],..
[],[],"y",[2;1],"c",[],[%f,%f],"")," ","TEXT_f")
scs_m.objs(8)=tlist(["Text","graphics","model","void","gui"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id"],[218.27411,297.34177],[8.1218274,13.670886],%t,..
["x";"2";"1"],[],[],[],[],[],""),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label"],"text",[],[],[],[],..
[],[],"x",[2;1],"c",[],[%f,%f],"")," ","TEXT_f")
scs_m.objs(9)=tlist(["Text","graphics","model","void","gui"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id"],[98.477157,305.31646],[7.106599,13.670886],%t,..
["u";"2";"1"],[],[],[],[],[],""),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label"],"text",[],[],[],[],..
[],[],"u",[2;1],"c",[],[%f,%f],"")," ","TEXT_f")
scs_m.objs(10)=tlist(["Text","graphics","model","void","gui"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id"],[375.63452,340.63291],[25.380711,13.670886],%t,..
["est. x";"2";"1"],[],[],[],[],[],""),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label"],"text",[],[],[],[],..
[],[],"est. x",[2;1],"c",[],[%f,%f],"")," ","TEXT_f")
scs_m.objs(11)=tlist(["Text","graphics","model","void","gui"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id"],[457.12503,262.5626],[23.350254,13.670886],%t,..
["error";"2";"1"],[],[],[],[],[],""),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label"],"text",[],[],[],[],..
[],[],"error",[2;1],"c",[],[%f,%f],"")," ","TEXT_f")
scs_m.objs(12)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id","in_implicit","out_implicit"],[25.279188,201.07595],..
[60,40],%t,..
["1";
"zeros(size(B,''c'')+size(C,''r''),1)";
"[0.1*ones(size(B,''c''),1);0.1*ones(size(C,''r''),1)]"],[],36,33,..
[],..
list(..
["txt=[''random'';''generator''];";
"xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'')"],31),"",[],..
[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
"equations"],"rndblk",[],3,1,[],[],[0;0;0;0],..
[0;0;0;0.1;0.1;0.1;0],1,"d",[],[%f,%f]," ",0,0,list()),"RAND_f",..
list())
scs_m.objs(13)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id","in_implicit","out_implicit"],[249.64467,322.51055],..
[16.666667,16.666667],%t,"[1;1;1]",[38;14;0],15,[],[],[],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
"equations"],list("plusblk",2),[-1;-1;-1],-1,[],[],[],[],[],[],..
"c",[],[%t,%f]," ",0,0,list()),"SUM_f",list())
scs_m.objs(14)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[213.03843;249.64467],[330.84388;330.84388]," ",[0,0],[1,1],..
[1,1,0],[13,2,1])
scs_m.objs(15)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[263.16493;305.13416],[330.84388;330.84388]," ",[0,0],[1,1],..
[13,1,0],[2,2,1])
scs_m.objs(16)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id","in_implicit","out_implicit"],[116.64975,315.84388],..
[16.666667,16.666667],%t,"[1;1;1]",[37;22;0],25,[],[],[],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
"equations"],list("plusblk",2),[-1;-1;-1],-1,[],[],[],[],[],[],..
"c",[],[%t,%f]," ",0,0,list()),"SUM_f",list())
scs_m.objs(17)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id","in_implicit","out_implicit"],[172.48731,436.89873],..
[40,40],%f,"L",30,19,[],[],..
["[nin,nout]=(model.in,model.out);";
"if nin*nout==1 then gain=string(model.rpar),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'');"],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
"equations"],"gain",3,1,[],[],[],[],..
[-0.0041585;-0.1489701;-0.4993004],[],"c",[],[%t,%f]," ",0,0,..
list()),"GAIN_f",list())
scs_m.objs(18)=tlist(["Text","graphics","model","void","gui"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id"],[305.48223,368.5443],[50.761421,15.949367],%t,..
["Observer";"2";"2"],[],[],[],[],[],""),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label"],"text",[],[],[],[],..
[],[],"Observer",[2;2],"c",[],[%f,%f],"")," ","TEXT_f")
scs_m.objs(19)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[163.91588;103.45178;103.45178],[456.89873;456.89873;395.88607],..
" ",[0,0],[1,1],[17,1,0],[21,1,1])
scs_m.objs(20)=tlist(["Text","graphics","model","void","gui"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id"],[83.857868,469.59493],[77.15736,15.949367],%t,..
["Feedback gain";"2";"2"],[],[],[],[],[],""),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label"],"text",[],[],[],[],..
[],[],"Feedback gain",[2;2],"c",[],[%f,%f],"")," ","TEXT_f")
scs_m.objs(21)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id","in_implicit","out_implicit"],[103.45178;395.88607],..
[0.3333333,0.3333333],%t,[],19,[22;23],[],[],[],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
"equations"],"lsplit",-1,[-1;-1;-1],[],[],[],[],[],[],"c",[],..
[%t,%f]," ",0,0,list()),"SPLIT_f",list())
scs_m.objs(22)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[103.45178;103.45178;116.64975],[395.88607;324.17722;324.17722],..
" ",[0,0],[1,1],[21,1,0],[16,2,1])
scs_m.objs(23)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[103.45178;268.93401;268.93401;305.13415],..
[395.88607;395.88607;344.17722;344.17722]," ",[0,0],[1,1],..
[21,2,0],[2,1,1])
scs_m.objs(24)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[362.27701;409.69795],[337.51055;337.51055]," ",[0,0],[1,1],..
[2,1,0],[29,1,1])
scs_m.objs(25)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[135.69737;155.89558],[324.17721;324.17722]," ",[0,0],[1,1],..
[16,1,0],[1,1,1])
scs_m.objs(26)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id","in_implicit","out_implicit"],[430.4473,263.77637],..
[20;30],%t,"[-1;1]",[31;28],27,[],[],..
list(..
["[x,y,typ]=standard_inputs(o) ";
"dd=sz(1)/8,de=0,";
"if ~arg1.graphics.flip then dd=6*sz(1)/8,de=-sz(1)/8,end";
"for k=1:size(x,''*'')";
"if size(sgn,1)>1 then";
" if sgn(k)>0 then";
" xstring(orig(1)+dd,y(k)-4,''+'')";
" else";
" xstring(orig(1)+dd,y(k)-4,''-'')";
" end";
"end";
"end";
"xx=sz(1)*[.8 .4 0.75 .4 .8]+orig(1)+de";
"yy=sz(2)*[.8 .8 .5 .2 .2]+orig(2)";
"xpoly(xx,yy,''lines'')"],8),"",["E";"E"],"E"),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
"equations"],list("summation",4),[-1;-1],-1,[],[],[],[],[],[-1;1],..
"c",[],[%t,%f],"",0,0,list()),"SUMMATION",list())
scs_m.objs(27)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[459.01873;470.61639],[278.77637;278.77637]," ",[0,0],[1,1],..
[26,1,0],[3,1,1])
scs_m.objs(28)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[213.03844;245.18524;245.18524;421.87587],..
[317.51055;317.51055;273.77637;273.77637]," ",[0,0],[1,1],[1,2,0],..
[26,2,1])
scs_m.objs(29)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id","in_implicit","out_implicit"],[409.69795;337.51055],..
[0.3333333,0.3333333],%t,[],24,[30;31],[],[],[],"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
"equations"],"lsplit",-1,[-1;-1;-1],[],[],[],[],[],[],"c",[],..
[%t,%f]," ",0,0,list()),"SPLIT_f",list())
scs_m.objs(30)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[409.69795;410.05076;410.05076;218.2016],..
[337.51055;337.51055;456.89873;456.89873]," ",[0,0],[1,1],..
[29,1,0],[17,1,1])
scs_m.objs(31)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[409.69795;409.69795;421.87587],[337.51055;283.77637;283.77637],..
" ",[0,0],[1,1],[29,2,0],[26,1,1])
scs_m.objs(32)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id","in_implicit","out_implicit"],[499.18782,334.36709],..
[0.3333333,0.3333333],%t,[],[],[],5,[33;34],list([],8),"",[],[]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
"equations"],"split",[],[],1,[1;1],[],[],[],[],"d",[%f,%f,%f],..
[%f,%f],"",0,0,list()),"CLKSPLIT_f",list())
scs_m.objs(33)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[499.18782;439.49239;439.49239;55.736041;55.736041;55.279188;
55.279188],..
[334.36709;334.36709;410.6962;410.6962;284.24051;284.24051;
246.79024]," ",[0,0],[5,-1],[32,1,0],[12,1,1])
scs_m.objs(34)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[499.18782;499.18782],[334.36709;304.49066],"drawlink",[0,0],..
[5,-1],[32,2,0],[3,1,1])
scs_m.objs(35)=mlist(["Block","graphics","model","gui","doc"],..
mlist(..
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
"gr_i","id","in_implicit","out_implicit"],[148.84898,201.07595],..
[10,40],%t,"2",36,[37;38],[],[],list("",8),"Demux","E",["E";"E"]),..
mlist(..
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
"equations"],list("multiplex",4),0,[-1;-2],[],[],[],[],[],2,"c",..
[],[%t,%f],"",0,0,list()),"DEMUX",list())
scs_m.objs(36)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[93.850617;140.27755],[221.07595;221.07595],"drawlink",[0,0],..
[1,1],[12,1,0],[35,1,1])
scs_m.objs(37)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[167.42041;189.60663;189.60663;124.98308;124.98308],..
[227.74262;227.74262;272.93384;272.93384;315.84388],"drawlink",..
[0,0],[1,1],[35,1,0],[16,1,1])
scs_m.objs(38)=mlist(["Link","xx","yy","id","thick","ct","from","to"],..
[167.42041;257.978;257.978],[214.40928;214.40928;322.51055],..
"drawlink",[0,0],[1,1],[35,2,0],[13,1,1])
|
