diff options
Diffstat (limited to 'history/data_structures/READAU_f.js')
-rw-r--r-- | history/data_structures/READAU_f.js | 40 |
1 files changed, 40 insertions, 0 deletions
diff --git a/history/data_structures/READAU_f.js b/history/data_structures/READAU_f.js new file mode 100644 index 0000000..a7ef985 --- /dev/null +++ b/history/data_structures/READAU_f.js @@ -0,0 +1,40 @@ +function READAU_f () { + + + var frmt = "uc,"; + + var fname = "test.au"; + + var lunit = 0; + + var N = 20; + + var M = 1; + + var tmask = []; + + var swap = 0; + + var offset = 1; + + var outmask = 1; + + var ievt = 0; + + var nout = size(outmask,"*"); + + var model = scicos_model(); + model.sim=list(new ScilabString(["readau"]),new ScilabDouble([2])); + model.out=nout; + model.evtin = new ScilabDouble([1]); + model.dstate = new ScilabDouble([1],[1],[lunit],[zeros(N*M,1)]); + model.ipar = new ScilabDouble([length(fname)],[_str2code(frmt)],[ievt],[N],[M],[swap],[offset],[_str2code(fname)],[tmask],[outmask]); + model.blocktype = new ScilabString(["d"]); + model.dep_ut = new ScilabBoolean([false,false]); + + var exprs = [[fname],[string(N)],[string(swap)]]; + + var gr_i = []; + this.x=new standard_define(new ScilabDouble([5,2]),model,exprs,gr_i); + return new BasicBlock(this.x) +} |