From 7f7c0fabe7492349323b8aec0c675ea1e60e9a3c Mon Sep 17 00:00:00 2001
From: torset
Date: Thu, 29 Jan 2009 08:08:21 +0000
Subject: Files for multiplication test which failed

---
 src/operations/interface/int_OpMinus.h | 13 +++++++------
 1 file changed, 7 insertions(+), 6 deletions(-)

(limited to 'src/operations/interface/int_OpMinus.h')

diff --git a/src/operations/interface/int_OpMinus.h b/src/operations/interface/int_OpMinus.h
index e63f3658..5dfde1d5 100644
--- a/src/operations/interface/int_OpMinus.h
+++ b/src/operations/interface/int_OpMinus.h
@@ -108,8 +108,9 @@
 #define d0z2OpMinusz2(in1,in2,size,out)		z0z2OpMinusz2(DoubleComplex(in1,0),in2,size,out)
 
 
-#define z0d2OpMinusz2(in1,in2,size,out)		dfilla((double*)out,size[0],size[1],0);\
-								z0z2OpMinusz2(in1,DoubleComplexMatrix(in2,(double*)out,size[0]*size[1]),size,out)
+#define z0d2OpMinusz2(in1,in2,size,out)		{int i=0;\
+								for (i=0;i<size[0]*size[1];i++) out[i]=zdiffs(in1,DoubleComplex(in2[i],0));\
+								}
 								
 
 
@@ -123,21 +124,21 @@
 
 
 #define s2c2OpMinusc2(in1,size1,in2,size2,out)		{int i;\
-									for (i=0;i<size[0]*size[1];i++) out[i]=cdiffs(FloatComplex(in1[i],0),in2[i]);}
+									for (i=0;i<size1[0]*size2[1];i++) out[i]=cdiffs(FloatComplex(in1[i],0),in2[i]);}
 									
 
 #define c2s2OpMinusc2(in1,size1,in2,size2,out)		{int i;\
-									for (i=0;i<size[0]*size[1];i++) out[i]=cdiffs(in1[i],FloatComplex(in2[i],0));}
+									for (i=0;i<size1[0]*size2[1];i++) out[i]=cdiffs(in1[i],FloatComplex(in2[i],0));}
 
 #define z2z2OpMinusz2(in1,size1,in2,size2,out)		zdiffa(in1, size1[0]*size1[1], in2, size2[0]*size2[1], out)
 
 
 #define d2z2OpMinusz2(in1,size1,in2,size2,out)		{int i;\
-									for (i=0;i<size[0]*size[1];i++) out[i]=zdiffs(DoubleComplex(in1[i],0),in2[i]);}
+									for (i=0;i<size1[0]*size2[1];i++) out[i]=zdiffs(DoubleComplex(in1[i],0),in2[i]);}
 									
 
 #define z2d2OpMinusz2(in1,size1,in2,size2,out)		{int i;\
-									for (i=0;i<size[0]*size[1];i++) out[i]=zdiffs(in1[i],DoubleComplex(in2[i],0));}
+									for (i=0;i<size1[0]*size2[1];i++) out[i]=zdiffs(in1[i],DoubleComplex(in2[i],0));}
 
 
 
-- 
cgit