1 files changed, 55 insertions, 54 deletions
diff --git a/js/MatrixOp/EXTTRI.js b/js/MatrixOp/EXTTRI.js
index 319de0cc..5ebaaf18 100644
--- a/js/MatrixOp/EXTTRI.js
+++ b/js/MatrixOp/EXTTRI.js
@@ -22,70 +22,71 @@ function EXTTRI() {
         model.dep_ut = [true,false];
         label = [[sci2exp(1)],[sci2exp(1)]];
         gr_i = [];
-        x = standard_define([3,2],model,label,gr_i);
+        this.x = standard_define([3,2],model,label,gr_i);
     }
     EXTTRI.prototype.details = function EXTTRI() {
+        return this.x;
     }
     EXTTRI.prototype.get = function EXTTRI() {
     }
     EXTTRI.prototype.set = function EXTTRI() {
-        x = arg1;
+        this.x = arg1;
         model = arg1.model;
         graphics = arg1.graphics;
         label = graphics.exprs;
         if (size(label,"*")==14) {
-        label[9-1] = [];
-}
+            label[9-1] = [];
+        }
         while (true) {
-        [ok,typ,decomptyp,lab] = scicos_getvalue("Set EXTTRI block parameters",[["Datatype(1=real double  2=Complex)"],["extraction type (1=lower  2=upper  3=diagonal)"]],list("vec",1,"vec",1),label);
-        if (!ok) {
-break;
-}
-        label = lab;
-        if ((typ==1)) {
-        if ((decomptyp==1)) {
-        function_name = "exttril";
-        } else if ((decomptyp==2)) {
-        function_name = "exttriu";
-        } else if ((decomptyp==3)) {
-        function_name = "extdiag";
-        } else {
-message("decomposition type is not supported");
-        ok = false;
-}
-        it = 1;
-        ot = 1;
-        } else if ((typ==2)) {
-        if ((decomptyp==1)) {
-        function_name = "exttrilz";
-        } else if ((decomptyp==2)) {
-        function_name = "exttriuz";
-        } else if ((decomptyp==3)) {
-        function_name = "extdiagz";
-        } else {
-message("decomposition type is not supported");
-        ok = false;
-}
-        it = 2;
-        ot = 2;
-        } else {
-message("Datatype is not supported");
-        ok = false;
-}
-        in1 = [model.in1,model.in2];
-        out = [model.out,model.out2];
-        funtyp = 4;
-        if (ok) {
-        [model,graphics,ok] = set_io(model,graphics,list(in1,it),list(out,ot),[],[]);
-}
-        if (ok) {
-        model.sim = list(function_name,funtyp);
-        arg1.model = model;
-        graphics.exprs = label;
-        arg1.graphics = graphics;
-        x = arg1;
-break;
-}
-}
+            [ok,typ,decomptyp,lab] = scicos_getvalue("Set EXTTRI block parameters",[["Datatype(1=real double  2=Complex)"],["extraction type (1=lower  2=upper  3=diagonal)"]],list("vec",1,"vec",1),label);
+            if (!ok) {
+                break;
+            }
+            label = lab;
+            if ((typ==1)) {
+                if ((decomptyp==1)) {
+                    function_name = "exttril";
+                } else if ((decomptyp==2)) {
+                    function_name = "exttriu";
+                } else if ((decomptyp==3)) {
+                    function_name = "extdiag";
+                } else {
+                    message("decomposition type is not supported");
+                    ok = false;
+                }
+                it = 1;
+                ot = 1;
+            } else if ((typ==2)) {
+                if ((decomptyp==1)) {
+                    function_name = "exttrilz";
+                } else if ((decomptyp==2)) {
+                    function_name = "exttriuz";
+                } else if ((decomptyp==3)) {
+                    function_name = "extdiagz";
+                } else {
+                    message("decomposition type is not supported");
+                    ok = false;
+                }
+                it = 2;
+                ot = 2;
+            } else {
+                message("Datatype is not supported");
+                ok = false;
+            }
+            in1 = [model.in1,model.in2];
+            out = [model.out,model.out2];
+            funtyp = 4;
+            if (ok) {
+                [model,graphics,ok] = set_io(model,graphics,list(in1,it),list(out,ot),[],[]);
+            }
+            if (ok) {
+                model.sim = list(function_name,funtyp);
+                arg1.model = model;
+                graphics.exprs = label;
+                arg1.graphics = graphics;
+                this.x = arg1;
+                break;
+            }
+        }
     }
 }