summaryrefslogtreecommitdiff
path: root/src/Scilab2C/SCI2CTests/test999_WorkingDir
diff options
context:
space:
mode:
authortorset2009-02-10 14:06:53 +0000
committertorset2009-02-10 14:06:53 +0000
commitdb8e453cc7a696d6461afdfc83faa86fad5ab7be (patch)
tree82fb6a8d2b7e00fa58e420c2568cdcfdc9ac2258 /src/Scilab2C/SCI2CTests/test999_WorkingDir
parent9cea656d20e16294356b99e360d93ab64e3e1e54 (diff)
downloadscilab2c-db8e453cc7a696d6461afdfc83faa86fad5ab7be.tar.gz
scilab2c-db8e453cc7a696d6461afdfc83faa86fad5ab7be.tar.bz2
scilab2c-db8e453cc7a696d6461afdfc83faa86fad5ab7be.zip
Some modif in Lev functions
Diffstat (limited to 'src/Scilab2C/SCI2CTests/test999_WorkingDir')
-rw-r--r--src/Scilab2C/SCI2CTests/test999_WorkingDir/scilabcode/mainfunction.sci20
1 files changed, 19 insertions, 1 deletions
diff --git a/src/Scilab2C/SCI2CTests/test999_WorkingDir/scilabcode/mainfunction.sci b/src/Scilab2C/SCI2CTests/test999_WorkingDir/scilabcode/mainfunction.sci
index cdca2826..378ded91 100644
--- a/src/Scilab2C/SCI2CTests/test999_WorkingDir/scilabcode/mainfunction.sci
+++ b/src/Scilab2C/SCI2CTests/test999_WorkingDir/scilabcode/mainfunction.sci
@@ -1,8 +1,11 @@
-//SCI2C: DEFAULT_PRECISION= DOUBLE
+//SCI2C: DEFAULT_PRECISION= FLOAT
function mainfunction()
//test lev
+
+//reals
+
b=[1 2 3 4]
disp(lev(b))
@@ -16,5 +19,20 @@ disp(x)
disp(y)
disp(z)
+//complexes
+
+c=[1+2*%i 2 3-3*%i 4+%i]
+
+disp(lev(c))
+
+[uc,vc]=lev(c)
+disp(uc)
+disp(vc)
+
+[xc,yc,zc]=lev(c)
+disp(xc)
+disp(yc)
+disp(zc)
+
endfunction