diff options
Diffstat (limited to 'js/Misc/RELATIONALOP.js')
-rw-r--r-- | js/Misc/RELATIONALOP.js | 94 |
1 files changed, 92 insertions, 2 deletions
diff --git a/js/Misc/RELATIONALOP.js b/js/Misc/RELATIONALOP.js index 7ebbd94d..33d0d152 100644 --- a/js/Misc/RELATIONALOP.js +++ b/js/Misc/RELATIONALOP.js @@ -1,3 +1,93 @@ -Syntax error in input LexToken(CLOSESQBRACKET,']',1,3405) /* autogenerated from "macros/Misc/RELATIONALOP.sci" */ -None +function RELATIONALOP() { +RELATIONALOP.prototype.get = function RELATIONALOP() { +} +RELATIONALOP.prototype.set = function RELATIONALOP() { +x=arg1; +graphics=arg1.graphics; +exprs=graphics.exprs; +model=arg1.model; +if (size(exprs,1)==2) { +exprs=[exprs,sci2exp(1)]; +} +while (true) { +[ok,rule,zcr,Datatype,exprs]=scicos_getvalue("Set parameters",["Operator: == (0), ~= (1), < (2), <= (3), > (4), >= (5)","Use zero crossing (no: 0), (yes: 1)","Datatype (1=double 3=int32 ...)"],list("vec",1,"vec",1,"vec",1),exprs); +if (!ok) { +break +} +rule=int(rule); +if (zcr!=0) { +zcr=1; +} +if ((rule<0)||(rule>5)) { +message("Incorrect operator "+string(rule)+" ; must be 0 to 5."); +ok=None; +} +if ((Datatype==1)) { +model.sim=list("relational_op",4); +} else if ((Datatype==3||Datatype==9)) { +model.sim=list("relational_op_i32",4); +} else if ((Datatype==4)) { +model.sim=list("relational_op_i16",4); +} else if ((Datatype==5)) { +model.sim=list("relational_op_i8",4); +} else if ((Datatype==6)) { +model.sim=list("relational_op_ui32",4); +} else if ((Datatype==7)) { +model.sim=list("relational_op_ui16",4); +} else if ((Datatype==8)) { +model.sim=list("relational_op_ui8",4); +} else { +message("Datatype is not supported"); +ok=None; +} +if (ok) { +it=Datatype*ones(1,2); +ot=Datatype; +in1=[-1,-2,-1,-2]; +out=[-1,-2]; +[model,graphics,ok]=set_io(model,graphics,list(in1,it),list(out,ot),[],[]); +} +if (ok) { +if (rule==0) { +label="=="; +} else if (rule==1) { +label="~="; +} else if (rule==2) { +label="<"; +} else if (rule==3) { +label="≤"; +} else if (rule==4) { +label=">"; +} else if (rule==5) { +label="≥"; +} +graphics.exprs=exprs; +graphics.style=["fontSize=13;fontStyle=1;displayedLabel="+label]; +model.ipar=[rule]; +model.nzcross=zcr; +model.nmode=zcr; +x.graphics=graphics; +x.model=model; +break +} +} +} +RELATIONALOP.prototype.define = function RELATIONALOP() { +ipar=[2]; +label="<"; +model=scicos_model(); +model.sim=list("relationalop",4); +model.in=[1,1]; +model.out=1; +model.ipar=ipar; +model.blocktype="c"; +model.dep_ut=[true,None]; +exprs=[string(ipar),string(0)]; +gr_i=[]; +x=standard_define([2,2],model,exprs,gr_i); +x.graphics.style=["fontSize=13;fontStyle=1;displayedLabel="+label]; +} +RELATIONALOP.prototype.details = function RELATIONALOP() { +} +} |