diff options
author | simon | 2008-10-22 08:31:53 +0000 |
---|---|---|
committer | simon | 2008-10-22 08:31:53 +0000 |
commit | fffe45cf4c76fbb01f290ad5508acd6b9580b91d (patch) | |
tree | 9ba8d3527812ce08484cddc9471830580b264bac /src/signalProcessing/fft | |
parent | b169f3e58badc5fcef8d8ef3b06f97185d03303b (diff) | |
download | scilab2c-fffe45cf4c76fbb01f290ad5508acd6b9580b91d.tar.gz scilab2c-fffe45cf4c76fbb01f290ad5508acd6b9580b91d.tar.bz2 scilab2c-fffe45cf4c76fbb01f290ad5508acd6b9580b91d.zip |
every vector test passed
Diffstat (limited to 'src/signalProcessing/fft')
-rw-r--r-- | src/signalProcessing/fft/testDoubleFft.c | 160 |
1 files changed, 118 insertions, 42 deletions
diff --git a/src/signalProcessing/fft/testDoubleFft.c b/src/signalProcessing/fft/testDoubleFft.c index 94912726..f94f315a 100644 --- a/src/signalProcessing/fft/testDoubleFft.c +++ b/src/signalProcessing/fft/testDoubleFft.c @@ -89,29 +89,58 @@ -#define ZREAL_IN11 { 1,2,3,4,5,6,7,8,9,10,11 } -#define ZIMAG_IN11 { 1,2,3,4,5,6,7,8,9,10,11 } +#define ZREAL_IN11 {0.49934938363730907,0.26385784195736051,0.52535630855709314,0.53762298030778766,\ + 0.11999255046248436,0.2256303490139544 ,0.62740930821746588,0.76084325974807143,\ + 0.04855662025511265,0.67239497276023030,0.20171726960688829 } +#define ZIMAG_IN11 {0.39115739194676280,0.83003165572881699,0.58787201577797532,0.48291792999953032,\ + 0.22328650346025825,0.84008856676518917,0.12059959070757031,0.28553641680628061,\ + 0.86075146449729800,0.84941016510128975,0.52570608118548989} -#define ZREAL_IN12 { 1,2,3,4,5,6,7,8,9,10,11,12 } -#define ZIMAG_IN12 { 1,2,3,4,5,6,7,8,9,10,11,12 } +#define ZREAL_IN12 {0.75604385416954756,0.00022113462910056,0.33032709173858166,0.66538110421970487,\ + 0.62839178834110498,0.84974523587152362,0.68573101982474327,0.87821648130193353,\ + 0.06837403681129217,0.56084860628470778,0.66235693730413914,0.72635067673400044} +#define ZIMAG_IN12 {0.19851438421756029,0.54425731627270579,0.23207478970289230,0.23122371966019273,\ + 0.21646326314657927,0.88338878145441413,0.65251349471509457,0.30760907428339124,\ + 0.93296162132173777,0.21460078610107303,0.31264199689030647,0.36163610080257058} -#define ZREAL_IN13 { 1,2,3,4,5,6,7,8,9,10,11,12,13 } -#define ZIMAG_IN13 { 1,2,3,4,5,6,7,8,9,10,11,12,13 } +#define ZREAL_IN13 {0.2922266637906432 ,0.56642488157376647,0.48264719732105732,0.33217189135029912,\ + 0.59350947011262178,0.50153415976092219,0.43685875833034515,0.26931248093023896,\ + 0.63257448654621840,0.40519540151581168,0.91847078315913677,0.04373343335464597,\ + 0.48185089323669672} -#define ZREAL_IN14 { 1,2,3,4,5,6,7,8,9,10,11,12,13,14 } +#define ZIMAG_IN13 {0.26395560009405017,0.41481037065386772,0.28064980218186975,0.12800584640353918,\ + 0.77831285959109664,0.21190304495394230,0.11213546665385365,0.68568959552794695,\ + 0.15312166837975383,0.69708506017923355,0.84155184263363481,0.40620247554033995,\ + 0.40948254754766822} -#define ZIMAG_IN14 { 1,2,3,4,5,6,7,8,9,10,11,12,13,14 } -#define ZREAL_IN15 { 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 } -#define ZIMAG_IN15 { 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 } +#define ZREAL_IN14 {0.87841258011758327,0.11383596854284406,0.19983377400785685,0.56186607433483005,\ + 0.58961773291230202,0.68539796629920602,0.89062247332185507,0.50422128057107329,\ + 0.34936154074966908,0.38737787725403905,0.92228986788541079,0.94881842611357570,\ + 0.34353372454643250,0.37601187312975526} + +#define ZIMAG_IN14 {0.73409405630081892,0.26157614728435874,0.49934938363730907,0.26385784195736051,\ + 0.52535630855709314,0.53762298030778766,0.11999255046248436,0.2256303490139544 ,\ + 0.62740930821746588,0.76084325974807143,0.04855662025511265,0.67239497276023030,\ + 0.20171726960688829,0.39115739194676280} + +#define ZREAL_IN15 {0.83003165572881699,0.58787201577797532,0.48291792999953032,0.22328650346025825,\ + 0.84008856676518917,0.12059959070757031,0.28553641680628061,0.86075146449729800,\ + 0.84941016510128975,0.52570608118548989,0.99312098976224661,0.64885628735646605,\ + 0.99231909401714802,0.05004197778180242,0.74855065811425447} + +#define ZIMAG_IN15 {0.41040589986369014,0.60845263302326202,0.85442108893766999,0.06426467280834913,\ + 0.82790829380974174,0.92623437754809856,0.56672112690284848,0.57116389367729425,\ + 0.81601104838773608,0.05689279362559319,0.55959366867318749,0.12493403162807226,\ + 0.72792222863063216,0.26777664758265018,0.54653349192813039} @@ -195,6 +224,54 @@ +0.91311790128897607,+0.14664673572406173,-0.38825389263472715,+0.70003588825710683,\ -1.10050453393604197,+0.32258157187768072} +#define ZREAL_RESULT11 { 4.48273084452375770,-0.38185469421558837,-0.20352646397260507, 0.93844897170676500,\ + -0.36107014581234886, 1.63127126429331426, 0.21051283071884830, 0.41375037345506283,\ + -1.51895083986003510, 0.07998126975880851, 0.20154980941442344} + +#define ZIMAG_RESULT11 {+5.99735778197646141,+0.89612320628808262,-1.19950115725534112,+0.16831729582097132,\ + -0.30180616479381106,-1.1576712540107854 ,+0.14605414615044232,+0.98186675096176135,\ + -1.81578488007792282,+0.11882005651954808,+0.46895552983498812} + +#define ZREAL_RESULT12 { 6.81198796723037958,-0.94341279444120363, 0.80833429094732012, 0.51617261953651883,\ + -0.2952048802069408 , 2.17160345678053313,-0.54953851085156202,-0.00060138915045171,\ + 1.48723066647267177,-0.96738335862755753, 0.38783971037387632,-0.35450152802901336} + +#define ZIMAG_RESULT12 {+5.08788532856851816,-0.92793626853655098,+1.98330386259771707,+1.00984227284789085,\ + -0.76701015963174557,-0.03923425866831987,+0.00245377141982317,-0.97965668697496155,\ + -0.43031801485501076,-0.70842429809272289,-0.77014751450337293,-1.07858542356054099} + + +#define ZREAL_RESULT13 { 5.95651050098240376,-1.05002118208049122,-0.62824400440218664, 0.73670329745244079,\ + 1.01270235903781081,-0.97652276217739442,-0.80139420917945892,-1.08927100387059594,\ + 1.10768757452252697,-0.90416530058905542, 0.19128270229571837,-0.36935459470156029,\ + 0.61303325198820890} + +#define ZIMAG_RESULT13 {+5.38290618034079671,-0.01795106539414900,-1.0736822056133133 ,-0.38375436766279453,\ + +0.45177555081294796,-0.42204321578379422,+1.167268002300917 ,-0.8654330910349184 ,\ + -1.80135467250416070,+0.73358402770681042,+0.92212767526074568,-0.53962030646712056,\ + -0.12239971073931022} + +#define ZREAL_RESULT14 { 7.75120115978643298,-0.78366539551591063,-0.20265674140819168, 0.04290246165533468,\ + 2.26072777524451896, 0.41764276367067404,-0.94725360360479638, 0.59614222729578614,\ + 1.2655897771348088 , 1.49954927048727082, 0.59161337187577756, 1.32712418977692859,\ + -1.04078471420795249,-0.48035642054451416} + + +#define ZIMAG_RESULT14 {+5.86955844005569816,+0.59116535878306964,+1.10949301280070478,-0.10194863149531888,\ + +0.33742089533324454,+1.27136622217475770,+0.66505772083419801,-0.35660744598135352,\ + +0.55272403261244618,+0.78239239747489764,-0.76097885152655409,+1.7013910918422144 ,\ + -1.05520441290632339,-0.32851304179021534} + +#define ZREAL_RESULT15 { 9.03908939706161618, 0.83695739793685675,-0.1247585940626968 , 0.73554494173292662,\ + 2.89255624599792061,-0.60942096648213817,-0.96289916352621108,-2.01148115975842146,\ + 1.08671310762523987, 1.10385593717105923, 0.14097082301450437, 0.77951939204949339,\ + -0.19682993144621974, 1.09445436001472118,-1.35379695139639411} + +#define ZIMAG_RESULT15 {+7.929235897026956 ,+0.93665405708769556,-0.58867096407810116,-0.08075001529554950,\ + +0.05154837779444588,-1.64233407065738146,+2.20857407200866884,+0.92685932199933529,\ + -1.71222943015973872,-0.79519673795720203,-0.80828166087623532,-0.07547063282874045,\ + +0.21930651464200918,+1.00880777239444086,-1.42196400314524918} + #define ZREAL_RESULT16 { 7.31841186061501503, 0.57213963313411265,-0.54757095809921363,-0.48628670926159856,\ @@ -689,8 +766,8 @@ static void zfftmaTest11 (void ) - double tRealResult [] = ZREAL_RESULT16 ; - double tImagResult [] = ZIMAG_RESULT16 ; + double tRealResult [] = ZREAL_RESULT11 ; + double tImagResult [] = ZIMAG_RESULT11 ; @@ -744,8 +821,8 @@ static void zfftmaTest12 (void ) - double tRealResult [] = ZREAL_RESULT16 ; - double tImagResult [] = ZIMAG_RESULT16 ; + double tRealResult [] = ZREAL_RESULT12 ; + double tImagResult [] = ZIMAG_RESULT12 ; @@ -799,8 +876,8 @@ static void zfftmaTest13 (void ) - double tRealResult [] = ZREAL_RESULT16 ; - double tImagResult [] = ZIMAG_RESULT16 ; + double tRealResult [] = ZREAL_RESULT13 ; + double tImagResult [] = ZIMAG_RESULT13 ; @@ -854,8 +931,8 @@ static void zfftmaTest14 (void ) - double tRealResult [] = ZREAL_RESULT16 ; - double tImagResult [] = ZIMAG_RESULT16 ; + double tRealResult [] = ZREAL_RESULT14 ; + double tImagResult [] = ZIMAG_RESULT14 ; @@ -910,8 +987,8 @@ static void zfftmaTest15 (void ) - double tRealResult [] = ZREAL_RESULT16 ; - double tImagResult [] = ZIMAG_RESULT16 ; + double tRealResult [] = ZREAL_RESULT15 ; + double tImagResult [] = ZIMAG_RESULT15 ; @@ -1075,39 +1152,38 @@ static int testFft(void) { printf("\n\n\n"); - printf("\t>>>> Vector 2 Double Complex Tests\n"); + printf("\n\t>>>> Vector 2 Double Complex Tests\n"); zfftmaTest2(); - printf("\t>>>> Vector 3 Double Complex Tests\n"); + printf("\n\t>>>> Vector 3 Double Complex Tests\n"); zfftmaTest3(); - printf("\t>>>> Vector 4 Double Complex Tests\n"); + printf("\n\t>>>> Vector 4 Double Complex Tests\n"); zfftmaTest4(); - printf("\t>>>> Vector 5 Double Complex Tests\n"); + printf("\n\t>>>> Vector 5 Double Complex Tests\n"); zfftmaTest5(); - printf("\t>>>> Vector 6 Double Complex Tests\n"); + printf("\n\t>>>> Vector 6 Double Complex Tests\n"); zfftmaTest6(); - printf("\t>>>> Vector 7 Double Complex Tests\n"); + printf("\n\t>>>> Vector 7 Double Complex Tests\n"); zfftmaTest7(); - printf("\t>>>> Vector 8 Double Complex Tests\n"); + printf("\n\t>>>> Vector 8 Double Complex Tests\n"); zfftmaTest8(); - printf("\t>>>> Vector 9 Double Complex Tests\n"); + printf("\n\t>>>> Vector 9 Double Complex Tests\n"); zfftmaTest9(); - - - - printf("\t>>>> Vector 10 Double Complex Tests\n"); + printf("\n\t>>>> Vector 10 Double Complex Tests\n"); zfftmaTest10(); - -/* - printf("\t>>>> Vector 16 Double Complex Tests\n"); + printf("\n\t>>>> Vector 11 Double Complex Tests\n"); + zfftmaTest11(); + printf("\n\t>>>> Vector 12 Double Complex Tests\n"); + zfftmaTest12(); + printf("\n\t>>>> Vector 13 Double Complex Tests\n"); + zfftmaTest13(); + printf("\n\t>>>> Vector 14 Double Complex Tests\n"); + zfftmaTest14(); + printf("\n\t>>>> Vector 14 Double Complex Tests\n"); + zfftmaTest15(); + printf("\n\t>>>> Vector 16 Double Complex Tests\n"); zfftmaTest16(); - printf("\t>>>> Vector 32 Double Complex Tests\n"); + printf("\n\t>>>> Vector 32 Double Complex Tests\n"); zfftmaTest32(); - - - - printf("\t>>>> Vector 6 Double Complex Tests\n"); - zfftmaTest6(); -*/ return 0; } |