Original Version

2 files changed, 35 insertions, 0 deletions

diff --git a/2.3-1/tests/unit_tests/test000_TrigonIdentity/launchConversion.sci b/2.3-1/tests/unit_tests/test000_TrigonIdentity/launchConversion.sci
new file mode 100644
index 00000000..41be0f04
--- /dev/null
+++ b/2.3-1/tests/unit_tests/test000_TrigonIdentity/launchConversion.sci
@@ -0,0 +1,5 @@
+lines(0)

+clear all

+tmpPWD = pwd;

+

+scilab2c(pwd()+"/scilabcode/mainfunction.sci", pwd(), pwd()+"/scilabcode/");

diff --git a/2.3-1/tests/unit_tests/test000_TrigonIdentity/scilabcode/mainfunction.sci b/2.3-1/tests/unit_tests/test000_TrigonIdentity/scilabcode/mainfunction.sci
new file mode 100644
index 00000000..b19fc009
--- /dev/null
+++ b/2.3-1/tests/unit_tests/test000_TrigonIdentity/scilabcode/mainfunction.sci
@@ -0,0 +1,30 @@
+//SCI2C: DEFAULT_PRECISION= DOUBLE

+
+function mainfunction()

+
+// ------------------------------
+// --- Simple Scalar Addition ---
+// ------------------------------
+a = 1;
+b = 2;
+c = 0;
+c = a + b;
+disp(c);
+
+// ------------------------------
+// --- Trigonometric Identity ---
+// ------------------------------
+x = (1:3)' * (4:9);
+y = (sin(x).^2) + (cos(x).^2);
+disp(x);
+disp(y-ones(3,6));
+
+// -------------------------------
+// --- Computation of Distance ---
+// -------------------------------
+// generate a vector w 
+w = cos(sin(cos(x*3)*2).* x+ones(3,6).*cos(x-sin(y*2))); 
+distxw = sqrt(x.^2 + w.^2);
+disp(distxw);
+endfunction
+