From 85e8c75a5ef43bdb89be4c5446f26ba84159e7f0 Mon Sep 17 00:00:00 2001
From: jofret
Date: Thu, 19 Jun 2008 14:58:41 +0000
Subject: Split Subtraction

---
 .../subtraction/matrixSubtraction.c                | 93 ----------------------
 src/matrixOperations/subtraction/sdiffma.c         | 93 ++++++++++++++++++++++
 2 files changed, 93 insertions(+), 93 deletions(-)
 delete mode 100644 src/matrixOperations/subtraction/matrixSubtraction.c
 create mode 100644 src/matrixOperations/subtraction/sdiffma.c

diff --git a/src/matrixOperations/subtraction/matrixSubtraction.c b/src/matrixOperations/subtraction/matrixSubtraction.c
deleted file mode 100644
index ffd30d7a..00000000
--- a/src/matrixOperations/subtraction/matrixSubtraction.c
+++ /dev/null
@@ -1,93 +0,0 @@
-/*
- *  Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
- *  Copyright (C) 2008-2008 - INRIA - Bruno JOFRET
- *
- *  This file must be used under the terms of the CeCILL.
- *  This source file is licensed as described in the file COPYING, which
- *  you should have received as part of this distribution.  The terms
- *  are also available at
- *  http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
- *
- */
-
-#include "matrixSubtraction.h"
-
-/*
-** \brief Compute an substraction element ways for floats.
-** \param in1 : input array.
-** \param size1 : size of in1 array.
-** \param in2 : input arry.
-** \param size2 : size of in2 array.
-** \param out : array that contains in1 - in2.
-*/
-void	sdiffma(float *in1, int size1,
-	       float *in2, int size2,
-	       float *out)
-{
-  int i = 0;
-
-  for(i = 0 ; i < size1 && i < size2 ; ++i)
-    {
-      out[i] = in1[i] - in2[i];
-    }
-}
-
-/*
-** \brief Compute an substraction element ways for double.
-** \param in1 : input array.
-** \param size1 : size of in1 array.
-** \param in2 : input arry.
-** \param size2 : size of in2 array.
-** \param out : array that contains in1 - in2.
-*/
-void	ddiffma(double *in1, int size1,
-	       double *in2, int size2,
-	       double * out)
-{
-  int i = 0;
-
-  for(i = 0 ; i < size1 && i < size2 ; ++i)
-    {
-      out[i] = in1[i] - in2[i];
-    }
-}
-
-/*
-** \brief Compute an substraction element ways for complex single precision.
-** \param in1 : input array.
-** \param size1 : size of in1 array.
-** \param in2 : input arry.
-** \param size2 : size of in2 array.
-** \param out : array that contains in1 - in2.
-*/
-void	cdiffma(floatComplex *in1, int size1,
-	       floatComplex *in2, int size2,
-	       floatComplex *out)
-{
-  int i = 0;
-
-  for(i = 0 ; i < size1 && i < size2 ; ++i)
-    {
-      out[i] = cdiffs(in1[i], in2[i]);
-    }
-}
-
-/*
-** \brief Compute an substraction element ways for complex double precision.
-** \param in1 : input array.
-** \param size1 : size of in1 array.
-** \param in2 : input arry.
-** \param size2 : size of in2 array.
-** \param out : array that contains in1 - in2.
-*/
-void	zdiffma(doubleComplex *in1, int size1,
-	       doubleComplex *in2, int size2,
-	       doubleComplex *out)
-{
-  int i = 0;
-
-  for(i = 0 ; i < size1 && i < size2 ; ++i)
-    {
-      out[i] = zdiffs(in1[i], in2[i]);
-    }
-}
diff --git a/src/matrixOperations/subtraction/sdiffma.c b/src/matrixOperations/subtraction/sdiffma.c
new file mode 100644
index 00000000..ffd30d7a
--- /dev/null
+++ b/src/matrixOperations/subtraction/sdiffma.c
@@ -0,0 +1,93 @@
+/*
+ *  Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+ *  Copyright (C) 2008-2008 - INRIA - Bruno JOFRET
+ *
+ *  This file must be used under the terms of the CeCILL.
+ *  This source file is licensed as described in the file COPYING, which
+ *  you should have received as part of this distribution.  The terms
+ *  are also available at
+ *  http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+ *
+ */
+
+#include "matrixSubtraction.h"
+
+/*
+** \brief Compute an substraction element ways for floats.
+** \param in1 : input array.
+** \param size1 : size of in1 array.
+** \param in2 : input arry.
+** \param size2 : size of in2 array.
+** \param out : array that contains in1 - in2.
+*/
+void	sdiffma(float *in1, int size1,
+	       float *in2, int size2,
+	       float *out)
+{
+  int i = 0;
+
+  for(i = 0 ; i < size1 && i < size2 ; ++i)
+    {
+      out[i] = in1[i] - in2[i];
+    }
+}
+
+/*
+** \brief Compute an substraction element ways for double.
+** \param in1 : input array.
+** \param size1 : size of in1 array.
+** \param in2 : input arry.
+** \param size2 : size of in2 array.
+** \param out : array that contains in1 - in2.
+*/
+void	ddiffma(double *in1, int size1,
+	       double *in2, int size2,
+	       double * out)
+{
+  int i = 0;
+
+  for(i = 0 ; i < size1 && i < size2 ; ++i)
+    {
+      out[i] = in1[i] - in2[i];
+    }
+}
+
+/*
+** \brief Compute an substraction element ways for complex single precision.
+** \param in1 : input array.
+** \param size1 : size of in1 array.
+** \param in2 : input arry.
+** \param size2 : size of in2 array.
+** \param out : array that contains in1 - in2.
+*/
+void	cdiffma(floatComplex *in1, int size1,
+	       floatComplex *in2, int size2,
+	       floatComplex *out)
+{
+  int i = 0;
+
+  for(i = 0 ; i < size1 && i < size2 ; ++i)
+    {
+      out[i] = cdiffs(in1[i], in2[i]);
+    }
+}
+
+/*
+** \brief Compute an substraction element ways for complex double precision.
+** \param in1 : input array.
+** \param size1 : size of in1 array.
+** \param in2 : input arry.
+** \param size2 : size of in2 array.
+** \param out : array that contains in1 - in2.
+*/
+void	zdiffma(doubleComplex *in1, int size1,
+	       doubleComplex *in2, int size2,
+	       doubleComplex *out)
+{
+  int i = 0;
+
+  for(i = 0 ; i < size1 && i < size2 ; ++i)
+    {
+      out[i] = zdiffs(in1[i], in2[i]);
+    }
+}
-- 
cgit