1
scicos_ver = 'scicos2.4'
3
scs_m(1)=list([449,443,0,0,450,450],..
4
['Non_linear','/usr/local/lib/scilab-2.4.1/macros/scicos/'],[],[],' ',list(),..
5
tlist(['scsopt','3D','Background','Link','ID','Cmap'],list(%t,33),[8,1],[1,5],..
6
list([5,0],[4,0]),[ .8, .8, .8]),[],[],[])
7
scs_m(2)=list('Block',..
8
list([39.593909,354.3038],[40,40],%t,['0.1';'1'],0,0,[],[],..
9
['thick=xget(''thickness'');xset(''thickness'',2);';
10
'xx=orig(1)+[1;2;2;3;3;4;4]/5*sz(1);';
11
'yy= orig(2)+[1;1;2;2;3;3;4]/5*sz(2);';
12
'xpoly(xx,yy,''lines'');';
13
'xset(''thickness'',thick);']),..
14
list('qzrnd',-1,-1,[],[],[],[], .1,1,'c',[],[%t,%f],' ',list()),' ',..
16
scs_m(3)=list('Block',..
17
list([39.593909,266.58228],[40,40],%t,['-1';'1';'1'],0,0,[],[],..
18
['thick=xget(''thickness'');xset(''thickness'',2);';
19
'xx=orig(1)+[4/5;1/2+1/5;1/2-1/5;1/5]*sz(1);';
20
'yy=orig(2)+[1-1/5;1-1/5;1/5;1/5]*sz(2);';
21
'xpoly(xx,yy,''lines'');';
22
'xset(''thickness'',thick)']),..
23
list('lusat',1,1,[],[],[],[],[-1;1;1],[],'c',[],[%t,%f],' ',list()),' ',..
25
scs_m(4)=list('Block',..
26
list([31.472081,43.565401],[16.666667,16.666667],%t,[],[0;0],0,[],[],[]),..
27
list(list('prod',2),[-1;-1],-1,[],[],[],[],[],[],'c',[],[%t,%f],' ',..
29
scs_m(5)=list('Block',..
30
list([39.593909,108.22785],[40,40],%t,'3',0,0,[],[],..
32
['puiss=arg1(2)(4)(1)';
34
'xstringb(orig(1),orig(2),puiss,sz(1),sz(2),''fill'');';
36
list('expblk',-1,-1,[],[],[],[],3,[],'c',[],[%t,%f],' ',list()),' ',..
38
scs_m(6)=list('Block',..
39
list([144.16244,354.3038],[40,40],%t,' ',0,0,[],[],..
40
'xstringb(orig(1),orig(2),''sin'',sz(1),sz(2),''fill'')'),..
41
list('sinblk',-1,-1,[],[],[],[],[],[],'c',[],[%t,%f],' ',list()),' ',..
43
scs_m(7)=list('Block',..
44
list([144.16244,266.58228],[40,40],%t,' ',0,0,[],[],..
45
'xstringb(orig(1),orig(2),[''cos''],sz(1),sz(2),''fill'');'),..
46
list('cosblk',-1,-1,[],[],[],[],[],[],'c',[],[%t,%f],' ',list()),' ',..
48
scs_m(8)=list('Block',..
49
list([144.16244,191.39241],[40,40],%t,'-1',0,0,[],[],..
50
'xstringb(orig(1),orig(2),''tan'',sz(1),sz(2),''fill'');'),..
51
list('tanblk',-1,-1,[],[],[],[],[],[],'c',[],[%t,%f],' ',list()),' ',..
53
scs_m(9)=list('Block',..
54
list([144.16244,108.22785],[40,40],%t,' ',0,0,[],[],..
55
'xstringb(orig(1),orig(2),''1/u'',sz(1),sz(2),''fill'');'),..
56
list('invblk',-1,-1,[],[],[],[],[],[],'c',[],[%t,%f],' ',list()),' ',..
58
scs_m(10)=list('Block',..
59
list([237.56345,354.3038],[40,40],%t,'%e',0,0,[],[],..
60
'xstringb(orig(1),orig(2),''Log'',sz(1),sz(2),''fill'');'),..
61
list('logblk',-1,-1,[],[],[],[],2.7182818,[],'c',[],[%t,%f],' ',list()),..
63
scs_m(11)=list('Block',..
64
list([144.16244,31.898734],[40,40],%t,'3',0,0,[],[],..
66
['puiss=arg1(2)(4)(1)';
67
'if evstr(puiss)==.5 then ';
72
'xstringb(orig(1),orig(2),puiss,sz(1),sz(2),''fill'');'],[])),..
73
list('powblk',-1,-1,[],[],[],[],[],3,'c',[],[%t,%f],' ',list()),' ',..
75
scs_m(12)=list('Block',..
76
list([237.56345,266.58228],[40,40],%t,' ',0,0,[],[],..
77
'xstringb(orig(1),orig(2),''Abs'',sz(1),sz(2),''fill'')'),..
78
list(list('absblk',1),-1,-1,[],[],[],[],[],[],'c',[],[%t,%f],' ',..
79
list()),' ','ABSBLK_f')
80
scs_m(13)=list('Block',..
81
list([39.593909,191.39241],[40,40],%t,[],0,0,[],[],..
82
['rpar=model(8);n=size(rpar,''*'')/2;';
83
'thick=xget(''thickness'');xset(''thickness'',2);';
84
'xx=rpar(1:n);yy=rpar(n+1:2*n);';
85
'mnx=mini(xx);xx=xx-mnx*ones(xx);mxx=maxi(xx);';
86
'xx=orig(1)+sz(1)*(1/10+(4/5)*xx/mxx);';
87
'mnx=mini(yy);yy=yy-mnx*ones(yy);mxx=maxi(yy);';
88
'yy=orig(2)+sz(2)*(1/10+(4/5)*yy/mxx);';
89
'xpoly(xx,yy,''lines'');';
90
'xset(''thickness'',thick);']),..
91
list('lookup',1,1,[],[],[],[],[-2;-1;1;2;-1;1;-1;1],[],'c',[],[%t,%f],..
92
' ',list()),' ','LOOKUP_f')
93
scs_m(14)=list('Block',..
94
list([237.56345,191.39241],[40,40],%t,'-1',0,0,[],[],..
95
'xstringb(orig(1),orig(2),''MIN'',sz(1),sz(2),''fill'')'),..
96
list('minblk',-1,1,[],[],[],[0;0],[],[],'c',[],[%t,%f],' ',list()),' ',..
98
scs_m(15)=list('Block',..
99
list([237.56345,108.22785],[40,40],%t,' ',0,0,[],[],..
100
'xstringb(orig(1),orig(2),''Max'',sz(1),sz(2),''fill'');'),..
101
list('maxblk',-1,1,[],[],[],[0;0],[],[],'c',[],[%t,%f],' ',list()),' ',..
103
scs_m(16)=list('Block',..
104
list([237.56345,31.898734],[40;50],%t,..
107
'[0.2+%i*0.8,0.2-%i*0.8;0.3+%i*0.7,0.3-%i*0.7]';
110
'[0;0]'],[0;0],0,0,[],..
111
['txt=[''N(z,p)'';''-----'';''D(z,p)''];';
112
'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'');']),..
113
list('dlradp',[1;1],1,1,[],[],[0;0],..
114
[0;1; .2; .3; .2; .3; .8; .7; -.8; -.7;1;1],[0;2;2],'d',[],[%t,%f],' ',..
115
list()),' ','DLRADAPT_f')
116
scs_m(17)=list('Block',..
117
list([314.59276,353.16456],[40,40],%t,['[0;1]';'[0;1]'],0,0,[],[],..
118
'xstringb(orig(1),orig(2),''interp'',sz(1),sz(2),''fill'');'),..
119
list('intrpl',1,1,[],[],[],[],[0;1;0;1],[],'c',[],[%t,%f],' ',list()),..
121
scs_m(18)=list('Block',..
122
list([307.78781,267.72152],[60,40],%t,['[0;1]';'[0;1]';'[0;1]'],[0;0],..
123
0,[],[],'xstringb(orig(1),orig(2),''interp2'',sz(1),sz(2),''fill'');'),..
124
list(list('intrp2',1),[1;1],1,[],[],[],[],[0;1;0;1;0;1;1;2],[2;2],'c',..
125
[],[%t,%f],' ',list()),' ','INTRP2BLK_f')
1
scicos_ver = "scicos2.7.3"
4
["params","wpar","title","tol","tf","context","void1","options","void2","void3",..
5
"doc"],[600,450,0,0,600,450],["Non_linear","SCI/macros/scicos_blocks"],..
6
[0.0001,1.000E-06,1.000E-10,100001,0,0],100000,[],[],..
7
tlist(["scsopt","3D","Background","Link","ID","Cmap"],list(%t,33),[8,1],[1,5],..
8
list([5,1],[4,1]),[0.8,0.8,0.8]),[],[],list())
9
scs_m.objs(1)=mlist(["Block","graphics","model","gui","doc"],..
11
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
12
"gr_i","id","in_implicit","out_implicit"],[0,0],[40,40],%t,"1",0,0,..
16
"xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'')"],8),"","E",..
19
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
20
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
21
"equations"],list("absolute_value",4),-1,-1,[],[],[],[],[],[],"c",..
22
[],[%t,%f],"",-1,-1,list()),"ABS_VALUE",list())
23
scs_m.objs(2)=mlist(["Block","graphics","model","gui","doc"],..
25
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
26
"gr_i","id","in_implicit","out_implicit"],[70,0],[60,40],%t,"sin",..
29
"xstringb(orig(1),orig(2),[''Trig. Function'';Txt],sz(1),sz(2),''fill'');",..
32
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
33
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
34
"equations"],list("sin_blk",4),-1,-1,[],[],[],[],[],[],"c",[],..
35
[%t,%f],"",0,0,list()),"TrigFun",list())
36
scs_m.objs(3)=mlist(["Block","graphics","model","gui","doc"],..
38
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
39
"gr_i","id","in_implicit","out_implicit"],[160,0],[40,40],%t,"%e",..
41
list("xstringb(orig(1),orig(2),''a^u'',sz(1),sz(2),''fill'');",8),..
44
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
45
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
46
"equations"],"expblk",-1,-1,[],[],[],[],2.7182818,[],"c",[],..
47
[%t,%f],"",0,0,list()),"EXPBLK_f",list())
48
scs_m.objs(4)=mlist(["Block","graphics","model","gui","doc"],..
50
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
51
"gr_i","id","in_implicit","out_implicit"],[230,0],[60,40],%t,..
52
["[0;1]";"[0;1]";"[0,1;1,2]"],[0;0],0,[],[],..
54
"xstringb(orig(1),orig(2),''interp2'',sz(1),sz(2),''fill'');",8),..
57
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
58
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
59
"equations"],list("intrp2",1),[1;1],1,[],[],[],[],..
60
[0;1;0;1;0;1;1;2],[2;2],"c",[],[%t,%f],"",0,0,list()),..
62
scs_m.objs(5)=mlist(["Block","graphics","model","gui","doc"],..
64
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
65
"gr_i","id","in_implicit","out_implicit"],[320,0],[40,40],%t,..
66
["[0;1]";"[0;1]"],0,0,[],[],..
67
list("xstringb(orig(1),orig(2),''interp'',sz(1),sz(2),''fill'');",..
70
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
71
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
72
"equations"],"intrpl",1,1,[],[],[],[],[0;1;0;1],[],"c",[],[%t,%f],..
73
"",0,0,list()),"INTRPLBLK_f",list())
74
scs_m.objs(6)=mlist(["Block","graphics","model","gui","doc"],..
76
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
77
"gr_i","id","in_implicit","out_implicit"],[390,0],[40,40],%t," ",0,..
79
list("xstringb(orig(1),orig(2),''1/u'',sz(1),sz(2),''fill'');",8),..
82
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
83
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
84
"equations"],"invblk",-1,-1,[],[],[],[],[],[],"c",[],[%t,%f],"",0,..
85
0,list()),"INVBLK_f",list())
86
scs_m.objs(7)=mlist(["Block","graphics","model","gui","doc"],..
88
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
89
"gr_i","id","in_implicit","out_implicit"],[0,70],[40,40],%t,"%e",0,..
91
list("xstringb(orig(1),orig(2),''Log'',sz(1),sz(2),''fill'');",8),..
94
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
95
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
96
"equations"],"logblk",-1,-1,[],[],[],[],2.7182818,[],"c",[],..
97
[%t,%f],"",0,0,list()),"LOGBLK_f",list())
98
scs_m.objs(8)=mlist(["Block","graphics","model","gui","doc"],..
100
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
101
"gr_i","id","in_implicit","out_implicit"],[70,70],[40,40],%t,[],0,..
104
["rpar=model.rpar;n=size(rpar,''*'')/2;";
105
"thick=xget(''thickness'');xset(''thickness'',2);";
106
"xx=rpar(1:n);yy=rpar(n+1:2*n);";
107
"mnx=mini(xx);xx=xx-mnx*ones(xx);mxx=maxi(xx);";
108
"xx=orig(1)+sz(1)*(1/10+(4/5)*xx/mxx);";
109
"mnx=mini(yy);yy=yy-mnx*ones(yy);mxx=maxi(yy);";
110
"yy=orig(2)+sz(2)*(1/10+(4/5)*yy/mxx);";
111
"xpoly(xx,yy,''lines'');";
112
"xset(''thickness'',thick);"],8),"","E","E"),..
114
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
115
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
116
"equations"],"lookup",1,1,[],[],[],[],[-2;-1;1;2;-1;1;-1;1],[],"c",..
117
[],[%t,%f],"",0,0,list()),"LOOKUP_f",list())
118
scs_m.objs(9)=mlist(["Block","graphics","model","gui","doc"],..
120
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
121
"gr_i","id","in_implicit","out_implicit"],[140,70],[40,40],%t,..
122
["2";"1";"1"],0,0,[],[],..
124
["txt=[CCC];";"xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'')"],..
127
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
128
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
129
"equations"],list("minmax",4),-1,1,[],[],[],[],[],0,"c",[],[%t,%f],..
130
"",0,0,list()),"MAXMIN",list())
131
scs_m.objs(10)=mlist(["Block","graphics","model","gui","doc"],..
133
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
134
"gr_i","id","in_implicit","out_implicit"],[210,70],[40,40],%t,..
136
list("xstringb(orig(1),orig(2),''u^a'',sz(1),sz(2),''fill'');",8),..
139
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
140
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
141
"equations"],"powblk",-1,-1,[],[],[],[],1.5,[],"c",[],[%t,%f],"",..
142
0,0,list()),"POWBLK_f",list())
143
scs_m.objs(11)=mlist(["Block","graphics","model","gui","doc"],..
145
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
146
"gr_i","id","in_implicit","out_implicit"],[280,70],..
147
[16.666667,16.666667],%t,[],[0;0],0,[],[],list([],8),"",["E";"E"],..
150
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
151
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
152
"equations"],list("prod",2),[-1;-1],-1,[],[],[],[],[],[],"c",[],..
153
[%t,%f],"",0,0,list()),"PROD_f",list())
154
scs_m.objs(12)=mlist(["Block","graphics","model","gui","doc"],..
156
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
157
"gr_i","id","in_implicit","out_implicit"],[326.66667,70],[40,60],..
158
%t,"[1;-1]",[0;0],0,[],[],..
160
["[x,y,typ]=standard_inputs(o) ";
162
"if ~arg1.graphics.flip then dd=6*sz(1)/8,de=-sz(1)/8,end";
163
"for k=1:size(x,''*'')";
164
"if size(sgn,1)>1 then";
166
" xstring(orig(1)+dd,y(k)-4,''*'')";
168
" xstring(orig(1)+dd,y(k)-4,''/'')";
172
"xx=sz(1)*[.8 .8 .4 .4]+orig(1)+de";
173
"yy=sz(2)*[.2 .8 .8 .2]+orig(2)";
174
"xpoly(xx,yy,''lines'')"],8),"Product",["E";"E"],"E"),..
176
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
177
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
178
"equations"],list("product",4),[-1;-1],-1,[],[],[],[],[],[1;-1],..
179
"c",[],[%t,%f],"",0,0,list()),"PRODUCT",list())
180
scs_m.objs(13)=mlist(["Block","graphics","model","gui","doc"],..
182
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
183
"gr_i","id","in_implicit","out_implicit"],[396.66667,70],[40,40],..
184
%t,["0.1";"1"],0,0,[],[],..
186
["thick=xget(''thickness'');xset(''thickness'',2);";
187
"xx=orig(1)+[1;2;2;3;3;4;4]/5*sz(1);";
188
"yy= orig(2)+[1;1;2;2;3;3;4]/5*sz(2);";
189
"xpoly(xx,yy,''lines'');";
190
"xset(''thickness'',thick);"],8),"","E","E"),..
192
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
193
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
194
"equations"],"qzrnd",-1,-1,[],[],[],[],0.1,1,"c",[],[%t,%f],"",0,..
195
0,list()),"QUANT_f",list())
196
scs_m.objs(14)=mlist(["Block","graphics","model","gui","doc"],..
198
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
199
"gr_i","id","in_implicit","out_implicit"],[0,160],[60,40],%t,..
200
["2";"(u1>0)*sin(u2)^2";"1"],[0;0],0,[],[],..
202
"xstringb(orig(1),orig(2),[''Mathematical'';''Expression''],sz(1),sz(2),''fill'');",..
203
8),"",["E";"E"],"E"),..
205
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
206
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
207
"equations"],list("evaluate_expr",4),[1;1],1,[],[],[],[],[0;2],..
208
[2;1;6;1;5;18;2;2;5;101;6;2;5;15;5;3],"c",[],[%t,%f],"",1,1,..
209
list()),"EXPRESSION",list())
210
scs_m.objs(15)=mlist(["Block","graphics","model","gui","doc"],..
212
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
213
"gr_i","id","in_implicit","out_implicit"],[90,160],[40,40],%t,..
214
["1";"-1";"1"],0,0,[],[],..
216
["thick=xget(''thickness'');xset(''thickness'',2);";
217
"xx=orig(1)+[4/5;1/2+1/5;1/2-1/5;1/5]*sz(1);";
218
"yy=orig(2)+[1-1/5;1-1/5;1/5;1/5]*sz(2);";
219
"xpoly(xx,yy,''lines'');";
220
"xset(''thickness'',thick)"],8),"","E","E"),..
222
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
223
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
224
"equations"],list("satur",4),1,1,[],[],[],[],[1;-1],[],"c",[],..
225
[%t,%f],"",2,1,list()),"SATURATION",list())
226
scs_m.objs(16)=mlist(["Block","graphics","model","gui","doc"],..
228
["graphics","orig","sz","flip","exprs","pin","pout","pein","peout",..
229
"gr_i","id","in_implicit","out_implicit"],[160,160],[40,40],%t,..
233
"xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'')"],8),"","E",..
236
["model","sim","in","out","evtin","evtout","state","dstate","rpar",..
237
"ipar","blocktype","firing","dep_ut","label","nzcross","nmode",..
238
"equations"],list("signum",4),-1,-1,[],[],[],[],[],[],"c",[],..
239
[%t,%f],"",-1,-1,list()),"SIGNUM",list())