summaryrefslogtreecommitdiff
path: root/js/MatrixOp/MATTRAN.js
diff options
context:
space:
mode:
Diffstat (limited to 'js/MatrixOp/MATTRAN.js')
-rw-r--r--js/MatrixOp/MATTRAN.js86
1 files changed, 43 insertions, 43 deletions
diff --git a/js/MatrixOp/MATTRAN.js b/js/MatrixOp/MATTRAN.js
index e8bb7ca1..b55aa3c3 100644
--- a/js/MatrixOp/MATTRAN.js
+++ b/js/MatrixOp/MATTRAN.js
@@ -1,61 +1,61 @@
/* autogenerated from "macros/MatrixOp/MATTRAN.sci" */
function MATTRAN() {
MATTRAN.prototype.define = function MATTRAN() {
-model=scicos_model();
-model.sim=list("mattran_m",4);
-model.in1=-1;
-model.in2=-2;
-model.out=-2;
-model.out2=-1;
-model.dep_ut=[true,false];
-label=[sci2exp(1)];
-gr_i=[];
-x=standard_define([3,2],model,label,gr_i);
+ model = scicos_model();
+ model.sim = list("mattran_m",4);
+ model.in1 = -1;
+ model.in2 = -2;
+ model.out = -2;
+ model.out2 = -1;
+ model.dep_ut = [true,false];
+ label = [sci2exp(1)];
+ gr_i = [];
+ x = standard_define([3,2],model,label,gr_i);
}
MATTRAN.prototype.details = function MATTRAN() {
}
MATTRAN.prototype.get = function MATTRAN() {
}
MATTRAN.prototype.set = function MATTRAN() {
-x=arg1;
-graphics=arg1.graphics;
-label=graphics.exprs;
-model=arg1.model;
-if (size(label,"*")==1) {
-label[2-1]=sci2exp(1);
+ x = arg1;
+ graphics = arg1.graphics;
+ label = graphics.exprs;
+ model = arg1.model;
+ if (size(label,"*")==1) {
+ label[2-1] = sci2exp(1);
}
-while (true) {
-[ok,typ,rule,exprs]=scicos_getvalue("Set MATTRAN Block",[["Datatype(1=real double 2=Complex)"],["rule (1=.\' 2=\')"]],list("vec",1,"vec",1),label);
-if (!ok) {
+ while (true) {
+ [ok,typ,rule,exprs] = scicos_getvalue("Set MATTRAN Block",[["Datatype(1=real double 2=Complex)"],["rule (1=.\' 2=\')"]],list("vec",1,"vec",1),label);
+ if (!ok) {
break;
}
-if ((typ==1)) {
-function_name="mattran_m";
-ot=1;
-it=1;
-} else if ((typ==2)) {
-if (rule==1) {
-function_name="matztran_m";
-} else {
-function_name="mathermit_m";
+ if ((typ==1)) {
+ function_name = "mattran_m";
+ ot = 1;
+ it = 1;
+ } else if ((typ==2)) {
+ if (rule==1) {
+ function_name = "matztran_m";
+ } else {
+ function_name = "mathermit_m";
}
-ot=2;
-it=2;
-} else {
+ ot = 2;
+ it = 2;
+ } else {
message("Datatype is not supported");
-ok=false;
+ ok = false;
}
-in1=[model.in1,model.in2];
-out=[model.out,model.out2];
-funtyp=4;
-if (ok) {
-label=exprs;
-[model,graphics,ok]=set_io(model,graphics,list(in1,it),list(out,ot),[],[]);
-model.sim=list(function_name,funtyp);
-graphics.exprs=label;
-arg1.graphics=graphics;
-arg1.model=model;
-x=arg1;
+ in1 = [model.in1,model.in2];
+ out = [model.out,model.out2];
+ funtyp = 4;
+ if (ok) {
+ label = exprs;
+ [model,graphics,ok] = set_io(model,graphics,list(in1,it),list(out,ot),[],[]);
+ model.sim = list(function_name,funtyp);
+ graphics.exprs = label;
+ arg1.graphics = graphics;
+ arg1.model = model;
+ x = arg1;
break;
}
}