/* Test for iircas4 : rand */
#define NX 16
#define NBIQ 3
#define FNAME "t3"
#define MAXERROR 10

DATA x[NX] ={
-1478,
-1217,
-1233,
424,
-933,
-1233,
-1984,
1009,
-225,
1766,
-140,
-333,
1416,
102,
-1217,
704,
};

#pragma DATA_SECTION (h,".coeffs")
DATA h[4*NBIQ] ={ /* C54x: a1 a2 b2 b1 ... */
11068,
-7891,
-20319,
13714,
-15725,
21722,
-20072,
-4656,
5934,
184,
11930,
-12792,
};

DATA rtest[NX] ={
-1478,
-933,
31,
1755,
356,
-1244,
-1498,
1539,
1141,
1592,
-99,
-2395,
1082,
-505,
-1329,
1133,
};

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

DATA r[NX];