diff options
author | torset | 2009-01-28 13:25:36 +0000 |
---|---|---|
committer | torset | 2009-01-28 13:25:36 +0000 |
commit | 343dc58409dcc9d52d931f9ea2e4e541cfc0db4b (patch) | |
tree | f827aea908217bc391d9955d61f0b196fcb31ce4 /src/operations/interface/int_OpDotBackSlash.h | |
parent | 0ac678f101949aa88e9b32792273b8cc4dd3311f (diff) | |
download | scilab2c-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.h | 50 |
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 */ |