summaryrefslogtreecommitdiff
path: root/src/operations/interface/int_OpDotBackSlash.h
diff options
context:
space:
mode:
authortorset2009-01-28 13:25:36 +0000
committertorset2009-01-28 13:25:36 +0000
commit343dc58409dcc9d52d931f9ea2e4e541cfc0db4b (patch)
treef827aea908217bc391d9955d61f0b196fcb31ce4 /src/operations/interface/int_OpDotBackSlash.h
parent0ac678f101949aa88e9b32792273b8cc4dd3311f (diff)
downloadscilab2c-343dc58409dcc9d52d931f9ea2e4e541cfc0db4b.tar.gz
scilab2c-343dc58409dcc9d52d931f9ea2e4e541cfc0db4b.tar.bz2
scilab2c-343dc58409dcc9d52d931f9ea2e4e541cfc0db4b.zip
Update interfaces
Diffstat (limited to 'src/operations/interface/int_OpDotBackSlash.h')
-rw-r--r--src/operations/interface/int_OpDotBackSlash.h50
1 files changed, 31 insertions, 19 deletions
diff --git a/src/operations/interface/int_OpDotBackSlash.h b/src/operations/interface/int_OpDotBackSlash.h
index 31e3420b..5ccd70ef 100644
--- a/src/operations/interface/int_OpDotBackSlash.h
+++ b/src/operations/interface/int_OpDotBackSlash.h
@@ -34,42 +34,54 @@
#define z0d0OpDotBackSlashz0(in1,in2) zldivs(in1,DoubleComplex(in2,0))
-/* Scalar .\ Matrix */
+/* 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 s0s2OpDotBackSlashs2(in1,in2,size,out) {int i;\
+ 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 d0d2OpDotBackSlashd2(in1,in2,size,out) {int i;\
+ for(int i=0;i<size[0]*size[1];i++) out[i]= dldivs(in1,in2[i]);}
+
+#define c0c2OpDotBackSlashc2(in1,in2,size,out) {int i;\
+ for(int i=0;i<size[0]*size[1];i++) out[i]= cldivs(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) {int i;\
+ for(int i=0;i<size[0]*size[1];i++) out[i]= zldivs(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) c0c2OpDotBackSlashc2(FloatComplex(in1,0),in2,size,out)
-#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) z0z2OpDotBackSlashz2(DoubleCompelex(in1,0),in2,size,out)
-#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) {int i;\
+ for(int i=0;i<size[0]*size[1];i++) out[i]= cldivs(in1,FloatComplex(in2[i],0));}
-#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) {int i;\
+ for(int i=0;i<size[0]*size[1];i++) out[i]= zldivs(in1,DoubleComplex(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 */
-/* Matrix .\ Scalar */
+#define s2s0OpDotBackSlashs2(in1,size,in2,out) {int i;\
+ for(int i=0;i<size[0]*size[1];i++) out[i]= sldivs(in1[i],in2);}
-#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) {int i;\
+ for(int i=0;i<size[0]*size[1];i++) out[i]= dldivs(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) {int i;\
+ for(int i=0;i<size[0]*size[1];i++) out[i]= cldivs(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) {int i;\
+ for(int i=0;i<size[0]*size[1];i++) out[i]= zldivs(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) {int i;\
+ for(int i=0;i<size[0]*size[1];i++) out[i]= cldivs(FloatComplex(in1[i],0),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) {int i;\
+ for(int i=0;i<size[0]*size[1];i++) out[i]= zldivs(DoubleComplex(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) c2c0OpDotBackSlashc2(in1,size,FloatComplex(in2,0),out)
-#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));
+#define z2d0OpDotBackSlashz2(in1,size,in2,out) z2z0OpDotBackSlashz2(in1,size,DoubleComplex(in2,0),out)
/* Matrix .\ Matrix */