diff options
Diffstat (limited to '2.3-1/tests/unit_tests/test200_malloc/scilabcode')
3 files changed, 42 insertions, 0 deletions
diff --git a/2.3-1/tests/unit_tests/test200_malloc/scilabcode/mainfunction.sci b/2.3-1/tests/unit_tests/test200_malloc/scilabcode/mainfunction.sci new file mode 100644 index 00000000..c63992e4 --- /dev/null +++ b/2.3-1/tests/unit_tests/test200_malloc/scilabcode/mainfunction.sci @@ -0,0 +1,18 @@ +//SCI2C: DEFAULT_PRECISION= DOUBLE
+function mainfunction()
+
+N = 2;
+B = myinit(N+4-2,2);
+disp('B')
+disp(B)
+
+N = 4;
+C = myinit(N,3);
+disp('C')
+disp(C)
+
+D=B+2.*C;
+disp('D')
+disp(D)
+endfunction
+
diff --git a/2.3-1/tests/unit_tests/test200_malloc/scilabcode/myinit.sci b/2.3-1/tests/unit_tests/test200_malloc/scilabcode/myinit.sci new file mode 100644 index 00000000..af38cf5c --- /dev/null +++ b/2.3-1/tests/unit_tests/test200_malloc/scilabcode/myinit.sci @@ -0,0 +1,13 @@ +//SCI2C: NIN= 2 +//SCI2C: NOUT= 1 +//SCI2C: OUT(1).TP= IN(1).TP +//SCI2C: OUT(1).SZ(1)= IN(1).VAL +//SCI2C: OUT(1).SZ(2)= IN(1).VAL +//SCI2C: DEFAULT_PRECISION= DOUBLE
+function out = myinit(n,m)
+
+out1 = m+ones(n,n); +out = out1+2*ones(n,n); + +endfunction
+ diff --git a/2.3-1/tests/unit_tests/test200_malloc/scilabcode/myzeros.sci b/2.3-1/tests/unit_tests/test200_malloc/scilabcode/myzeros.sci new file mode 100644 index 00000000..a2cdc36b --- /dev/null +++ b/2.3-1/tests/unit_tests/test200_malloc/scilabcode/myzeros.sci @@ -0,0 +1,11 @@ +//SCI2C: NIN= 1 +//SCI2C: NOUT= 1 +//SCI2C: OUT(1).TP= IN(1).TP +//SCI2C: OUT(1).SZ(1)= IN(1).SZ(1) +//SCI2C: OUT(1).SZ(2)= IN(1).SZ(2) +//SCI2C: DEFAULT_PRECISION= DOUBLE
+function out = myzeros(in)
+
+out = 3+zeros(in); +endfunction
+ |