/* autogenerated from "macros/MatrixOp/MATTRAN.sci" */ function MATTRAN() { MATTRAN.prototype.define = function MATTRAN() { this.model = scicos_model(); this.model.sim = list(new ScilabString(["mattran_m"]), new ScilabDouble([4])); this.model.in1 = new ScilabDouble([-1]); this.model.in2 = new ScilabDouble([-2]); this.model.out = new ScilabDouble([-2]); this.model.out2 = new ScilabDouble([-1]); this.model.dep_ut = [true,false]; label = [sci2exp(1)]; gr_i = []; this.x = standard_define([3,2],this.model,label,gr_i); return new BasicBlock(this.x); } MATTRAN.prototype.details = function MATTRAN() { return this.x; } MATTRAN.prototype.get = function MATTRAN() { var options = { typ:["Datatype(1=real double 2=Complex)",this.typ], rule:["rule (1=.\' 2=\')",this.rule], } return options; } MATTRAN.prototype.set = function MATTRAN() { this.typ = inverse(arguments[0]["typ"]) this.rule = arguments[0]["rule"] this.x = arg1; graphics = arg1.graphics; label = graphics.exprs; this.model = arg1.model; if (size(label,"*")==1) { label[2-1] = sci2exp(1); } while (true) { [ok,this.typ,this.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 ((this.typ==1)) { function_name = "mattran_m"; ot = 1; it = 1; } else if ((this.typ==2)) { if (this.rule==1) { function_name = "matztran_m"; } else { function_name = "mathermit_m"; } ot = 2; it = 2; } else { message("Datatype is not supported"); ok = false; } in1 = [this.model.in1,this.model.in2]; out = [this.model.out,this.model.out2]; funtyp = 4; if (ok) { label = exprs; [this.model,graphics,ok] = set_io(this.model,graphics,list(in1,it),list(out,ot),[],[]); this.model.sim = list(new ScilabString([function_name]), new ScilabDouble([funtyp])); graphics.exprs = label; arg1.graphics = graphics; arg1.model = this.model; this.x = arg1; break; } } return new BasicBlock(this.x); } }