t3_scale.h

数字信号处理中的傅立叶反变换程序.希望对大家有用处

/* Test for cfft: rand */
#define NX 32
#define FNAME "t3"
#define MAXERROR 16

#pragma DATA_SECTION (x,".input")

DATA x[2*NX] ={
-11593,	17492,	/* 0 */ 
-18414,	27105,	/* 1 */ 
-18190,	1340,	/* 2 */ 
10811,	22554,	/* 3 */ 
-11703,	-19404,	/* 4 */ 
2472,	28464,	/* 5 */ 
-20715,	-13561,	/* 6 */ 
11741,	-14695,	/* 7 */ 
-7217,	22293,	/* 8 */ 
21360,	14079,	/* 9 */ 
20982,	-21566,	/* 10 */ 
5551,	-28969,	/* 11 */ 
-205,	23370,	/* 12 */ 
23718,	-17851,	/* 13 */ 
19082,	-11943,	/* 14 */ 
8597,	9578,	/* 15 */ 
18865,	-12792,	/* 16 */ 
9506,	-1826,	/* 17 */ 
-9377,	-25823,	/* 18 */ 
-12476,	28973,	/* 19 */ 
-9423,	4912,	/* 20 */ 
2021,	-4540,	/* 21 */ 
13474,	920,	/* 22 */ 
-11316,	-9852,	/* 23 */ 
20083,	-3981,	/* 24 */ 
4038,	-16260,	/* 25 */ 
-7689,	4735,	/* 26 */ 
12028,	15447,	/* 27 */ 
2763,	1769,	/* 28 */ 
-3271,	8337,	/* 29 */ 
11543,	-17262,	/* 30 */ 
7197,	-7131,	/* 31 */ 
};

#pragma DATA_SECTION (rtest,".test")

DATA rtest[2*NX] ={
2633,	122,	 /* 0 */ 
-2831,	2073,	 /* 1 */ 
980,	5079,	 /* 2 */ 
-794,	-446,	 /* 3 */ 
2566,	620,	 /* 4 */ 
1295,	1409,	 /* 5 */ 
30,	1861,	 /* 6 */ 
519,	3656,	 /* 7 */ 
439,	3360,	 /* 8 */ 
3840,	-397,	 /* 9 */ 
-2577,	384,	 /* 10 */ 
-2910,	1665,	 /* 11 */ 
2893,	539,	 /* 12 */ 
219,	4217,	 /* 13 */ 
4235,	-3781,	 /* 14 */ 
-1096,	-4250,	 /* 15 */ 
-1966,	-3217,	 /* 16 */ 
-1546,	1621,	 /* 17 */ 
-3546,	-2042,	 /* 18 */ 
3187,	2674,	 /* 19 */ 
-114,	2505,	 /* 20 */ 
-1856,	4088,	 /* 21 */ 
2622,	357,	 /* 22 */ 
-3046,	-6927,	 /* 23 */ 
-911,	3941,	 /* 24 */ 
-166,	305,	 /* 25 */ 
-512,	-2165,	 /* 26 */ 
-6877,	1000,	 /* 27 */ 
-508,	-2121,	 /* 28 */ 
-5,	1076,	 /* 29 */ 
-2635,	-3101,	 /* 30 */ 
-3170,	3370,	 /* 31 */ 
};

DATA error;