summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authortorset2009-02-19 08:33:22 +0000
committertorset2009-02-19 08:33:22 +0000
commitc0f33e51dc7a13e18af67cdecb6aa66a94928fcb (patch)
tree83c25d779efd019a7968cafe5b8109b74fc91046
parent739f45380ef86f5edee2688d4077422e2a3eb91b (diff)
downloadscilab2c-c0f33e51dc7a13e18af67cdecb6aa66a94928fcb.tar.gz
scilab2c-c0f33e51dc7a13e18af67cdecb6aa66a94928fcb.tar.bz2
scilab2c-c0f33e51dc7a13e18af67cdecb6aa66a94928fcb.zip
Add SCI2C test
-rw-r--r--scilab2c/src/Scilab2C/SCI2CTests/Mes_tests/type/mainfunctionReal_Imag.sci20
1 files changed, 20 insertions, 0 deletions
diff --git a/scilab2c/src/Scilab2C/SCI2CTests/Mes_tests/type/mainfunctionReal_Imag.sci b/scilab2c/src/Scilab2C/SCI2CTests/Mes_tests/type/mainfunctionReal_Imag.sci
new file mode 100644
index 00000000..02b5c3a7
--- /dev/null
+++ b/scilab2c/src/Scilab2C/SCI2CTests/Mes_tests/type/mainfunctionReal_Imag.sci
@@ -0,0 +1,20 @@
+//SCI2C: DEFAULT_PRECISION= DOUBLE
+
+function mainfunction()
+
+disp(real(4));
+disp(imag(4));
+
+disp(real(1+2*%i));
+disp(imag(1+2*%i));
+
+a=[4 2 7 5;4 8 6 1];
+
+disp(real(a));
+disp(imag(a));
+
+b=a+%i*2*a
+disp(real(b));
+disp(imag(b));
+
+endfunction