change precision for tests : put it to 3e-16 for double and 3e-6 for float

2 files changed, 14 insertions, 14 deletions

diff --git a/src/elementaryFunctions/log/testDoubleLog.c b/src/elementaryFunctions/log/testDoubleLog.c
index 94f8357f..424b9db2 100644
--- a/src/elementaryFunctions/log/testDoubleLog.c
+++ b/src/elementaryFunctions/log/testDoubleLog.c
@@ -852,7 +852,7 @@ void dlogsTest(void) {
 
 	for (i=0;i<200;i++){
 		out=dlogs(in[i]);
-		assert(( (fabs(out-res[i]))/(fabs(out)) )<1e-15);
+		assert(( (fabs(out-res[i]))/(fabs(out)) )<3e-16);
 	}
 	
 	for (i=0;i<200;i++){
@@ -878,15 +878,15 @@ void zlogsTest(void) {
 	for (i=0;i<200;i++){
 		in=DoubleComplex(inR[i],inI[i]);
 		out=zlogs(in);
-		assert(( (fabs(zreals(out)-resR[i]))/(fabs(zreals(out))) )<1e-14);	
-		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);			
 	}
 	
 	
 	for (i=0;i<200;i++){
 		in2=DoubleComplex(in2R[i],in2I[i]);
 		out=zlogs(in2);
-		assert(( (fabs(zreals(out)-res2R[i]))/(fabs(zreals(out))) )<1e-15);	
+		assert(( (fabs(zreals(out)-res2R[i]))/(fabs(zreals(out))) )<3e-16);	
 		assert(( (fabs(zimags(out)-res2I[i]))/(fabs(zimags(out))) )<1e-16);			
 	}
 }
@@ -901,7 +901,7 @@ void dlogaTest(void) {
 
 	dloga(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);
 	}
 	
 	dloga(in2,200,out);
@@ -927,15 +927,15 @@ void zlogaTest(void) {
 	zloga(in,200,out);
 
 	for (i=0;i<200;i++){
-		assert(( (fabs(zreals(out[i])-resR[i]))/(fabs(zreals(out[i]))) )<1e-14);	
-		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);			
 	}
 	
 	in2=DoubleComplexMatrix(in2R,in2I,200);
 	zloga(in2,200,out);
 
 	for (i=0;i<200;i++){
-		assert(( (fabs(zreals(out[i])-res2R[i]))/(fabs(zreals(out[i]))) )<1e-15);	
+		assert(( (fabs(zreals(out[i])-res2R[i]))/(fabs(zreals(out[i]))) )<3e-16);	
 		assert(( (fabs(zimags(out[i])-res2I[i]))/(fabs(zimags(out[i]))) )<1e-16);			
 	}
 	
diff --git a/src/elementaryFunctions/log/testFloatLog.c b/src/elementaryFunctions/log/testFloatLog.c
index 34b12d89..d2a85cc0 100644
--- a/src/elementaryFunctions/log/testFloatLog.c
+++ b/src/elementaryFunctions/log/testFloatLog.c
@@ -857,12 +857,12 @@ void slogsTest(void) {
 
 	for (i=0;i<200;i++){
 		out=slogs(in[i]);
-		assert(( (fabs(out-res[i]))/(fabs(out)) )<1e-5);
+		assert(( (fabs(out-res[i]))/(fabs(out)) )<3e-6);
 	}
 	
 	for (i=0;i<200;i++){
 		out=slogs(in2[i]);
-		assert(( (fabs(out-res2[i]))/(fabs(out)) )<1e-4);
+		assert(( (fabs(out-res2[i]))/(fabs(out)) )<3e-6);
 	}
 }
 
@@ -881,7 +881,7 @@ void clogsTest(void) {
 	for (i=0;i<200;i++){
 		in=FloatComplex(inR[i],inI[i]);
 		out=clogs(in);
-		assert(( (fabs(creals(out)-resR[i]))/(fabs(creals(out))) )<1e-5);	
+		assert(( (fabs(creals(out)-resR[i]))/(fabs(creals(out))) )<3e-6);	
 		assert(( (fabs(cimags(out)-resI[i]))/(fabs(cimags(out))) )<1e-6);			
 	}
 
@@ -903,12 +903,12 @@ void slogaTest(void) {
 	
 	sloga(in,200,out);
 	for (i=0;i<200;i++){
-		assert(( (fabs(out[i]-res[i]))/(fabs(out[i])) )<1e-5);
+		assert(( (fabs(out[i]-res[i]))/(fabs(out[i])) )<3e-6);
 	}
 	
 	sloga(in2,200,out);
 	for (i=0;i<200;i++){
-		assert(( (fabs(out[i]-res2[i]))/(fabs(out[i])) )<1e-4);
+		assert(( (fabs(out[i]-res2[i]))/(fabs(out[i])) )<3e-6);
 	}
 }
 
@@ -928,7 +928,7 @@ void clogaTest(void) {
 	cloga(in,200,out);
 
 	for (i=0;i<200;i++){
-		assert(( (fabs(creals(out[i])-resR[i]))/(fabs(creals(out[i]))) )<1e-5);	
+		assert(( (fabs(creals(out[i])-resR[i]))/(fabs(creals(out[i]))) )<3e-6);	
 		assert(( (fabs(cimags(out[i])-resI[i]))/(fabs(cimags(out[i]))) )<1e-6);			
 	}