From b2cd0d0cad32683971baf53efa2e50ff8d26f66b Mon Sep 17 00:00:00 2001
From: kamakshidasan
Date: Thu, 22 Dec 2016 15:36:18 +0530
Subject: Maven has been removed

---
 data_structures_correct/fortran_block.js | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100644 data_structures_correct/fortran_block.js

(limited to 'data_structures_correct/fortran_block.js')

diff --git a/data_structures_correct/fortran_block.js b/data_structures_correct/fortran_block.js
new file mode 100644
index 0000000..adfa5ef
--- /dev/null
+++ b/data_structures_correct/fortran_block.js
@@ -0,0 +1,29 @@
+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;
+    }
+}
-- 
cgit