#define NX 128
#define NH 64
#define FNAME "t2"
#define MAXERROR 10

DATA x[NX] ={
32767,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
};

#pragma DATA_SECTION(h,".coeffs")
DATA h[NH] ={ /* b0 b1 b2 ... b(NH-1) */
-143,
-83,
104,
72,
240,
12,
306,
-12,
-349,
222,
535,
340,
225,
-17,
-428,
182,
-150,
-400,
74,
358,
192,
553,
511,
-490,
-155,
53,
-265,
107,
-500,
78,
222,
512,
277,
266,
-76,
148,
336,
-462,
493,
461,
113,
-274,
414,
14,
257,
-87,
511,
-475,
59,
-231,
396,
-183,
199,
-496,
-159,
-2,
-73,
69,
129,
-429,
441,
282,
322,
349,
};

#pragma DATA_SECTION(db,".dbuffer")
DATA db[2*NH] ;

DATA rtest[NX] ={
-142,
-83,
105,
73,
240,
13,
307,
-12,
-348,
222,
535,
340,
226,
-17,
-427,
183,
-149,
-399,
74,
358,
193,
554,
512,
-489,
-155,
54,
-264,
108,
-500,
79,
223,
513,
278,
266,
-76,
149,
336,
-461,
494,
461,
113,
-273,
414,
15,
258,
-86,
512,
-475,
59,
-231,
397,
-182,
200,
-495,
-159,
-2,
-73,
69,
129,
-429,
442,
282,
323,
349,
349,
323,
282,
442,
-429,
129,
69,
-73,
-2,
-159,
-495,
200,
-182,
397,
-231,
59,
-475,
512,
-86,
258,
15,
414,
-273,
113,
461,
494,
-461,
336,
149,
-76,
266,
278,
513,
223,
79,
-500,
108,
-264,
54,
-155,
-489,
512,
554,
193,
358,
74,
-399,
-149,
183,
-427,
-17,
226,
340,
535,
222,
-348,
-12,
307,
13,
240,
73,
105,
-83,
-142,
};