add the interface for operation (interfaces for the operations with matrix in the two input are in matrixOperations)

8 files changed, 659 insertions, 0 deletions

diff --git a/src/operations/interface/int_DotBackSlash.h b/src/operations/interface/int_DotBackSlash.h
new file mode 100644
index 00000000..c082203e
--- /dev/null
+++ b/src/operations/interface/int_DotBackSlash.h
@@ -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
+ *
+ */
+
+/* THIS IS AN AUTOMATICALLY GENERATED FILE : DO NOT EDIT BY HAND. */
+
+#ifndef __INT_DOTDotBackSlash_H__
+#define __INT_DOTDotBackSlash_H__
+
+/* Scalar .\ Scalar */
+
+#define s0s0OpDotBackSlashs0(in1,in2)				sldivs(in1,in2)
+
+#define d0d0OpDotBackSlashd0(in1,in2)				dldivs(in1,in2)
+	
+#define c0c0OpDotBackSlashc0(in1,in2)				cldivs(in1,in2)
+
+#define z0z0OpDotBackSlashz0(in1,in2)				zldivs(in1,in2)
+
+#define s0c0OpDotBackSlashc0(in1,in2)				cldivs(FloatComplex(in1,0),in2)
+
+#define c0s0OpDotBackSlashc0(in1,in2)				cldivs(in1,FloatComplex(in2,0))
+
+#define d0z0OpDotBackSlashz0(in1,in2)				zldivs(DoubleComplex(in1,0),in2)
+
+#define z0d0OpDotBackSlashz0(in1,in2)				zldivs(in1,DoubleComplex(in2,0))
+
+
+/* Scalar .\ Matrix */
+
+#define s0s2OpDotBackSlashs2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= sldivs(in1,in2[i]);
+
+#define d0d2OpDotBackSlashd2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= dldivs(in1,in2[i]);
+
+#define c0c2OpDotBackSlashc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cldivs(in1,in2[i]);
+
+#define z0z2OpDotBackSlashz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zldivs(in1,in2[i]);
+
+#define s0c2OpDotBackSlashc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cldivs(FloatComplex(in1,0),in2[i]);
+
+#define d0z2OpDotBackSlashz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zldivs(DoubleComplex(in1,0),in2[i]);
+
+#define c0s2OpDotBackSlashc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cldivs(in1,FloatComplex(in2[i],0));
+
+#define z0d2OpDotBackSlashz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zldivs(in1,DoubleComplex(in2[i],0));
+
+
+/* Matrix .\ Scalar */
+
+#define s2s0OpDotBackSlashs2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= sldivs(in1[i],in2);
+
+#define d2d0OpDotBackSlashd2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= dldivs(in1[i],in2);
+
+#define c2c0OpDotBackSlashc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cldivs(in1[i],in2);
+
+#define z2z0OpDotBackSlashz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zldivs(in1[i],in2);
+
+#define s2c0OpDotBackSlashc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cldivs(FloatComplex(in1[i],0),in2);
+
+#define d2z0OpDotBackSlashz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zldivs(DoubleComplex(in1[i],0),in2);
+
+#define c2s0OpDotBackSlashc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cldivs(in1[i],FloatComplex(in2,0));
+
+#define z2d0OpDotBackSlashz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zldivs(in1[i],DoubleComplex(in2,0));
+
+/* Matrix .\ Matrix */
+
+#define s2s2OpDotBackSlashs2(in1,size1,in2,size2,out)		sldiva(in1,size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+#define d2d2OpDotBackSlashd2(in1,size1,in2,size2,out)		dldiva(in1,size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+#define c2c2OpDotBackSlashc2(in1,size1,in2,size2,out)		cldiva(in1,size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+#define c2s2OpDotBackSlashc2(in1,size1,in2,size2,out)		cldiva(in1,size1[0]*size1[1],FloatComplexMatrix(in2,0,size2[0]*size2[1]),size2[0]*size2[1],out)
+
+#define s2c2OpDotBackSlashc2(in1,size1,in2,size2,out)		cldiva(FloatComplexMatrix(in1,0,size1[0]*size1[1]),size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+#define z2z2OpDotBackSlashz2(in1,size1,in2,size2,out)		zldiva(in1,size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+#define z2d2OpDotBackSlashc2(in1,size1,in2,size2,out)		cldiva(in1,size1[0]*size1[1],DoubleComplexMatrix(in2,0,size2[0]*size2[1]),size2[0]*size2[1],out)
+
+#define d2z2OpDotBackSlashc2(in1,size1,in2,size2,out)		cldiva(DoubleComplexMatrix(in1,0,size1[0]*size1[1]),size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+
+#endif /* !__INT_DOTDotBackSlash_H__ */
diff --git a/src/operations/interface/int_OpBackSlash.h b/src/operations/interface/int_OpBackSlash.h
new file mode 100644
index 00000000..8f000b63
--- /dev/null
+++ b/src/operations/interface/int_OpBackSlash.h
@@ -0,0 +1,76 @@
+/*
+ * 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
+ *
+ */
+
+/* THIS IS AN AUTOMATICALLY GENERATED FILE : DO NOT EDIT BY HAND. */
+
+#ifndef __INT_OPBACKSLASH_H__
+#define __INT_OPBACKSLASH_H__
+
+/* Scalar \ Scalar */
+
+#define s0s0OpBackSlashs0(in1,in2)				sldivs(in1,in2)
+
+#define d0d0OpBackSlashd0(in1,in2)				dldivs(in1,in2)
+	
+#define c0c0OpBackSlashc0(in1,in2)				cldivs(in1,in2)
+
+#define z0z0OpBackSlashz0(in1,in2)				zldivs(in1,in2)
+
+#define s0c0OpBackSlashc0(in1,in2)				cldivs(FloatComplex(in1,0),in2)
+
+#define c0s0OpBackSlashc0(in1,in2)				cldivs(in1,FloatComplex(in2,0))
+
+#define d0z0OpBackSlashz0(in1,in2)				zldivs(DoubleComplex(in1,0),in2)
+
+#define z0d0OpBackSlashz0(in1,in2)				zldivs(in1,DoubleComplex(in2,0))
+
+
+/* Scalar \ Matrix */
+
+#define s0s2OpBackSlashs2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= sldivs(in1,in2[i]);
+
+#define d0d2OpBackSlashd2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= dldivs(in1,in2[i]);
+
+#define c0c2OpBackSlashc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cldivs(in1,in2[i]);
+
+#define z0z2OpBackSlashz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zldivs(in1,in2[i]);
+
+#define s0c2OpBackSlashc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cldivs(FloatComplex(in1,0),in2[i]);
+
+#define d0z2OpBackSlashz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zldivs(DoubleComplex(in1,0),in2[i]);
+
+#define c0s2OpBackSlashc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cldivs(in1,FloatComplex(in2[i],0));
+
+#define z0d2OpBackSlashz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zldivs(in1,DoubleComplex(in2[i],0));
+
+
+/* Matrix \ Scalar */
+
+#define s2s0OpBackSlashs2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= sldivs(in1[i],in2);
+
+#define d2d0OpBackSlashd2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= dldivs(in1[i],in2);
+
+#define c2c0OpBackSlashc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cldivs(in1[i],in2);
+
+#define z2z0OpBackSlashz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zldivs(in1[i],in2);
+
+#define s2c0OpBackSlashc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cldivs(FloatComplex(in1[i],0),in2);
+
+#define d2z0OpBackSlashz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zldivs(DoubleComplex(in1[i],0),in2);
+
+#define c2s0OpBackSlashc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cldivs(in1[i],FloatComplex(in2,0));
+
+#define z2d0OpBackSlashz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zldivs(in1[i],DoubleComplex(in2,0));
+
+
+
+#endif /* !__INT_OPBACKSLASH_H__ */
diff --git a/src/operations/interface/int_OpDotSlash.h b/src/operations/interface/int_OpDotSlash.h
new file mode 100644
index 00000000..bc56ef06
--- /dev/null
+++ b/src/operations/interface/int_OpDotSlash.h
@@ -0,0 +1,94 @@
+/*
+ * 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
+ *
+ */
+
+/* THIS IS AN AUTOMATICALLY GENERATED FILE : DO NOT EDIT BY HAND. */
+
+#ifndef __INT_OPDOTSLASH_H__
+#define __INT_OPDOTSLASH_H__
+
+/* Scalar ./ Scalar */
+
+#define s0s0OpDotSlashs0(in1,in2)				srdivs(in1,in2)
+
+#define d0d0OpDotSlashd0(in1,in2)				drdivs(in1,in2)
+	
+#define c0c0OpDotSlashc0(in1,in2)				crdivs(in1,in2)
+
+#define z0z0OpDotSlashz0(in1,in2)				zrdivs(in1,in2)
+
+#define s0c0OpDotSlashc0(in1,in2)				crdivs(FloatComplex(in1,0),in2)
+
+#define c0s0OpDotSlashc0(in1,in2)				crdivs(in1,FloatComplex(in2,0))
+
+#define d0z0OpDotSlashz0(in1,in2)				zrdivs(DoubleComplex(in1,0),in2)
+
+#define z0d0OpDotSlashz0(in1,in2)				zrdivs(in1,DoubleComplex(in2,0))
+
+
+/* Scalar ./ Matrix */
+
+#define s0s2OpDotSlashs2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= srdivs(in1,in2[i]);
+
+#define d0d2OpDotSlashd2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= drdivs(in1,in2[i]);
+
+#define c0c2OpDotSlashc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= crdivs(in1,in2[i]);
+
+#define z0z2OpDotSlashz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zrdivs(in1,in2[i]);
+
+#define s0c2OpDotSlashc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= crdivs(FloatComplex(in1,0),in2[i]);
+
+#define d0z2OpDotSlashz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zrdivs(DoubleComplex(in1,0),in2[i]);
+
+#define c0s2OpDotSlashc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= crdivs(in1,FloatComplex(in2[i],0));
+
+#define z0d2OpDotSlashz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zrdivs(in1,DoubleComplex(in2[i],0));
+
+
+/* Matrix ./ Scalar */
+
+#define s2s0OpDotSlashs2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= srdivs(in1[i],in2);
+
+#define d2d0OpDotSlashd2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= drdivs(in1[i],in2);
+
+#define c2c0OpDotSlashc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= crdivs(in1[i],in2);
+
+#define z2z0OpDotSlashz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zrdivs(in1[i],in2);
+
+#define s2c0OpDotSlashc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= crdivs(FloatComplex(in1[i],0),in2);
+
+#define d2z0OpDotSlashz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zrdivs(DoubleComplex(in1[i],0),in2);
+
+#define c2s0OpDotSlashc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= crdivs(in1[i],FloatComplex(in2,0));
+
+#define z2d0OpDotSlashz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zrdivs(in1[i],DoubleComplex(in2,0));
+
+/* Matrix ./ Matrix */
+
+#define s2s2OpDotSlashs2(in1,size1,in2,size2,out)		srdiva(in1,size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+#define d2d2OpDotSlashd2(in1,size1,in2,size2,out)		drdiva(in1,size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+#define c2c2OpDotSlashc2(in1,size1,in2,size2,out)		crdiva(in1,size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+#define c2s2OpDotSlashc2(in1,size1,in2,size2,out)		crdiva(in1,size1[0]*size1[1],FloatComplexMatrix(in2,0,size2[0]*size2[1]),size2[0]*size2[1],out)
+
+#define s2c2OpDotSlashc2(in1,size1,in2,size2,out)		crdiva(FloatComplexMatrix(in1,0,size1[0]*size1[1]),size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+#define z2z2OpDotSlashz2(in1,size1,in2,size2,out)		zrdiva(in1,size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+#define z2d2OpDotSlashc2(in1,size1,in2,size2,out)		crdiva(in1,size1[0]*size1[1],DoubleComplexMatrix(in2,0,size2[0]*size2[1]),size2[0]*size2[1],out)
+
+#define d2z2OpDotSlashc2(in1,size1,in2,size2,out)		crdiva(DoubleComplexMatrix(in1,0,size1[0]*size1[1]),size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+
+
+#endif /* !__INT_OPDOTSLASH_H__ */
diff --git a/src/operations/interface/int_OpDotStar.h b/src/operations/interface/int_OpDotStar.h
new file mode 100644
index 00000000..8adfee87
--- /dev/null
+++ b/src/operations/interface/int_OpDotStar.h
@@ -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
+ *
+ */
+
+/* THIS IS AN AUTOMATICALLY GENERATED FILE : DO NOT EDIT BY HAND. */
+
+#ifndef __INT_OPDOTSTAR_H__
+#define __INT_OPDOTSTAR_H__
+
+/* Scalar .* Scalar */
+
+#define s0s0OpDotStars0(in1,in2)				smuls(in1,in2)
+
+#define d0d0OpDotStard0(in1,in2)				dmuls(in1,in2)
+	
+#define c0c0OpDotStarc0(in1,in2)				cmuls(in1,in2)
+
+#define z0z0OpDotStarz0(in1,in2)				zmuls(in1,in2)
+
+#define s0c0OpDotStarc0(in1,in2)				cmuls(FloatComplex(in1,0),in2)
+
+#define c0s0OpDotStarc0(in1,in2)				cmuls(in1,FloatComplex(in2,0))
+
+#define d0z0OpDotStarz0(in1,in2)				zmuls(DoubleComplex(in1,0),in2)
+
+#define z0d0OpDotStarz0(in1,in2)				zmuls(in1,DoubleComplex(in2,0))
+
+
+/* Scalar .* Matrix */
+
+#define s0s2OpDotStars2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= smuls(in1,in2[i]);
+
+#define d0d2OpDotStard2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= dmuls(in1,in2[i]);
+
+#define c0c2OpDotStarc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cmuls(in1,in2[i]);
+
+#define z0z2OpDotStarz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zmuls(in1,in2[i]);
+
+#define s0c2OpDotStarc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cmuls(FloatComplex(in1,0),in2[i]);
+
+#define d0z2OpDotStarz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zmuls(DoubleComplex(in1,0),in2[i]);
+
+#define c0s2OpDotStarc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cmuls(in1,FloatComplex(in2[i],0));
+
+#define z0d2OpDotStarz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zmuls(in1,DoubleComplex(in2[i],0));
+
+
+/* Matrix .* Scalar */
+
+#define s2s0OpDotStars2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= smuls(in1[i],in2);
+
+#define d2d0OpDotStard2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= dmuls(in1[i],in2);
+
+#define c2c0OpDotStarc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cmuls(in1[i],in2);
+
+#define z2z0OpDotStarz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zmuls(in1[i],in2);
+
+#define s2c0OpDotStarc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cmuls(FloatComplex(in1[i],0),in2);
+
+#define d2z0OpDotStarz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zmuls(DoubleComplex(in1[i],0),in2);
+
+#define c2s0OpDotStarc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cmuls(in1[i],FloatComplex(in2,0));
+
+#define z2d0OpDotStarz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zmuls(in1[i],DoubleComplex(in2,0));
+
+/* Matrix .* Matrix */
+
+#define s2s2OpDotStars2(in1,size1,in2,size2,out)		smula(in1,size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+#define d2d2OpDotStard2(in1,size1,in2,size2,out)		dmula(in1,size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+#define c2c2OpDotStarc2(in1,size1,in2,size2,out)		cmula(in1,size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+#define c2s2OpDotStarc2(in1,size1,in2,size2,out)		cmula(in1,size1[0]*size1[1],FloatComplexMatrix(in2,0,size2[0]*size2[1]),size2[0]*size2[1],out)
+
+#define s2c2OpDotStarc2(in1,size1,in2,size2,out)		cmula(FloatComplexMatrix(in1,0,size1[0]*size1[1]),size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+#define z2z2OpDotStarz2(in1,size1,in2,size2,out)		zmula(in1,size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+#define z2d2OpDotStarc2(in1,size1,in2,size2,out)		cmula(in1,size1[0]*size1[1],DoubleComplexMatrix(in2,0,size2[0]*size2[1]),size2[0]*size2[1],out)
+
+#define d2z2OpDotStarc2(in1,size1,in2,size2,out)		cmula(DoubleComplexMatrix(in1,0,size1[0]*size1[1]),size1[0]*size1[1],in2,size2[0]*size2[1],out)
+
+
+#endif /* !__INT_OPDOTSTAR_H__ */
diff --git a/src/operations/interface/int_OpMinus.h b/src/operations/interface/int_OpMinus.h
new file mode 100644
index 00000000..6d925c3d
--- /dev/null
+++ b/src/operations/interface/int_OpMinus.h
@@ -0,0 +1,75 @@
+/*
+ * 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
+ *
+ */
+
+/* THIS IS AN AUTOMATICALLY GENERATED FILE : DO NOT EDIT BY HAND. */
+
+#ifndef __INT_OPMINUS_H__
+#define __INT_OPMINUS_H__
+
+/* Scalar - Scalar */
+
+#define s0s0OpMinuss0(in1,in2)				sdiffs(in1,in2)
+
+#define d0d0OpMinusd0(in1,in2)				ddiffs(in1,in2)
+	
+#define c0c0OpMinusc0(in1,in2)				cdiffs(in1,in2)
+
+#define z0z0OpMinusz0(in1,in2)				zdiffs(in1,in2)
+
+#define s0c0OpMinusc0(in1,in2)				cdiffs(FloatComplex(in1,0),in2)
+
+#define c0s0OpMinusc0(in1,in2)				cdiffs(in1,FloatComplex(in2,0))
+
+#define d0z0OpMinusz0(in1,in2)				zdiffs(DoubleComplex(in1,0),in2)
+
+#define z0d0OpMinusz0(in1,in2)				zdiffs(in1,DoubleComplex(in2,0))
+
+
+/* Scalar - Matrix */
+
+#define s0s2OpMinuss2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= sdiffs(in1,in2[i]);
+
+#define d0d2OpMinusd2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= ddiffs(in1,in2[i]);
+
+#define c0c2OpMinusc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cdiffs(in1,in2[i]);
+
+#define z0z2OpMinusz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zdiffs(in1,in2[i]);
+
+#define s0c2OpMinusc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cdiffs(FloatComplex(in1,0),in2[i]);
+
+#define d0z2OpMinusz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zdiffs(DoubleComplex(in1,0),in2[i]);
+
+#define c0s2OpMinusc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cdiffs(in1,FloatComplex(in2[i],0));
+
+#define z0d2OpMinusz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zdiffs(in1,DoubleComplex(in2[i],0));
+
+/* Matrix - Scalar */
+
+#define s2s0OpMinuss2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= sdiffs(in1[i],in2);
+
+#define d2d0OpMinusd2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= ddiffs(in1[i],in2);
+
+#define c2c0OpMinusc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cdiffs(in1[i],in2);
+
+#define z2z0OpMinusz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zdiffs(in1[i],in2);
+
+#define s2c0OpMinusc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cdiffs(FloatComplex(in1[i],0),in2);
+
+#define d2z0OpMinusz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zdiffs(DoubleComplex(in1[i],0),in2);
+
+#define c2s0OpMinusc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cdiffs(in1[i],FloatComplex(in2,0));
+
+#define z2d0OpMinusz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zdiffs(in1[i],DoubleComplex(in2,0));
+
+
+
+#endif /* !__INT_OPMINUS_H__ */
diff --git a/src/operations/interface/int_OpPlus.h b/src/operations/interface/int_OpPlus.h
new file mode 100644
index 00000000..7cfe31d8
--- /dev/null
+++ b/src/operations/interface/int_OpPlus.h
@@ -0,0 +1,78 @@
+/*
+ * 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
+ *
+ */
+
+/* THIS IS AN AUTOMATICALLY GENERATED FILE : DO NOT EDIT BY HAND. */
+
+#ifndef __INT_OPPLUS_H__
+#define __INT_OPPLUS_H__
+
+
+/* Scalar + Scalar */
+
+#define s0s0OpPluss0(in1,in2)				sadds(in1,in2)
+
+#define d0d0OpPlusd0(in1,in2)				dadds(in1,in2)
+	
+#define c0c0OpPlusc0(in1,in2)				cadds(in1,in2)
+
+#define z0z0OpPlusz0(in1,in2)				zadds(in1,in2)
+
+#define s0c0OpPlusc0(in1,in2)				cadds(FloatComplex(in1,0),in2)
+
+#define c0s0OpPlusc0(in1,in2)				cadds(in1,FloatComplex(in2,0))
+
+#define d0z0OpPlusz0(in1,in2)				zadds(DoubleComplex(in1,0),in2)
+
+#define z0d0OpPlusz0(in1,in2)				zadds(in1,DoubleComplex(in2,0))
+
+
+
+/* Matrix + Scalar */
+
+#define s2s0OpPluss2(in1,size,in2,out)		for (int i=0;i<size[0]*size[1];i++) out[i] = sadds(in1[i],in2)
+
+#define d2d0OpPlusd2(in1,size,in2,out)		for (int i=0;i<size[0]*size[1];i++) out[i] = dadds(in1[i],in2)
+
+#define c2c0OpPlusc2(in1,size,in2,out)		for (int i=0;i<size[0]*size[1];i++) out[i] = cadds(in1[i],in2)
+
+#define c2s0OpPlusc2(in1,size,in2,out)		for (int i=0;i<size[0]*size[1];i++) out[i] = cadds(in1[i],FloatComplex(in2,0))
+
+#define s2c0OpPlusc2(in1,size,in2,out)		for (int i=0;i<size[0]*size[1];i++) out[i] = cadds(FloatComplex(in1[i],0),in2)
+
+#define z2z0OpPlusz2(in1,size,in2,out)		for (int i=0;i<size[0]*size[1];i++) out[i] = zadds(in1[i],in2)
+
+#define z2d0OpPlusz2(in1,size,in2,out)		for (int i=0;i<size[0]*size[1];i++) out[i] = zadds(in1[i],DoubleComplex(in2,0))
+
+#define d2z0OpPlusz2(in1,size,in2,out)		for (int i=0;i<size[0]*size[1];i++) out[i] = zadds(DoubleComplex(in1[i],0),in2)
+
+
+/* Scalar + Matrix */
+
+#define s0s2OpPluss2(in1,size,in2,out)		for (int i=0;i<size[0]*size[1];i++) out[i] = sadds(in1,in2[i])
+
+#define d0d2OpPlusd2(in1,size,in2,out)		for (int i=0;i<size[0]*size[1];i++) out[i] = dadds(in1,in2[i])
+
+#define c0c2OpPlusc2(in1,size,in2,out)		for (int i=0;i<size[0]*size[1];i++) out[i] = cadds(in1,in2[i])
+
+#define s0c2OpPlusc2(in1,size,in2,out)		for (int i=0;i<size[0]*size[1];i++) out[i] = cadds(FloatComplex(in1,0),in2[i])
+
+#define c0s2OpPlusc2(in1,size,in2,out)		for (int i=0;i<size[0]*size[1];i++) out[i] = cadds(in1,FloatComplex(in2[i],0))
+
+#define z0z2OpPlusz2(in1,size,in2,out)		for (int i=0;i<size[0]*size[1];i++) out[i] = zadds(in1,in2[i])
+
+#define d0z2OpPlusz2(in1,size,in2,out)		for (int i=0;i<size[0]*size[1];i++) out[i] = zadds(DoubleComplex(in1,0),in2[i])
+
+#define z0d2OpPlusz2(in1,size,in2,out)		for (int i=0;i<size[0]*size[1];i++) out[i] = zadds(in1,DoubleComplex(in2[i],0))
+
+
+
+#endif /* !__INT_OPPLUS_H__ */
diff --git a/src/operations/interface/int_OpSlash.h b/src/operations/interface/int_OpSlash.h
new file mode 100644
index 00000000..b4de1088
--- /dev/null
+++ b/src/operations/interface/int_OpSlash.h
@@ -0,0 +1,74 @@
+/*
+ * 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
+ *
+ */
+
+/* THIS IS AN AUTOMATICALLY GENERATED FILE : DO NOT EDIT BY HAND. */
+
+#ifndef __INT_OPSLASH_H__
+#define __INT_OPSLASH_H__
+
+/* Scalar / Scalar */
+
+#define s0s0OpSlashs0(in1,in2)				srdivs(in1,in2)
+
+#define d0d0OpSlashd0(in1,in2)				drdivs(in1,in2)
+	
+#define c0c0OpSlashc0(in1,in2)				crdivs(in1,in2)
+
+#define z0z0OpSlashz0(in1,in2)				zrdivs(in1,in2)
+
+#define s0c0OpSlashc0(in1,in2)				crdivs(FloatComplex(in1,0),in2)
+
+#define c0s0OpSlashc0(in1,in2)				crdivs(in1,FloatComplex(in2,0))
+
+#define d0z0OpSlashz0(in1,in2)				zrdivs(DoubleComplex(in1,0),in2)
+
+#define z0d0OpSlashz0(in1,in2)				zrdivs(in1,DoubleComplex(in2,0))
+
+
+/* Scalar / Matrix */
+
+#define s0s2OpSlashs2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= srdivs(in1,in2[i]);
+
+#define d0d2OpSlashd2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= drdivs(in1,in2[i]);
+
+#define c0c2OpSlashc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= crdivs(in1,in2[i]);
+
+#define z0z2OpSlashz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zrdivs(in1,in2[i]);
+
+#define s0c2OpSlashc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= crdivs(FloatComplex(in1,0),in2[i]);
+
+#define d0z2OpSlashz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zrdivs(DoubleComplex(in1,0),in2[i]);
+
+#define c0s2OpSlashc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= crdivs(in1,FloatComplex(in2[i],0));
+
+#define z0d2OpSlashz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zrdivs(in1,DoubleComplex(in2[i],0));
+
+
+/* Matrix / Scalar */
+
+#define s2s0OpSlashs2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= srdivs(in1[i],in2);
+
+#define d2d0OpSlashd2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= drdivs(in1[i],in2);
+
+#define c2c0OpSlashc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= crdivs(in1[i],in2);
+
+#define z2z0OpSlashz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zrdivs(in1[i],in2);
+
+#define s2c0OpSlashc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= crdivs(FloatComplex(in1[i],0),in2);
+
+#define d2z0OpSlashz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zrdivs(DoubleComplex(in1[i],0),in2);
+
+#define c2s0OpSlashc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= crdivs(in1[i],FloatComplex(in2,0));
+
+#define z2d0OpSlashz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zrdivs(in1[i],DoubleComplex(in2,0));
+
+#endif /* !__INT_OPSLASH_H__ */
diff --git a/src/operations/interface/int_OpStar.h b/src/operations/interface/int_OpStar.h
new file mode 100644
index 00000000..82bcf2fd
--- /dev/null
+++ b/src/operations/interface/int_OpStar.h
@@ -0,0 +1,76 @@
+/*
+ * 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
+ *
+ */
+
+/* THIS IS AN AUTOMATICALLY GENERATED FILE : DO NOT EDIT BY HAND. */
+
+#ifndef __INT_OPSTAR_H__
+#define __INT_OPSTAR_H__
+
+/* Scalar * Scalar */
+
+#define s0s0OpStars0(in1,in2)				smuls(in1,in2)
+
+#define d0d0OpStard0(in1,in2)				dmuls(in1,in2)
+	
+#define c0c0OpStarc0(in1,in2)				cmuls(in1,in2)
+
+#define z0z0OpStarz0(in1,in2)				zmuls(in1,in2)
+
+#define s0c0OpStarc0(in1,in2)				cmuls(FloatComplex(in1,0),in2)
+
+#define c0s0OpStarc0(in1,in2)				cmuls(in1,FloatComplex(in2,0))
+
+#define d0z0OpStarz0(in1,in2)				zmuls(DoubleComplex(in1,0),in2)
+
+#define z0d0OpStarz0(in1,in2)				zmuls(in1,DoubleComplex(in2,0))
+
+
+/* Scalar * Matrix */
+
+#define s0s2OpStars2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= smuls(in1,in2[i]);
+
+#define d0d2OpStard2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= dmuls(in1,in2[i]);
+
+#define c0c2OpStarc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cmuls(in1,in2[i]);
+
+#define z0z2OpStarz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zmuls(in1,in2[i]);
+
+#define s0c2OpStarc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cmuls(FloatComplex(in1,0),in2[i]);
+
+#define d0z2OpStarz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zmuls(DoubleComplex(in1,0),in2[i]);
+
+#define c0s2OpStarc2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cmuls(in1,FloatComplex(in2[i],0));
+
+#define z0d2OpStarz2(in1,in2,size,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zmuls(in1,DoubleComplex(in2[i],0));
+
+
+/* Matrix * Scalar */
+
+#define s2s0OpStars2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= smuls(in1[i],in2);
+
+#define d2d0OpStard2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= dmuls(in1[i],in2);
+
+#define c2c0OpStarc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cmuls(in1[i],in2);
+
+#define z2z0OpStarz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zmuls(in1[i],in2);
+
+#define s2c0OpStarc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cmuls(FloatComplex(in1[i],0),in2);
+
+#define d2z0OpStarz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zmuls(DoubleComplex(in1[i],0),in2);
+
+#define c2s0OpStarc2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= cmuls(in1[i],FloatComplex(in2,0));
+
+#define z2d0OpStarz2(in1,size,in2,out)			for(int i=0;i<size[0]*size[1];i++) out[i]= zmuls(in1[i],DoubleComplex(in2,0));
+
+
+
+#endif /* !__INT_OPSTAR_H__ */