diff options
Diffstat (limited to 'js/NonLinear/LOOKUP2D.js')
-rw-r--r-- | js/NonLinear/LOOKUP2D.js | 136 |
1 files changed, 68 insertions, 68 deletions
diff --git a/js/NonLinear/LOOKUP2D.js b/js/NonLinear/LOOKUP2D.js index 9576a841..355a3523 100644 --- a/js/NonLinear/LOOKUP2D.js +++ b/js/NonLinear/LOOKUP2D.js @@ -1,96 +1,96 @@ /* autogenerated from "macros/NonLinear/LOOKUP2D.sci" */ function LOOKUP2D() { LOOKUP2D.prototype.define = function LOOKUP2D() { -model=scicos_model(); -xx=[1:4]; -yy=[1:3]; -zz=[[4,5,6],[16,19,20],[10,18,23],[6,3,-1]]; -Method=1; -Graf="n"; -Nx=length(xx); -Ny=length(yy); -model.sim=list("lookup2d",4); -model.in1=[[1],[1]]; -model.out=1; -model.rpar=[[xx.slice()],[yy.slice()],[zz.slice()]]; -model.ipar=[[Nx],[Ny],[Method]]; -model.blocktype="c"; -model.dep_ut=[true,false]; -exprs=list(strcat(sci2exp(xx)),strcat(sci2exp(yy)),strcat(sci2exp(zz)),sci2exp(Method),Graf); -gr_i=[]; -x=standard_define([2.5,2],model,exprs,gr_i); + model = scicos_model(); + xx = [1:4]; + yy = [1:3]; + zz = [[4,5,6],[16,19,20],[10,18,23],[6,3,-1]]; + Method = 1; + Graf = "n"; + Nx = length(xx); + Ny = length(yy); + model.sim = list("lookup2d",4); + model.in1 = [[1],[1]]; + model.out = 1; + model.rpar = [[xx.slice()],[yy.slice()],[zz.slice()]]; + model.ipar = [[Nx],[Ny],[Method]]; + model.blocktype = "c"; + model.dep_ut = [true,false]; + exprs = list(strcat(sci2exp(xx)),strcat(sci2exp(yy)),strcat(sci2exp(zz)),sci2exp(Method),Graf); + gr_i = []; + x = standard_define([2.5,2],model,exprs,gr_i); } LOOKUP2D.prototype.details = function LOOKUP2D() { } LOOKUP2D.prototype.get = function LOOKUP2D() { } LOOKUP2D.prototype.set = function LOOKUP2D() { -x=arg1; -model=arg1.model; -graphics=arg1.graphics; -exprs=graphics.exprs; -ok=false; -SaveExit=false; -while (true) { -Ask_again=false; -[ok,xx,yy,zz,Method,graf,exprs]=scicos_getvalue("2D Lookup table parameters",[["Row index input values"],["Column index input values"],["Table data"],["Lookup method(1..5)"],["Launch graphic window(y/n)?"]],list("vec",-1,"vec",-1,"mat",[-1,-1],"vec",1,"str",1),exprs); -if (!ok) { + x = arg1; + model = arg1.model; + graphics = arg1.graphics; + exprs = graphics.exprs; + ok = false; + SaveExit = false; + while (true) { + Ask_again = false; + [ok,xx,yy,zz,Method,graf,exprs] = scicos_getvalue("2D Lookup table parameters",[["Row index input values"],["Column index input values"],["Table data"],["Lookup method(1..5)"],["Launch graphic window(y/n)?"]],list("vec",-1,"vec",-1,"mat",[-1,-1],"vec",1,"str",1),exprs); + if (!ok) { break; } -mtd=int(Method); -if (mtd<1) { -mtd=1; + mtd = int(Method); + if (mtd<1) { + mtd = 1; } -if (mtd>6) { -mtd=6; + if (mtd>6) { + mtd = 6; } -if (graf!="y"&&graf!="Y") { -graf="n"; + if (graf!="y"&&graf!="Y") { + graf = "n"; } -exprs[5-1]="n"; -exprs[4-1]=sci2exp(mtd); -METHOD=getmethod(mtd); -if (!Ask_again) { -xx=xx.slice(); -yy=yy.slice(); -[nx,mx]=size(xx); -[ny,my]=size(yy); -[nz,mz]=size(zz); -if (((nx<=1)||(ny<=1))) { + exprs[5-1] = "n"; + exprs[4-1] = sci2exp(mtd); + METHOD = getmethod(mtd); + if (!Ask_again) { + xx = xx.slice(); + yy = yy.slice(); + [nx,mx] = size(xx); + [ny,my] = size(yy); + [nz,mz] = size(zz); + if (((nx<=1)||(ny<=1))) { x_message("input row/column data size should be greater than one"); -Ask_again=true; + Ask_again = true; } -if (!((nx==nz)&&(ny==mz))) { + if (!((nx==nz)&&(ny==mz))) { x_message("incompatible size of x and y"); -Ask_again=true; + Ask_again = true; } -[ok]=test_increasing(xx); -if ((!ok)) { + [ok] = test_increasing(xx); + if ((!ok)) { x_message("Row input values must be monotonically increasing"); -Ask_again=true; + Ask_again = true; } -[ok]=test_increasing(yy); -if ((!ok)) { + [ok] = test_increasing(yy); + if ((!ok)) { x_message("Column input values must be monotonically increasing"); -Ask_again=true; + Ask_again = true; } } -if (!Ask_again) { -if ((graf=="Y"||graf=="y")) { -gh=gcf(); -curwin=gh.figure_id; -save_curwin=curwin; -gh2=scf(); -curwin=max(winsid())+1; + if (!Ask_again) { + if ((graf=="Y"||graf=="y")) { + gh = gcf(); + curwin = gh.figure_id; + save_curwin = curwin; + gh2 = scf(); + curwin = max(winsid())+1; plot3d(xx,yy,zz,35,45,"X@Y@Z",[5,2,4]); -curwin=save_curwin; -gh.figure_id=curwin; + curwin = save_curwin; + gh.figure_id = curwin; } -model.rpar=[[xx.slice()],[yy.slice()],[zz.slice()]]; -model.ipar=[[nx],[ny],[mtd]]; -graphics.exprs=exprs; -x.model=model; -x.graphics=graphics; + model.rpar = [[xx.slice()],[yy.slice()],[zz.slice()]]; + model.ipar = [[nx],[ny],[mtd]]; + graphics.exprs = exprs; + x.model = model; + x.graphics = graphics; break; } } |