hb_64.c

fftw-3.0.1

		    T9F = W[78];
		    T9H = W[79];
		    rio[WS(ios, 40)] = FNMS(T9H, T9I, T9F * T9G);
		    iio[-WS(ios, 23)] = FMA(T9H, T9G, T9F * T9I);
	       }
	       {
		    E T9u, T9w, T9t, T9v;
		    T9u = T96 - T9h;
		    T9w = T9r - T9m;
		    T9t = W[46];
		    T9v = W[47];
		    rio[WS(ios, 24)] = FNMS(T9v, T9w, T9t * T9u);
		    iio[-WS(ios, 39)] = FMA(T9v, T9u, T9t * T9w);
	       }
	       {
		    E T9A, T9E, T9x, T9B;
		    T9A = T9y + T9z;
		    T9E = T9C + T9D;
		    T9x = W[14];
		    T9B = W[15];
		    rio[WS(ios, 8)] = FNMS(T9B, T9E, T9x * T9A);
		    iio[-WS(ios, 55)] = FMA(T9B, T9A, T9x * T9E);
	       }
	  }
	  {
	       E T8u, T8Q, T8J, T8V, T8B, T8U, T8G, T8R;
	       {
		    E T8s, T8t, T8H, T8I;
		    T8s = T7i - T7l;
		    T8t = KP707106781 * (T82 - T81);
		    T8u = T8s + T8t;
		    T8Q = T8s - T8t;
		    T8H = KP707106781 * (T7r - T7w);
		    T8I = T87 - T84;
		    T8J = T8H + T8I;
		    T8V = T8I - T8H;
	       }
	       {
		    E T8x, T8A, T8E, T8F;
		    T8x = FNMS(KP382683432, T8w, KP923879532 * T8v);
		    T8A = FMA(KP923879532, T8y, KP382683432 * T8z);
		    T8B = T8x + T8A;
		    T8U = T8A - T8x;
		    T8E = FMA(KP382683432, T8v, KP923879532 * T8w);
		    T8F = FNMS(KP382683432, T8y, KP923879532 * T8z);
		    T8G = T8E + T8F;
		    T8R = T8E - T8F;
	       }
	       {
		    E T8C, T8K, T8r, T8D;
		    T8C = T8u + T8B;
		    T8K = T8G + T8J;
		    T8r = W[6];
		    T8D = W[7];
		    rio[WS(ios, 4)] = FNMS(T8D, T8K, T8r * T8C);
		    iio[-WS(ios, 59)] = FMA(T8D, T8C, T8r * T8K);
	       }
	       {
		    E T8Y, T90, T8X, T8Z;
		    T8Y = T8Q - T8R;
		    T90 = T8V - T8U;
		    T8X = W[38];
		    T8Z = W[39];
		    rio[WS(ios, 20)] = FNMS(T8Z, T90, T8X * T8Y);
		    iio[-WS(ios, 43)] = FMA(T8Z, T8Y, T8X * T90);
	       }
	       {
		    E T8M, T8O, T8L, T8N;
		    T8M = T8u - T8B;
		    T8O = T8J - T8G;
		    T8L = W[70];
		    T8N = W[71];
		    rio[WS(ios, 36)] = FNMS(T8N, T8O, T8L * T8M);
		    iio[-WS(ios, 27)] = FMA(T8N, T8M, T8L * T8O);
	       }
	       {
		    E T8S, T8W, T8P, T8T;
		    T8S = T8Q + T8R;
		    T8W = T8U + T8V;
		    T8P = W[102];
		    T8T = W[103];
		    rio[WS(ios, 52)] = FNMS(T8T, T8W, T8P * T8S);
		    iio[-WS(ios, 11)] = FMA(T8T, T8S, T8P * T8W);
	       }
	  }
	  {
	       E T7y, T8g, T89, T8l, T7V, T8k, T80, T8h;
	       {
		    E T7m, T7x, T83, T88;
		    T7m = T7i + T7l;
		    T7x = KP707106781 * (T7r + T7w);
		    T7y = T7m + T7x;
		    T8g = T7m - T7x;
		    T83 = KP707106781 * (T81 + T82);
		    T88 = T84 + T87;
		    T89 = T83 + T88;
		    T8l = T88 - T83;
	       }
	       {
		    E T7J, T7U, T7Y, T7Z;
		    T7J = FMA(KP923879532, T7D, KP382683432 * T7I);
		    T7U = FNMS(KP382683432, T7T, KP923879532 * T7O);
		    T7V = T7J + T7U;
		    T8k = T7J - T7U;
		    T7Y = FNMS(KP382683432, T7D, KP923879532 * T7I);
		    T7Z = FMA(KP382683432, T7O, KP923879532 * T7T);
		    T80 = T7Y + T7Z;
		    T8h = T7Z - T7Y;
	       }
	       {
		    E T7W, T8a, T7h, T7X;
		    T7W = T7y + T7V;
		    T8a = T80 + T89;
		    T7h = W[118];
		    T7X = W[119];
		    rio[WS(ios, 60)] = FNMS(T7X, T8a, T7h * T7W);
		    iio[-WS(ios, 3)] = FMA(T7X, T7W, T7h * T8a);
	       }
	       {
		    E T8o, T8q, T8n, T8p;
		    T8o = T8g - T8h;
		    T8q = T8l - T8k;
		    T8n = W[86];
		    T8p = W[87];
		    rio[WS(ios, 44)] = FNMS(T8p, T8q, T8n * T8o);
		    iio[-WS(ios, 19)] = FMA(T8p, T8o, T8n * T8q);
	       }
	       {
		    E T8c, T8e, T8b, T8d;
		    T8c = T7y - T7V;
		    T8e = T89 - T80;
		    T8b = W[54];
		    T8d = W[55];
		    rio[WS(ios, 28)] = FNMS(T8d, T8e, T8b * T8c);
		    iio[-WS(ios, 35)] = FMA(T8d, T8c, T8b * T8e);
	       }
	       {
		    E T8i, T8m, T8f, T8j;
		    T8i = T8g + T8h;
		    T8m = T8k + T8l;
		    T8f = W[22];
		    T8j = W[23];
		    rio[WS(ios, 12)] = FNMS(T8j, T8m, T8f * T8i);
		    iio[-WS(ios, 51)] = FMA(T8j, T8i, T8f * T8m);
	       }
	  }
	  {
	       E T6K, T76, T6Z, T7b, T6R, T7a, T6W, T77;
	       {
		    E T6I, T6J, T6X, T6Y;
		    T6I = T5O - T5P;
		    T6J = T6j - T6k;
		    T6K = T6I + T6J;
		    T76 = T6I - T6J;
		    T6X = T5W - T5T;
		    T6Y = T6n - T6m;
		    T6Z = T6X + T6Y;
		    T7b = T6Y - T6X;
		    {
			 E T6N, T6U, T6Q, T6V;
			 {
			      E T6L, T6M, T6O, T6P;
			      T6L = T5Z - T60;
			      T6M = T63 - T62;
			      T6N = FMA(KP831469612, T6L, KP555570233 * T6M);
			      T6U = FNMS(KP555570233, T6L, KP831469612 * T6M);
			      T6O = T66 - T67;
			      T6P = T6a - T69;
			      T6Q = FNMS(KP555570233, T6P, KP831469612 * T6O);
			      T6V = FMA(KP555570233, T6O, KP831469612 * T6P);
			 }
			 T6R = T6N + T6Q;
			 T7a = T6N - T6Q;
			 T6W = T6U + T6V;
			 T77 = T6V - T6U;
		    }
	       }
	       {
		    E T6S, T70, T6H, T6T;
		    T6S = T6K + T6R;
		    T70 = T6W + T6Z;
		    T6H = W[114];
		    T6T = W[115];
		    rio[WS(ios, 58)] = FNMS(T6T, T70, T6H * T6S);
		    iio[-WS(ios, 5)] = FMA(T6T, T6S, T6H * T70);
	       }
	       {
		    E T7e, T7g, T7d, T7f;
		    T7e = T76 - T77;
		    T7g = T7b - T7a;
		    T7d = W[82];
		    T7f = W[83];
		    rio[WS(ios, 42)] = FNMS(T7f, T7g, T7d * T7e);
		    iio[-WS(ios, 21)] = FMA(T7f, T7e, T7d * T7g);
	       }
	       {
		    E T72, T74, T71, T73;
		    T72 = T6K - T6R;
		    T74 = T6Z - T6W;
		    T71 = W[50];
		    T73 = W[51];
		    rio[WS(ios, 26)] = FNMS(T73, T74, T71 * T72);
		    iio[-WS(ios, 37)] = FMA(T73, T72, T71 * T74);
	       }
	       {
		    E T78, T7c, T75, T79;
		    T78 = T76 + T77;
		    T7c = T7a + T7b;
		    T75 = W[18];
		    T79 = W[19];
		    rio[WS(ios, 10)] = FNMS(T79, T7c, T75 * T78);
		    iio[-WS(ios, 53)] = FMA(T79, T78, T75 * T7c);
	       }
	  }
	  {
	       E T3a, T52, T4V, T57, T4z, T56, T4E, T53;
	       {
		    E T2w, T39, T4H, T4U;
		    T2w = T2c + T2v;
		    T39 = T2P + T38;
		    T3a = T2w + T39;
		    T52 = T2w - T39;
		    T4H = T4F + T4G;
		    T4U = T4K + T4T;
		    T4V = T4H + T4U;
		    T57 = T4U - T4H;
		    {
			 E T3R, T4C, T4y, T4D;
			 {
			      E T3D, T3Q, T4k, T4x;
			      T3D = T3j + T3C;
			      T3Q = T3G + T3P;
			      T3R = FMA(KP980785280, T3D, KP195090322 * T3Q);
			      T4C = FNMS(KP195090322, T3D, KP980785280 * T3Q);
			      T4k = T40 + T4j;
			      T4x = T4n + T4w;
			      T4y = FNMS(KP195090322, T4x, KP980785280 * T4k);
			      T4D = FMA(KP195090322, T4k, KP980785280 * T4x);
			 }
			 T4z = T3R + T4y;
			 T56 = T3R - T4y;
			 T4E = T4C + T4D;
			 T53 = T4D - T4C;
		    }
	       }
	       {
		    E T4A, T4W, T23, T4B;
		    T4A = T3a + T4z;
		    T4W = T4E + T4V;
		    T23 = W[122];
		    T4B = W[123];
		    rio[WS(ios, 62)] = FNMS(T4B, T4W, T23 * T4A);
		    iio[-WS(ios, 1)] = FMA(T4B, T4A, T23 * T4W);
	       }
	       {
		    E T5a, T5c, T59, T5b;
		    T5a = T52 - T53;
		    T5c = T57 - T56;
		    T59 = W[90];
		    T5b = W[91];
		    rio[WS(ios, 46)] = FNMS(T5b, T5c, T59 * T5a);
		    iio[-WS(ios, 17)] = FMA(T5b, T5a, T59 * T5c);
	       }
	       {
		    E T4Y, T50, T4X, T4Z;
		    T4Y = T3a - T4z;
		    T50 = T4V - T4E;
		    T4X = W[58];
		    T4Z = W[59];
		    rio[WS(ios, 30)] = FNMS(T4Z, T50, T4X * T4Y);
		    iio[-WS(ios, 33)] = FMA(T4Z, T4Y, T4X * T50);
	       }
	       {
		    E T54, T58, T51, T55;
		    T54 = T52 + T53;
		    T58 = T56 + T57;
		    T51 = W[26];
		    T55 = W[27];
		    rio[WS(ios, 14)] = FNMS(T55, T58, T51 * T54);
		    iio[-WS(ios, 49)] = FMA(T55, T54, T51 * T58);
	       }
	  }
	  {
	       E T5g, T5C, T5v, T5H, T5n, T5G, T5s, T5D;
	       {
		    E T5e, T5f, T5t, T5u;
		    T5e = T2c - T2v;
		    T5f = T4G - T4F;
		    T5g = T5e + T5f;
		    T5C = T5e - T5f;
		    T5t = T2P - T38;
		    T5u = T4T - T4K;
		    T5v = T5t + T5u;
		    T5H = T5u - T5t;
		    {
			 E T5j, T5q, T5m, T5r;
			 {
			      E T5h, T5i, T5k, T5l;
			      T5h = T3j - T3C;
			      T5i = T3P - T3G;
			      T5j = FNMS(KP555570233, T5i, KP831469612 * T5h);
			      T5q = FMA(KP555570233, T5h, KP831469612 * T5i);
			      T5k = T40 - T4j;
			      T5l = T4w - T4n;
			      T5m = FMA(KP831469612, T5k, KP555570233 * T5l);
			      T5r = FNMS(KP555570233, T5k, KP831469612 * T5l);
			 }
			 T5n = T5j + T5m;
			 T5G = T5m - T5j;
			 T5s = T5q + T5r;
			 T5D = T5q - T5r;
		    }
	       }
	       {
		    E T5o, T5w, T5d, T5p;
		    T5o = T5g + T5n;
		    T5w = T5s + T5v;
		    T5d = W[10];
		    T5p = W[11];
		    rio[WS(ios, 6)] = FNMS(T5p, T5w, T5d * T5o);
		    iio[-WS(ios, 57)] = FMA(T5p, T5o, T5d * T5w);
	       }
	       {
		    E T5K, T5M, T5J, T5L;
		    T5K = T5C - T5D;
		    T5M = T5H - T5G;
		    T5J = W[42];
		    T5L = W[43];
		    rio[WS(ios, 22)] = FNMS(T5L, T5M, T5J * T5K);
		    iio[-WS(ios, 41)] = FMA(T5L, T5K, T5J * T5M);
	       }
	       {
		    E T5y, T5A, T5x, T5z;
		    T5y = T5g - T5n;
		    T5A = T5v - T5s;
		    T5x = W[74];
		    T5z = W[75];
		    rio[WS(ios, 38)] = FNMS(T5z, T5A, T5x * T5y);
		    iio[-WS(ios, 25)] = FMA(T5z, T5y, T5x * T5A);
	       }
	       {
		    E T5E, T5I, T5B, T5F;
		    T5E = T5C + T5D;
		    T5I = T5G + T5H;
		    T5B = W[106];
		    T5F = W[107];
		    rio[WS(ios, 54)] = FNMS(T5F, T5I, T5B * T5E);
		    iio[-WS(ios, 9)] = FMA(T5F, T5E, T5B * T5I);
	       }
	  }
	  {
	       E T5Y, T6w, T6p, T6B, T6d, T6A, T6i, T6x;
	       {
		    E T5Q, T5X, T6l, T6o;
		    T5Q = T5O + T5P;
		    T5X = T5T + T5W;
		    T5Y = T5Q + T5X;
		    T6w = T5Q - T5X;
		    T6l = T6j + T6k;
		    T6o = T6m + T6n;
		    T6p = T6l + T6o;
		    T6B = T6o - T6l;
		    {
			 E T65, T6g, T6c, T6h;
			 {
			      E T61, T64, T68, T6b;
			      T61 = T5Z + T60;
			      T64 = T62 + T63;
			      T65 = FNMS(KP195090322, T64, KP980785280 * T61);
			      T6g = FMA(KP195090322, T61, KP980785280 * T64);
			      T68 = T66 + T67;
			      T6b = T69 + T6a;
			      T6c = FMA(KP980785280, T68, KP195090322 * T6b);
			      T6h = FNMS(KP195090322, T68, KP980785280 * T6b);
			 }
			 T6d = T65 + T6c;
			 T6A = T6c - T65;
			 T6i = T6g + T6h;
			 T6x = T6g - T6h;
		    }
	       }
	       {
		    E T6e, T6q, T5N, T6f;
		    T6e = T5Y + T6d;
		    T6q = T6i + T6p;
		    T5N = W[2];
		    T6f = W[3];
		    rio[WS(ios, 2)] = FNMS(T6f, T6q, T5N * T6e);
		    iio[-WS(ios, 61)] = FMA(T6f, T6e, T5N * T6q);
	       }
	       {
		    E T6E, T6G, T6D, T6F;
		    T6E = T6w - T6x;
		    T6G = T6B - T6A;
		    T6D = W[34];
		    T6F = W[35];
		    rio[WS(ios, 18)] = FNMS(T6F, T6G, T6D * T6E);
		    iio[-WS(ios, 45)] = FMA(T6F, T6E, T6D * T6G);
	       }
	       {
		    E T6s, T6u, T6r, T6t;
		    T6s = T5Y - T6d;
		    T6u = T6p - T6i;
		    T6r = W[66];
		    T6t = W[67];
		    rio[WS(ios, 34)] = FNMS(T6t, T6u, T6r * T6s);
		    iio[-WS(ios, 29)] = FMA(T6t, T6s, T6r * T6u);
	       }
	       {
		    E T6y, T6C, T6v, T6z;
		    T6y = T6w + T6x;
		    T6C = T6A + T6B;
		    T6v = W[98];
		    T6z = W[99];
		    rio[WS(ios, 50)] = FNMS(T6z, T6C, T6v * T6y);
		    iio[-WS(ios, 13)] = FMA(T6z, T6y, T6v * T6C);
	       }
	  }
	  {
	       E TdO, Tf1, Teq, TeH, Tef, TeW, Ten, TeM, Te3, Ter, Te8, Tem, TeE, Tf0, TeP;
	       E TeX;
	       {
		    E TdG, TeG, TdN, TeF, TdJ, TdM;
		    TdG = TdE + TdF;
		    TeG = Ted - Tec;
		    TdJ = FNMS(KP555570233, TdI, KP831469612 * TdH);
		    TdM = FMA(KP831469612, TdK, KP555570233 * TdL);
		    TdN = TdJ + TdM;
		    TeF = TdM - TdJ;
		    TdO = TdG + TdN;
		    Tf1 = TeG - TeF;
		    Teq = TdG - TdN;
		    TeH = TeF + TeG;
	       }
	       {
		    E Tee, TeK, Teb, TeL, Te9, Tea;
		    Tee = Tec + Ted;
		    TeK = TdE - TdF;
		    Te9 = FMA(KP555570233, TdH, KP831469612 * TdI);
		    Tea = FNMS(KP555570233, TdK, KP831469612 * TdL);
		    Teb = Te9 + Tea;
		    TeL = Te9 - Tea;
		    Tef = Teb + Tee;
		    TeW = TeK - TeL;
		    Ten = Tee - Teb;
		    TeM = TeK + TeL;
	       }
	       {
		    E TdV, Te6, Te2, Te7;
		    {
			 E TdR, TdU, TdY, Te1;
			 TdR = TdP + TdQ;
			 TdU = TdS + TdT;
			 TdV = FNMS(KP290284677, TdU, KP956940335 * TdR);
			 Te6 = FMA(KP290284677, TdR, KP956940335 * TdU);
			 TdY = TdW + TdX;
			 Te1 = TdZ + Te0;
			 Te2 = FMA(KP956940335, TdY, KP290284677 * Te1);
			 Te7 = FNMS(KP290284677, TdY, KP956940335 * Te1);
		    }
		    Te3 = TdV + Te2;
		    Ter = Te6 - Te7;
		    Te8 = Te6 + Te7;
		    Tem = Te2 - TdV;
	       }
	       {
		    E TeA, TeN, TeD, TeO;
		    {
			 E Tey, Tez, TeB, TeC;
			 Tey = TdT - TdS;
			 Tez = TdP - TdQ;
			 TeA = FNMS(KP471396736, Tez, KP881921264 * Tey);
			 TeN = FMA(KP881921264, Tez, KP471396736 * Tey);
			 TeB = TdW - TdX;
			 TeC = Te0 - TdZ;
			 TeD = FMA(KP471396736, TeB, KP881921264 * TeC);
			 TeO = FNMS(KP471396736, TeC, KP881921264 * TeB);
		    }
		    TeE = TeA + TeD;
		    Tf0 = TeN - TeO;
		    TeP = TeN + TeO;
		    TeX = TeD - TeA;
	       }
	       {
		    E Te4, Teg, TdD, Te5;
		    Te4 = TdO + Te3;
		    Teg = Te8 + Tef;
		    TdD = W[120];
		    Te5 = W[121];
		    iio[-WS(ios, 2)] = FMA(TdD, Te4, Te5 * Teg);
		    rio[WS(ios, 61)] = FNMS(Te5, Te4, TdD * Teg);
	       }
	       {
		    E TeY, Tf2, TeV, TeZ;