diff options
Diffstat (limited to 'combined.js')
| -rw-r--r-- | combined.js | 254 |
1 files changed, 253 insertions, 1 deletions
diff --git a/combined.js b/combined.js index 93cd3606..cd1f9165 100644 --- a/combined.js +++ b/combined.js @@ -526,6 +526,69 @@ break; } } } +/* autogenerated from "macros/Events/M_freq.sci" */ +function M_freq() { + M_freq.prototype.define = function M_freq() { +model=scicos_model(); +model.sim=list("m_frequ",4); +model.evtout=[[1],[1],[1]]; +model.evtin=1; +model.rpar=[]; +model.opar=list([[1,1,0],[1,1,1],[1,3,2]],1,0,0); +model.blocktype="d"; +model.firing=[0,-1,-1]; +model.dep_ut=[false,false]; +exprs=[[sci2exp([[1],[2]])],[sci2exp([[0],[0]])]]; +gr_i=[]; +x=standard_define([3,2],model,exprs,gr_i); + } + M_freq.prototype.details = function M_freq() { + } + M_freq.prototype.get = function M_freq() { + } + M_freq.prototype.set = function M_freq() { +x=arg1; +graphics=arg1.graphics; +model=arg1.model; +exprs=graphics.exprs; +while (true) { +[ok,frequ,offset,exprs]=scicos_getvalue("Set block parameters",[["Sample time"],["Offset"]],list("vec",-1,"vec",-1),exprs); +if (!ok) { +break; +} +offset=offset.slice(); +frequ=frequ.slice(); +if ((size(frequ,"*"))!=(size(offset,"*"))) { +message("offset and frequency must have the same size"); +ok=false; +} else if (or(frequ<0)) { +message("Frequency must be a positif number"); +ok=false; +} else if (or(abs(offset)>frequ)) { +message("The |Offset| must be less than the Frequency"); +ok=false; +} +if (ok) { +[m,den,off,count,m1,fir,frequ,offset,ok]=mfrequ_clk[frequ-1][offset-1]; +} +if (ok) { +model.opar=list(m,double[den-1],off,count); +mn=(2^size(m1,"*"))-1; +[model,graphics,ok]=set_io(model,graphics,list(),list(),1,ones(mn,1)); +if (mn>3) { +graphics.sz=[40+(mn-3)*10,40]; +} else { +graphics.sz=[50,40]; +} +model.firing=fir; +graphics.exprs=exprs; +x.graphics=graphics; +x.model=model; +break; +} +} + } +} /* autogenerated from "macros/Events/IFTHEL_f.sci" */ function IFTHEL_f() { IFTHEL_f.prototype.define = function IFTHEL_f() { @@ -8341,6 +8404,97 @@ break; } } } +/* autogenerated from "macros/Sources/Sigbuilder.sci" */ +function Sigbuilder() { + Sigbuilder.prototype.define = function Sigbuilder() { +scs_m_1=scicos_diagram(version="scicos4.2",props=scicos_params(wpar=[600,450,0,0,600,450],Title=["Sigbuilder","./"],tol=[[0.0001],[0.000001],[1.000e-10],[100001],[0],[0],[0]],tf=100,context=" ",void1=[],options=tlist(["scsopt","3D","Background","Link","ID","Cmap"],list(true,33),[8,1],[1,5],list([5,1],[4,1]),[0.8,0.8,0.8]),void2=[],void3=[],doc=list())); +scs_m_1.objs[1-1]=scicos_block(gui="CURVE_c",graphics=scicos_graphics(orig=[329.63473,606.18517],sz=[40,40],flip=true,theta=0,exprs=[["3"],["[0,1,2]"],["[10,20,-30]"],["y"],["n"]],pin=[],pout=6,pein=4,peout=2,gr_i=[],id="",in_implicit=[],out_implicit="E"),model=scicos_model(sim=list("curve_c",4),in1=[],in2=[],intyp=1,out=1,out2=[],outtyp=1,evtin=1,evtout=1,state=[],dstate=[],odstate=list(),rpar=[[0],[1],[2],[10],[20],[-30]],ipar=[[3],[3],[1]],opar=list(),blocktype="c",firing=0,dep_ut=[false,true],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[2-1]=scicos_link(xx=[[349.63473],[349.49528]],yy=[[600.47089],[565.10704]],id="drawlink",thick=[0,0],ct=[5,-1],from=[1,1,0],to=[3,1,1]); +scs_m_1.objs[3-1]=scicos_block(gui="CLKSPLIT_f",graphics=scicos_graphics(orig=[[349.49528],[565.10704]],sz=[0.3333333,0.3333333],flip=true,theta=0,exprs=[],pin=[],pout=[],pein=2,peout=[[8],[4]],gr_i=[],id="",in_implicit=[],out_implicit=[]),model=scicos_model(sim="split",in1=[],in2=[],intyp=1,out=[],out2=[],outtyp=1,evtin=1,evtout=[[1],[1]],state=[],dstate=[],odstate=list(),rpar=[],ipar=[],opar=list(),blocktype="d",firing=[false,false,false],dep_ut=[false,false],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[4-1]=scicos_link(xx=[[349.49528],[266.69602],[266.69602],[270.35525],[342.80795],[342.80795],[349.63473]],yy=[[565.10704],[565.10704],[680.99483],[680.99483],[680.99483],[651.89946],[651.89946]],id="drawlink",thick=[0,0],ct=[5,-1],from=[3,2,0],to=[1,1,1]); +scs_m_1.objs[5-1]=scicos_block(gui="OUT_f",graphics=scicos_graphics(orig=[398.20616,616.18517],sz=[20,20],flip=true,theta=0,exprs="1",pin=6,pout=[],pein=[],peout=[],gr_i=[],id="",in_implicit="E",out_implicit=[]),model=scicos_model(sim="output",in1=-1,in2=-2,intyp=-1,out=[],out2=[],outtyp=1,evtin=[],evtout=[],state=[],dstate=[],odstate=list(),rpar=[],ipar=1,opar=list(),blocktype="c",firing=[],dep_ut=[false,false],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[6-1]=scicos_link(xx=[[378.20616],[398.20616]],yy=[[626.18517],[626.18517]],id="drawlink",thick=[0,0],ct=[1,1],from=[1,1,0],to=[5,1,1]); +scs_m_1.objs[7-1]=scicos_block(gui="CLKOUTV_f",graphics=scicos_graphics(orig=[339.49528,505.10704],sz=[20,30],flip=true,theta=0,exprs="1",pin=[],pout=[],pein=8,peout=[],gr_i=[],id="",in_implicit=[],out_implicit=[]),model=scicos_model(sim="output",in1=[],in2=[],intyp=1,out=[],out2=[],outtyp=1,evtin=1,evtout=[],state=[],dstate=[],odstate=list(),rpar=[],ipar=1,opar=list(),blocktype="d",firing=[],dep_ut=[false,false],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[8-1]=scicos_link(xx=[[349.49528],[349.49528]],yy=[[565.10704],[535.10704]],id="drawlink",thick=[0,0],ct=[5,-1],from=[3,1,0],to=[7,1,1]); +model=scicos_model(sim="csuper",in1=[],in2=[],intyp=1,out=-1,out2=[],outtyp=1,evtin=[],evtout=1,state=[],dstate=[],odstate=list(),rpar=scs_m_1,ipar=[],opar=list(),blocktype="h",firing=[],dep_ut=[false,false],label="",nzcross=0,nmode=0,equations=list()); +gr_i=[]; +x=standard_define([3,2],model,[],gr_i); + } + Sigbuilder.prototype.details = function Sigbuilder() { + } + Sigbuilder.prototype.get = function Sigbuilder() { + } + Sigbuilder.prototype.set = function Sigbuilder() { +ppath=list(0); +for (i=1;i<=length(arg1.model.rpar.objs);i+=1) { +o=arg1.model.rpar.objs[i-1]; +if (typeof(o)=="Block"&&o.gui=="CURVE_c") { +ppath[1-1]=i; +break; +} +} +newpar=list(); +y=0; +for (path in ppath) { +np=size(path,"*"); +spath=list(); +for (k=1;k<=np;k+=1) { +spath[$+1-1]="model"; +spath[$+1-1]="rpar"; +spath[$+1-1]="objs"; +spath[$+1-1]=path[k-1]; +} +xx=arg1[spath-1]; +execstr("xxn="+xx.gui+"(\'set\',xx)"); +if (diffobjs(xxn,xx)) { +model=xx.model; +model_n=xxn.model; +if (!is_modelica_block(xx)) { +modified=or(model.sim!=model_n.sim)||!isequal(model.state,model_n.state)||!isequal(model.dstate,model_n.dstate)||!isequal(model.odstate,model_n.odstate)||!isequal(model.rpar,model_n.rpar)||!isequal(model.ipar,model_n.ipar)||!isequal(model.opar,model_n.opar)||!isequal(model.label,model_n.label); +if (or(model.in1!=model_n.in1)||or(model.out!=model_n.out)||or(model.in2!=model_n.in2)||or(model.out2!=model_n.out2)||or(model.outtyp!=model_n.outtyp)||or(model.intyp!=model_n.intyp)) { +needcompile=1; +} +if (or(model.firing!=model_n.firing)) { +needcompile=2; +} +if ((size(model.in1,"*")!=size(model_n.in1,"*"))||(size(model.out,"*")!=size(model_n.out,"*"))) { +needcompile=4; +} +if (model.sim=="input"||model.sim=="output") { +if (model.ipar!=model_n.ipar) { +needcompile=4; +} +} +if (or(model.blocktype!=model_n.blocktype)||or(model.dep_ut!=model_n.dep_ut)) { +needcompile=4; +} +if ((model.nzcross!=model_n.nzcross)||(model.nmode!=model_n.nmode)) { +needcompile=4; +} +if (prod[size(model_n.sim)-1]>1) { +if (model_n.sim[2-1]>1000) { +if (model.sim[1-1]!=model_n.sim[1-1]) { +needcompile=4; +} +} +} +} else { +modified=or(model_n!=model); +eq=model.equations; +eqn=model_n.equations; +if (or(eq.model!=eqn.model)||or(eq.inputs!=eqn.inputs)||or(eq.outputs!=eqn.outputs)) { +needcompile=4; +} +} +arg1[spath-1]=xxn; +newpar[size(newpar)+1-1]=path; +y=max(y,needcompile); +} +} +x=arg1; +typ=newpar; + } +} /* autogenerated from "macros/Sources/Modulo_Count.sci" */ function Modulo_Count() { Modulo_Count.prototype.define = function Modulo_Count() { @@ -17670,5 +17824,103 @@ x=standard_define([2,2],model,exprs,gr_i); x=arg1; } } +/* 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); + } + 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) { +break; +} +mtd=int(Method); +if (mtd<1) { +mtd=1; +} +if (mtd>6) { +mtd=6; +} +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))) { +x_message("input row/column data size should be greater than one"); +Ask_again=true; +} +if (!((nx==nz)&&(ny==mz))) { +x_message("incompatible size of x and y"); +Ask_again=true; +} +[ok]=test_increasing[xx-1]; +if ((!ok)) { +x_message("Row input values must be monotonically increasing"); +Ask_again=true; +} +[ok]=test_increasing[yy-1]; +if ((!ok)) { +x_message("Column input values must be monotonically increasing"); +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; +plot3d(xx,yy,zz,35,45,"X@Y@Z",[5,2,4]); +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; +break; +} +} + } +} -/* made from 267/274 files */ +/* made from 270/274 files */ |