t1bv_64.c

fftw-3.0.1

			      T6U = VFNMS(LDK(KP195090322), T6T, VMUL(LDK(KP980785280), T6S));
			      T71 = VFMA(LDK(KP195090322), T6S, VMUL(LDK(KP980785280), T6T));
			 }
			 T6V = VSUB(T6R, T6U);
			 T7a = VADD(T70, T71);
			 T72 = VSUB(T70, T71);
			 T76 = VADD(T6R, T6U);
		    }
	       }
	       {
		    V T6W, T73, T7c, T7d;
		    T6W = VADD(T6O, T6V);
		    T73 = VBYI(VADD(T6Z, T72));
		    ST(&(x[WS(ios, 50)]), VSUB(T6W, T73), dist, &(x[0]));
		    ST(&(x[WS(ios, 14)]), VADD(T6W, T73), dist, &(x[0]));
		    T7c = VBYI(VADD(T77, T76));
		    T7d = VADD(T79, T7a);
		    ST(&(x[WS(ios, 2)]), VADD(T7c, T7d), dist, &(x[0]));
		    ST(&(x[WS(ios, 62)]), VSUB(T7d, T7c), dist, &(x[0]));
	       }
	       {
		    V T74, T75, T78, T7b;
		    T74 = VSUB(T6O, T6V);
		    T75 = VBYI(VSUB(T72, T6Z));
		    ST(&(x[WS(ios, 46)]), VSUB(T74, T75), dist, &(x[0]));
		    ST(&(x[WS(ios, 18)]), VADD(T74, T75), dist, &(x[0]));
		    T78 = VBYI(VSUB(T76, T77));
		    T7b = VSUB(T79, T7a);
		    ST(&(x[WS(ios, 30)]), VADD(T78, T7b), dist, &(x[0]));
		    ST(&(x[WS(ios, 34)]), VSUB(T7b, T78), dist, &(x[0]));
	       }
	  }
	  {
	       V T4z, T5g, T4R, T59, T4H, T5j, T4O, T55, T4o, T4S, T4K, T4P, T52, T5k, T5c;
	       V T5h;
	       {
		    V T4y, T57, T4v, T58, T4r, T4u;
		    T4y = VADD(T4w, T4x);
		    T57 = VSUB(T4B, T4C);
		    T4r = VFMA(LDK(KP980785280), T4p, VMUL(LDK(KP195090322), T4q));
		    T4u = VFNMS(LDK(KP195090322), T4t, VMUL(LDK(KP980785280), T4s));
		    T4v = VADD(T4r, T4u);
		    T58 = VSUB(T4r, T4u);
		    T4z = VSUB(T4v, T4y);
		    T5g = VADD(T57, T58);
		    T4R = VADD(T4y, T4v);
		    T59 = VSUB(T57, T58);
	       }
	       {
		    V T4D, T54, T4G, T53, T4E, T4F;
		    T4D = VADD(T4B, T4C);
		    T54 = VSUB(T4x, T4w);
		    T4E = VFNMS(LDK(KP195090322), T4p, VMUL(LDK(KP980785280), T4q));
		    T4F = VFMA(LDK(KP195090322), T4s, VMUL(LDK(KP980785280), T4t));
		    T4G = VADD(T4E, T4F);
		    T53 = VSUB(T4E, T4F);
		    T4H = VSUB(T4D, T4G);
		    T5j = VADD(T54, T53);
		    T4O = VADD(T4D, T4G);
		    T55 = VSUB(T53, T54);
	       }
	       {
		    V T4g, T4I, T4n, T4J;
		    {
			 V T4c, T4f, T4j, T4m;
			 T4c = VADD(T4a, T4b);
			 T4f = VADD(T4d, T4e);
			 T4g = VFNMS(LDK(KP098017140), T4f, VMUL(LDK(KP995184726), T4c));
			 T4I = VFMA(LDK(KP098017140), T4c, VMUL(LDK(KP995184726), T4f));
			 T4j = VADD(T4h, T4i);
			 T4m = VADD(T4k, T4l);
			 T4n = VFMA(LDK(KP995184726), T4j, VMUL(LDK(KP098017140), T4m));
			 T4J = VFNMS(LDK(KP098017140), T4j, VMUL(LDK(KP995184726), T4m));
		    }
		    T4o = VSUB(T4g, T4n);
		    T4S = VADD(T4I, T4J);
		    T4K = VSUB(T4I, T4J);
		    T4P = VADD(T4g, T4n);
	       }
	       {
		    V T4Y, T5a, T51, T5b;
		    {
			 V T4W, T4X, T4Z, T50;
			 T4W = VSUB(T4a, T4b);
			 T4X = VSUB(T4e, T4d);
			 T4Y = VFNMS(LDK(KP634393284), T4X, VMUL(LDK(KP773010453), T4W));
			 T5a = VFMA(LDK(KP634393284), T4W, VMUL(LDK(KP773010453), T4X));
			 T4Z = VSUB(T4h, T4i);
			 T50 = VSUB(T4l, T4k);
			 T51 = VFMA(LDK(KP773010453), T4Z, VMUL(LDK(KP634393284), T50));
			 T5b = VFNMS(LDK(KP634393284), T4Z, VMUL(LDK(KP773010453), T50));
		    }
		    T52 = VSUB(T4Y, T51);
		    T5k = VADD(T5a, T5b);
		    T5c = VSUB(T5a, T5b);
		    T5h = VADD(T4Y, T51);
	       }
	       {
		    V T4A, T4L, T5i, T5l;
		    T4A = VBYI(VSUB(T4o, T4z));
		    T4L = VSUB(T4H, T4K);
		    ST(&(x[WS(ios, 17)]), VADD(T4A, T4L), dist, &(x[WS(ios, 1)]));
		    ST(&(x[WS(ios, 47)]), VSUB(T4L, T4A), dist, &(x[WS(ios, 1)]));
		    T5i = VADD(T5g, T5h);
		    T5l = VBYI(VADD(T5j, T5k));
		    ST(&(x[WS(ios, 57)]), VSUB(T5i, T5l), dist, &(x[WS(ios, 1)]));
		    ST(&(x[WS(ios, 7)]), VADD(T5i, T5l), dist, &(x[WS(ios, 1)]));
	       }
	       {
		    V T5m, T5n, T4M, T4N;
		    T5m = VSUB(T5g, T5h);
		    T5n = VBYI(VSUB(T5k, T5j));
		    ST(&(x[WS(ios, 39)]), VSUB(T5m, T5n), dist, &(x[WS(ios, 1)]));
		    ST(&(x[WS(ios, 25)]), VADD(T5m, T5n), dist, &(x[WS(ios, 1)]));
		    T4M = VBYI(VADD(T4z, T4o));
		    T4N = VADD(T4H, T4K);
		    ST(&(x[WS(ios, 15)]), VADD(T4M, T4N), dist, &(x[WS(ios, 1)]));
		    ST(&(x[WS(ios, 49)]), VSUB(T4N, T4M), dist, &(x[WS(ios, 1)]));
	       }
	       {
		    V T4Q, T4T, T56, T5d;
		    T4Q = VADD(T4O, T4P);
		    T4T = VBYI(VADD(T4R, T4S));
		    ST(&(x[WS(ios, 63)]), VSUB(T4Q, T4T), dist, &(x[WS(ios, 1)]));
		    ST(&(x[WS(ios, 1)]), VADD(T4Q, T4T), dist, &(x[WS(ios, 1)]));
		    T56 = VBYI(VSUB(T52, T55));
		    T5d = VSUB(T59, T5c);
		    ST(&(x[WS(ios, 23)]), VADD(T56, T5d), dist, &(x[WS(ios, 1)]));
		    ST(&(x[WS(ios, 41)]), VSUB(T5d, T56), dist, &(x[WS(ios, 1)]));
	       }
	       {
		    V T5e, T5f, T4U, T4V;
		    T5e = VBYI(VADD(T55, T52));
		    T5f = VADD(T59, T5c);
		    ST(&(x[WS(ios, 9)]), VADD(T5e, T5f), dist, &(x[WS(ios, 1)]));
		    ST(&(x[WS(ios, 55)]), VSUB(T5f, T5e), dist, &(x[WS(ios, 1)]));
		    T4U = VSUB(T4O, T4P);
		    T4V = VBYI(VSUB(T4S, T4R));
		    ST(&(x[WS(ios, 33)]), VSUB(T4U, T4V), dist, &(x[WS(ios, 1)]));
		    ST(&(x[WS(ios, 31)]), VADD(T4U, T4V), dist, &(x[WS(ios, 1)]));
	       }
	  }
	  {
	       V T1u, T43, T3D, T3V, T3t, T45, T3B, T3K, T3d, T3E, T3w, T3A, T3R, T46, T3Y;
	       V T42;
	       {
		    V TE, T3U, T1t, T3T, T13, T1s;
		    TE = VSUB(Tg, TD);
		    T3U = VADD(T3r, T3k);
		    T13 = VFMA(LDK(KP831469612), TV, VMUL(LDK(KP555570233), T12));
		    T1s = VFNMS(LDK(KP555570233), T1r, VMUL(LDK(KP831469612), T1k));
		    T1t = VSUB(T13, T1s);
		    T3T = VADD(T13, T1s);
		    T1u = VSUB(TE, T1t);
		    T43 = VADD(T3U, T3T);
		    T3D = VADD(TE, T1t);
		    T3V = VSUB(T3T, T3U);
	       }
	       {
		    V T3s, T3I, T3h, T3J, T3f, T3g;
		    T3s = VSUB(T3k, T3r);
		    T3I = VADD(Tg, TD);
		    T3f = VFNMS(LDK(KP555570233), TV, VMUL(LDK(KP831469612), T12));
		    T3g = VFMA(LDK(KP555570233), T1k, VMUL(LDK(KP831469612), T1r));
		    T3h = VSUB(T3f, T3g);
		    T3J = VADD(T3f, T3g);
		    T3t = VSUB(T3h, T3s);
		    T45 = VADD(T3I, T3J);
		    T3B = VADD(T3s, T3h);
		    T3K = VSUB(T3I, T3J);
	       }
	       {
		    V T2l, T3u, T3c, T3v;
		    {
			 V T29, T2k, T30, T3b;
			 T29 = VSUB(T1R, T28);
			 T2k = VSUB(T2g, T2j);
			 T2l = VFMA(LDK(KP881921264), T29, VMUL(LDK(KP471396736), T2k));
			 T3u = VFNMS(LDK(KP471396736), T29, VMUL(LDK(KP881921264), T2k));
			 T30 = VSUB(T2I, T2Z);
			 T3b = VSUB(T37, T3a);
			 T3c = VFNMS(LDK(KP471396736), T3b, VMUL(LDK(KP881921264), T30));
			 T3v = VFMA(LDK(KP471396736), T30, VMUL(LDK(KP881921264), T3b));
		    }
		    T3d = VSUB(T2l, T3c);
		    T3E = VADD(T3u, T3v);
		    T3w = VSUB(T3u, T3v);
		    T3A = VADD(T2l, T3c);
	       }
	       {
		    V T3N, T3W, T3Q, T3X;
		    {
			 V T3L, T3M, T3O, T3P;
			 T3L = VADD(T28, T1R);
			 T3M = VADD(T2g, T2j);
			 T3N = VFMA(LDK(KP956940335), T3L, VMUL(LDK(KP290284677), T3M));
			 T3W = VFNMS(LDK(KP290284677), T3L, VMUL(LDK(KP956940335), T3M));
			 T3O = VADD(T2Z, T2I);
			 T3P = VADD(T37, T3a);
			 T3Q = VFNMS(LDK(KP290284677), T3P, VMUL(LDK(KP956940335), T3O));
			 T3X = VFMA(LDK(KP290284677), T3O, VMUL(LDK(KP956940335), T3P));
		    }
		    T3R = VSUB(T3N, T3Q);
		    T46 = VADD(T3W, T3X);
		    T3Y = VSUB(T3W, T3X);
		    T42 = VADD(T3N, T3Q);
	       }
	       {
		    V T3e, T3x, T44, T47;
		    T3e = VADD(T1u, T3d);
		    T3x = VBYI(VADD(T3t, T3w));
		    ST(&(x[WS(ios, 53)]), VSUB(T3e, T3x), dist, &(x[WS(ios, 1)]));
		    ST(&(x[WS(ios, 11)]), VADD(T3e, T3x), dist, &(x[WS(ios, 1)]));
		    T44 = VBYI(VSUB(T42, T43));
		    T47 = VSUB(T45, T46);
		    ST(&(x[WS(ios, 29)]), VADD(T44, T47), dist, &(x[WS(ios, 1)]));
		    ST(&(x[WS(ios, 35)]), VSUB(T47, T44), dist, &(x[WS(ios, 1)]));
	       }
	       {
		    V T48, T49, T3y, T3z;
		    T48 = VBYI(VADD(T43, T42));
		    T49 = VADD(T45, T46);
		    ST(&(x[WS(ios, 3)]), VADD(T48, T49), dist, &(x[WS(ios, 1)]));
		    ST(&(x[WS(ios, 61)]), VSUB(T49, T48), dist, &(x[WS(ios, 1)]));
		    T3y = VSUB(T1u, T3d);
		    T3z = VBYI(VSUB(T3w, T3t));
		    ST(&(x[WS(ios, 43)]), VSUB(T3y, T3z), dist, &(x[WS(ios, 1)]));
		    ST(&(x[WS(ios, 21)]), VADD(T3y, T3z), dist, &(x[WS(ios, 1)]));
	       }
	       {
		    V T3C, T3F, T3S, T3Z;
		    T3C = VBYI(VSUB(T3A, T3B));
		    T3F = VSUB(T3D, T3E);
		    ST(&(x[WS(ios, 27)]), VADD(T3C, T3F), dist, &(x[WS(ios, 1)]));
		    ST(&(x[WS(ios, 37)]), VSUB(T3F, T3C), dist, &(x[WS(ios, 1)]));
		    T3S = VADD(T3K, T3R);
		    T3Z = VBYI(VADD(T3V, T3Y));
		    ST(&(x[WS(ios, 51)]), VSUB(T3S, T3Z), dist, &(x[WS(ios, 1)]));
		    ST(&(x[WS(ios, 13)]), VADD(T3S, T3Z), dist, &(x[WS(ios, 1)]));
	       }
	       {
		    V T40, T41, T3G, T3H;
		    T40 = VSUB(T3K, T3R);
		    T41 = VBYI(VSUB(T3Y, T3V));
		    ST(&(x[WS(ios, 45)]), VSUB(T40, T41), dist, &(x[WS(ios, 1)]));
		    ST(&(x[WS(ios, 19)]), VADD(T40, T41), dist, &(x[WS(ios, 1)]));
		    T3G = VBYI(VADD(T3B, T3A));
		    T3H = VADD(T3D, T3E);
		    ST(&(x[WS(ios, 5)]), VADD(T3G, T3H), dist, &(x[WS(ios, 1)]));
		    ST(&(x[WS(ios, 59)]), VSUB(T3H, T3G), dist, &(x[WS(ios, 1)]));
	       }
	  }
     }
     END_SIMD();
     return W;
}

static const tw_instr twinstr[] = {
     VTW(1),
     VTW(2),
     VTW(3),
     VTW(4),
     VTW(5),
     VTW(6),
     VTW(7),
     VTW(8),
     VTW(9),
     VTW(10),
     VTW(11),
     VTW(12),
     VTW(13),
     VTW(14),
     VTW(15),
     VTW(16),
     VTW(17),
     VTW(18),
     VTW(19),
     VTW(20),
     VTW(21),
     VTW(22),
     VTW(23),
     VTW(24),
     VTW(25),
     VTW(26),
     VTW(27),
     VTW(28),
     VTW(29),
     VTW(30),
     VTW(31),
     VTW(32),
     VTW(33),
     VTW(34),
     VTW(35),
     VTW(36),
     VTW(37),
     VTW(38),
     VTW(39),
     VTW(40),
     VTW(41),
     VTW(42),
     VTW(43),
     VTW(44),
     VTW(45),
     VTW(46),
     VTW(47),
     VTW(48),
     VTW(49),
     VTW(50),
     VTW(51),
     VTW(52),
     VTW(53),
     VTW(54),
     VTW(55),
     VTW(56),
     VTW(57),
     VTW(58),
     VTW(59),
     VTW(60),
     VTW(61),
     VTW(62),
     VTW(63),
     {TW_NEXT, VL, 0}
};

static const ct_desc desc = { 64, "t1bv_64", twinstr, {467, 198, 52, 0}, &GENUS, 0, 0, 0 };

void X(codelet_t1bv_64) (planner *p) {
     X(kdft_dit_register) (p, t1bv_64, &desc);
}