?? n1bv_25.c
字號:
V T2n, T1s, T1u, T1d; T1b = VMUL(LDK(KP559016994), VSUB(T17, T1a)); T2n = VMUL(LDK(KP587785252), T1r); T2o = VFNMS(LDK(KP951056516), T1t, T2n); T1s = VMUL(LDK(KP951056516), T1r); T1u = VMUL(LDK(KP587785252), T1t); T1v = VADD(T1s, T1u); T1d = VADD(T17, T1a); T1e = VFNMS(LDK(KP250000000), T1d, T1c); T2W = VADD(T1c, T1d); } } { V TG, TV, TF, TL, TH, TK, TU, T10, TW, TZ, TX, TI; TG = LD(&(xi[WS(is, 2)]), ivs, &(xi[0])); TV = LD(&(xi[WS(is, 3)]), ivs, &(xi[WS(is, 1)])); { V Tz, TA, TB, TC, TD, TE; Tz = LD(&(xi[WS(is, 7)]), ivs, &(xi[WS(is, 1)])); TA = LD(&(xi[WS(is, 22)]), ivs, &(xi[0])); TB = VADD(Tz, TA); TC = LD(&(xi[WS(is, 12)]), ivs, &(xi[0])); TD = LD(&(xi[WS(is, 17)]), ivs, &(xi[WS(is, 1)])); TE = VADD(TC, TD); TF = VMUL(LDK(KP559016994), VSUB(TB, TE)); TL = VSUB(TC, TD); TH = VADD(TB, TE); TK = VSUB(Tz, TA); } { V TO, TP, TQ, TR, TS, TT; TO = LD(&(xi[WS(is, 8)]), ivs, &(xi[0])); TP = LD(&(xi[WS(is, 23)]), ivs, &(xi[WS(is, 1)])); TQ = VADD(TO, TP); TR = LD(&(xi[WS(is, 13)]), ivs, &(xi[WS(is, 1)])); TS = LD(&(xi[WS(is, 18)]), ivs, &(xi[0])); TT = VADD(TR, TS); TU = VMUL(LDK(KP559016994), VSUB(TQ, TT)); T10 = VSUB(TR, TS); TW = VADD(TQ, TT); TZ = VSUB(TO, TP); } T2P = VADD(TG, TH); T2Q = VADD(TV, TW); T2U = VADD(T2P, T2Q); T11 = VFMA(LDK(KP475528258), TZ, VMUL(LDK(KP293892626), T10)); T27 = VFNMS(LDK(KP475528258), T10, VMUL(LDK(KP293892626), TZ)); TX = VFNMS(LDK(KP250000000), TW, TV); TY = VADD(TU, TX); T26 = VSUB(TX, TU); T12 = VFNMS(LDK(KP1_369094211), T11, VMUL(LDK(KP728968627), TY)); T2f = VFMA(LDK(KP125581039), T27, VMUL(LDK(KP998026728), T26)); T1j = VFMA(LDK(KP1_457937254), T11, VMUL(LDK(KP684547105), TY)); T28 = VFNMS(LDK(KP1_996053456), T27, VMUL(LDK(KP062790519), T26)); TM = VFMA(LDK(KP475528258), TK, VMUL(LDK(KP293892626), TL)); T24 = VFNMS(LDK(KP475528258), TL, VMUL(LDK(KP293892626), TK)); TI = VFNMS(LDK(KP250000000), TH, TG); TJ = VADD(TF, TI); T23 = VSUB(TI, TF); TN = VFNMS(LDK(KP963507348), TM, VMUL(LDK(KP876306680), TJ)); T2e = VFMA(LDK(KP1_071653589), T24, VMUL(LDK(KP844327925), T23)); T1i = VFMA(LDK(KP1_752613360), TM, VMUL(LDK(KP481753674), TJ)); T25 = VFNMS(LDK(KP1_688655851), T24, VMUL(LDK(KP535826794), T23)); } { V Tb, Tq, T3, Tc, T6, Ta, Ti, Tr, Tl, Tp, Ts, Td; Tb = LD(&(xi[WS(is, 4)]), ivs, &(xi[0])); Tq = LD(&(xi[WS(is, 1)]), ivs, &(xi[WS(is, 1)])); { V T1, T2, T8, T4, T5, T9; T1 = LD(&(xi[WS(is, 9)]), ivs, &(xi[WS(is, 1)])); T2 = LD(&(xi[WS(is, 24)]), ivs, &(xi[0])); T8 = VADD(T1, T2); T4 = LD(&(xi[WS(is, 14)]), ivs, &(xi[0])); T5 = LD(&(xi[WS(is, 19)]), ivs, &(xi[WS(is, 1)])); T9 = VADD(T4, T5); T3 = VSUB(T1, T2); Tc = VADD(T8, T9); T6 = VSUB(T4, T5); Ta = VMUL(LDK(KP559016994), VSUB(T8, T9)); } { V Tg, Th, Tn, Tj, Tk, To; Tg = LD(&(xi[WS(is, 6)]), ivs, &(xi[0])); Th = LD(&(xi[WS(is, 21)]), ivs, &(xi[WS(is, 1)])); Tn = VADD(Tg, Th); Tj = LD(&(xi[WS(is, 11)]), ivs, &(xi[WS(is, 1)])); Tk = LD(&(xi[WS(is, 16)]), ivs, &(xi[0])); To = VADD(Tj, Tk); Ti = VSUB(Tg, Th); Tr = VADD(Tn, To); Tl = VSUB(Tj, Tk); Tp = VMUL(LDK(KP559016994), VSUB(Tn, To)); } T2M = VADD(Tq, Tr); T2N = VADD(Tb, Tc); T2T = VADD(T2M, T2N); Tm = VFMA(LDK(KP475528258), Ti, VMUL(LDK(KP293892626), Tl)); T1W = VFNMS(LDK(KP475528258), Tl, VMUL(LDK(KP293892626), Ti)); Ts = VFNMS(LDK(KP250000000), Tr, Tq); Tt = VADD(Tp, Ts); T1X = VSUB(Ts, Tp); Tu = VFMA(LDK(KP1_937166322), Tm, VMUL(LDK(KP248689887), Tt)); T20 = VFNMS(LDK(KP963507348), T1W, VMUL(LDK(KP876306680), T1X)); Tw = VFNMS(LDK(KP497379774), Tm, VMUL(LDK(KP968583161), Tt)); T1Y = VFMA(LDK(KP1_752613360), T1W, VMUL(LDK(KP481753674), T1X)); T7 = VFMA(LDK(KP475528258), T3, VMUL(LDK(KP293892626), T6)); T1U = VFNMS(LDK(KP475528258), T6, VMUL(LDK(KP293892626), T3)); Td = VFNMS(LDK(KP250000000), Tc, Tb); Te = VADD(Ta, Td); T1T = VSUB(Td, Ta); Tf = VFMA(LDK(KP1_071653589), T7, VMUL(LDK(KP844327925), Te)); T21 = VFMA(LDK(KP1_809654104), T1U, VMUL(LDK(KP425779291), T1T)); Tx = VFNMS(LDK(KP1_688655851), T7, VMUL(LDK(KP535826794), Te)); T1V = VFNMS(LDK(KP851558583), T1U, VMUL(LDK(KP904827052), T1T)); } { V T2V, T2X, T2Y, T2S, T30, T2O, T2R, T31, T2Z; T2V = VMUL(LDK(KP559016994), VSUB(T2T, T2U)); T2X = VADD(T2T, T2U); T2Y = VFNMS(LDK(KP250000000), T2X, T2W); T2O = VSUB(T2M, T2N); T2R = VSUB(T2P, T2Q); T2S = VBYI(VFMA(LDK(KP951056516), T2O, VMUL(LDK(KP587785252), T2R))); T30 = VBYI(VFNMS(LDK(KP951056516), T2R, VMUL(LDK(KP587785252), T2O))); ST(&(xo[0]), VADD(T2W, T2X), ovs, &(xo[0])); T31 = VSUB(T2Y, T2V); ST(&(xo[WS(os, 10)]), VADD(T30, T31), ovs, &(xo[0])); ST(&(xo[WS(os, 15)]), VSUB(T31, T30), ovs, &(xo[WS(os, 1)])); T2Z = VADD(T2V, T2Y); ST(&(xo[WS(os, 5)]), VADD(T2S, T2Z), ovs, &(xo[WS(os, 1)])); ST(&(xo[WS(os, 20)]), VSUB(T2Z, T2S), ovs, &(xo[0])); } { V T1Z, T2i, T2j, T2g, T2w, T2x, T2y, T2G, T2H, T2I, T2D, T2E, T2F, T2z, T2A; V T2B, T2p, T2m, T2q, T2b, T2c, T2a, T2d, T2h, T2r; T1Z = VSUB(T1V, T1Y); T2i = VADD(T20, T21); T2j = VSUB(T25, T28); T2g = VSUB(T2e, T2f); T2w = VFMA(LDK(KP1_369094211), T1W, VMUL(LDK(KP728968627), T1X)); T2x = VFNMS(LDK(KP992114701), T1T, VMUL(LDK(KP250666467), T1U)); T2y = VADD(T2w, T2x); T2G = VFNMS(LDK(KP125581039), T24, VMUL(LDK(KP998026728), T23)); T2H = VFMA(LDK(KP1_274847979), T27, VMUL(LDK(KP770513242), T26)); T2I = VADD(T2G, T2H); T2D = VFNMS(LDK(KP1_457937254), T1W, VMUL(LDK(KP684547105), T1X)); T2E = VFMA(LDK(KP1_984229402), T1U, VMUL(LDK(KP125333233), T1T)); T2F = VADD(T2D, T2E); T2z = VFMA(LDK(KP1_996053456), T24, VMUL(LDK(KP062790519), T23)); T2A = VFNMS(LDK(KP637423989), T26, VMUL(LDK(KP1_541026485), T27)); T2B = VADD(T2z, T2A); { V T2k, T2l, T22, T29; T2k = VADD(T1Y, T1V); T2l = VADD(T2e, T2f); T2p = VADD(T2k, T2l); T2m = VMUL(LDK(KP559016994), VSUB(T2k, T2l)); T2q = VFNMS(LDK(KP250000000), T2p, T2o); T2b = VSUB(T1e, T1b); T22 = VSUB(T20, T21); T29 = VADD(T25, T28); T2c = VADD(T22, T29); T2a = VMUL(LDK(KP559016994), VSUB(T22, T29)); T2d = VFNMS(LDK(KP250000000), T2c, T2b); } { V T2u, T2v, T2C, T2J; T2u = VADD(T2b, T2c); T2v = VBYI(VADD(T2o, T2p)); ST(&(xo[WS(os, 23)]), VSUB(T2u, T2v), ovs, &(xo[WS(os, 1)])); ST(&(xo[WS(os, 2)]), VADD(T2u, T2v), ovs, &(xo[0])); T2C = VADD(T2b, VADD(T2y, T2B)); T2J = VBYI(VSUB(VADD(T2F, T2I), T2o)); ST(&(xo[WS(os, 22)]), VSUB(T2C, T2J), ovs, &(xo[0])); ST(&(xo[WS(os, 3)]), VADD(T2C, T2J), ovs, &(xo[WS(os, 1)])); } T2h = VFMA(LDK(KP951056516), T1Z, VADD(T2a, VFNMS(LDK(KP587785252), T2g, T2d))); T2r = VBYI(VADD(VFMA(LDK(KP951056516), T2i, VMUL(LDK(KP587785252), T2j)), VADD(T2m, T2q))); ST(&(xo[WS(os, 18)]), VSUB(T2h, T2r), ovs, &(xo[0])); ST(&(xo[WS(os, 7)]), VADD(T2h, T2r), ovs, &(xo[WS(os, 1)])); { V T2s, T2t, T2K, T2L; T2s = VFMA(LDK(KP587785252), T1Z, VFMA(LDK(KP951056516), T2g, VSUB(T2d, T2a))); T2t = VBYI(VADD(VFNMS(LDK(KP951056516), T2j, VMUL(LDK(KP587785252), T2i)), VSUB(T2q, T2m))); ST(&(xo[WS(os, 13)]), VSUB(T2s, T2t), ovs, &(xo[WS(os, 1)])); ST(&(xo[WS(os, 12)]), VADD(T2s, T2t), ovs, &(xo[0])); T2K = VBYI(VSUB(VFMA(LDK(KP951056516), VSUB(T2w, T2x), VFMA(LDK(KP309016994), T2F, VFNMS(LDK(KP809016994), T2I, VMUL(LDK(KP587785252), VSUB(T2z, T2A))))), T2o)); T2L = VFMA(LDK(KP309016994), T2y, VFMA(LDK(KP951056516), VSUB(T2E, T2D), VFMA(LDK(KP587785252), VSUB(T2H, T2G), VFNMS(LDK(KP809016994), T2B, T2b)))); ST(&(xo[WS(os, 8)]), VADD(T2K, T2L), ovs, &(xo[0])); ST(&(xo[WS(os, 17)]), VSUB(T2L, T2K), ovs, &(xo[WS(os, 1)])); } } { V Tv, T1m, T1n, T1k, T1D, T1E, T1F, T1N, T1O, T1P, T1K, T1L, T1M, T1G, T1H; V T1I, T1w, T1q, T1x, T1f, T1g, T14, T1h, T1l, T1y; Tv = VSUB(Tf, Tu); T1m = VSUB(Tw, Tx); T1n = VSUB(TN, T12); T1k = VSUB(T1i, T1j); T1D = VFMA(LDK(KP1_688655851), Tm, VMUL(LDK(KP535826794), Tt)); T1E = VFMA(LDK(KP1_541026485), T7, VMUL(LDK(KP637423989), Te)); T1F = VSUB(T1D, T1E); T1N = VFMA(LDK(KP851558583), TM, VMUL(LDK(KP904827052), TJ)); T1O = VFMA(LDK(KP1_984229402), T11, VMUL(LDK(KP125333233), TY)); T1P = VADD(T1N, T1O); T1K = VFNMS(LDK(KP1_071653589), Tm, VMUL(LDK(KP844327925), Tt)); T1L = VFNMS(LDK(KP770513242), Te, VMUL(LDK(KP1_274847979), T7)); T1M = VADD(T1K, T1L); T1G = VFNMS(LDK(KP425779291), TJ, VMUL(LDK(KP1_809654104), TM)); T1H = VFNMS(LDK(KP992114701), TY, VMUL(LDK(KP250666467), T11)); T1I = VADD(T1G, T1H); { V T1o, T1p, Ty, T13; T1o = VADD(Tu, Tf); T1p = VADD(T1i, T1j); T1w = VADD(T1o, T1p); T1q = VMUL(LDK(KP559016994), VSUB(T1o, T1p)); T1x = VFNMS(LDK(KP250000000), T1w, T1v); T1f = VADD(T1b, T1e); Ty = VADD(Tw, Tx); T13 = VADD(TN, T12); T1g = VADD(Ty, T13); T14 = VMUL(LDK(KP559016994), VSUB(Ty, T13)); T1h = VFNMS(LDK(KP250000000), T1g, T1f); } { V T1B, T1C, T1J, T1Q; T1B = VADD(T1f, T1g); T1C = VBYI(VADD(T1v, T1w)); ST(&(xo[WS(os, 24)]), VSUB(T1B, T1C), ovs, &(xo[0])); ST(&(xo[WS(os, 1)]), VADD(T1B, T1C), ovs, &(xo[WS(os, 1)])); T1J = VADD(T1f, VADD(T1F, T1I)); T1Q = VBYI(VSUB(VADD(T1M, T1P), T1v)); ST(&(xo[WS(os, 21)]), VSUB(T1J, T1Q), ovs, &(xo[WS(os, 1)])); ST(&(xo[WS(os, 4)]), VADD(T1J, T1Q), ovs, &(xo[0])); } T1l = VFMA(LDK(KP951056516), Tv, VADD(T14, VFNMS(LDK(KP587785252), T1k, T1h))); T1y = VBYI(VADD(VFMA(LDK(KP951056516), T1m, VMUL(LDK(KP587785252), T1n)), VADD(T1q, T1x))); ST(&(xo[WS(os, 19)]), VSUB(T1l, T1y), ovs, &(xo[WS(os, 1)])); ST(&(xo[WS(os, 6)]), VADD(T1l, T1y), ovs, &(xo[0])); { V T1z, T1A, T1R, T1S; T1z = VFMA(LDK(KP587785252), Tv, VFMA(LDK(KP951056516), T1k, VSUB(T1h, T14))); T1A = VBYI(VADD(VFNMS(LDK(KP951056516), T1n, VMUL(LDK(KP587785252), T1m)), VSUB(T1x, T1q))); ST(&(xo[WS(os, 14)]), VSUB(T1z, T1A), ovs, &(xo[0])); ST(&(xo[WS(os, 11)]), VADD(T1z, T1A), ovs, &(xo[WS(os, 1)])); T1R = VBYI(VSUB(VFMA(LDK(KP309016994), T1M, VFMA(LDK(KP951056516), VADD(T1D, T1E), VFNMS(LDK(KP809016994), T1P, VMUL(LDK(KP587785252), VSUB(T1G, T1H))))), T1v)); T1S = VFMA(LDK(KP951056516), VSUB(T1L, T1K), VFMA(LDK(KP309016994), T1F, VFMA(LDK(KP587785252), VSUB(T1O, T1N), VFNMS(LDK(KP809016994), T1I, T1f)))); ST(&(xo[WS(os, 9)]), VADD(T1R, T1S), ovs, &(xo[WS(os, 1)])); ST(&(xo[WS(os, 16)]), VSUB(T1S, T1R), ovs, &(xo[0])); } } }}static const kdft_desc desc = { 25, "n1bv_25", {147, 63, 77, 0}, &GENUS, 0, 0, 0, 0 };void X(codelet_n1bv_25) (planner *p) { X(kdft_register) (p, n1bv_25, &desc);}#endif /* HAVE_FMA */
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -