summaryrefslogtreecommitdiff
path: root/history/data_structures/DELAYV_f.js
diff options
context:
space:
mode:
Diffstat (limited to 'history/data_structures/DELAYV_f.js')
-rw-r--r--history/data_structures/DELAYV_f.js29
1 files changed, 29 insertions, 0 deletions
diff --git a/history/data_structures/DELAYV_f.js b/history/data_structures/DELAYV_f.js
new file mode 100644
index 0000000..f262231
--- /dev/null
+++ b/history/data_structures/DELAYV_f.js
@@ -0,0 +1,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)
+}