/* This is a test for sub: tst1 */
#define NX 4
#define FNAME "t2"
#define MAXERROR 2

#define SUB_SCALE 1

DATA x[NX] ={
3276,
6553,
9830,
13107,
};

DATA y[NX] ={
328,
655,
983,
1311,
};

DATA rtest[NX] ={
1475,
2949,
4424,
5898,
};

DATA r[NX];