From 5b039b5b51970dd1fe3f961f80a27b1fdbea1569 Mon Sep 17 00:00:00 2001
From: simon
Date: Tue, 8 Sep 2009 07:32:30 +0000
Subject: Automated test

---
 src/c/operations/division/testRDivision.c            | 8 ++++----
 src/c/operations/multiplication/testMultiplication.c | 8 ++++----
 2 files changed, 8 insertions(+), 8 deletions(-)

(limited to 'src/c/operations')

diff --git a/src/c/operations/division/testRDivision.c b/src/c/operations/division/testRDivision.c
index 7b48ac96..f4dc2228 100644
--- a/src/c/operations/division/testRDivision.c
+++ b/src/c/operations/division/testRDivision.c
@@ -1323,9 +1323,9 @@ static void zrdivsTest()
   	in2 = DoubleComplex(DR[i],DI[i]);
   	out = zrdivs(in1,in2);
 	printf("%d : %1.25f ; num = %1.25f;erreur = %1.25f\n",i,zreals(out),RR[i], fabs(zreals(out)-RR[i]) );
-  	assert( ( fabs(zreals(out)-RR[i]) ) < 1e-15);
+  	assert( ( fabs(zreals(out)-RR[i]) ) < 1e-14);
 	printf("%d : %1.25f ; num = %1.25f;erreur = %1.25f\n",i,zimags(out),RI[i], fabs(zimags(out)-RI[i]) );
-  	assert( ( fabs(zimags(out)-RI[i]) ) < 1e-15);
+  	assert( ( fabs(zimags(out)-RI[i]) ) < 1e-14);
   }
 }
 
@@ -1406,8 +1406,8 @@ static void zrdivaTest()
   zrdiva(in1,in2,200,out);
 
   for (i=0;i<200;i++){
-  	assert( ( fabs(zreals(out[i])-RR[i]) ) < 1e-15);
-  	assert( ( fabs(zimags(out[i])-RI[i]) ) < 1e-15);
+  	assert( ( fabs(zreals(out[i])-RR[i]) ) < 1e-14);
+  	assert( ( fabs(zimags(out[i])-RI[i]) ) < 1e-14);
   }
 }
 
diff --git a/src/c/operations/multiplication/testMultiplication.c b/src/c/operations/multiplication/testMultiplication.c
index 92839b80..ac022157 100644
--- a/src/c/operations/multiplication/testMultiplication.c
+++ b/src/c/operations/multiplication/testMultiplication.c
@@ -1306,8 +1306,8 @@ static void zmulsTest(void){
 	in1=DoubleComplex(P1_R[i],P1_I[i]);
 	in2=DoubleComplex(P2_R[i],P2_I[i]);
 	out=zmuls(in1,in2);
-	assert( ( fabs(zreals(out)-Res_R[i]) / fabs(zreals(out)) ) <3e-16);
-	assert( ( fabs(zimags(out)-Res_I[i]) / fabs(zimags(out)) ) <3e-16);
+	assert( ( fabs(zreals(out)-Res_R[i]) / fabs(zreals(out)) ) <3e-15);
+	assert( ( fabs(zimags(out)-Res_I[i]) / fabs(zimags(out)) ) <3e-15);
   }
 }
 
@@ -1380,8 +1380,8 @@ static void zmulaTest(void){
   
   zmula(in1,in2,200,out);
   for (i=0;i<200;i++){
-  	assert( ( fabs(zreals(out[i])-Res_R[i]) / fabs(zreals(out[i])) ) <3e-16);
-  	assert( ( fabs(zimags(out[i])-Res_I[i]) / fabs(zimags(out[i])) ) <3e-16);
+  	assert( ( fabs(zreals(out[i])-Res_R[i]) / fabs(zreals(out[i])) ) <3e-15);
+  	assert( ( fabs(zimags(out[i])-Res_I[i]) / fabs(zimags(out[i])) ) <3e-15);
   }
 }
 
-- 
cgit