summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/operations/division/testLDivision.c12
-rw-r--r--src/operations/division/testRDivision.c14
-rw-r--r--src/operations/multiplication/testMultiplication.c20
3 files changed, 23 insertions, 23 deletions
diff --git a/src/operations/division/testLDivision.c b/src/operations/division/testLDivision.c
index 36641050..5f234a53 100644
--- a/src/operations/division/testLDivision.c
+++ b/src/operations/division/testLDivision.c
@@ -1307,7 +1307,7 @@ static void cldivsTest()
in2 = FloatComplex(DR[i],DI[i]);
out = cldivs(in1,in2);
assert( ( fabs(creals(out)-RR[i]) / fabs(creals(out)) ) <1e-6);
- assert( ( fabs(cimags(out)-RI[i]) / fabs(cimags(out)) ) <1e-4);
+ assert( ( fabs(cimags(out)-RI[i]) / fabs(cimags(out)) ) <3e-6);
}
}
@@ -1327,8 +1327,8 @@ static void zldivsTest()
in1 = DoubleComplex(NR[i],NI[i]);
in2 = DoubleComplex(DR[i],DI[i]);
out = zldivs(in1,in2);
- assert( ( fabs(zreals(out)-RR[i]) / fabs(zreals(out)) ) <1e-15);
- assert( ( fabs(zimags(out)-RI[i]) / fabs(zimags(out)) ) <1e-13);
+ assert( ( fabs(zreals(out)-RR[i]) / fabs(zreals(out)) ) <3e-16);
+ assert( ( fabs(zimags(out)-RI[i]) / fabs(zimags(out)) ) <3e-16);
}
}
@@ -1388,7 +1388,7 @@ static void cldivaTest()
for (i=0;i<200;i++){
assert( ( fabs(creals(out[i])-RR[i]) / fabs(creals(out[i])) ) <1e-6);
- assert( ( fabs(cimags(out[i])-RI[i]) / fabs(cimags(out[i])) ) <1e-4);
+ assert( ( fabs(cimags(out[i])-RI[i]) / fabs(cimags(out[i])) ) <3e-6);
}
}
@@ -1412,8 +1412,8 @@ static void zldivaTest()
zldiva(in1,in2,200,out);
for (i=0;i<200;i++){
- assert( ( fabs(zreals(out[i])-RR[i]) / fabs(zreals(out[i])) ) <1e-15);
- assert( ( fabs(zimags(out[i])-RI[i]) / fabs(zimags(out[i])) ) <1e-13);
+ assert( ( fabs(zreals(out[i])-RR[i]) / fabs(zreals(out[i])) ) <3e-16);
+ assert( ( fabs(zimags(out[i])-RI[i]) / fabs(zimags(out[i])) ) <3e-16);
}
}
diff --git a/src/operations/division/testRDivision.c b/src/operations/division/testRDivision.c
index 33cdb09b..fd9f495d 100644
--- a/src/operations/division/testRDivision.c
+++ b/src/operations/division/testRDivision.c
@@ -1275,7 +1275,7 @@ static void drdivsTest()
for(i=0;i<200;i++){
out=drdivs(tIn1[i],tIn2[i]);
printf("%d : %f ; num = %f;erreur = %1.25f\n",i,out,tIn1[i],fabs(out-tRes[i]) / fabs(out));
- assert( (fabs(out-tRes[i]) / fabs(out) ) <1e-15);
+ assert( (fabs(out-tRes[i]) / fabs(out) ) <3e-16);
}
}
@@ -1296,7 +1296,7 @@ static void crdivsTest()
in2 = FloatComplex(DR[i],DI[i]);
out = crdivs(in1,in2);
assert( ( fabs(creals(out)-RR[i]) / fabs(creals(out)) ) <1e-6);
- assert( ( fabs(cimags(out)-RI[i]) / fabs(cimags(out)) ) <1e-5);
+ assert( ( fabs(cimags(out)-RI[i]) / fabs(cimags(out)) ) <3e-6);
}
}
@@ -1316,8 +1316,8 @@ static void zrdivsTest()
in1 = DoubleComplex(NR[i],NI[i]);
in2 = DoubleComplex(DR[i],DI[i]);
out = zrdivs(in1,in2);
- assert( ( fabs(zreals(out)-RR[i]) / fabs(zreals(out)) ) <1e-15);
- assert( ( fabs(zimags(out)-RI[i]) / fabs(zimags(out)) ) <1e-13);
+ assert( ( fabs(zreals(out)-RR[i]) / fabs(zreals(out)) ) <3e-16);
+ assert( ( fabs(zimags(out)-RI[i]) / fabs(zimags(out)) ) <3e-16);
}
}
@@ -1374,7 +1374,7 @@ static void crdivaTest()
for (i=0;i<200;i++){
assert( ( fabs(creals(out[i])-RR[i]) / fabs(creals(out[i])) ) <1e-6);
- assert( ( fabs(cimags(out[i])-RI[i]) / fabs(cimags(out[i])) ) <1e-5);
+ assert( ( fabs(cimags(out[i])-RI[i]) / fabs(cimags(out[i])) ) <3e-6);
}
}
@@ -1398,8 +1398,8 @@ static void zrdivaTest()
zrdiva(in1,in2,200,out);
for (i=0;i<200;i++){
- assert( ( fabs(zreals(out[i])-RR[i]) / fabs(zreals(out[i])) ) <1e-15);
- assert( ( fabs(zimags(out[i])-RI[i]) / fabs(zimags(out[i])) ) <1e-13);
+ assert( ( fabs(zreals(out[i])-RR[i]) / fabs(zreals(out[i])) ) <3e-16);
+ assert( ( fabs(zimags(out[i])-RI[i]) / fabs(zimags(out[i])) ) <3e-16);
}
}
diff --git a/src/operations/multiplication/testMultiplication.c b/src/operations/multiplication/testMultiplication.c
index 87cf465c..cd3de179 100644
--- a/src/operations/multiplication/testMultiplication.c
+++ b/src/operations/multiplication/testMultiplication.c
@@ -1258,8 +1258,8 @@ static void ztimessTest(void) {
in1=DoubleComplex(P1_R[i],P1_I[i]);
in2=DoubleComplex(P2_R[i],P2_I[i]);
out=ztimess(in1,in2);
- assert( ( fabs(zreals(out)-Res_R[i]) / fabs(zreals(out)) ) <1e-14);
- assert( ( fabs(zimags(out)-Res_I[i]) / fabs(zimags(out)) ) <1e-15);
+ assert( ( fabs(zreals(out)-Res_R[i]) / fabs(zreals(out)) ) <3e-16);
+ assert( ( fabs(zimags(out)-Res_I[i]) / fabs(zimags(out)) ) <3e-16);
}
}
@@ -1277,7 +1277,7 @@ static void ctimessTest(void) {
in1=FloatComplex(P1_R[i],P1_I[i]);
in2=FloatComplex(P2_R[i],P2_I[i]);
out=ctimess(in1,in2);
- assert( ( fabs(creals(out)-Res_R[i]) / fabs(creals(out)) ) <1e-5);
+ assert( ( fabs(creals(out)-Res_R[i]) / fabs(creals(out)) ) <3e-6);
assert( ( fabs(cimags(out)-Res_I[i]) / fabs(cimags(out)) ) <1e-6);
}
}
@@ -1306,7 +1306,7 @@ static void dmulsTest(void){
for (i=0;i<200;i++){
out = dmuls(P1[i],P2[i]);
- assert( ( fabs(out-Res[i]) / fabs(out) ) <1e-15);
+ assert( ( fabs(out-Res[i]) / fabs(out) ) <3e-16);
}
}
@@ -1325,7 +1325,7 @@ static void cmulsTest(void){
in1=FloatComplex(P1_R[i],P1_I[i]);
in2=FloatComplex(P2_R[i],P2_I[i]);
out=cmuls(in1,in2);
- assert( ( fabs(creals(out)-Res_R[i]) / fabs(creals(out)) ) <1e-5);
+ assert( ( fabs(creals(out)-Res_R[i]) / fabs(creals(out)) ) <3e-6);
assert( ( fabs(cimags(out)-Res_I[i]) / fabs(cimags(out)) ) <1e-6);
}
}
@@ -1345,8 +1345,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)) ) <1e-14);
- assert( ( fabs(zimags(out)-Res_I[i]) / fabs(zimags(out)) ) <1e-15);
+ assert( ( fabs(zreals(out)-Res_R[i]) / fabs(zreals(out)) ) <3e-16);
+ assert( ( fabs(zimags(out)-Res_I[i]) / fabs(zimags(out)) ) <3e-16);
}
}
@@ -1396,7 +1396,7 @@ static void cmulaTest(void){
cmula(in1,in2,200,out);
for (i=0;i<200;i++){
- assert( ( fabs(creals(out[i])-Res_R[i]) / fabs(creals(out[i])) ) <1e-5);
+ assert( ( fabs(creals(out[i])-Res_R[i]) / fabs(creals(out[i])) ) <3e-6);
assert( ( fabs(cimags(out[i])-Res_I[i]) / fabs(cimags(out[i])) ) <1e-6);
}
}
@@ -1419,8 +1419,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])) ) <1e-14);
- assert( ( fabs(zimags(out[i])-Res_I[i]) / fabs(zimags(out[i])) ) <1e-15);
+ 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);
}
}
generated by cgit (git 2.34.1) at 2025-03-13 15:48:36 +0000