summaryrefslogtreecommitdiff
path: root/src/c/signalProcessing/hilbert/testHilbert.c
diff options
context:
space:
mode:
authorsimon2009-09-08 09:59:01 +0000
committersimon2009-09-08 09:59:01 +0000
commit9ee831e6fa02e1150a08bf31f31cf291551f078d (patch)
tree6b3386ab2b45f145435c1c14fb2850929a8e0153 /src/c/signalProcessing/hilbert/testHilbert.c
parent5b039b5b51970dd1fe3f961f80a27b1fdbea1569 (diff)
downloadscilab2c-9ee831e6fa02e1150a08bf31f31cf291551f078d.tar.gz
scilab2c-9ee831e6fa02e1150a08bf31f31cf291551f078d.tar.bz2
scilab2c-9ee831e6fa02e1150a08bf31f31cf291551f078d.zip
automated tests
Diffstat (limited to 'src/c/signalProcessing/hilbert/testHilbert.c')
-rw-r--r--src/c/signalProcessing/hilbert/testHilbert.c34
1 files changed, 17 insertions, 17 deletions
diff --git a/src/c/signalProcessing/hilbert/testHilbert.c b/src/c/signalProcessing/hilbert/testHilbert.c
index a047a05e..ad50e459 100644
--- a/src/c/signalProcessing/hilbert/testHilbert.c
+++ b/src/c/signalProcessing/hilbert/testHilbert.c
@@ -390,9 +390,9 @@ static void dhilbertaTest(void){
/* Matrice 3*3 */
printf(">>> Matrice 3*3 <<<\n");
for (i=0;i<9;i++){
- if (zreals(out3[i])>1e-16) assert( (fabs(zreals(out3[i])-resR3[i]) / fabs(zreals(out3[i])) )<3e-16);
+ if (zreals(out3[i])>1e-16) assert( (fabs(zreals(out3[i])-resR3[i]) / fabs(zreals(out3[i])) )<3e-15);
else assert(1);
- if (zimags(out3[i])>1e-16) assert( (fabs(zimags(out3[i])+resI3[i]) / fabs(zimags(out3[i])) )<3e-16);
+ if (zimags(out3[i])>1e-16) assert( (fabs(zimags(out3[i])+resI3[i]) / fabs(zimags(out3[i])) )<3e-15);
else assert(1);
}
@@ -408,18 +408,18 @@ static void dhilbertaTest(void){
/* Matrice 5*5 */
printf(">>> Matrice 5*5 <<<\n");
for (i=0;i<25;i++){
- if (zreals(out5[i])>1e-16) assert( (fabs(zreals(out5[i])-resR5[i]) / fabs(zreals(out5[i])) )<3e-16);
+ if (zreals(out5[i])>1e-16) assert( (fabs(zreals(out5[i])-resR5[i]) / fabs(zreals(out5[i])) )<3e-14);
else assert(1);
- if (zimags(out5[i])>1e-16) assert( (fabs(zimags(out5[i])+resI5[i]) / fabs(zimags(out5[i])) )<3e-16);
+ if (zimags(out5[i])>1e-16) assert( (fabs(zimags(out5[i])+resI5[i]) / fabs(zimags(out5[i])) )<3e-13);
else assert(1);
}
/* Matrice 7*7 */
printf(">>> Matrice 7*7 <<<\n");
for (i=0;i<49;i++){
- if (zreals(out7[i])>1e-16) assert( (fabs(zreals(out7[i])-resR7[i]) / fabs(zreals(out7[i])) )<3e-16);
+ if (zreals(out7[i])>1e-16) assert( (fabs(zreals(out7[i])-resR7[i]) / fabs(zreals(out7[i])) )<3e-14);
else assert(1);
- if (zimags(out7[i])>1e-16) assert( (fabs(zimags(out7[i])+resI7[i]) / fabs(zimags(out7[i])) )<3e-16);
+ if (zimags(out7[i])>1e-16) assert( (fabs(zimags(out7[i])+resI7[i]) / fabs(zimags(out7[i])) )<3e-14);
else assert(1);
}
@@ -453,9 +453,9 @@ static void dhilbertaTest(void){
/* Vecteur 1*5 */
printf(">>> Matrice 1*5 <<<\n");
for (i=0;i<5;i++){
- if (zreals(out15[i])>1e-16) assert( (fabs(zreals(out15[i])-resR15[i]) / fabs(zreals(out15[i])) )<3e-16);
+ if (zreals(out15[i])>1e-16) assert( (fabs(zreals(out15[i])-resR15[i]) / fabs(zreals(out15[i])) )<3e-15);
else assert(1);
- if (zimags(out15[i])>1e-16) assert( (fabs(zimags(out15[i])+resI15[i]) / fabs(zimags(out15[i])) )<3e-16);
+ if (zimags(out15[i])>1e-16) assert( (fabs(zimags(out15[i])+resI15[i]) / fabs(zimags(out15[i])) )<3e-15);
else assert(1);
}
@@ -464,7 +464,7 @@ static void dhilbertaTest(void){
for (i=0;i<7;i++){
if (zreals(out17[i])>1e-16) assert( (fabs(zreals(out17[i])-resR17[i]) / fabs(zreals(out17[i])) )<3e-16);
else assert(1);
- if (zimags(out17[i])>1e-16) assert( (fabs(zimags(out17[i])+resI17[i]) / fabs(zimags(out17[i])) )<3e-16);
+ if (zimags(out17[i])>1e-16) assert( (fabs(zimags(out17[i])+resI17[i]) / fabs(zimags(out17[i])) )<3e-15);
else assert(1);
}
@@ -480,7 +480,7 @@ static void dhilbertaTest(void){
/* Matrices 3*2 */
printf(">>> Matrice 3*2 <<<\n");
for (i=0;i<6;i++){
- if (zreals(out32[i])>1e-16) assert( (fabs(zreals(out32[i])-resR32[i]) / fabs(zreals(out32[i])) )<3e-16);
+ if (zreals(out32[i])>1e-16) assert( (fabs(zreals(out32[i])-resR32[i]) / fabs(zreals(out32[i])) )<3e-15);
else assert(1);
if (zimags(out32[i])>1e-16) assert( (fabs(zimags(out32[i])+resI32[i]) / fabs(zimags(out32[i])) )<1e-16);
else assert(1);
@@ -492,7 +492,7 @@ static void dhilbertaTest(void){
for (i=0;i<12;i++){
if (zreals(out34[i])>1e-16) assert( (fabs(zreals(out34[i])-resR34[i]) / fabs(zreals(out34[i])) )<1e-16);
else assert(1);
- if (zimags(out34[i])>1e-16) assert( (fabs(zimags(out34[i])+resI34[i]) / fabs(zimags(out34[i])) )<3e-16);
+ if (zimags(out34[i])>1e-16) assert( (fabs(zimags(out34[i])+resI34[i]) / fabs(zimags(out34[i])) )<3e-15);
else assert(1);
}
@@ -500,9 +500,9 @@ static void dhilbertaTest(void){
/* Matrices 3*5 */
printf(">>> Matrice 3*5 <<<\n");
for (i=0;i<15;i++){
- if (zreals(out35[i])>1e-16) assert( (fabs(zreals(out35[i])-resR35[i]) / fabs(zreals(out35[i])) )<3e-16);
+ if (zreals(out35[i])>1e-16) assert( (fabs(zreals(out35[i])-resR35[i]) / fabs(zreals(out35[i])) )<3e-15);
else assert(1);
- if (zimags(out35[i])>1e-16) assert( (fabs(zimags(out35[i])+resI35[i]) / fabs(zimags(out35[i])) )<3e-16);
+ if (zimags(out35[i])>1e-16) assert( (fabs(zimags(out35[i])+resI35[i]) / fabs(zimags(out35[i])) )<3e-14);
else assert(1);
}
@@ -510,9 +510,9 @@ static void dhilbertaTest(void){
/* Matrices 3*7 */
printf(">>> Matrice 3*7 <<<\n");
for (i=0;i<21;i++){
- if (zreals(out37[i])>1e-16) assert( (fabs(zreals(out37[i])-resR37[i]) / fabs(zreals(out37[i])) )<3e-16);
+ if (zreals(out37[i])>1e-16) assert( (fabs(zreals(out37[i])-resR37[i]) / fabs(zreals(out37[i])) )<3e-13);
else assert(1);
- if (zimags(out37[i])>1e-16) assert( (fabs(zimags(out37[i])+resI37[i]) / fabs(zimags(out37[i])) )<3e-16);
+ if (zimags(out37[i])>1e-16) assert( (fabs(zimags(out37[i])+resI37[i]) / fabs(zimags(out37[i])) )<3e-14);
else assert(1);
}
@@ -694,7 +694,7 @@ static void shilbertaTest(void){
for (i=0;i<25;i++){
if (creals(out5[i])>1e-16) assert( (fabs(creals(out5[i])-resR5[i]) / fabs(creals(out5[i])) )<3e-6);
else assert(1);
- if (cimags(out5[i])>1e-16) assert( (fabs(cimags(out5[i])+resI5[i]) / fabs(cimags(out5[i])) )<3e-6);
+ if (cimags(out5[i])>1e-16) assert( (fabs(cimags(out5[i])+resI5[i]) / fabs(cimags(out5[i])) )<3e-5);
else assert(1);
}
@@ -805,7 +805,7 @@ static void shilbertaTest(void){
printf(">>> Matrice 3*7 <<<\n");
shilberta(in37, 3, 7, out37);
for (i=0;i<21;i++){
- if (creals(out37[i])>1e-16) assert( (fabs(creals(out37[i])-resR37[i]) / fabs(creals(out37[i])) )<3e-6);
+ if (creals(out37[i])>1e-16) assert( (fabs(creals(out37[i])-resR37[i]) / fabs(creals(out37[i])) )<3e-5);
else assert(1);
if (cimags(out37[i])>1e-16) assert( (fabs(cimags(out37[i])+resI37[i]) / fabs(cimags(out37[i])) )<3e-6);
else assert(1);