diff options
Diffstat (limited to 'js/Linear/DELAYV_f.js')
| -rw-r--r-- | js/Linear/DELAYV_f.js | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/js/Linear/DELAYV_f.js b/js/Linear/DELAYV_f.js index 3a1687b8..8ecb2401 100644 --- a/js/Linear/DELAYV_f.js +++ b/js/Linear/DELAYV_f.js @@ -7,16 +7,16 @@ zz0=z0.slice(1-1,$-1); T=1; model=scicos_model(); model.sim=list("delayv",1); -model.in1=[nin,1]; +model.in1=[[nin],[1]]; model.out=nin; model.evtin=1; -model.evtout=[1,1]; +model.evtout=[[1],[1]]; model.dstate=z0; model.rpar=T/(size(zz0,"*")); model.blocktype="d"; model.firing=[0,-1]; model.dep_ut=[true,false]; -exprs=[string(nin),strcat(string(z0.slice(1-1,$-1)),";"),string(T)]; +exprs=[[string(nin)],[strcat(string(z0.slice(1-1,$-1)),";")],[string(T)]]; gr_i=[]; x=standard_define([3,2],model,exprs,gr_i); } @@ -34,7 +34,7 @@ z0=model.dstate; zz0=z0.slice(1-1,$-1); told=z0[$-1]; while (true) { -[ok,nin,zz0,T,exprs]=scicos_getvalue("Set delay parameters",["Number of inputs","Register initial condition","Max delay"],list("vec",1,"vec",-1,"vec",1),exprs); +[ok,nin,zz0,T,exprs]=scicos_getvalue("Set delay parameters",[["Number of inputs"],["Register initial condition"],["Max delay"]],list("vec",1,"vec",-1,"vec",1),exprs); if (!ok) { break; } @@ -47,11 +47,11 @@ message("Delay must be positive"); ok=false; } if (ok) { -[model,graphics,ok]=check_io(model,graphics,[nin,1],nin,1,[1,1]); +[model,graphics,ok]=check_io(model,graphics,[[nin],[1]],nin,1,[[1],[1]]); } if (ok) { graphics.exprs=exprs; -model.dstate=[zz0.slice(),told]; +model.dstate=[[zz0.slice()],[told]]; model.rpar=T/(size(zz0,"*")); x.graphics=graphics; x.model=model; |