1 files changed, 40 insertions, 39 deletions
diff --git a/js/Sources/RAND_m.js b/js/Sources/RAND_m.js
index ab7e919f..5c6a35fd 100644
--- a/js/Sources/RAND_m.js
+++ b/js/Sources/RAND_m.js
@@ -26,55 +26,56 @@ function RAND_m() {
         model.dep_ut = [false,false];
         exprs = [[sci2exp(1)],[string(flag)],[sci2exp([a])],[sci2exp([b])],[sci2exp([model.dstate[1-1],int(rand()*(10^7-1))])]];
         gr_i = [];
-        x = standard_define([3,2],model,exprs,gr_i);
+        this.x = standard_define([3,2],model,exprs,gr_i);
     }
     RAND_m.prototype.details = function RAND_m() {
+        return this.x;
     }
     RAND_m.prototype.get = function RAND_m() {
     }
     RAND_m.prototype.set = function RAND_m() {
-        x = arg1;
+        this.x = arg1;
         graphics = arg1.graphics;
         exprs = graphics.exprs;
         model = arg1.model;
         if (size(exprs,"*")==14) {
-        exprs[9-1] = [];
-}
+            exprs[9-1] = [];
+        }
         while (true) {
-        [ok,typ,flag,a,b,seed_c,exprs] = scicos_getvalue([["Set Random generator block parameters"],["flag = 0 : Uniform distribution A is min and A+B max"],["flag = 1 : Normal distribution A is mean and B deviation"],[" "],["A and B must be matrix with equal sizes"]],[["Datatype(1=real double  2=complex)"],["flag"],["A"],["B"],["SEED"]],list("vec",1,"vec",1,"mat",[-1,-2],"mat","[-1 -2]","mat",[1,2]),exprs);
-        if (!ok) {
-break;
-}
-        if (flag!=0&&flag!=1) {
-message("flag must be equal to 1 or 0");
-        } else {
-        out = size(a);
-        if (typ==1) {
-        function_name = "rndblk_m";
-        model.rpar = [[real(a.slice())],[real(b.slice())]];
-        model.dstate = [[seed_c[1-1]],[0*real(a.slice())]];
-        ot = 1;
-        } else if (typ==2) {
-        function_name = "rndblkz_m";
-        ot = 2;
-        model.rpar = [[real(a.slice())],[imag(a.slice())],[real(b.slice())],[imag(b.slice())]];
-        model.dstate = [[seed_c.slice()],[0*[[real(a.slice())],[imag(a.slice())]]]];
-        } else {
-message("Datatype is not supported");
-        ok = false;
-}
-        if (ok) {
-        [model,graphics,ok] = set_io(model,graphics,list([],[]),list(out,ot),1,[]);
-        if (ok) {
-        model.sim = list(function_name,4);
-        graphics.exprs = exprs;
-        model.ipar = flag;
-        x.graphics = graphics;
-        x.model = model;
-break;
-}
-}
-}
-}
+            [ok,typ,flag,a,b,seed_c,exprs] = scicos_getvalue([["Set Random generator block parameters"],["flag = 0 : Uniform distribution A is min and A+B max"],["flag = 1 : Normal distribution A is mean and B deviation"],[" "],["A and B must be matrix with equal sizes"]],[["Datatype(1=real double  2=complex)"],["flag"],["A"],["B"],["SEED"]],list("vec",1,"vec",1,"mat",[-1,-2],"mat","[-1 -2]","mat",[1,2]),exprs);
+            if (!ok) {
+                break;
+            }
+            if (flag!=0&&flag!=1) {
+                message("flag must be equal to 1 or 0");
+            } else {
+                out = size(a);
+                if (typ==1) {
+                    function_name = "rndblk_m";
+                    model.rpar = [[real(a.slice())],[real(b.slice())]];
+                    model.dstate = [[seed_c[1-1]],[0*real(a.slice())]];
+                    ot = 1;
+                } else if (typ==2) {
+                    function_name = "rndblkz_m";
+                    ot = 2;
+                    model.rpar = [[real(a.slice())],[imag(a.slice())],[real(b.slice())],[imag(b.slice())]];
+                    model.dstate = [[seed_c.slice()],[0*[[real(a.slice())],[imag(a.slice())]]]];
+                } else {
+                    message("Datatype is not supported");
+                    ok = false;
+                }
+                if (ok) {
+                    [model,graphics,ok] = set_io(model,graphics,list([],[]),list(out,ot),1,[]);
+                    if (ok) {
+                        model.sim = list(function_name,4);
+                        graphics.exprs = exprs;
+                        model.ipar = flag;
+                        this.x.graphics = graphics;
+                        this.x.model = model;
+                        break;
+                    }
+                }
+            }
+        }
     }
 }