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
|
/* autogenerated from "macros/NonLinear/INTRPLBLK_f.sci" */
function INTRPLBLK_f() {
INTRPLBLK_f.prototype.define = function INTRPLBLK_f() {
this.a = [[0],[1]];
this.b = [[0],[1]];
this.model = scicos_model();
this.model.sim = new ScilabString(["intrpl"]);
this.model.in = new ScilabDouble([1]);
this.model.out = new ScilabDouble([1]);
this.model.rpar = new ScilabDouble([this.a],[this.b]);
this.model.blocktype = new ScilabString(["c"]);
this.model.dep_ut = new ScilabDouble([true,false]);
this.exprs = [[strcat(sci2exp(this.a))],[strcat(sci2exp(this.b))]];
this.gr_i = new ScilabString(["xstringb(orig(1),orig(2),\"INTRPLBLK_f\",sz(1),sz(2));"]);
this.x = new standard_define(new ScilabDouble([2,2]),this.model,this.exprs,this.gr_i);
return new BasicBlock(this.x);
}
INTRPLBLK_f.prototype.details = function INTRPLBLK_f() {
return this.x;
}
INTRPLBLK_f.prototype.get = function INTRPLBLK_f() {
var options = {
a:["X coord.",this.a.toString().replace(/,/g," ")],
b:["Y coord.",this.b.toString().replace(/,/g," ")],
}
return options;
}
INTRPLBLK_f.prototype.set = function INTRPLBLK_f() {
this.a = inverse(arguments[0]["a"])
this.b = inverse(arguments[0]["b"])
this.exprs = arguments[0]["exprs"]
this.exprs = this.graphics.exprs;
while (true) {
[ok,this.a,this.b,this.exprs] = scicos_getvalue("Set Interpolation block parameters",["X coord.","Y coord."],list("vec",-1,"vec",-1),this.exprs);
if (!ok) {
break;
}
if (size(this.a,"*")!=size(this.b,"*")) {
message("X and Y must have the same size");
} else if (min(this.a.slice(2-1,$)-this.a.slice(1-1,$-1))<=0) {
message("X must be strictly increasing");
} else {
if (ok) {
this.graphics.exprs = new ScilabDouble([this.exprs]);
this.model.rpar = new ScilabDouble([this.a.slice()],[this.b.slice()]);
this.x.graphics = this.graphics;
this.x.model = this.model;
break;
}
}
}
return new BasicBlock(this.x);
}
}
|
