summaryrefslogtreecommitdiff
path: root/src/matrixOperations/fill/sfilla.c
diff options
context:
space:
mode:
authortorset2008-12-15 13:35:29 +0000
committertorset2008-12-15 13:35:29 +0000
commit4e1b5f27b89c984671f00ddab42a3f5f185a092d (patch)
tree3a2f5e12ada13de2d44a537c27f77175fcaee816 /src/matrixOperations/fill/sfilla.c
parent719416cbc187993dddd9272d95f040143b5cb137 (diff)
downloadscilab2c-4e1b5f27b89c984671f00ddab42a3f5f185a092d.tar.gz
scilab2c-4e1b5f27b89c984671f00ddab42a3f5f185a092d.tar.bz2
scilab2c-4e1b5f27b89c984671f00ddab42a3f5f185a092d.zip
Add fill and dist repertories and files (tests for dist are empty)
Diffstat (limited to 'src/matrixOperations/fill/sfilla.c')
-rw-r--r--src/matrixOperations/fill/sfilla.c24
1 files changed, 24 insertions, 0 deletions
diff --git a/src/matrixOperations/fill/sfilla.c b/src/matrixOperations/fill/sfilla.c
new file mode 100644
index 00000000..fb5b0271
--- /dev/null
+++ b/src/matrixOperations/fill/sfilla.c
@@ -0,0 +1,24 @@
+/*
+ * 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"
+#include "ones.h"
+
+
+void sfilla (float* in, int rows, int cols, float constant){
+ int i;
+
+ sonesa(in,rows,cols);
+ for (i=0;i<rows*cols;i++) in[i]*=constant;
+}