diff options
author | torset | 2009-02-27 13:30:30 +0000 |
---|---|---|
committer | torset | 2009-02-27 13:30:30 +0000 |
commit | 05fb6a62c83ae7cea37aa2795e61697b3560f135 (patch) | |
tree | e4135e36ec029b677faeb18125b19fa4a6d11a6c /src/elementaryFunctions/int/testDoubleInt.c | |
parent | 3ce979f5740261766f4248864c0758d6cb6af857 (diff) | |
download | scilab2c-05fb6a62c83ae7cea37aa2795e61697b3560f135.tar.gz scilab2c-05fb6a62c83ae7cea37aa2795e61697b3560f135.tar.bz2 scilab2c-05fb6a62c83ae7cea37aa2795e61697b3560f135.zip |
change precision for tests : put it to 3e-16 for double and 3e-6 for float
Diffstat (limited to 'src/elementaryFunctions/int/testDoubleInt.c')
-rw-r--r-- | src/elementaryFunctions/int/testDoubleInt.c | 42 |
1 files changed, 23 insertions, 19 deletions
diff --git a/src/elementaryFunctions/int/testDoubleInt.c b/src/elementaryFunctions/int/testDoubleInt.c index 4dfad2b6..f5bf78b8 100644 --- a/src/elementaryFunctions/int/testDoubleInt.c +++ b/src/elementaryFunctions/int/testDoubleInt.c @@ -27,25 +27,25 @@ static void dintsTest(void) { */ assert ((fabs( dints(-2) - (-2))/fabs(dints(-2)))<1e-16); assert ((fabs( dints(-1.9) - (-1))/fabs(dints(-1.9)))<1e-16); - assert ((fabs( dints(-1.8) - (-1))/fabs(dints(-1.9)))<1e-16); - assert ((fabs( dints(-1.7) - (-1))/fabs(dints(-1.9)))<1e-16); - assert ((fabs( dints(-1.6) - (-1))/fabs(dints(-1.9)))<1e-16); - assert ((fabs( dints(-1.5) - (-1))/fabs(dints(-1.9)))<1e-16); - assert ((fabs( dints(-1.4) - (-1))/fabs(dints(-1.9)))<1e-16); - assert ((fabs( dints(-1.3) - (-1))/fabs(dints(-1.9)))<1e-16); - assert ((fabs( dints(-1.2) - (-1))/fabs(dints(-1.9)))<1e-16); - assert ((fabs( dints(-1.1) - (-1))/fabs(dints(-1.9)))<1e-16); - assert ((fabs( dints(-1.0) - (-1))/fabs(dints(-1.9)))<1e-16); + assert ((fabs( dints(-1.8) - (-1))/fabs(dints(-1.8)))<1e-16); + assert ((fabs( dints(-1.7) - (-1))/fabs(dints(-1.7)))<1e-16); + assert ((fabs( dints(-1.6) - (-1))/fabs(dints(-1.6)))<1e-16); + assert ((fabs( dints(-1.5) - (-1))/fabs(dints(-1.5)))<1e-16); + assert ((fabs( dints(-1.4) - (-1))/fabs(dints(-1.4)))<1e-16); + assert ((fabs( dints(-1.3) - (-1))/fabs(dints(-1.3)))<1e-16); + assert ((fabs( dints(-1.2) - (-1))/fabs(dints(-1.2)))<1e-16); + assert ((fabs( dints(-1.1) - (-1))/fabs(dints(-1.1)))<1e-16); + assert ((fabs( dints(-1.0) - (-1))/fabs(dints(-1.0)))<1e-16); assert (fabs( dints(-.9))<1e-16); - assert ((fabs( dints(1.0) - (1))/fabs(dints(1.9)))<1e-16); - assert ((fabs( dints(1.1) - (1))/fabs(dints(1.9)))<1e-16); - assert ((fabs( dints(1.2) - (1))/fabs(dints(1.9)))<1e-16); - assert ((fabs( dints(1.3) - (1))/fabs(dints(1.9)))<1e-16); - assert ((fabs( dints(1.4) - (1))/fabs(dints(1.9)))<1e-16); - assert ((fabs( dints(1.5) - (1))/fabs(dints(1.9)))<1e-16); - assert ((fabs( dints(1.6) - (1))/fabs(dints(1.9)))<1e-16); - assert ((fabs( dints(1.7) - (1))/fabs(dints(1.9)))<1e-16); - assert ((fabs( dints(1.8) - (1))/fabs(dints(1.9)))<1e-16); + assert ((fabs( dints(1.0) - (1))/fabs(dints(1.0)))<1e-16); + assert ((fabs( dints(1.1) - (1))/fabs(dints(1.1)))<1e-16); + assert ((fabs( dints(1.2) - (1))/fabs(dints(1.2)))<1e-16); + assert ((fabs( dints(1.3) - (1))/fabs(dints(1.3)))<1e-16); + assert ((fabs( dints(1.4) - (1))/fabs(dints(1.4)))<1e-16); + assert ((fabs( dints(1.5) - (1))/fabs(dints(1.5)))<1e-16); + assert ((fabs( dints(1.6) - (1))/fabs(dints(1.6)))<1e-16); + assert ((fabs( dints(1.7) - (1))/fabs(dints(1.7)))<1e-16); + assert ((fabs( dints(1.8) - (1))/fabs(dints(1.8)))<1e-16); assert ((fabs( dints(1.9) - (1))/fabs(dints(1.9)))<1e-16); assert ((fabs( dints(2.0) - (2))/fabs(dints(2.0)))<1e-16); @@ -116,7 +116,9 @@ static void dintaTest(void) { dinta(in,10,out); - for (i=0;i<10;i++) assert(fabs(out[i]-res[i]) <1e-16); + for (i=0;i<10;i++) + if (out[i]!=0) assert(fabs(out[i]-res[i])/fabs(out[i]) <1e-16); + else assert(fabs(out[i]-res[i]) <1e-16); @@ -134,7 +136,9 @@ static void zintaTest(void) { zinta(in,10,out); for (i=0;i<10;i++){ + if(zreals(out[i])!=0) assert(fabs(zreals(out[i])-resR[i])/ fabs(zreals(out[i]))<1e-16); assert(fabs(zreals(out[i])-resR[i]) <1e-16); + if(zimags(out[i])!=0) assert(fabs(zimags(out[i])-resI[i])/ fabs(zimags(out[i]))<1e-16); assert(fabs(zimags(out[i])-resI[i]) <1e-16); } } |