diff options
Diffstat (limited to 'js/Sources/CURVE_c.js')
-rw-r--r-- | js/Sources/CURVE_c.js | 91 |
1 files changed, 51 insertions, 40 deletions
diff --git a/js/Sources/CURVE_c.js b/js/Sources/CURVE_c.js index 742bfed7..0076b715 100644 --- a/js/Sources/CURVE_c.js +++ b/js/Sources/CURVE_c.js @@ -4,10 +4,10 @@ function CURVE_c() { this.model = scicos_model(); this.xx = [0,1,2]; this.yy = [10,20,-30]; - N = 3; + var N = 3; this.Method = 3; this.PeriodicOption = "y"; - Graf = "n"; + var Graf = "n"; this.model.sim = list(new ScilabString(["curve_c"]), new ScilabDouble([4])); this.model.in1 = []; this.model.out = new ScilabDouble([1]); @@ -18,8 +18,8 @@ function CURVE_c() { this.model.evtin = new ScilabDouble([1]); this.model.evtout = new ScilabDouble([1]); this.model.firing = new ScilabDouble([0]); - exprs = [[sci2exp(this.Method)],[sci2exp(this.xx)],[sci2exp(this.yy)],[this.PeriodicOption],[Graf]]; - gr_i = []; + var exprs = [[sci2exp(this.Method)],[sci2exp(this.xx)],[sci2exp(this.yy)],[this.PeriodicOption],[Graf]]; + var gr_i = []; this.x = standard_define([2,2],this.model,exprs,gr_i); return new BasicBlock(this.x); } @@ -44,70 +44,78 @@ function CURVE_c() { this.graf = arguments[0]["graf"] this.x = arg1; this.model = arg1.model; - graphics = arg1.graphics; - exprs = graphics.exprs; - ok = false; - SaveExit = false; + var graphics = arg1.graphics; + var exprs = graphics.exprs; + var ok = false; + var SaveExit = false; while (true) { - Ask_again = false; + var Ask_again = false; [ok,this.Method,this.xx,this.yy,this.PeriodicOption,this.graf,exprs] = scicos_getvalue("Spline data",["Spline Method (0..7)","x","y","Periodic signal(y/n)?","Launch graphic window(y/n)?"],list("vec",1,"vec",-1,"vec",-1,"str",1,"str",1),exprs); if (!ok) { break; } if (this.PeriodicOption=="y"||this.PeriodicOption=="Y") { - PO = 1; + var PO = 1; } else { exprs[4-1] = "n"; - PO = 0; + var PO = 0; } - mtd = int(this.Method); + var mtd = int(this.Method); if (mtd<0) { - mtd = 0; + var mtd = 0; } if (mtd>7) { - mtd = 7; + var mtd = 7; } - METHOD = getmethod(mtd); + var METHOD = getmethod(mtd); if (!Ask_again) { this.xx = this.xx.slice(); this.yy = this.yy.slice(); - [nx,mx] = size(this.xx); - [ny,my] = size(this.yy); + var tmpvar0 = size(this.xx) + var nx = tmpvar0[0] + var mx = tmpvar0[1]; + var tmpvar1 = size(this.yy) + var ny = tmpvar1[0] + var my = tmpvar1[1]; if (!((nx==ny)&&(mx==my))) { messagebox("Incompatible size of [x] and [y]","modal","error"); - Ask_again = true; + var Ask_again = true; } } if (!Ask_again) { this.xy = [this.xx,this.yy]; - [this.xy] = cleandata(this.xy); - N = size(this.xy,"r"); + var tmpvar2 = cleandata(this.xy) + this.xy = tmpvar2[0]; + var N = size(this.xy,"r"); exprs[5-1] = "n"; if (this.graf=="y"||this.graf=="Y") { - ipar = [[N],[mtd],[PO]]; - rpar = []; + var ipar = [[N],[mtd],[PO]]; + var rpar = []; if ((winsid()==[])) { this.curwin = 0; } else { this.curwin = max(winsid())+1; } - [orpar,oipar,ok] = poke_point(this.xy,ipar,rpar); + var tmpvar3 = poke_point(this.xy,ipar,rpar) + var orpar = tmpvar3[0] + var oipar = tmpvar3[1] + var ok = tmpvar3[2]; if (!ok) { break; } - N2 = oipar[1-1]; - xy2 = [orpar.slice(1-1,N2),orpar.slice(N2+1-1,2*N2)]; - New_methhod = oipar[2-1]; - DChange = false; - METHOD = getmethod(New_methhod); + var N2 = oipar[1-1]; + var xy2 = [orpar.slice(1-1,N2),orpar.slice(N2+1-1,2*N2)]; + var New_methhod = oipar[2-1]; + var DChange = false; + var METHOD = getmethod(New_methhod); if (or(this.xy.slice()[1-1]!=xy2.slice()[1-1])) { - DChange = true; + var DChange = true; } if (or(this.xy.slice(1-1,N-1)[2-1]!=xy2.slice(1-1,N2-1)[2-1])) { - DChange = true; + var DChange = true; } if ((this.xy[N-1][2-1]!=xy2[N2-1][2-1]&&(METHOD!="periodic"))) { - DChange = true; + var DChange = true; } if (DChange) { exprs[2-1] = strcat(sci2exp(xy2.slice()[1-1])); @@ -115,31 +123,34 @@ function CURVE_c() { } exprs[1-1] = sci2exp(New_methhod); if (oipar[3-1]==1) { - perop = "y"; + var perop = "y"; } else { - perop = "n"; + var perop = "n"; } exprs[4-1] = perop; - SaveExit = true; + var SaveExit = true; } else { - [Xdummy,Ydummy,orpar] = Do_Spline(N,mtd,this.xy.slice()[1-1],this.xy.slice()[2-1]); + var tmpvar4 = Do_Spline(N,mtd,this.xy.slice()[1-1],this.xy.slice()[2-1]) + var Xdummy = tmpvar4[0] + var Ydummy = tmpvar4[1] + var orpar = tmpvar4[2]; if ((METHOD=="periodic")) { this.xy[N-1][2-1] = this.xy[1-1][2-1]; } if ((METHOD=="order 2"||METHOD=="not_a_knot"||METHOD=="periodic"||METHOD=="monotone"||METHOD=="fast"||METHOD=="clamped")) { - orpar = [[this.xy.slice()[1-1]],[this.xy.slice()[2-1]],[orpar]]; + var orpar = [[this.xy.slice()[1-1]],[this.xy.slice()[2-1]],[orpar]]; } else { if ((METHOD=="zero order"||METHOD=="linear")) { - orpar = [[this.xy.slice()[1-1]],[this.xy.slice()[2-1]]]; + var orpar = [[this.xy.slice()[1-1]],[this.xy.slice()[2-1]]]; } } exprs[1-1] = sci2exp(mtd); - oipar = [[N],[mtd],[PO]]; - SaveExit = true; + var oipar = [[N],[mtd],[PO]]; + var SaveExit = true; } } if ((SaveExit)) { - xp = find(orpar.slice(1-1,oipar[1-1])>=0); + var xp = find(orpar.slice(1-1,oipar[1-1])>=0); if ((xp!=[])) { this.model.firing = new ScilabDouble([orpar[xp[1-1]-1]]); } else { |