t12.h

DSP5402实现FFT变化

/* Test for rfft: both */
#define NX 64
#define FNAME "t12"
#define MAXERROR 10

#pragma DATA_SECTION (x,".input")

DATA x[NX] ={
32764,	/* 0 */ 
32031,	/* 1 */ 
29882,	/* 2 */ 
26460,	/* 3 */ 
21992,	/* 4 */ 
16770,	/* 5 */ 
11129,	/* 6 */ 
5424,	/* 7 */ 
0,	/* 8 */ 
-4835,	/* 9 */ 
-8824,	/* 10 */ 
-11789,	/* 11 */ 
-13634,	/* 12 */ 
-14354,	/* 13 */ 
-14028,	/* 14 */ 
-12812,	/* 15 */ 
-10922,	/* 16 */ 
-8612,	/* 17 */ 
-6154,	/* 18 */ 
-3809,	/* 19 */ 
-1813,	/* 20 */ 
-348,	/* 21 */ 
464,	/* 22 */ 
572,	/* 23 */ 
0,	/* 24 */ 
-1164,	/* 25 */ 
-2771,	/* 26 */ 
-4635,	/* 27 */ 
-6548,	/* 28 */ 
-8299,	/* 29 */ 
-9703,	/* 30 */ 
-10609,	/* 31 */ 
-10922,	/* 32 */ 
-10609,	/* 33 */ 
-9703,	/* 34 */ 
-8299,	/* 35 */ 
-6548,	/* 36 */ 
-4635,	/* 37 */ 
-2771,	/* 38 */ 
-1164,	/* 39 */ 
-1,	/* 40 */ 
572,	/* 41 */ 
464,	/* 42 */ 
-348,	/* 43 */ 
-1813,	/* 44 */ 
-3809,	/* 45 */ 
-6154,	/* 46 */ 
-8612,	/* 47 */ 
-10922,	/* 48 */ 
-12812,	/* 49 */ 
-14028,	/* 50 */ 
-14354,	/* 51 */ 
-13634,	/* 52 */ 
-11789,	/* 53 */ 
-8824,	/* 54 */ 
-4835,	/* 55 */ 
-1,	/* 56 */ 
5424,	/* 57 */ 
11129,	/* 58 */ 
16770,	/* 59 */ 
21992,	/* 60 */ 
26460,	/* 61 */ 
29882,	/* 62 */ 
32031,	/* 63 */ 
};

#pragma DATA_SECTION (rtest,".test")

/* format: y(0)Re,y(1)Re,y(2)Re,y(3)Re, ... y(N-1)Re */

DATA rtest[NX] ={
-6,	1489,	 /* 0 */ 
2992,	-215,	 /* 1 */ 
3257,	-1159,	 /* 2 */ 
3517,	-2989,	 /* 3 */ 
-6,	-1461,	 /* 4 */ 
-6,	-1015,	 /* 5 */ 
-6,	-772,	 /* 6 */ 
-6,	-609,	 /* 7 */ 
-6,	-489,	 /* 8 */ 
-6,	-394,	 /* 9 */ 
-6,	-314,	 /* 10 */ 
-6,	-245,	 /* 11 */ 
-6,	-183,	 /* 12 */ 
-6,	-126,	 /* 13 */ 
-6,	-73,	 /* 14 */ 
-6,	-21,	 /* 15 */ 
-6,	31,	 /* 16 */ 
-6,	83,	 /* 17 */ 
-6,	137,	 /* 18 */ 
-6,	194,	 /* 19 */ 
-6,	256,	 /* 20 */ 
-6,	325,	 /* 21 */ 
-6,	404,	 /* 22 */ 
-6,	500,	 /* 23 */ 
-6,	620,	 /* 24 */ 
-6,	782,	 /* 25 */ 
-6,	1025,	 /* 26 */ 
-6,	1472,	 /* 27 */ 
-6,	3000,	 /* 28 */ 
1932,	1170,	 /* 29 */ 
2191,	225,	 /* 30 */ 
2457,	-1479,	 /* 31 */ 
};

DATA error;