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
|
function DELAYV_f () {
var nin = 1;
var z0 = zeros(11,1);
var zz0 = ...colon_operator(z0,1,$-1);
var T = 1;
var model = scicos_model();
model.sim=list(new ScilabString(["delayv"]),new ScilabDouble([1]));
model.in1 = new ScilabDouble([nin],[1]);
model.out=new ScilabDouble([nin]);
model.evtin = new ScilabDouble([1]);
model.evtout = new ScilabDouble([1],[1]);
model.dstate=z0;
model.rpar=T/(size(zz0,"*"));
model.blocktype = new ScilabString(["d"]);
model.firing = new ScilabDouble([0,-1]);
model.dep_ut = new ScilabBoolean([true,false]);
var exprs = [[...colon_operator(string,nin);strcat(string(z0(1,$-1)),";")],[string(T)]];
var gr_i = [];
this.x=new standard_define(new ScilabDouble([3,2]),model,exprs,gr_i);
return new BasicBlock(this.x)
}
|