summaryrefslogtreecommitdiff
path: root/src/c/matrixOperations/fill/cfilla.c
diff options
context:
space:
mode:
authorjofret2009-04-28 06:55:15 +0000
committerjofret2009-04-28 06:55:15 +0000
commit89ce1d449dde70966962946e197c576cf350dc31 (patch)
tree913252b78bddfb80d8a7a98db0592950372f91d0 /src/c/matrixOperations/fill/cfilla.c
parent49ad35ec2d8a12428a1613e2a955ddae4195e216 (diff)
downloadscilab2c-89ce1d449dde70966962946e197c576cf350dc31.tar.gz
scilab2c-89ce1d449dde70966962946e197c576cf350dc31.tar.bz2
scilab2c-89ce1d449dde70966962946e197c576cf350dc31.zip
Moving source code
Diffstat (limited to 'src/c/matrixOperations/fill/cfilla.c')
-rw-r--r--src/c/matrixOperations/fill/cfilla.c21
1 files changed, 21 insertions, 0 deletions
diff --git a/src/c/matrixOperations/fill/cfilla.c b/src/c/matrixOperations/fill/cfilla.c
new file mode 100644
index 00000000..0c591047
--- /dev/null
+++ b/src/c/matrixOperations/fill/cfilla.c
@@ -0,0 +1,21 @@
+/*
+ * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+ * Copyright (C) 2008 - INRIA - Arnaud TORSET
+ *
+ * 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 "fill.h"
+
+void cfilla (floatComplex* in, int rows, int cols, floatComplex constant){
+ int i;
+
+ for (i=0;i<rows*cols;i++) in[i]=FloatComplex(creals(constant),cimags(constant));
+}