/* Test for cfft: both */
#define NX 32
#define FNAME "t11"
#define MAXERROR 10

#pragma DATA_SECTION (x,".input")

DATA x[2*NX] ={
23170,	23170,	/* 0 */ 
21132,	21132,	/* 1 */ 
15552,	15552,	/* 2 */ 
7870,	7870,	/* 3 */ 
0,	0,	/* 4 */ 
-6240,	-6240,	/* 5 */ 
-9642,	-9642,	/* 6 */ 
-9920,	-9920,	/* 7 */ 
-7724,	-7724,	/* 8 */ 
-4352,	-4352,	/* 9 */ 
-1282,	-1282,	/* 10 */ 
328,	328,	/* 11 */ 
0,	0,	/* 12 */ 
-1960,	-1960,	/* 13 */ 
-4630,	-4630,	/* 14 */ 
-6862,	-6862,	/* 15 */ 
-7724,	-7724,	/* 16 */ 
-6862,	-6862,	/* 17 */ 
-4630,	-4630,	/* 18 */ 
-1960,	-1960,	/* 19 */ 
-1,	-1,	/* 20 */ 
328,	328,	/* 21 */ 
-1282,	-1282,	/* 22 */ 
-4352,	-4352,	/* 23 */ 
-7724,	-7724,	/* 24 */ 
-9920,	-9920,	/* 25 */ 
-9642,	-9642,	/* 26 */ 
-6240,	-6240,	/* 27 */ 
-1,	-1,	/* 28 */ 
7870,	7870,	/* 29 */ 
15552,	15552,	/* 30 */ 
21132,	21132,	/* 31 */ 
};

#pragma DATA_SECTION (rtest,".test")

DATA rtest[2*NX] ={
-1,	-1,	 /* 0 */ 
3861,	3861,	 /* 1 */ 
3861,	3861,	 /* 2 */ 
3861,	3861,	 /* 3 */ 
0,	0,	 /* 4 */ 
0,	-1,	 /* 5 */ 
0,	-1,	 /* 6 */ 
-1,	-1,	 /* 7 */ 
0,	-1,	 /* 8 */ 
0,	-1,	 /* 9 */ 
0,	0,	 /* 10 */ 
-1,	-1,	 /* 11 */ 
-1,	0,	 /* 12 */ 
0,	0,	 /* 13 */ 
0,	0,	 /* 14 */ 
0,	0,	 /* 15 */ 
0,	0,	 /* 16 */ 
0,	0,	 /* 17 */ 
0,	0,	 /* 18 */ 
-1,	0,	 /* 19 */ 
0,	-1,	 /* 20 */ 
-1,	-1,	 /* 21 */ 
0,	0,	 /* 22 */ 
-1,	0,	 /* 23 */ 
-1,	0,	 /* 24 */ 
-1,	-1,	 /* 25 */ 
0,	0,	 /* 26 */ 
-1,	0,	 /* 27 */ 
0,	0,	 /* 28 */ 
3861,	3861,	 /* 29 */ 
3861,	3861,	 /* 30 */ 
3861,	3861,	 /* 31 */ 
};

DATA error;