summaryrefslogtreecommitdiff
path: root/src/Scilab2C
diff options
context:
space:
mode:
authortorset2009-01-29 08:55:45 +0000
committertorset2009-01-29 08:55:45 +0000
commit87cb4a24b4bef5e1317cfa85c14535ddcba0b630 (patch)
treee6633534c9b727d7d395f1e687ea61344ee1fd37 /src/Scilab2C
parent47eff0c4b795ab3a4461013bcb5f28188ed142ab (diff)
downloadscilab2c-87cb4a24b4bef5e1317cfa85c14535ddcba0b630.tar.gz
scilab2c-87cb4a24b4bef5e1317cfa85c14535ddcba0b630.tar.bz2
scilab2c-87cb4a24b4bef5e1317cfa85c14535ddcba0b630.zip
Diffstat (limited to 'src/Scilab2C')
-rw-r--r--src/Scilab2C/SCI2CTests/test999_WorkingDir/scilabcode/mainfunction.sci45
1 files changed, 22 insertions, 23 deletions
diff --git a/src/Scilab2C/SCI2CTests/test999_WorkingDir/scilabcode/mainfunction.sci b/src/Scilab2C/SCI2CTests/test999_WorkingDir/scilabcode/mainfunction.sci
index f0958f7a..f4700edf 100644
--- a/src/Scilab2C/SCI2CTests/test999_WorkingDir/scilabcode/mainfunction.sci
+++ b/src/Scilab2C/SCI2CTests/test999_WorkingDir/scilabcode/mainfunction.sci
@@ -1,56 +1,55 @@
//SCI2C: DEFAULT_PRECISION= DOUBLE
function mainfunction()
-//test multiplication
+//test division
//d0d0
-disp (5*3)
+disp (5/3)
//d0z0
-disp (1*%i)
+disp (1/%i)
//z0d0
-disp (%i*1)
+disp (%i/5)
//z0z0
-disp (%i*3*%i)
+disp (%i/(3*%i))
-a=[1 2 3; 4 5 6]
+a=[1 2 3; 5 5 6]
c=[4 2 3 ;8 8 4; 3 4 5]
b=[1+%i,2+4*%i 3+1*%i; 4 5 6+2*%i]
d=[4 2 3 ;8 8-1*%i 4; 3+4*%i 4 5]
-e=[4 2 ;3 8 ;8-1*%i 4; 3+4*%i 4]
//d2d2
-disp(a*c)
-disp(a.*a)
+disp(a/c)
+disp(a./a)
//d2z2
-disp(a*d)
-disp(a.*b)
+disp(a/d)
+disp(a./b)
//z2d2
-disp(e*a)
-disp(b.*a)
+disp(d/c)
+disp(b./a)
//z2z2
-disp(b*d)
-disp(b.*b)
+disp(b/d)
+disp(b./b)
//d2d0
-disp(a*1)
+disp(a/2)
//d0d2
-disp(1*a)
+disp(1/a)
//d2z0
-disp(a*%i)
+disp(a/%i)
//z0d2
-disp(%i*a)
+disp(%i/a)
//z2d0
-disp(b*1)
+disp(b/5)
//d0z2
-disp(1*b)
+disp(1/b)
//z2z0
-disp(b*%i)
+disp(b/%i)
//z0z2
-disp(%i*b)
+disp(%i/b)
endfunction