diff options
author | torset | 2009-02-27 14:43:06 +0000 |
---|---|---|
committer | torset | 2009-02-27 14:43:06 +0000 |
commit | 032f682c8ee956db344b1aae267a28e344ace94b (patch) | |
tree | 0b91956992576bdb9fc3a3cff3927dc46ad41086 /src/signalProcessing/lev/testDoubleLev.c | |
parent | 8e207d069eb29be177718a7d2e760434d1e40e1f (diff) | |
download | scilab2c-032f682c8ee956db344b1aae267a28e344ace94b.tar.gz scilab2c-032f682c8ee956db344b1aae267a28e344ace94b.tar.bz2 scilab2c-032f682c8ee956db344b1aae267a28e344ace94b.zip |
change precision for tests : put it to 3e-16 for double and 3e-6 for float
Diffstat (limited to 'src/signalProcessing/lev/testDoubleLev.c')
-rw-r--r-- | src/signalProcessing/lev/testDoubleLev.c | 26 |
1 files changed, 13 insertions, 13 deletions
diff --git a/src/signalProcessing/lev/testDoubleLev.c b/src/signalProcessing/lev/testDoubleLev.c index d9d4b2f5..6967890e 100644 --- a/src/signalProcessing/lev/testDoubleLev.c +++ b/src/signalProcessing/lev/testDoubleLev.c @@ -33,7 +33,7 @@ static void dlevaTest(void) { ; for (i=0;i<3;i++) { - if (out1[i]>1e-16) assert((fabs(out1[i]-result1[i]) / fabs (out1[i]))<1e-15); + if (out1[i]>1e-16) assert((fabs(out1[i]-result1[i]) / fabs (out1[i]))<3e-16); else assert(1); } @@ -75,11 +75,11 @@ static void dlevaTest(void) { else assert(1); } - if (out2>1e-16) assert((fabs(out2-result2) / fabs (out2))<1e-15); + if (out2>1e-16) assert((fabs(out2-result2) / fabs (out2))<3e-16); for (i=0;i<7;i++) { - if (out3[i]>1e-16) assert((fabs(out3[i]-result3[i]) / fabs (out3[i]))<1e-14); + if (out3[i]>1e-16) assert((fabs(out3[i]-result3[i]) / fabs (out3[i]))<3e-16); else assert(1); } @@ -110,19 +110,19 @@ static void zlevaTest(void) { out2 = zleva(in,4,out1,out3); for (i=0;i<3;i++){ - if (zreals(out1[i])>1e-16) assert((fabs(zreals(out1[i])-result1R[i]) / fabs(zreals(out1[i]))) <1e-15); + if (zreals(out1[i])>1e-16) assert((fabs(zreals(out1[i])-result1R[i]) / fabs(zreals(out1[i]))) <3e-16); else assert(1); if (zimags(out1[i])>1e-16) assert((fabs(zimags(out1[i])-result1I[i]) / fabs(zimags(out1[i]))) <1e-16); else assert(1); } - if (zreals(out2)>1e-16) assert((fabs(zreals(out2)-result2R) / fabs(zreals(out2))) <1e-15); + if (zreals(out2)>1e-16) assert((fabs(zreals(out2)-result2R) / fabs(zreals(out2))) <3e-16); else assert(1); - if (zimags(out2)>1e-16) assert((fabs(zimags(out2)-result2I) / fabs(zimags(out2))) <1e-15); + if (zimags(out2)>1e-16) assert((fabs(zimags(out2)-result2I) / fabs(zimags(out2))) <3e-16); else assert(1); for (i=0;i<3;i++){ - if (zreals(out3[i])>1e-16) assert((fabs(zreals(out3[i])-result3R[i]) / fabs(zreals(out3[i]))) <1e-15); + if (zreals(out3[i])>1e-16) assert((fabs(zreals(out3[i])-result3R[i]) / fabs(zreals(out3[i]))) <3e-16); else assert(1); if (zimags(out3[i])>1e-16) assert((fabs(zimags(out3[i])-result3I[i]) / fabs(zimags(out3[i]))) <1e-16); else assert(1); @@ -162,21 +162,21 @@ static void zlevaTest(void) { for (i=0;i<5;i++) printf("out : %1.20f+%1.20f\n",zreals(out1[i]),zimags(out1[i])); for (i=0;i<5;i++){ - if (zreals(out1[i])>1e-16) assert((fabs(zreals(out1[i])-result1R[i]) / fabs(zreals(out1[i]))) <1e-14); + if (zreals(out1[i])>1e-16) assert((fabs(zreals(out1[i])-result1R[i]) / fabs(zreals(out1[i]))) <3e-16); else assert(1); - if (zimags(out1[i])>1e-16) assert((fabs(zimags(out1[i])-result1I[i]) / fabs(zimags(out1[i]))) <1e-14); + if (zimags(out1[i])>1e-16) assert((fabs(zimags(out1[i])-result1I[i]) / fabs(zimags(out1[i]))) <3e-16); else assert(1); } - if (zreals(out2)>1e-16) assert((fabs(zreals(out2)-result2R) / fabs(zreals(out2))) <1e-14); + if (zreals(out2)>1e-16) assert((fabs(zreals(out2)-result2R) / fabs(zreals(out2))) <3e-16); else assert(1); - if (zimags(out2)>1e-16) assert((fabs(zimags(out2)-result2I) / fabs(zimags(out2))) <1e-14); + if (zimags(out2)>1e-16) assert((fabs(zimags(out2)-result2I) / fabs(zimags(out2))) <3e-16); else assert(1); for (i=0;i<5;i++){ - if (zreals(out3[i])>1e-16) assert((fabs(zreals(out3[i])-result3R[i]) / fabs(zreals(out3[i]))) <1e-15); + if (zreals(out3[i])>1e-16) assert((fabs(zreals(out3[i])-result3R[i]) / fabs(zreals(out3[i]))) <3e-16); else assert(1); - if (zimags(out3[i])>1e-16) assert((fabs(zimags(out3[i])-result3I[i]) / fabs(zimags(out3[i]))) <1e-14); + if (zimags(out3[i])>1e-16) assert((fabs(zimags(out3[i])-result3I[i]) / fabs(zimags(out3[i]))) <3e-16); else assert(1); } } |