diff options
author | Sunil Shetye | 2018-06-15 23:43:09 +0530 |
---|---|---|
committer | Sunil Shetye | 2018-06-15 23:43:09 +0530 |
commit | 073f4cb62b331bb437c894e0581126e5d1ef459f (patch) | |
tree | 84d6755d231feb9feb2d79a06e0bbe7f784d86fc /js/MatrixOp/MATSING.js | |
parent | a8e5849586f23ffb1ecd2fe47a636b61c80c2e70 (diff) | |
download | sci2js-073f4cb62b331bb437c894e0581126e5d1ef459f.tar.gz sci2js-073f4cb62b331bb437c894e0581126e5d1ef459f.tar.bz2 sci2js-073f4cb62b331bb437c894e0581126e5d1ef459f.zip |
handle space character also
required in lists
Diffstat (limited to 'js/MatrixOp/MATSING.js')
-rw-r--r-- | js/MatrixOp/MATSING.js | 96 |
1 files changed, 94 insertions, 2 deletions
diff --git a/js/MatrixOp/MATSING.js b/js/MatrixOp/MATSING.js index 682208e5..789a1349 100644 --- a/js/MatrixOp/MATSING.js +++ b/js/MatrixOp/MATSING.js @@ -1,3 +1,95 @@ -Syntax error in input LexToken(CLOSESQBRACKET,']',1,1605) /* autogenerated from "macros/MatrixOp/MATSING.sci" */ -None +function MATSING() { +MATSING.prototype.get = function MATSING() { +} +MATSING.prototype.set = function MATSING() { +x=arg1; +model=arg1.model; +graphics=arg1.graphics; +label=graphics.exprs; +if (size(label,"*")==14) { +label[9-1]=[]; +} +while (true) { +[ok,typ,decomptyp,lab]=scicos_getvalue("Set MATSVD block parameters",["Datatype(1=real double 2=Complex)","decomposition type (1=singular values 2=sing values+matrix U & V)"],list("vec",1,"vec",1),label); +if (!ok) { +break +} +label=lab; +if ((typ==1)) { +if ((decomptyp==1)) { +function_name="mat_sing"; +in1=[-1,-2]; +out=[-1,1]; +ot=1; +} else if ((decomptyp==2)) { +function_name="mat_svd"; +in1=[-1,-2]; +out=[-1,-1,-1,-2,-2,-2]; +ot=[1,1,1]; +} else { +message("decomposition type is not supported"); +ok=None; +} +it=1; +} else if ((typ==2)) { +if ((decomptyp==1)) { +function_name="matz_sing"; +in1=[-1,-2]; +out=[-1,1]; +ot=1; +} else if ((decomptyp==2)) { +function_name="matz_svd"; +in1=[-1,-2]; +out=[-1,-1,-1,-2,-2,-2]; +ot=[2,1,2]; +} else { +message("decomposition type is not supported"); +ok=None; +} +it=2; +} else { +message("Datatype is not supported"); +ok=None; +} +funtyp=4; +if (ok) { +[model,graphics,ok]=set_io(model,graphics,list(in1,it),list(out,ot),[],[]); +} +if (ok) { +model.sim=list(function_name,funtyp); +arg1.model=model; +graphics.exprs=label; +arg1.graphics=graphics; +x=arg1; +break +} +} +} +MATSING.prototype.define = function MATSING() { +model=scicos_model(); +function_name="mat_sing"; +funtyp=4; +model.sim=list(function_name,funtyp); +model.in=-1; +model.in2=-2; +model.intyp=1; +model.out=-1; +model.out2=1; +model.outtyp=1; +model.evtin=[]; +model.evtout=[]; +model.state=[]; +model.dstate=[]; +model.rpar=[]; +model.ipar=[]; +model.blocktype="c"; +model.firing=[]; +model.dep_ut=[true,None]; +label=[sci2exp(1),sci2exp(1)]; +gr_i=[]; +x=standard_define([2,2],model,label,gr_i); +} +MATSING.prototype.details = function MATSING() { +} +} |