diff options
author | Sunil Shetye | 2018-06-25 12:08:56 +0530 |
---|---|---|
committer | Sunil Shetye | 2018-06-25 12:45:27 +0530 |
commit | 7c70459c10aed0d74ee03896abaf47fefdbf7c8f (patch) | |
tree | 6f6acc6a5087295c6e59f0f94bfda5025049d5fa /js/Sources/CONST.js | |
parent | 870479a2e4b932426a904b2ebae7e4ee72037326 (diff) | |
download | sci2js-7c70459c10aed0d74ee03896abaf47fefdbf7c8f.tar.gz sci2js-7c70459c10aed0d74ee03896abaf47fefdbf7c8f.tar.bz2 sci2js-7c70459c10aed0d74ee03896abaf47fefdbf7c8f.zip |
separate out code for getvalue
Diffstat (limited to 'js/Sources/CONST.js')
-rw-r--r-- | js/Sources/CONST.js | 56 |
1 files changed, 28 insertions, 28 deletions
diff --git a/js/Sources/CONST.js b/js/Sources/CONST.js index 7293695b..d96bad1c 100644 --- a/js/Sources/CONST.js +++ b/js/Sources/CONST.js @@ -1,44 +1,44 @@ /* autogenerated from "macros/Sources/CONST.sci" */ function CONST() { CONST.prototype.define = function CONST() { -C=1; -model=scicos_model(); -model.sim=list("cstblk4",4); -model.in1=[]; -model.out=1; -model.rpar=C; -model.blocktype="d"; -model.dep_ut=[false,false]; -exprs=strcat(sci2exp(C)); -gr_i=[]; -x=standard_define([2,2],model,exprs,gr_i); + C = 1; + model = scicos_model(); + model.sim = list("cstblk4",4); + model.in1 = []; + model.out = 1; + model.rpar = C; + model.blocktype = "d"; + model.dep_ut = [false,false]; + exprs = strcat(sci2exp(C)); + gr_i = []; + x = standard_define([2,2],model,exprs,gr_i); } CONST.prototype.details = function CONST() { } CONST.prototype.get = function CONST() { } CONST.prototype.set = function CONST() { -x=arg1; -graphics=arg1.graphics; -exprs=graphics.exprs; -model=arg1.model; -while (true) { -[ok,C,exprs]=scicos_getvalue(["Set Contant Block"],"Constant",list("vec",-1),exprs); -if (!ok) { + x = arg1; + graphics = arg1.graphics; + exprs = graphics.exprs; + model = arg1.model; + while (true) { + [ok,C,exprs] = scicos_getvalue(["Set Contant Block"],"Constant",list("vec",-1),exprs); + if (!ok) { break; } -sz=size(C); -nout=size(C,"*"); -if (nout==0) { + sz = size(C); + nout = size(C,"*"); + if (nout==0) { message("C must have at least one element"); -} else if (and(sz>1)) { + } else if (and(sz>1)) { message("C matrix is not supported, use CONST_m instead"); -} else { -model.rpar=C.slice(); -model.out=nout; -graphics.exprs=exprs; -x.graphics=graphics; -x.model=model; + } else { + model.rpar = C.slice(); + model.out = nout; + graphics.exprs = exprs; + x.graphics = graphics; + x.model = model; break; } } |