t5.h

IIR数字滤波器的c语言程序

/* Test for iircas5: rand */
#define NX 32
#define NBIQ 8
#define FNAME "t5"
#define MAXERROR 10

DATA x[NX] ={
-617,
-413,
330,
-442,
-64,
-892,
1000,
169,
-157,
31,
-341,
-138,
-562,
163,
533,
61,
287,
-596,
-247,
580,
370,
-80,
138,
602,
-903,
210,
-922,
-174,
-400,
766,
-994,
548,
};

#pragma DATA_SECTION (h,".coeffs")
DATA h[5*NBIQ] ={ /* C54x: a1 a2 b2 b0 b1 ... */
30857,
30152,
-26684,
-18838,
4924,
32118,
14852,
-30453,
22232,
-3184,
18930,
-5771,
7365,
8440,
-29892,
-4021,
16027,
7113,
-24002,
-30987,
-111,
-15208,
-31736,
-19194,
-12276,
-18746,
-3938,
-31697,
7025,
-31926,
9403,
28401,
-20312,
8512,
-7605,
-11795,
12014,
5696,
-8489,
12000,
};

DATA rtest[NX] ={
-1,
3,
-9,
-12,
53,
-21,
-52,
65,
-112,
76,
77,
-225,
222,
-39,
-144,
260,
22,
-180,
-251,
334,
236,
-471,
47,
437,
-139,
-525,
248,
607,
-505,
-355,
758,
-236,
};

#pragma DATA_SECTION (dbuffer,".dbuffer")
DATA dbuffer[2*NBIQ];
DATA *dp = dbuffer;

DATA r[NX];