1 files changed, 112 insertions, 0 deletions
diff --git a/2.3-1/src/c/matrixOperations/includes/ones.h b/2.3-1/src/c/matrixOperations/includes/ones.h
new file mode 100644
index 00000000..6734017d
--- /dev/null
+++ b/2.3-1/src/c/matrixOperations/includes/ones.h
@@ -0,0 +1,112 @@
+/*
+ * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+ * Copyright (C) 2008 - INRIA - Allan SIMON
+ *
+ * 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
+ *
+ */
+
+
+#ifndef __ONES_H__
+#define __ONES_H__
+
+#include "dynlib_matrixoperations.h"
+#include "floatComplex.h"
+#include "doubleComplex.h"
+#include "types.h"
+
+
+#ifdef  __cplusplus
+extern "C" {
+#endif
+
+/*
+** \brief create a float one value
+*/
+#define soness(in)		1.0f
+
+/*
+** \brief create a Double one value
+*/
+#define doness(in)		1.0
+
+/*
+** \brief create a float complex one value
+*/
+#define coness(in)		FloatComplex(1.0f, 0)
+
+/*
+** \brief create a Double complex one value
+*/
+#define zoness(in)		DoubleComplex(1, 0)
+
+/*
+** \brief create a uint8 one value
+*/
+#define u8oness(in)		(uint8)1
+
+/*
+** \brief create a int8 one value
+*/
+#define i8oness(in)		(int8)1
+
+/*
+** \brief create a uint16 one value
+*/
+#define u16oness(in)		(uint16)1
+
+/*
+** \brief create a int16 one value
+*/
+#define i16oness(in)		(int16)1
+
+
+/*
+** \brief create a float matrix full of one
+*/
+EXTERN_MATOPS void sonesa ( float* in , int rows , int cols );
+
+/*
+** \brief create a float complex matrix full of one
+*/
+EXTERN_MATOPS void conesa ( floatComplex* in , int rows ,int cols );
+
+/*
+** \brief create a double  matrix full of one
+*/
+EXTERN_MATOPS void donesa ( double* in , int rows ,int cols );
+
+/*
+** \brief create a double complex  matrix full of one
+*/
+EXTERN_MATOPS void zonesa ( doubleComplex* in , int rows ,int cols );
+
+/*
+** \brief create a uint8 matrix full of one
+*/
+EXTERN_MATOPS void u8onesa ( uint8* in , int rows , int cols );
+
+/*
+** \brief create a int8 matrix full of one
+*/
+EXTERN_MATOPS void i8onesa ( int8* in , int rows , int cols );
+
+/*
+** \brief create a uint16 matrix full of one
+*/
+EXTERN_MATOPS void u16onesa ( uint16* in , int rows , int cols );
+
+/*
+** \brief create a int16 matrix full of one
+*/
+EXTERN_MATOPS void i16onesa ( int16* in , int rows , int cols );
+
+#ifdef  __cplusplus
+} /* extern "C" */
+#endif
+
+#endif /* !__ONES_H__ */