diff options
| author | simon | 2009-09-08 07:32:30 +0000 |
|---|---|---|
| committer | simon | 2009-09-08 07:32:30 +0000 |
| commit | 5b039b5b51970dd1fe3f961f80a27b1fdbea1569 (patch) | |
| tree | 7bdbfb8440cbf463b504176f45759e8a1135ad69 /src/c/operations | |
| parent | 3dce118de0a298d6bfffcecc017a71196910bbf9 (diff) | |
| download | scilab2c-5b039b5b51970dd1fe3f961f80a27b1fdbea1569.tar.gz scilab2c-5b039b5b51970dd1fe3f961f80a27b1fdbea1569.tar.bz2 scilab2c-5b039b5b51970dd1fe3f961f80a27b1fdbea1569.zip | |
Automated test
Diffstat (limited to 'src/c/operations')
| -rw-r--r-- | src/c/operations/division/testRDivision.c | 8 | ||||
| -rw-r--r-- | src/c/operations/multiplication/testMultiplication.c | 8 |
2 files changed, 8 insertions, 8 deletions
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); } } |