q1_8.c

fftw-3.0.1

	  }
	  {
	       E T5d, T5I, T5t, T68, T5g, T5q, T5L, T69;
	       {
		    E T5b, T5c, T5r, T5s;
		    T5b = rio[WS(vs, 4)];
		    T5c = rio[WS(vs, 4) + WS(is, 4)];
		    T5d = T5b + T5c;
		    T5I = T5b - T5c;
		    T5r = iio[WS(vs, 4)];
		    T5s = iio[WS(vs, 4) + WS(is, 4)];
		    T5t = T5r - T5s;
		    T68 = T5r + T5s;
	       }
	       {
		    E T5e, T5f, T5J, T5K;
		    T5e = rio[WS(vs, 4) + WS(is, 2)];
		    T5f = rio[WS(vs, 4) + WS(is, 6)];
		    T5g = T5e + T5f;
		    T5q = T5e - T5f;
		    T5J = iio[WS(vs, 4) + WS(is, 2)];
		    T5K = iio[WS(vs, 4) + WS(is, 6)];
		    T5L = T5J - T5K;
		    T69 = T5J + T5K;
	       }
	       T5h = T5d + T5g;
	       T6e = T5d - T5g;
	       T6q = T68 + T69;
	       T5u = T5q + T5t;
	       T5M = T5I - T5L;
	       T60 = T5t - T5q;
	       T6a = T68 - T69;
	       T5W = T5I + T5L;
	  }
	  {
	       E T6C, T6S, T6V, T7x, T6F, T6N, T6Q, T7y;
	       {
		    E T6A, T6B, T6T, T6U;
		    T6A = rio[WS(vs, 5) + WS(is, 1)];
		    T6B = rio[WS(vs, 5) + WS(is, 5)];
		    T6C = T6A + T6B;
		    T6S = T6A - T6B;
		    T6T = iio[WS(vs, 5) + WS(is, 1)];
		    T6U = iio[WS(vs, 5) + WS(is, 5)];
		    T6V = T6T - T6U;
		    T7x = T6T + T6U;
	       }
	       {
		    E T6D, T6E, T6O, T6P;
		    T6D = rio[WS(vs, 5) + WS(is, 7)];
		    T6E = rio[WS(vs, 5) + WS(is, 3)];
		    T6F = T6D + T6E;
		    T6N = T6D - T6E;
		    T6O = iio[WS(vs, 5) + WS(is, 7)];
		    T6P = iio[WS(vs, 5) + WS(is, 3)];
		    T6Q = T6O - T6P;
		    T7y = T6O + T6P;
	       }
	       T6G = T6C + T6F;
	       T7z = T7x - T7y;
	       T7J = T7x + T7y;
	       T6R = T6N - T6Q;
	       T6W = T6S + T6V;
	       T76 = T6N + T6Q;
	       T7t = T6F - T6C;
	       T75 = T6V - T6S;
	  }
	  {
	       E T2K, T30, T33, T3F, T2N, T2V, T2Y, T3G;
	       {
		    E T2I, T2J, T31, T32;
		    T2I = rio[WS(vs, 2) + WS(is, 1)];
		    T2J = rio[WS(vs, 2) + WS(is, 5)];
		    T2K = T2I + T2J;
		    T30 = T2I - T2J;
		    T31 = iio[WS(vs, 2) + WS(is, 1)];
		    T32 = iio[WS(vs, 2) + WS(is, 5)];
		    T33 = T31 - T32;
		    T3F = T31 + T32;
	       }
	       {
		    E T2L, T2M, T2W, T2X;
		    T2L = rio[WS(vs, 2) + WS(is, 7)];
		    T2M = rio[WS(vs, 2) + WS(is, 3)];
		    T2N = T2L + T2M;
		    T2V = T2L - T2M;
		    T2W = iio[WS(vs, 2) + WS(is, 7)];
		    T2X = iio[WS(vs, 2) + WS(is, 3)];
		    T2Y = T2W - T2X;
		    T3G = T2W + T2X;
	       }
	       T2O = T2K + T2N;
	       T3H = T3F - T3G;
	       T3R = T3F + T3G;
	       T2Z = T2V - T2Y;
	       T34 = T30 + T33;
	       T3e = T2V + T2Y;
	       T3B = T2N - T2K;
	       T3d = T33 - T30;
	  }
	  {
	       E T3V, T4q, T4b, T4Q, T3Y, T48, T4t, T4R;
	       {
		    E T3T, T3U, T49, T4a;
		    T3T = rio[WS(vs, 3)];
		    T3U = rio[WS(vs, 3) + WS(is, 4)];
		    T3V = T3T + T3U;
		    T4q = T3T - T3U;
		    T49 = iio[WS(vs, 3)];
		    T4a = iio[WS(vs, 3) + WS(is, 4)];
		    T4b = T49 - T4a;
		    T4Q = T49 + T4a;
	       }
	       {
		    E T3W, T3X, T4r, T4s;
		    T3W = rio[WS(vs, 3) + WS(is, 2)];
		    T3X = rio[WS(vs, 3) + WS(is, 6)];
		    T3Y = T3W + T3X;
		    T48 = T3W - T3X;
		    T4r = iio[WS(vs, 3) + WS(is, 2)];
		    T4s = iio[WS(vs, 3) + WS(is, 6)];
		    T4t = T4r - T4s;
		    T4R = T4r + T4s;
	       }
	       T3Z = T3V + T3Y;
	       T4W = T3V - T3Y;
	       T58 = T4Q + T4R;
	       T4c = T48 + T4b;
	       T4u = T4q - T4t;
	       T4I = T4b - T48;
	       T4S = T4Q - T4R;
	       T4E = T4q + T4t;
	  }
	  {
	       E T5k, T5A, T5D, T6f, T5n, T5v, T5y, T6g;
	       {
		    E T5i, T5j, T5B, T5C;
		    T5i = rio[WS(vs, 4) + WS(is, 1)];
		    T5j = rio[WS(vs, 4) + WS(is, 5)];
		    T5k = T5i + T5j;
		    T5A = T5i - T5j;
		    T5B = iio[WS(vs, 4) + WS(is, 1)];
		    T5C = iio[WS(vs, 4) + WS(is, 5)];
		    T5D = T5B - T5C;
		    T6f = T5B + T5C;
	       }
	       {
		    E T5l, T5m, T5w, T5x;
		    T5l = rio[WS(vs, 4) + WS(is, 7)];
		    T5m = rio[WS(vs, 4) + WS(is, 3)];
		    T5n = T5l + T5m;
		    T5v = T5l - T5m;
		    T5w = iio[WS(vs, 4) + WS(is, 7)];
		    T5x = iio[WS(vs, 4) + WS(is, 3)];
		    T5y = T5w - T5x;
		    T6g = T5w + T5x;
	       }
	       T5o = T5k + T5n;
	       T6h = T6f - T6g;
	       T6r = T6f + T6g;
	       T5z = T5v - T5y;
	       T5E = T5A + T5D;
	       T5O = T5v + T5y;
	       T6b = T5n - T5k;
	       T5N = T5D - T5A;
	  }
	  {
	       E T6v, T70, T6L, T7q, T6y, T6I, T73, T7r;
	       {
		    E T6t, T6u, T6J, T6K;
		    T6t = rio[WS(vs, 5)];
		    T6u = rio[WS(vs, 5) + WS(is, 4)];
		    T6v = T6t + T6u;
		    T70 = T6t - T6u;
		    T6J = iio[WS(vs, 5)];
		    T6K = iio[WS(vs, 5) + WS(is, 4)];
		    T6L = T6J - T6K;
		    T7q = T6J + T6K;
	       }
	       {
		    E T6w, T6x, T71, T72;
		    T6w = rio[WS(vs, 5) + WS(is, 2)];
		    T6x = rio[WS(vs, 5) + WS(is, 6)];
		    T6y = T6w + T6x;
		    T6I = T6w - T6x;
		    T71 = iio[WS(vs, 5) + WS(is, 2)];
		    T72 = iio[WS(vs, 5) + WS(is, 6)];
		    T73 = T71 - T72;
		    T7r = T71 + T72;
	       }
	       T6z = T6v + T6y;
	       T7w = T6v - T6y;
	       T7I = T7q + T7r;
	       T6M = T6I + T6L;
	       T74 = T70 - T73;
	       T7i = T6L - T6I;
	       T7s = T7q - T7r;
	       T7e = T70 + T73;
	  }
	  rio[0] = T7 + Te;
	  iio[0] = T1g + T1h;
	  rio[WS(is, 1)] = T1p + T1w;
	  iio[WS(is, 1)] = T2y + T2z;
	  rio[WS(is, 3)] = T3Z + T46;
	  rio[WS(is, 2)] = T2H + T2O;
	  iio[WS(is, 2)] = T3Q + T3R;
	  iio[WS(is, 3)] = T58 + T59;
	  rio[WS(is, 6)] = T7R + T7Y;
	  iio[WS(is, 6)] = T90 + T91;
	  iio[WS(is, 5)] = T7I + T7J;
	  rio[WS(is, 5)] = T6z + T6G;
	  iio[WS(is, 4)] = T6q + T6r;
	  rio[WS(is, 4)] = T5h + T5o;
	  rio[WS(is, 7)] = T99 + T9g;
	  iio[WS(is, 7)] = Tai + Taj;
	  {
	       E T12, T18, TX, T13;
	       T12 = T10 - T11;
	       T18 = T14 - T17;
	       TX = W[10];
	       T13 = W[11];
	       iio[WS(vs, 6)] = FNMS(T13, T18, TX * T12);
	       rio[WS(vs, 6)] = FMA(T13, T12, TX * T18);
	  }
	  {
	       E Tag, Tak, Taf, Tah;
	       Tag = T99 - T9g;
	       Tak = Tai - Taj;
	       Taf = W[6];
	       Tah = W[7];
	       rio[WS(vs, 4) + WS(is, 7)] = FMA(Taf, Tag, Tah * Tak);
	       iio[WS(vs, 4) + WS(is, 7)] = FNMS(Tah, Tag, Taf * Tak);
	  }
	  {
	       E T8M, T8S, T8H, T8N;
	       T8M = T8K - T8L;
	       T8S = T8O - T8R;
	       T8H = W[10];
	       T8N = W[11];
	       iio[WS(vs, 6) + WS(is, 6)] = FNMS(T8N, T8S, T8H * T8M);
	       rio[WS(vs, 6) + WS(is, 6)] = FMA(T8N, T8M, T8H * T8S);
	  }
	  {
	       E T2k, T2q, T2f, T2l;
	       T2k = T2i - T2j;
	       T2q = T2m - T2p;
	       T2f = W[10];
	       T2l = W[11];
	       iio[WS(vs, 6) + WS(is, 1)] = FNMS(T2l, T2q, T2f * T2k);
	       rio[WS(vs, 6) + WS(is, 1)] = FMA(T2l, T2k, T2f * T2q);
	  }
	  {
	       E Ta4, Taa, T9Z, Ta5;
	       Ta4 = Ta2 - Ta3;
	       Taa = Ta6 - Ta9;
	       T9Z = W[10];
	       Ta5 = W[11];
	       iio[WS(vs, 6) + WS(is, 7)] = FNMS(Ta5, Taa, T9Z * Ta4);
	       rio[WS(vs, 6) + WS(is, 7)] = FMA(Ta5, Ta4, T9Z * Taa);
	  }
	  {
	       E T8Y, T92, T8X, T8Z;
	       T8Y = T7R - T7Y;
	       T92 = T90 - T91;
	       T8X = W[6];
	       T8Z = W[7];
	       rio[WS(vs, 4) + WS(is, 6)] = FMA(T8X, T8Y, T8Z * T92);
	       iio[WS(vs, 4) + WS(is, 6)] = FNMS(T8Z, T8Y, T8X * T92);
	  }
	  {
	       E T2w, T2A, T2v, T2x;
	       T2w = T1p - T1w;
	       T2A = T2y - T2z;
	       T2v = W[6];
	       T2x = W[7];
	       rio[WS(vs, 4) + WS(is, 1)] = FMA(T2v, T2w, T2x * T2A);
	       iio[WS(vs, 4) + WS(is, 1)] = FNMS(T2x, T2w, T2v * T2A);
	  }
	  {
	       E Tac, Tae, Tab, Tad;
	       Tac = Ta3 + Ta2;
	       Tae = Ta6 + Ta9;
	       Tab = W[2];
	       Tad = W[3];
	       iio[WS(vs, 2) + WS(is, 7)] = FNMS(Tad, Tae, Tab * Tac);
	       rio[WS(vs, 2) + WS(is, 7)] = FMA(Tad, Tac, Tab * Tae);
	  }
	  {
	       E T8U, T8W, T8T, T8V;
	       T8U = T8L + T8K;
	       T8W = T8O + T8R;
	       T8T = W[2];
	       T8V = W[3];
	       iio[WS(vs, 2) + WS(is, 6)] = FNMS(T8V, T8W, T8T * T8U);
	       rio[WS(vs, 2) + WS(is, 6)] = FMA(T8V, T8U, T8T * T8W);
	  }
	  {
	       E T1a, T1c, T19, T1b;
	       T1a = T11 + T10;
	       T1c = T14 + T17;
	       T19 = W[2];
	       T1b = W[3];
	       iio[WS(vs, 2)] = FNMS(T1b, T1c, T19 * T1a);
	       rio[WS(vs, 2)] = FMA(T1b, T1a, T19 * T1c);
	  }
	  {
	       E T1e, T1i, T1d, T1f;
	       T1e = T7 - Te;
	       T1i = T1g - T1h;
	       T1d = W[6];
	       T1f = W[7];
	       rio[WS(vs, 4)] = FMA(T1d, T1e, T1f * T1i);
	       iio[WS(vs, 4)] = FNMS(T1f, T1e, T1d * T1i);
	  }
	  {
	       E T2s, T2u, T2r, T2t;
	       T2s = T2j + T2i;
	       T2u = T2m + T2p;
	       T2r = W[2];
	       T2t = W[3];
	       iio[WS(vs, 2) + WS(is, 1)] = FNMS(T2t, T2u, T2r * T2s);
	       rio[WS(vs, 2) + WS(is, 1)] = FMA(T2t, T2s, T2r * T2u);
	  }
	  {
	       E T3C, T3I, T3x, T3D;
	       T3C = T3A - T3B;
	       T3I = T3E - T3H;
	       T3x = W[10];
	       T3D = W[11];
	       iio[WS(vs, 6) + WS(is, 2)] = FNMS(T3D, T3I, T3x * T3C);
	       rio[WS(vs, 6) + WS(is, 2)] = FMA(T3D, T3C, T3x * T3I);
	  }
	  {
	       E T4U, T50, T4P, T4V;
	       T4U = T4S - T4T;
	       T50 = T4W - T4Z;
	       T4P = W[10];
	       T4V = W[11];
	       iio[WS(vs, 6) + WS(is, 3)] = FNMS(T4V, T50, T4P * T4U);
	       rio[WS(vs, 6) + WS(is, 3)] = FMA(T4V, T4U, T4P * T50);
	  }
	  {
	       E T56, T5a, T55, T57;
	       T56 = T3Z - T46;
	       T5a = T58 - T59;
	       T55 = W[6];
	       T57 = W[7];
	       rio[WS(vs, 4) + WS(is, 3)] = FMA(T55, T56, T57 * T5a);
	       iio[WS(vs, 4) + WS(is, 3)] = FNMS(T57, T56, T55 * T5a);
	  }
	  {
	       E T6o, T6s, T6n, T6p;
	       T6o = T5h - T5o;
	       T6s = T6q - T6r;
	       T6n = W[6];
	       T6p = W[7];
	       rio[WS(vs, 4) + WS(is, 4)] = FMA(T6n, T6o, T6p * T6s);
	       iio[WS(vs, 4) + WS(is, 4)] = FNMS(T6p, T6o, T6n * T6s);
	  }
	  {
	       E T7u, T7A, T7p, T7v;
	       T7u = T7s - T7t;
	       T7A = T7w - T7z;
	       T7p = W[10];
	       T7v = W[11];
	       iio[WS(vs, 6) + WS(is, 5)] = FNMS(T7v, T7A, T7p * T7u);
	       rio[WS(vs, 6) + WS(is, 5)] = FMA(T7v, T7u, T7p * T7A);
	  }
	  {
	       E T6c, T6i, T67, T6d;
	       T6c = T6a - T6b;
	       T6i = T6e - T6h;
	       T67 = W[10];
	       T6d = W[11];
	       iio[WS(vs, 6) + WS(is, 4)] = FNMS(T6d, T6i, T67 * T6c);
	       rio[WS(vs, 6) + WS(is, 4)] = FMA(T6d, T6c, T67 * T6i);
	  }
	  {
	       E T7G, T7K, T7F, T7H;
	       T7G = T6z - T6G;
	       T7K = T7I - T7J;
	       T7F = W[6];
	       T7H = W[7];
	       rio[WS(vs, 4) + WS(is, 5)] = FMA(T7F, T7G, T7H * T7K);