/* autogenerated from "macros/Sources/GENSIN_f.sci" */
function GENSIN_f() {
GENSIN_f.prototype.define = function GENSIN_f() {
rpar=[1,1,0];
model=scicos_model();
model.sim="gensin";
model.in1=[];
model.out=1;
model.out2=1;
model.outtyp=1;
model.rpar=[1,1,0];
model.blocktype="c";
model.dep_ut=[false,true];
exprs=[string(rpar(1)),string(rpar(2)),string(rpar(3))];
gr_i=[];
x=standard_define([3,2],model,exprs,gr_i);
}
GENSIN_f.prototype.details = function GENSIN_f() {
}
GENSIN_f.prototype.get = function GENSIN_f() {
}
GENSIN_f.prototype.set = function GENSIN_f() {
x=arg1;
graphics=arg1.graphics;
exprs=graphics.exprs;
model=arg1.model;
while (true) {
[ok,M,F,P,exprs]=scicos_getvalue([msprintf(gettext("Set %s block parameters"),"GENSIN_f")," ",gettext("Sine wave generator")," "],[gettext("Magnitude"),gettext("Frequency (rad/s)"),gettext("Phase (rad)")],list("vec",1,"vec",1,"vec",1),exprs);
if (!ok) {
break
}
if (F<0) {
block_parameter_error(msprintf(gettext("Wrong value for \'Frequency\' parameter: %e."),F),gettext("Strictly positive integer expected."));
ok=false;
}
if (ok) {
[model,graphics,ok]=check_io(model,graphics,[],1,[],[]);
model.rpar=[M,F,P];
model.out2=1;
model.outtyp=1;
graphics.exprs=exprs;
x.graphics=graphics;
x.model=model;
break
}
}
}
}