From 05fb6a62c83ae7cea37aa2795e61697b3560f135 Mon Sep 17 00:00:00 2001
From: torset
Date: Fri, 27 Feb 2009 13:30:30 +0000
Subject: change precision for tests : put it to 3e-16 for double and 3e-6 for
 float

---
 src/elementaryFunctions/exp/testDoubleExp.c | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

(limited to 'src/elementaryFunctions/exp/testDoubleExp.c')

diff --git a/src/elementaryFunctions/exp/testDoubleExp.c b/src/elementaryFunctions/exp/testDoubleExp.c
index 2daeae06..d5d9f5c4 100644
--- a/src/elementaryFunctions/exp/testDoubleExp.c
+++ b/src/elementaryFunctions/exp/testDoubleExp.c
@@ -431,10 +431,10 @@ void dexpsTest(void) {
 
 	for (i=0;i<200;i++){
 		out=dexps(in[i]);
-		assert(( (fabs(out-res[i]))/(fabs(out)) )<1e-15);
+		assert(( (fabs(out-res[i]))/(fabs(out)) )<3e-16);
 	}
 	
-	assert(( (fabs(exp(3)-20.085536923187671476398))/(exp(3)) )<1e-15);
+	assert(( (fabs(exp(3)-20.085536923187671476398))/(exp(3)) )<3e-16);
 	
 }
 
@@ -449,8 +449,8 @@ void zexpsTest(void) {
 	for (i=0;i<200;i++){
 		in=DoubleComplex(inR[i],inI[i]);
 		out=zexps(in);
-		assert(( (fabs(zreals(out)-resR[i]))/(fabs(zreals(out))) )<1e-15);	
-		assert(( (fabs(zimags(out)-resI[i]))/(fabs(zimags(out))) )<1e-15);			
+		assert(( (fabs(zreals(out)-resR[i]))/(fabs(zreals(out))) )<3e-16);	
+		assert(( (fabs(zimags(out)-resI[i]))/(fabs(zimags(out))) )<3e-16);			
 	}
 }
 
@@ -462,7 +462,7 @@ void dexpaTest(void) {
 
 	dexpa(in,200,out);
 	for (i=0;i<200;i++){
-		assert(( (fabs(out[i]-res[i]))/(fabs(out[i])) )<1e-15);
+		assert(( (fabs(out[i]-res[i]))/(fabs(out[i])) )<3e-16);
 	}
 }
 
@@ -479,8 +479,8 @@ void zexpaTest(void) {
 	}
 	zexpa(in,200,out);
 	for (i=0;i<200;i++){
-		assert(( (fabs(zreals(out[i])-resR[i]))/(fabs(zreals(out[i]))) )<1e-15);	
-		assert(( (fabs(zimags(out[i])-resI[i]))/(fabs(zimags(out[i]))) )<1e-15);			
+		assert(( (fabs(zreals(out[i])-resR[i]))/(fabs(zreals(out[i]))) )<3e-16);	
+		assert(( (fabs(zimags(out[i])-resI[i]))/(fabs(zimags(out[i]))) )<3e-16);			
 	}
 }
 
-- 
cgit