summaryrefslogtreecommitdiff
path: root/data_structures_correct/fortran_block.js
diff options
context:
space:
mode:
Diffstat (limited to 'data_structures_correct/fortran_block.js')
-rw-r--r--data_structures_correct/fortran_block.js29
1 files changed, 0 insertions, 29 deletions
diff --git a/data_structures_correct/fortran_block.js b/data_structures_correct/fortran_block.js
deleted file mode 100644
index adfa5ef..0000000
--- a/data_structures_correct/fortran_block.js
+++ /dev/null
@@ -1,29 +0,0 @@
-function fortran_block() {
-
- fortran_block.prototype.define = function fortran_block() {
- var model = scicos_model();
- model.sim = list(new ScilabString([" "]), new ScilabDouble([1001]));
- model.in = new ScilabDouble([1]);
- model.out = new ScilabDouble([1]);
- model.evtin = new ScilabDouble();
- model.evtout = new ScilabDouble();
- model.state = new ScilabDouble();
- model.dstate = new ScilabDouble();
- model.rpar = new ScilabDouble();
- model.ipar = new ScilabDouble([0]);
- model.blocktype = new ScilabString(["c"]);
- model.firing = new ScilabDouble();
- model.dep_ut = new ScilabBoolean([true, false]);
-
- this.funam = "forty";
-
- var label = list(new ScilabString([sci2exp(parseInt(getData(model.in)))], [sci2exp(parseInt(getData(model.out)))], [sci2exp(getData(model.rpar))], [this.funam]), list(new ScilabDouble()));
-
- var gr_i = new ScilabString(["xstringb(orig(1),orig(2),\"fortran_block\",sz(1),sz(2));"]);
- this.x = new standard_define(new ScilabDouble([4, 2]), model, label, gr_i);
- return new BasicBlock(this.x);
- }
- fortran_block.prototype.details = function fortran_block() {
- return this.x;
- }
-}