1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
|
/* autogenerated from "macros/Misc/generic_block.sci" */
function generic_block() {
generic_block.prototype.define = function generic_block() {
model = scicos_model();
this.function_name = "sinblk";
this.funtyp = 1;
model.sim = list(this.function_name,this.funtyp);
model.in1 = 1;
model.out = 1;
model.evtin = [];
model.evtout = [];
model.state = [];
model.dstate = [];
model.rpar = [];
model.ipar = [];
model.blocktype = "c";
model.firing = [];
model.dep_ut = [true,false];
label = [[this.function_name],[sci2exp(this.funtyp)],[sci2exp(model.in1)],[sci2exp(model.out)],[sci2exp(model.evtin)],[sci2exp(model.evtout)],[sci2exp(model.state)],[sci2exp(model.dstate)],[sci2exp(model.rpar)],[sci2exp(model.ipar)],[sci2exp(model.firing)],["y"],["n"]];
gr_i = [];
this.x = standard_define([2,2],model,label,gr_i);
return new BasicBlock(this.x);
}
generic_block.prototype.details = function generic_block() {
return this.x;
}
generic_block.prototype.get = function generic_block() {
var options = {
function_name:["simulation function",this.function_name],
funtyp:["function type (0,1,2,..)",this.funtyp],
i:["input ports sizes",this.i],
o:["output port sizes",this.o],
ci:["input event ports sizes",this.ci],
co:["output events ports sizes",this.co],
xx:["initial continuous state",this.xx],
z:["initial discrete state",this.z],
rpar:["Real parameters vector",this.rpar],
ipar:["Integer parameters vector",this.ipar],
auto0:["initial firing vector (<0 for no firing)",this.auto0],
depu:["direct feedthrough (y or n)",this.depu],
dept:["time dependence (y or n)",this.dept],
}
return options;
}
generic_block.prototype.set = function generic_block() {
this.function_name = arguments[0]["function_name"]
this.funtyp = parseFloat(arguments[0]["funtyp"])
this.i = parseFloat(arguments[0]["i"])
this.o = parseFloat(arguments[0]["o"])
this.ci = parseFloat(arguments[0]["ci"])
this.co = parseFloat(arguments[0]["co"])
this.xx = inverse(arguments[0]["xx"])
this.z = inverse(arguments[0]["z"])
this.rpar = inverse(arguments[0]["rpar"])
this.ipar = parseFloat(arguments[0]["ipar"])
this.auto0 = arguments[0]["auto0"]
this.depu = parseBoolean(arguments[0]["depu"])
this.dept = parseBoolean(arguments[0]["dept"])
this.lab = arguments[0]["lab"]
this.x = arg1;
model = arg1.model;
graphics = arg1.graphics;
label = graphics.exprs;
if (size(label,"*")==14) {
label[9-1] = [];
}
while (true) {
[ok,this.function_name,this.funtyp,this.i,this.o,this.ci,this.co,this.xx,this.z,this.rpar,this.ipar,this.auto0,this.depu,this.dept,this.lab] = scicos_getvalue("Set GENERIC block parameters",["simulation function","function type (0,1,2,..)","input ports sizes","output port sizes","input event ports sizes","output events ports sizes","initial continuous state","initial discrete state","Real parameters vector","Integer parameters vector","initial firing vector (<0 for no firing)","direct feedthrough (y or n)","time dependence (y or n)"],list("str",1,"vec",1,"vec",-1,"vec",-1,"vec",-1,"vec",-1,"vec",-1,"vec",-1,"vec",-1,"vec",-1,"vec","sum(%6)","str",1,"str",1),label);
if (!ok) {
break;
}
label = this.lab;
this.function_name = stripblanks(this.function_name);
this.xx = this.xx.slice();
this.z = this.z.slice();
this.rpar = this.rpar.slice();
this.ipar = int(this.ipar.slice());
this.i = int(this.i.slice());
this.o = int(this.o.slice());
this.ci = int(this.ci.slice());
this.co = int(this.co.slice());
this.funtyp = int(this.funtyp);
if (this.funtyp<0) {
message("function type cannot be negative");
ok = false;
}
if ([[this.ci],[this.co]]!=[]) {
if (max([[this.ci],[this.co]])>1) {
message("vector event links not supported");
ok = false;
}
}
this.depu = stripblanks(this.depu);
if (part(this.depu,1)=="y") {
this.depu = true;
} else {
this.depu = false;
}
this.dept = stripblanks(this.dept);
if (part(this.dept,1)=="y") {
this.dept = true;
} else {
this.dept = false;
}
dep_ut = [this.depu,this.dept];
if (ok) {
[model,graphics,ok] = check_io(model,graphics,this.i,this.o,this.ci,this.co);
}
if (ok) {
if (this.funtyp==3) {
needcompile = 4;
}
model.sim = list(this.function_name,this.funtyp);
model.state = this.xx;
model.dstate = this.z;
model.rpar = this.rpar;
model.ipar = this.ipar;
model.firing = this.auto0;
model.dep_ut = dep_ut;
arg1.model = model;
graphics.exprs = label;
arg1.graphics = graphics;
this.x = arg1;
break;
}
}
needcompile = resume(needcompile)
return new BasicBlock(this.x);
}
}
|