cannam@127: /* cannam@127: * Copyright (c) 2003, 2007-14 Matteo Frigo cannam@127: * Copyright (c) 2003, 2007-14 Massachusetts Institute of Technology cannam@127: * cannam@127: * This program is free software; you can redistribute it and/or modify cannam@127: * it under the terms of the GNU General Public License as published by cannam@127: * the Free Software Foundation; either version 2 of the License, or cannam@127: * (at your option) any later version. cannam@127: * cannam@127: * This program is distributed in the hope that it will be useful, cannam@127: * but WITHOUT ANY WARRANTY; without even the implied warranty of cannam@127: * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the cannam@127: * GNU General Public License for more details. cannam@127: * cannam@127: * You should have received a copy of the GNU General Public License cannam@127: * along with this program; if not, write to the Free Software cannam@127: * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA cannam@127: * cannam@127: */ cannam@127: cannam@127: /* This file was automatically generated --- DO NOT EDIT */ cannam@127: /* Generated on Sat Jul 30 16:38:48 EDT 2016 */ cannam@127: cannam@127: #include "codelet-dft.h" cannam@127: cannam@127: #ifdef HAVE_FMA cannam@127: cannam@127: /* Generated by: ../../../genfft/gen_notw_c.native -fma -reorder-insns -schedule-for-pipeline -simd -compact -variables 4 -pipeline-latency 8 -n 128 -name n1fv_128 -include n1f.h */ cannam@127: cannam@127: /* cannam@127: * This function contains 1082 FP additions, 642 FP multiplications, cannam@127: * (or, 440 additions, 0 multiplications, 642 fused multiply/add), cannam@127: * 295 stack variables, 31 constants, and 256 memory accesses cannam@127: */ cannam@127: #include "n1f.h" cannam@127: cannam@127: static void n1fv_128(const R *ri, const R *ii, R *ro, R *io, stride is, stride os, INT v, INT ivs, INT ovs) cannam@127: { cannam@127: DVK(KP903989293, +0.903989293123443331586200297230537048710132025); cannam@127: DVK(KP941544065, +0.941544065183020778412509402599502357185589796); cannam@127: DVK(KP357805721, +0.357805721314524104672487743774474392487532769); cannam@127: DVK(KP472964775, +0.472964775891319928124438237972992463904131113); cannam@127: DVK(KP857728610, +0.857728610000272069902269984284770137042490799); cannam@127: DVK(KP970031253, +0.970031253194543992603984207286100251456865962); cannam@127: DVK(KP250486960, +0.250486960191305461595702160124721208578685568); cannam@127: DVK(KP998795456, +0.998795456205172392714771604759100694443203615); cannam@127: DVK(KP740951125, +0.740951125354959091175616897495162729728955309); cannam@127: DVK(KP599376933, +0.599376933681923766271389869014404232837890546); cannam@127: DVK(KP906347169, +0.906347169019147157946142717268914412664134293); cannam@127: DVK(KP049126849, +0.049126849769467254105343321271313617079695752); cannam@127: DVK(KP989176509, +0.989176509964780973451673738016243063983689533); cannam@127: DVK(KP803207531, +0.803207531480644909806676512963141923879569427); cannam@127: DVK(KP741650546, +0.741650546272035369581266691172079863842265220); cannam@127: DVK(KP956940335, +0.956940335732208864935797886980269969482849206); cannam@127: DVK(KP148335987, +0.148335987538347428753676511486911367000625355); cannam@127: DVK(KP881921264, +0.881921264348355029712756863660388349508442621); cannam@127: DVK(KP303346683, +0.303346683607342391675883946941299872384187453); cannam@127: DVK(KP534511135, +0.534511135950791641089685961295362908582039528); cannam@127: DVK(KP773010453, +0.773010453362736960810906609758469800971041293); cannam@127: DVK(KP995184726, +0.995184726672196886244836953109479921575474869); cannam@127: DVK(KP820678790, +0.820678790828660330972281985331011598767386482); cannam@127: DVK(KP098491403, +0.098491403357164253077197521291327432293052451); cannam@127: DVK(KP831469612, +0.831469612302545237078788377617905756738560812); cannam@127: DVK(KP980785280, +0.980785280403230449126182236134239036973933731); cannam@127: DVK(KP198912367, +0.198912367379658006911597622644676228597850501); cannam@127: DVK(KP668178637, +0.668178637919298919997757686523080761552472251); cannam@127: DVK(KP923879532, +0.923879532511286756128183189396788286822416626); cannam@127: DVK(KP414213562, +0.414213562373095048801688724209698078569671875); cannam@127: DVK(KP707106781, +0.707106781186547524400844362104849039284835938); cannam@127: { cannam@127: INT i; cannam@127: const R *xi; cannam@127: R *xo; cannam@127: xi = ri; cannam@127: xo = ro; cannam@127: for (i = v; i > 0; i = i - VL, xi = xi + (VL * ivs), xo = xo + (VL * ovs), MAKE_VOLATILE_STRIDE(256, is), MAKE_VOLATILE_STRIDE(256, os)) { cannam@127: V T6a, T5J, T6b, T5K, T6B, T6C, T6J, T6A, T6o, T6j, T6r, T68, T6e, T5O, T5R; cannam@127: V T6d, T6D, T6K; cannam@127: { cannam@127: V Tad, TcZ, T6Z, T8T, T4U, Tr, Tfq, TgG, Ted, Tgf, Td0, Tcc, T9k, T84, Tb6; cannam@127: V Tbt, Td8, TdK, TeK, Tgq, TeV, Tgt, T7q, T94, T3p, T5X, T7B, T97, T2G, T5U; cannam@127: V TbD, Tc0, Tdf, TdN, Tf5, Tgx, Tfg, TgA, T7J, T9b, T4E, T64, T7U, T9e, T3V; cannam@127: V T61, Td2, Td3, T85, T72, T4V, TI, Tcd, Tas, TgH, Tek, Tgg, Tft, T86, T75; cannam@127: V T4W, TZ, TaI, Tcg, Tdr, TdG, Tgi, Tet, Tgj, Teq, T8X, T7a, T5M, T1B, T8W; cannam@127: V T7d, T5N, T1s, TaX, Tcf, Tdo, TdH, Tgl, TeC, Tgm, Tez, T90, T7h, T5P, T2c; cannam@127: V T8Z, T7k, T5Q, T23, T3Y, T49, TdL, Tdb, Tbu, Tbl, Tgu, TeR, Tgr, TeY, Tf6; cannam@127: V TbG, T5V, T3s, T5Y, T3f, T95, T7E, T98, T7x, T4g, T4f, T4q, TbH, T41, TbI; cannam@127: V T44, T4h, T4j, T4k, Tf9, TbN; cannam@127: { cannam@127: V Tu, TF, Ty, TL, TW, Tah, Tx, Tag, Tee, Tz, TM, TN, Teh, Tan, TP; cannam@127: V TQ; cannam@127: { cannam@127: V TeG, T2A, Tbq, TeT, Tbp, TeH, T3m, T2x, Td6, T7o, T2q, T3l, T7z, Tbr, T2D; cannam@127: V T82, T83; cannam@127: { cannam@127: V Ta7, T3, Ta8, T4O, Taa, Tab, Ta, T4P, Te, Tc9, Th, Tca, Tl, Tc6, Tc7; cannam@127: V To; cannam@127: { cannam@127: V T1, T2, T4M, T4N; cannam@127: T1 = LD(&(xi[0]), ivs, &(xi[0])); cannam@127: T2 = LD(&(xi[WS(is, 64)]), ivs, &(xi[0])); cannam@127: T4M = LD(&(xi[WS(is, 32)]), ivs, &(xi[0])); cannam@127: T4N = LD(&(xi[WS(is, 96)]), ivs, &(xi[0])); cannam@127: { cannam@127: V T4, T5, T7, T8; cannam@127: T4 = LD(&(xi[WS(is, 16)]), ivs, &(xi[0])); cannam@127: T5 = LD(&(xi[WS(is, 80)]), ivs, &(xi[0])); cannam@127: T7 = LD(&(xi[WS(is, 112)]), ivs, &(xi[0])); cannam@127: T8 = LD(&(xi[WS(is, 48)]), ivs, &(xi[0])); cannam@127: { cannam@127: V Tc, T6, T9, Td, Tf, Tg; cannam@127: Tc = LD(&(xi[WS(is, 8)]), ivs, &(xi[0])); cannam@127: Ta7 = VADD(T1, T2); cannam@127: T3 = VSUB(T1, T2); cannam@127: Ta8 = VADD(T4M, T4N); cannam@127: T4O = VSUB(T4M, T4N); cannam@127: Taa = VADD(T4, T5); cannam@127: T6 = VSUB(T4, T5); cannam@127: Tab = VADD(T7, T8); cannam@127: T9 = VSUB(T7, T8); cannam@127: Td = LD(&(xi[WS(is, 72)]), ivs, &(xi[0])); cannam@127: Tf = LD(&(xi[WS(is, 40)]), ivs, &(xi[0])); cannam@127: Tg = LD(&(xi[WS(is, 104)]), ivs, &(xi[0])); cannam@127: { cannam@127: V Tj, Tk, Tm, Tn; cannam@127: Tj = LD(&(xi[WS(is, 120)]), ivs, &(xi[0])); cannam@127: Tk = LD(&(xi[WS(is, 56)]), ivs, &(xi[0])); cannam@127: Tm = LD(&(xi[WS(is, 88)]), ivs, &(xi[0])); cannam@127: Tn = LD(&(xi[WS(is, 24)]), ivs, &(xi[0])); cannam@127: Ta = VADD(T6, T9); cannam@127: T4P = VSUB(T9, T6); cannam@127: Te = VSUB(Tc, Td); cannam@127: Tc9 = VADD(Tc, Td); cannam@127: Th = VSUB(Tf, Tg); cannam@127: Tca = VADD(Tf, Tg); cannam@127: Tl = VSUB(Tj, Tk); cannam@127: Tc6 = VADD(Tj, Tk); cannam@127: Tc7 = VADD(Tn, Tm); cannam@127: To = VSUB(Tm, Tn); cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: { cannam@127: V T6X, Tb, Te9, Ta9, Tcb, Tea, T4R, Ti, Tfo, Tac, Tp, T4S, Tc8, Teb, T4Q; cannam@127: T6X = VFNMS(LDK(KP707106781), Ta, T3); cannam@127: Tb = VFMA(LDK(KP707106781), Ta, T3); cannam@127: Te9 = VSUB(Ta7, Ta8); cannam@127: Ta9 = VADD(Ta7, Ta8); cannam@127: Tcb = VADD(Tc9, Tca); cannam@127: Tea = VSUB(Tc9, Tca); cannam@127: T4R = VFMA(LDK(KP414213562), Te, Th); cannam@127: Ti = VFNMS(LDK(KP414213562), Th, Te); cannam@127: Tfo = VSUB(Tab, Taa); cannam@127: Tac = VADD(Taa, Tab); cannam@127: Tp = VFNMS(LDK(KP414213562), To, Tl); cannam@127: T4S = VFMA(LDK(KP414213562), Tl, To); cannam@127: Tc8 = VADD(Tc6, Tc7); cannam@127: Teb = VSUB(Tc6, Tc7); cannam@127: T4Q = VFNMS(LDK(KP707106781), T4P, T4O); cannam@127: T82 = VFMA(LDK(KP707106781), T4P, T4O); cannam@127: { cannam@127: V T4T, T6Y, Tq, Tfp, Tec; cannam@127: T4T = VSUB(T4R, T4S); cannam@127: T6Y = VADD(T4R, T4S); cannam@127: T83 = VSUB(Tp, Ti); cannam@127: Tq = VADD(Ti, Tp); cannam@127: Tfp = VSUB(Teb, Tea); cannam@127: Tec = VADD(Tea, Teb); cannam@127: Tad = VSUB(Ta9, Tac); cannam@127: TcZ = VADD(Ta9, Tac); cannam@127: T6Z = VFMA(LDK(KP923879532), T6Y, T6X); cannam@127: T8T = VFNMS(LDK(KP923879532), T6Y, T6X); cannam@127: T4U = VFMA(LDK(KP923879532), T4T, T4Q); cannam@127: T6a = VFNMS(LDK(KP923879532), T4T, T4Q); cannam@127: Tr = VFMA(LDK(KP923879532), Tq, Tb); cannam@127: T5J = VFNMS(LDK(KP923879532), Tq, Tb); cannam@127: Tfq = VFMA(LDK(KP707106781), Tfp, Tfo); cannam@127: TgG = VFNMS(LDK(KP707106781), Tfp, Tfo); cannam@127: Ted = VFMA(LDK(KP707106781), Tec, Te9); cannam@127: Tgf = VFNMS(LDK(KP707106781), Tec, Te9); cannam@127: Td0 = VADD(Tcb, Tc8); cannam@127: Tcc = VSUB(Tc8, Tcb); cannam@127: } cannam@127: } cannam@127: } cannam@127: { cannam@127: V T2i, T3j, Tb2, T2B, Tb5, T3k, T2p, T2C; cannam@127: { cannam@127: V T2m, Tb0, Tb1, Tb3, T2l, T2n; cannam@127: { cannam@127: V T2g, T2h, T3h, T3i, T2j, T2k; cannam@127: T2g = LD(&(xi[WS(is, 1)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2h = LD(&(xi[WS(is, 65)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3h = LD(&(xi[WS(is, 33)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3i = LD(&(xi[WS(is, 97)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2j = LD(&(xi[WS(is, 17)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2k = LD(&(xi[WS(is, 81)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2m = LD(&(xi[WS(is, 113)]), ivs, &(xi[WS(is, 1)])); cannam@127: T9k = VFNMS(LDK(KP923879532), T83, T82); cannam@127: T84 = VFMA(LDK(KP923879532), T83, T82); cannam@127: T2i = VSUB(T2g, T2h); cannam@127: Tb0 = VADD(T2g, T2h); cannam@127: T3j = VSUB(T3h, T3i); cannam@127: Tb1 = VADD(T3h, T3i); cannam@127: Tb3 = VADD(T2j, T2k); cannam@127: T2l = VSUB(T2j, T2k); cannam@127: T2n = LD(&(xi[WS(is, 49)]), ivs, &(xi[WS(is, 1)])); cannam@127: } cannam@127: { cannam@127: V T2r, T2s, T2u, T2v; cannam@127: T2r = LD(&(xi[WS(is, 9)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2s = LD(&(xi[WS(is, 73)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2u = LD(&(xi[WS(is, 41)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2v = LD(&(xi[WS(is, 105)]), ivs, &(xi[WS(is, 1)])); cannam@127: TeG = VSUB(Tb0, Tb1); cannam@127: Tb2 = VADD(Tb0, Tb1); cannam@127: { cannam@127: V T2y, T2z, Tb4, T2o, Tbn, T2t, Tbo, T2w; cannam@127: T2y = LD(&(xi[WS(is, 121)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2z = LD(&(xi[WS(is, 57)]), ivs, &(xi[WS(is, 1)])); cannam@127: Tb4 = VADD(T2m, T2n); cannam@127: T2o = VSUB(T2m, T2n); cannam@127: Tbn = VADD(T2r, T2s); cannam@127: T2t = VSUB(T2r, T2s); cannam@127: Tbo = VADD(T2u, T2v); cannam@127: T2w = VSUB(T2u, T2v); cannam@127: T2B = LD(&(xi[WS(is, 25)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2A = VSUB(T2y, T2z); cannam@127: Tbq = VADD(T2y, T2z); cannam@127: TeT = VSUB(Tb3, Tb4); cannam@127: Tb5 = VADD(Tb3, Tb4); cannam@127: T3k = VSUB(T2l, T2o); cannam@127: T2p = VADD(T2l, T2o); cannam@127: Tbp = VADD(Tbn, Tbo); cannam@127: TeH = VSUB(Tbn, Tbo); cannam@127: T3m = VFMA(LDK(KP414213562), T2t, T2w); cannam@127: T2x = VFNMS(LDK(KP414213562), T2w, T2t); cannam@127: T2C = LD(&(xi[WS(is, 89)]), ivs, &(xi[WS(is, 1)])); cannam@127: } cannam@127: } cannam@127: } cannam@127: Td6 = VADD(Tb2, Tb5); cannam@127: Tb6 = VSUB(Tb2, Tb5); cannam@127: T7o = VFNMS(LDK(KP707106781), T2p, T2i); cannam@127: T2q = VFMA(LDK(KP707106781), T2p, T2i); cannam@127: T3l = VFMA(LDK(KP707106781), T3k, T3j); cannam@127: T7z = VFNMS(LDK(KP707106781), T3k, T3j); cannam@127: Tbr = VADD(T2B, T2C); cannam@127: T2D = VSUB(T2B, T2C); cannam@127: } cannam@127: { cannam@127: V Tf1, Tfe, Tf2, TbZ, T3M, T4B, Tdd, T3F, T7H, T4A, T7S, TbW, Tf3, T4C, T3T; cannam@127: { cannam@127: V T3x, T4y, Tbz, T3Q, TbC, T4z, T3E, T3R, T3P, TbU, TbV, T3S; cannam@127: { cannam@127: V T3y, T3z, T3B, T3C; cannam@127: { cannam@127: V T3v, T3w, T4w, T4x; cannam@127: T3v = LD(&(xi[WS(is, 127)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3w = LD(&(xi[WS(is, 63)]), ivs, &(xi[WS(is, 1)])); cannam@127: T4w = LD(&(xi[WS(is, 95)]), ivs, &(xi[WS(is, 1)])); cannam@127: T4x = LD(&(xi[WS(is, 31)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3y = LD(&(xi[WS(is, 15)]), ivs, &(xi[WS(is, 1)])); cannam@127: { cannam@127: V Tbs, TeI, T3n, T2E, Tbx; cannam@127: Tbs = VADD(Tbq, Tbr); cannam@127: TeI = VSUB(Tbq, Tbr); cannam@127: T3n = VFNMS(LDK(KP414213562), T2A, T2D); cannam@127: T2E = VFMA(LDK(KP414213562), T2D, T2A); cannam@127: T3x = VSUB(T3v, T3w); cannam@127: Tbx = VADD(T3v, T3w); cannam@127: { cannam@127: V Tby, Td7, TeJ, TeU; cannam@127: T4y = VSUB(T4w, T4x); cannam@127: Tby = VADD(T4x, T4w); cannam@127: Td7 = VADD(Tbp, Tbs); cannam@127: Tbt = VSUB(Tbp, Tbs); cannam@127: TeJ = VADD(TeH, TeI); cannam@127: TeU = VSUB(TeH, TeI); cannam@127: { cannam@127: V T7p, T3o, T7A, T2F; cannam@127: T7p = VSUB(T3m, T3n); cannam@127: T3o = VADD(T3m, T3n); cannam@127: T7A = VSUB(T2x, T2E); cannam@127: T2F = VADD(T2x, T2E); cannam@127: Tbz = VADD(Tbx, Tby); cannam@127: Tf1 = VSUB(Tbx, Tby); cannam@127: Td8 = VADD(Td6, Td7); cannam@127: TdK = VSUB(Td6, Td7); cannam@127: TeK = VFMA(LDK(KP707106781), TeJ, TeG); cannam@127: Tgq = VFNMS(LDK(KP707106781), TeJ, TeG); cannam@127: TeV = VFMA(LDK(KP707106781), TeU, TeT); cannam@127: Tgt = VFNMS(LDK(KP707106781), TeU, TeT); cannam@127: T7q = VFMA(LDK(KP923879532), T7p, T7o); cannam@127: T94 = VFNMS(LDK(KP923879532), T7p, T7o); cannam@127: T3p = VFMA(LDK(KP923879532), T3o, T3l); cannam@127: T5X = VFNMS(LDK(KP923879532), T3o, T3l); cannam@127: T7B = VFNMS(LDK(KP923879532), T7A, T7z); cannam@127: T97 = VFMA(LDK(KP923879532), T7A, T7z); cannam@127: T2G = VFMA(LDK(KP923879532), T2F, T2q); cannam@127: T5U = VFNMS(LDK(KP923879532), T2F, T2q); cannam@127: T3z = LD(&(xi[WS(is, 79)]), ivs, &(xi[WS(is, 1)])); cannam@127: } cannam@127: } cannam@127: } cannam@127: T3B = LD(&(xi[WS(is, 111)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3C = LD(&(xi[WS(is, 47)]), ivs, &(xi[WS(is, 1)])); cannam@127: } cannam@127: { cannam@127: V T3G, T3H, T3J, T3K; cannam@127: T3G = LD(&(xi[WS(is, 7)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3H = LD(&(xi[WS(is, 71)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3J = LD(&(xi[WS(is, 103)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3K = LD(&(xi[WS(is, 39)]), ivs, &(xi[WS(is, 1)])); cannam@127: { cannam@127: V T3N, T3A, TbA, T3D, TbB, T3I, TbX, T3L, TbY, T3O; cannam@127: T3N = LD(&(xi[WS(is, 119)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3A = VSUB(T3y, T3z); cannam@127: TbA = VADD(T3y, T3z); cannam@127: T3D = VSUB(T3B, T3C); cannam@127: TbB = VADD(T3B, T3C); cannam@127: T3I = VSUB(T3G, T3H); cannam@127: TbX = VADD(T3G, T3H); cannam@127: T3L = VSUB(T3J, T3K); cannam@127: TbY = VADD(T3K, T3J); cannam@127: T3O = LD(&(xi[WS(is, 55)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3Q = LD(&(xi[WS(is, 87)]), ivs, &(xi[WS(is, 1)])); cannam@127: Tfe = VSUB(TbB, TbA); cannam@127: TbC = VADD(TbA, TbB); cannam@127: T4z = VSUB(T3D, T3A); cannam@127: T3E = VADD(T3A, T3D); cannam@127: T3R = LD(&(xi[WS(is, 23)]), ivs, &(xi[WS(is, 1)])); cannam@127: Tf2 = VSUB(TbX, TbY); cannam@127: TbZ = VADD(TbX, TbY); cannam@127: T3M = VFMA(LDK(KP414213562), T3L, T3I); cannam@127: T4B = VFNMS(LDK(KP414213562), T3I, T3L); cannam@127: T3P = VSUB(T3N, T3O); cannam@127: TbU = VADD(T3N, T3O); cannam@127: } cannam@127: } cannam@127: } cannam@127: Tdd = VADD(Tbz, TbC); cannam@127: TbD = VSUB(Tbz, TbC); cannam@127: TbV = VADD(T3R, T3Q); cannam@127: T3S = VSUB(T3Q, T3R); cannam@127: T3F = VFMA(LDK(KP707106781), T3E, T3x); cannam@127: T7H = VFNMS(LDK(KP707106781), T3E, T3x); cannam@127: T4A = VFMA(LDK(KP707106781), T4z, T4y); cannam@127: T7S = VFNMS(LDK(KP707106781), T4z, T4y); cannam@127: TbW = VADD(TbU, TbV); cannam@127: Tf3 = VSUB(TbU, TbV); cannam@127: T4C = VFMA(LDK(KP414213562), T3P, T3S); cannam@127: T3T = VFNMS(LDK(KP414213562), T3S, T3P); cannam@127: } cannam@127: { cannam@127: V TD, Tae, TE, TJ, TK, TU, TV; cannam@127: { cannam@127: V Ts, Tt, Tde, Tf4, Tff; cannam@127: Ts = LD(&(xi[WS(is, 4)]), ivs, &(xi[0])); cannam@127: Tt = LD(&(xi[WS(is, 68)]), ivs, &(xi[0])); cannam@127: TD = LD(&(xi[WS(is, 36)]), ivs, &(xi[0])); cannam@127: Tde = VADD(TbZ, TbW); cannam@127: Tc0 = VSUB(TbW, TbZ); cannam@127: Tf4 = VADD(Tf2, Tf3); cannam@127: Tff = VSUB(Tf3, Tf2); cannam@127: { cannam@127: V T7I, T4D, T7T, T3U; cannam@127: T7I = VSUB(T4C, T4B); cannam@127: T4D = VADD(T4B, T4C); cannam@127: T7T = VSUB(T3T, T3M); cannam@127: T3U = VADD(T3M, T3T); cannam@127: Tae = VADD(Ts, Tt); cannam@127: Tu = VSUB(Ts, Tt); cannam@127: Tdf = VADD(Tdd, Tde); cannam@127: TdN = VSUB(Tdd, Tde); cannam@127: Tf5 = VFMA(LDK(KP707106781), Tf4, Tf1); cannam@127: Tgx = VFNMS(LDK(KP707106781), Tf4, Tf1); cannam@127: Tfg = VFMA(LDK(KP707106781), Tff, Tfe); cannam@127: TgA = VFNMS(LDK(KP707106781), Tff, Tfe); cannam@127: T7J = VFMA(LDK(KP923879532), T7I, T7H); cannam@127: T9b = VFNMS(LDK(KP923879532), T7I, T7H); cannam@127: T4E = VFMA(LDK(KP923879532), T4D, T4A); cannam@127: T64 = VFNMS(LDK(KP923879532), T4D, T4A); cannam@127: T7U = VFNMS(LDK(KP923879532), T7T, T7S); cannam@127: T9e = VFMA(LDK(KP923879532), T7T, T7S); cannam@127: T3V = VFMA(LDK(KP923879532), T3U, T3F); cannam@127: T61 = VFNMS(LDK(KP923879532), T3U, T3F); cannam@127: TE = LD(&(xi[WS(is, 100)]), ivs, &(xi[0])); cannam@127: } cannam@127: } cannam@127: TJ = LD(&(xi[WS(is, 124)]), ivs, &(xi[0])); cannam@127: TK = LD(&(xi[WS(is, 60)]), ivs, &(xi[0])); cannam@127: TU = LD(&(xi[WS(is, 92)]), ivs, &(xi[0])); cannam@127: TV = LD(&(xi[WS(is, 28)]), ivs, &(xi[0])); cannam@127: { cannam@127: V Tal, Tam, Tv, Tw, Taf; cannam@127: Tv = LD(&(xi[WS(is, 20)]), ivs, &(xi[0])); cannam@127: Tw = LD(&(xi[WS(is, 84)]), ivs, &(xi[0])); cannam@127: Taf = VADD(TD, TE); cannam@127: TF = VSUB(TD, TE); cannam@127: Ty = LD(&(xi[WS(is, 116)]), ivs, &(xi[0])); cannam@127: TL = VSUB(TJ, TK); cannam@127: Tal = VADD(TJ, TK); cannam@127: TW = VSUB(TU, TV); cannam@127: Tam = VADD(TV, TU); cannam@127: Tah = VADD(Tv, Tw); cannam@127: Tx = VSUB(Tv, Tw); cannam@127: Tag = VADD(Tae, Taf); cannam@127: Tee = VSUB(Tae, Taf); cannam@127: Tz = LD(&(xi[WS(is, 52)]), ivs, &(xi[0])); cannam@127: TM = LD(&(xi[WS(is, 12)]), ivs, &(xi[0])); cannam@127: TN = LD(&(xi[WS(is, 76)]), ivs, &(xi[0])); cannam@127: Teh = VSUB(Tal, Tam); cannam@127: Tan = VADD(Tal, Tam); cannam@127: TP = LD(&(xi[WS(is, 108)]), ivs, &(xi[0])); cannam@127: TQ = LD(&(xi[WS(is, 44)]), ivs, &(xi[0])); cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: { cannam@127: V Tev, TeA, Tdm, TaP, Tew, TaV, T1U, T29, T7f, T1N, T28, T7i, Tex, TaS, T21; cannam@127: V T2a; cannam@127: { cannam@127: V Tem, Ter, Ten, TaD, T1j, T1y, TaA, Tdp, T1c, T78, T7b, T1x, TaG, Teo, T1z; cannam@127: V T1q; cannam@127: { cannam@127: V T14, T1v, Taw, Taz, T1b, T1w, T1n, T1o, T1m, TaE, TaF, T1p; cannam@127: { cannam@127: V Tau, Tav, T15, T16, T18, T19; cannam@127: { cannam@127: V T12, Tai, TA, Tao, TO, T13; cannam@127: T12 = LD(&(xi[WS(is, 2)]), ivs, &(xi[0])); cannam@127: Tai = VADD(Ty, Tz); cannam@127: TA = VSUB(Ty, Tz); cannam@127: Tao = VADD(TM, TN); cannam@127: TO = VSUB(TM, TN); cannam@127: T13 = LD(&(xi[WS(is, 66)]), ivs, &(xi[0])); cannam@127: { cannam@127: V T1t, Tap, TR, Taj, Tef, TG, TB, T1u; cannam@127: T1t = LD(&(xi[WS(is, 34)]), ivs, &(xi[0])); cannam@127: Tap = VADD(TP, TQ); cannam@127: TR = VSUB(TP, TQ); cannam@127: Taj = VADD(Tah, Tai); cannam@127: Tef = VSUB(Tah, Tai); cannam@127: TG = VSUB(Tx, TA); cannam@127: TB = VADD(Tx, TA); cannam@127: Tau = VADD(T12, T13); cannam@127: T14 = VSUB(T12, T13); cannam@127: T1u = LD(&(xi[WS(is, 98)]), ivs, &(xi[0])); cannam@127: { cannam@127: V Taq, Tei, TX, TS, Tak; cannam@127: Taq = VADD(Tao, Tap); cannam@127: Tei = VSUB(Tap, Tao); cannam@127: TX = VSUB(TR, TO); cannam@127: TS = VADD(TO, TR); cannam@127: Tak = VSUB(Tag, Taj); cannam@127: Td2 = VADD(Tag, Taj); cannam@127: { cannam@127: V Teg, Tfs, T71, TH; cannam@127: Teg = VFNMS(LDK(KP414213562), Tef, Tee); cannam@127: Tfs = VFMA(LDK(KP414213562), Tee, Tef); cannam@127: T71 = VFNMS(LDK(KP707106781), TG, TF); cannam@127: TH = VFMA(LDK(KP707106781), TG, TF); cannam@127: { cannam@127: V T70, TC, Tar, Tej, Tfr; cannam@127: T70 = VFNMS(LDK(KP707106781), TB, Tu); cannam@127: TC = VFMA(LDK(KP707106781), TB, Tu); cannam@127: Tar = VSUB(Tan, Taq); cannam@127: Td3 = VADD(Tan, Taq); cannam@127: Tej = VFNMS(LDK(KP414213562), Tei, Teh); cannam@127: Tfr = VFMA(LDK(KP414213562), Teh, Tei); cannam@127: { cannam@127: V T74, TY, T73, TT; cannam@127: T74 = VFNMS(LDK(KP707106781), TX, TW); cannam@127: TY = VFMA(LDK(KP707106781), TX, TW); cannam@127: T73 = VFNMS(LDK(KP707106781), TS, TL); cannam@127: TT = VFMA(LDK(KP707106781), TS, TL); cannam@127: T85 = VFNMS(LDK(KP668178637), T70, T71); cannam@127: T72 = VFMA(LDK(KP668178637), T71, T70); cannam@127: T4V = VFMA(LDK(KP198912367), TC, TH); cannam@127: TI = VFNMS(LDK(KP198912367), TH, TC); cannam@127: Tcd = VSUB(Tar, Tak); cannam@127: Tas = VADD(Tak, Tar); cannam@127: TgH = VSUB(Tej, Teg); cannam@127: Tek = VADD(Teg, Tej); cannam@127: Tgg = VADD(Tfs, Tfr); cannam@127: Tft = VSUB(Tfr, Tfs); cannam@127: T86 = VFNMS(LDK(KP668178637), T73, T74); cannam@127: T75 = VFMA(LDK(KP668178637), T74, T73); cannam@127: T4W = VFMA(LDK(KP198912367), TT, TY); cannam@127: TZ = VFNMS(LDK(KP198912367), TY, TT); cannam@127: Tav = VADD(T1t, T1u); cannam@127: T1v = VSUB(T1t, T1u); cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: T15 = LD(&(xi[WS(is, 18)]), ivs, &(xi[0])); cannam@127: T16 = LD(&(xi[WS(is, 82)]), ivs, &(xi[0])); cannam@127: T18 = LD(&(xi[WS(is, 114)]), ivs, &(xi[0])); cannam@127: T19 = LD(&(xi[WS(is, 50)]), ivs, &(xi[0])); cannam@127: { cannam@127: V T1d, T1e, T1g, T1h, Tax, T17, Tay, T1a; cannam@127: T1d = LD(&(xi[WS(is, 10)]), ivs, &(xi[0])); cannam@127: Taw = VADD(Tau, Tav); cannam@127: Tem = VSUB(Tau, Tav); cannam@127: T1e = LD(&(xi[WS(is, 74)]), ivs, &(xi[0])); cannam@127: T1g = LD(&(xi[WS(is, 42)]), ivs, &(xi[0])); cannam@127: T1h = LD(&(xi[WS(is, 106)]), ivs, &(xi[0])); cannam@127: Tax = VADD(T15, T16); cannam@127: T17 = VSUB(T15, T16); cannam@127: Tay = VADD(T18, T19); cannam@127: T1a = VSUB(T18, T19); cannam@127: { cannam@127: V T1k, T1f, TaB, T1i, TaC, T1l; cannam@127: T1k = LD(&(xi[WS(is, 122)]), ivs, &(xi[0])); cannam@127: T1f = VSUB(T1d, T1e); cannam@127: TaB = VADD(T1d, T1e); cannam@127: T1i = VSUB(T1g, T1h); cannam@127: TaC = VADD(T1g, T1h); cannam@127: T1l = LD(&(xi[WS(is, 58)]), ivs, &(xi[0])); cannam@127: Taz = VADD(Tax, Tay); cannam@127: Ter = VSUB(Tax, Tay); cannam@127: T1b = VADD(T17, T1a); cannam@127: T1w = VSUB(T17, T1a); cannam@127: T1n = LD(&(xi[WS(is, 26)]), ivs, &(xi[0])); cannam@127: T1o = LD(&(xi[WS(is, 90)]), ivs, &(xi[0])); cannam@127: Ten = VSUB(TaB, TaC); cannam@127: TaD = VADD(TaB, TaC); cannam@127: T1j = VFNMS(LDK(KP414213562), T1i, T1f); cannam@127: T1y = VFMA(LDK(KP414213562), T1f, T1i); cannam@127: T1m = VSUB(T1k, T1l); cannam@127: TaE = VADD(T1k, T1l); cannam@127: } cannam@127: } cannam@127: } cannam@127: TaA = VSUB(Taw, Taz); cannam@127: Tdp = VADD(Taw, Taz); cannam@127: TaF = VADD(T1n, T1o); cannam@127: T1p = VSUB(T1n, T1o); cannam@127: T1c = VFMA(LDK(KP707106781), T1b, T14); cannam@127: T78 = VFNMS(LDK(KP707106781), T1b, T14); cannam@127: T7b = VFNMS(LDK(KP707106781), T1w, T1v); cannam@127: T1x = VFMA(LDK(KP707106781), T1w, T1v); cannam@127: TaG = VADD(TaE, TaF); cannam@127: Teo = VSUB(TaE, TaF); cannam@127: T1z = VFNMS(LDK(KP414213562), T1m, T1p); cannam@127: T1q = VFMA(LDK(KP414213562), T1p, T1m); cannam@127: } cannam@127: { cannam@127: V T1F, T26, T1Q, TaT, TaL, TaO, T27, T1M, T1Y, T1Z, TaU, T1T, TaQ, T1X, T20; cannam@127: V TaR; cannam@127: { cannam@127: V T24, TaJ, T25, T1G, T1H, T1J, T1K, T1D, T1E; cannam@127: T1D = LD(&(xi[WS(is, 126)]), ivs, &(xi[0])); cannam@127: T1E = LD(&(xi[WS(is, 62)]), ivs, &(xi[0])); cannam@127: T24 = LD(&(xi[WS(is, 94)]), ivs, &(xi[0])); cannam@127: { cannam@127: V TaH, Tdq, Tes, Tep; cannam@127: TaH = VSUB(TaD, TaG); cannam@127: Tdq = VADD(TaD, TaG); cannam@127: Tes = VSUB(Ten, Teo); cannam@127: Tep = VADD(Ten, Teo); cannam@127: { cannam@127: V T79, T1A, T7c, T1r; cannam@127: T79 = VSUB(T1y, T1z); cannam@127: T1A = VADD(T1y, T1z); cannam@127: T7c = VSUB(T1j, T1q); cannam@127: T1r = VADD(T1j, T1q); cannam@127: TaJ = VADD(T1D, T1E); cannam@127: T1F = VSUB(T1D, T1E); cannam@127: TaI = VFNMS(LDK(KP414213562), TaH, TaA); cannam@127: Tcg = VFMA(LDK(KP414213562), TaA, TaH); cannam@127: Tdr = VADD(Tdp, Tdq); cannam@127: TdG = VSUB(Tdp, Tdq); cannam@127: Tgi = VFNMS(LDK(KP707106781), Tes, Ter); cannam@127: Tet = VFMA(LDK(KP707106781), Tes, Ter); cannam@127: Tgj = VFNMS(LDK(KP707106781), Tep, Tem); cannam@127: Teq = VFMA(LDK(KP707106781), Tep, Tem); cannam@127: T8X = VFNMS(LDK(KP923879532), T79, T78); cannam@127: T7a = VFMA(LDK(KP923879532), T79, T78); cannam@127: T5M = VFNMS(LDK(KP923879532), T1A, T1x); cannam@127: T1B = VFMA(LDK(KP923879532), T1A, T1x); cannam@127: T8W = VFMA(LDK(KP923879532), T7c, T7b); cannam@127: T7d = VFNMS(LDK(KP923879532), T7c, T7b); cannam@127: T5N = VFNMS(LDK(KP923879532), T1r, T1c); cannam@127: T1s = VFMA(LDK(KP923879532), T1r, T1c); cannam@127: T25 = LD(&(xi[WS(is, 30)]), ivs, &(xi[0])); cannam@127: } cannam@127: } cannam@127: T1G = LD(&(xi[WS(is, 14)]), ivs, &(xi[0])); cannam@127: T1H = LD(&(xi[WS(is, 78)]), ivs, &(xi[0])); cannam@127: T1J = LD(&(xi[WS(is, 110)]), ivs, &(xi[0])); cannam@127: T1K = LD(&(xi[WS(is, 46)]), ivs, &(xi[0])); cannam@127: { cannam@127: V T1R, T1I, TaM, T1L, TaN, T1S, T1O, T1P, TaK, T1V, T1W; cannam@127: T1O = LD(&(xi[WS(is, 6)]), ivs, &(xi[0])); cannam@127: T1P = LD(&(xi[WS(is, 70)]), ivs, &(xi[0])); cannam@127: T26 = VSUB(T24, T25); cannam@127: TaK = VADD(T25, T24); cannam@127: T1R = LD(&(xi[WS(is, 102)]), ivs, &(xi[0])); cannam@127: T1I = VSUB(T1G, T1H); cannam@127: TaM = VADD(T1G, T1H); cannam@127: T1L = VSUB(T1J, T1K); cannam@127: TaN = VADD(T1J, T1K); cannam@127: T1Q = VSUB(T1O, T1P); cannam@127: TaT = VADD(T1O, T1P); cannam@127: Tev = VSUB(TaJ, TaK); cannam@127: TaL = VADD(TaJ, TaK); cannam@127: T1S = LD(&(xi[WS(is, 38)]), ivs, &(xi[0])); cannam@127: T1V = LD(&(xi[WS(is, 118)]), ivs, &(xi[0])); cannam@127: T1W = LD(&(xi[WS(is, 54)]), ivs, &(xi[0])); cannam@127: TeA = VSUB(TaN, TaM); cannam@127: TaO = VADD(TaM, TaN); cannam@127: T27 = VSUB(T1L, T1I); cannam@127: T1M = VADD(T1I, T1L); cannam@127: T1Y = LD(&(xi[WS(is, 86)]), ivs, &(xi[0])); cannam@127: T1Z = LD(&(xi[WS(is, 22)]), ivs, &(xi[0])); cannam@127: TaU = VADD(T1S, T1R); cannam@127: T1T = VSUB(T1R, T1S); cannam@127: TaQ = VADD(T1V, T1W); cannam@127: T1X = VSUB(T1V, T1W); cannam@127: } cannam@127: } cannam@127: Tdm = VADD(TaL, TaO); cannam@127: TaP = VSUB(TaL, TaO); cannam@127: T20 = VSUB(T1Y, T1Z); cannam@127: TaR = VADD(T1Z, T1Y); cannam@127: Tew = VSUB(TaT, TaU); cannam@127: TaV = VADD(TaT, TaU); cannam@127: T1U = VFMA(LDK(KP414213562), T1T, T1Q); cannam@127: T29 = VFNMS(LDK(KP414213562), T1Q, T1T); cannam@127: T7f = VFNMS(LDK(KP707106781), T1M, T1F); cannam@127: T1N = VFMA(LDK(KP707106781), T1M, T1F); cannam@127: T28 = VFMA(LDK(KP707106781), T27, T26); cannam@127: T7i = VFNMS(LDK(KP707106781), T27, T26); cannam@127: Tex = VSUB(TaQ, TaR); cannam@127: TaS = VADD(TaQ, TaR); cannam@127: T21 = VFNMS(LDK(KP414213562), T20, T1X); cannam@127: T2a = VFMA(LDK(KP414213562), T1X, T20); cannam@127: } cannam@127: } cannam@127: { cannam@127: V T2J, T2U, T30, T3b, TeL, Tb9, TeO, Tbg, T2M, Tba, T2P, Tbb, T34, Tbh, T33; cannam@127: V T35; cannam@127: { cannam@127: V T2H, T2I, T2S, T2T, T2Y, T2Z, T39, T3a; cannam@127: T2H = LD(&(xi[WS(is, 5)]), ivs, &(xi[WS(is, 1)])); cannam@127: { cannam@127: V Tdn, TaW, Tey, TeB; cannam@127: Tdn = VADD(TaV, TaS); cannam@127: TaW = VSUB(TaS, TaV); cannam@127: Tey = VADD(Tew, Tex); cannam@127: TeB = VSUB(Tex, Tew); cannam@127: { cannam@127: V T2b, T7g, T22, T7j; cannam@127: T2b = VADD(T29, T2a); cannam@127: T7g = VSUB(T2a, T29); cannam@127: T22 = VADD(T1U, T21); cannam@127: T7j = VSUB(T21, T1U); cannam@127: TaX = VFNMS(LDK(KP414213562), TaW, TaP); cannam@127: Tcf = VFMA(LDK(KP414213562), TaP, TaW); cannam@127: Tdo = VADD(Tdm, Tdn); cannam@127: TdH = VSUB(Tdm, Tdn); cannam@127: Tgl = VFNMS(LDK(KP707106781), TeB, TeA); cannam@127: TeC = VFMA(LDK(KP707106781), TeB, TeA); cannam@127: Tgm = VFNMS(LDK(KP707106781), Tey, Tev); cannam@127: Tez = VFMA(LDK(KP707106781), Tey, Tev); cannam@127: T90 = VFNMS(LDK(KP923879532), T7g, T7f); cannam@127: T7h = VFMA(LDK(KP923879532), T7g, T7f); cannam@127: T5P = VFNMS(LDK(KP923879532), T2b, T28); cannam@127: T2c = VFMA(LDK(KP923879532), T2b, T28); cannam@127: T8Z = VFMA(LDK(KP923879532), T7j, T7i); cannam@127: T7k = VFNMS(LDK(KP923879532), T7j, T7i); cannam@127: T5Q = VFNMS(LDK(KP923879532), T22, T1N); cannam@127: T23 = VFMA(LDK(KP923879532), T22, T1N); cannam@127: T2I = LD(&(xi[WS(is, 69)]), ivs, &(xi[WS(is, 1)])); cannam@127: } cannam@127: } cannam@127: T2S = LD(&(xi[WS(is, 37)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2T = LD(&(xi[WS(is, 101)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2Y = LD(&(xi[WS(is, 125)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2Z = LD(&(xi[WS(is, 61)]), ivs, &(xi[WS(is, 1)])); cannam@127: T39 = LD(&(xi[WS(is, 29)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3a = LD(&(xi[WS(is, 93)]), ivs, &(xi[WS(is, 1)])); cannam@127: { cannam@127: V T2K, Tbe, Tbf, T2L, T2N, T2O, Tb7, Tb8, T31, T32; cannam@127: T2K = LD(&(xi[WS(is, 21)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2J = VSUB(T2H, T2I); cannam@127: Tb7 = VADD(T2H, T2I); cannam@127: T2U = VSUB(T2S, T2T); cannam@127: Tb8 = VADD(T2S, T2T); cannam@127: T30 = VSUB(T2Y, T2Z); cannam@127: Tbe = VADD(T2Y, T2Z); cannam@127: T3b = VSUB(T39, T3a); cannam@127: Tbf = VADD(T39, T3a); cannam@127: T2L = LD(&(xi[WS(is, 85)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2N = LD(&(xi[WS(is, 117)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2O = LD(&(xi[WS(is, 53)]), ivs, &(xi[WS(is, 1)])); cannam@127: TeL = VSUB(Tb7, Tb8); cannam@127: Tb9 = VADD(Tb7, Tb8); cannam@127: T31 = LD(&(xi[WS(is, 13)]), ivs, &(xi[WS(is, 1)])); cannam@127: T32 = LD(&(xi[WS(is, 77)]), ivs, &(xi[WS(is, 1)])); cannam@127: TeO = VSUB(Tbe, Tbf); cannam@127: Tbg = VADD(Tbe, Tbf); cannam@127: T2M = VSUB(T2K, T2L); cannam@127: Tba = VADD(T2K, T2L); cannam@127: T2P = VSUB(T2N, T2O); cannam@127: Tbb = VADD(T2N, T2O); cannam@127: T34 = LD(&(xi[WS(is, 109)]), ivs, &(xi[WS(is, 1)])); cannam@127: Tbh = VADD(T31, T32); cannam@127: T33 = VSUB(T31, T32); cannam@127: T35 = LD(&(xi[WS(is, 45)]), ivs, &(xi[WS(is, 1)])); cannam@127: } cannam@127: } cannam@127: { cannam@127: V T4d, T4e, T4o, T4p; cannam@127: { cannam@127: V T2X, T3q, T7t, T7C, T3r, T3e, T7D, T7w; cannam@127: { cannam@127: V T47, TbE, Tbd, Td9, TeW, TeN, T7s, T2W, T7r, T2R, TeP, Tbj, T37, T3c, T48; cannam@127: { cannam@127: V T3W, T3X, TeM, Tbc, T2Q, T2V, Tbi, T36; cannam@127: T3W = LD(&(xi[WS(is, 3)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3X = LD(&(xi[WS(is, 67)]), ivs, &(xi[WS(is, 1)])); cannam@127: TeM = VSUB(Tba, Tbb); cannam@127: Tbc = VADD(Tba, Tbb); cannam@127: T2Q = VADD(T2M, T2P); cannam@127: T2V = VSUB(T2M, T2P); cannam@127: T47 = LD(&(xi[WS(is, 99)]), ivs, &(xi[WS(is, 1)])); cannam@127: Tbi = VADD(T34, T35); cannam@127: T36 = VSUB(T34, T35); cannam@127: TbE = VADD(T3W, T3X); cannam@127: T3Y = VSUB(T3W, T3X); cannam@127: Tbd = VSUB(Tb9, Tbc); cannam@127: Td9 = VADD(Tb9, Tbc); cannam@127: TeW = VFMA(LDK(KP414213562), TeL, TeM); cannam@127: TeN = VFNMS(LDK(KP414213562), TeM, TeL); cannam@127: T7s = VFNMS(LDK(KP707106781), T2V, T2U); cannam@127: T2W = VFMA(LDK(KP707106781), T2V, T2U); cannam@127: T7r = VFNMS(LDK(KP707106781), T2Q, T2J); cannam@127: T2R = VFMA(LDK(KP707106781), T2Q, T2J); cannam@127: TeP = VSUB(Tbh, Tbi); cannam@127: Tbj = VADD(Tbh, Tbi); cannam@127: T37 = VADD(T33, T36); cannam@127: T3c = VSUB(T33, T36); cannam@127: T48 = LD(&(xi[WS(is, 35)]), ivs, &(xi[WS(is, 1)])); cannam@127: } cannam@127: T2X = VFNMS(LDK(KP198912367), T2W, T2R); cannam@127: T3q = VFMA(LDK(KP198912367), T2R, T2W); cannam@127: T7t = VFMA(LDK(KP668178637), T7s, T7r); cannam@127: T7C = VFNMS(LDK(KP668178637), T7r, T7s); cannam@127: { cannam@127: V Tbk, Tda, TeX, TeQ; cannam@127: Tbk = VSUB(Tbg, Tbj); cannam@127: Tda = VADD(Tbg, Tbj); cannam@127: TeX = VFNMS(LDK(KP414213562), TeO, TeP); cannam@127: TeQ = VFMA(LDK(KP414213562), TeP, TeO); cannam@127: { cannam@127: V T7v, T3d, T7u, T38, TbF; cannam@127: T7v = VFNMS(LDK(KP707106781), T3c, T3b); cannam@127: T3d = VFMA(LDK(KP707106781), T3c, T3b); cannam@127: T7u = VFNMS(LDK(KP707106781), T37, T30); cannam@127: T38 = VFMA(LDK(KP707106781), T37, T30); cannam@127: T49 = VSUB(T47, T48); cannam@127: TbF = VADD(T48, T47); cannam@127: TdL = VSUB(Td9, Tda); cannam@127: Tdb = VADD(Td9, Tda); cannam@127: Tbu = VSUB(Tbd, Tbk); cannam@127: Tbl = VADD(Tbd, Tbk); cannam@127: Tgu = VSUB(TeN, TeQ); cannam@127: TeR = VADD(TeN, TeQ); cannam@127: Tgr = VSUB(TeW, TeX); cannam@127: TeY = VADD(TeW, TeX); cannam@127: T3r = VFNMS(LDK(KP198912367), T38, T3d); cannam@127: T3e = VFMA(LDK(KP198912367), T3d, T38); cannam@127: T7D = VFMA(LDK(KP668178637), T7u, T7v); cannam@127: T7w = VFNMS(LDK(KP668178637), T7v, T7u); cannam@127: Tf6 = VSUB(TbE, TbF); cannam@127: TbG = VADD(TbE, TbF); cannam@127: } cannam@127: } cannam@127: } cannam@127: T4d = LD(&(xi[WS(is, 123)]), ivs, &(xi[WS(is, 1)])); cannam@127: T5V = VSUB(T3q, T3r); cannam@127: T3s = VADD(T3q, T3r); cannam@127: T5Y = VSUB(T2X, T3e); cannam@127: T3f = VADD(T2X, T3e); cannam@127: T95 = VSUB(T7D, T7C); cannam@127: T7E = VADD(T7C, T7D); cannam@127: T98 = VSUB(T7t, T7w); cannam@127: T7x = VADD(T7t, T7w); cannam@127: T4e = LD(&(xi[WS(is, 59)]), ivs, &(xi[WS(is, 1)])); cannam@127: T4o = LD(&(xi[WS(is, 91)]), ivs, &(xi[WS(is, 1)])); cannam@127: T4p = LD(&(xi[WS(is, 27)]), ivs, &(xi[WS(is, 1)])); cannam@127: } cannam@127: { cannam@127: V T3Z, T40, T42, T43, TbL, TbM; cannam@127: T3Z = LD(&(xi[WS(is, 19)]), ivs, &(xi[WS(is, 1)])); cannam@127: T40 = LD(&(xi[WS(is, 83)]), ivs, &(xi[WS(is, 1)])); cannam@127: T42 = LD(&(xi[WS(is, 115)]), ivs, &(xi[WS(is, 1)])); cannam@127: T43 = LD(&(xi[WS(is, 51)]), ivs, &(xi[WS(is, 1)])); cannam@127: T4g = LD(&(xi[WS(is, 11)]), ivs, &(xi[WS(is, 1)])); cannam@127: T4f = VSUB(T4d, T4e); cannam@127: TbL = VADD(T4d, T4e); cannam@127: T4q = VSUB(T4o, T4p); cannam@127: TbM = VADD(T4p, T4o); cannam@127: TbH = VADD(T3Z, T40); cannam@127: T41 = VSUB(T3Z, T40); cannam@127: TbI = VADD(T42, T43); cannam@127: T44 = VSUB(T42, T43); cannam@127: T4h = LD(&(xi[WS(is, 75)]), ivs, &(xi[WS(is, 1)])); cannam@127: T4j = LD(&(xi[WS(is, 107)]), ivs, &(xi[WS(is, 1)])); cannam@127: T4k = LD(&(xi[WS(is, 43)]), ivs, &(xi[WS(is, 1)])); cannam@127: Tf9 = VSUB(TbL, TbM); cannam@127: TbN = VADD(TbL, TbM); cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: { cannam@127: V TgB, Tgy, T62, T4H, T65, T4u, T9c, T7X, T9f, T7Q, Tg0, Tga, TfF, TeF, TfT; cannam@127: V TfU, TfP, Tg7, TfI, Tfy, TfA, Tf0, Tfz, Tfl, Tg2, TfS; cannam@127: { cannam@127: V Tc1, TbS, Tfc, Tfj, TdX, Te5, TdZ, TdR, Te7, Te3, TdU, Te4; cannam@127: { cannam@127: V TdF, TdS, Tdx, Td5, TdO, TdE, TdC, Tdt, Tdk; cannam@127: { cannam@127: V Tdc, TdA, T4F, T4c, T7V, T7M, T4G, T4t, T7W, T7P, TdB, Tdj; cannam@127: { cannam@127: V Td1, Tdg, TbK, Tf8, Tfh, T4b, T7L, T46, T7K, TbQ, Tfa, T4r, T4m, Td4; cannam@127: TdF = VSUB(TcZ, Td0); cannam@127: Td1 = VADD(TcZ, Td0); cannam@127: { cannam@127: V TbJ, Tf7, T4a, T45; cannam@127: TbJ = VADD(TbH, TbI); cannam@127: Tf7 = VSUB(TbI, TbH); cannam@127: T4a = VSUB(T44, T41); cannam@127: T45 = VADD(T41, T44); cannam@127: { cannam@127: V TbO, T4i, TbP, T4l; cannam@127: TbO = VADD(T4g, T4h); cannam@127: T4i = VSUB(T4g, T4h); cannam@127: TbP = VADD(T4j, T4k); cannam@127: T4l = VSUB(T4j, T4k); cannam@127: Tdg = VADD(TbG, TbJ); cannam@127: TbK = VSUB(TbG, TbJ); cannam@127: Tf8 = VFMA(LDK(KP414213562), Tf7, Tf6); cannam@127: Tfh = VFNMS(LDK(KP414213562), Tf6, Tf7); cannam@127: T4b = VFMA(LDK(KP707106781), T4a, T49); cannam@127: T7L = VFNMS(LDK(KP707106781), T4a, T49); cannam@127: T46 = VFMA(LDK(KP707106781), T45, T3Y); cannam@127: T7K = VFNMS(LDK(KP707106781), T45, T3Y); cannam@127: TbQ = VADD(TbO, TbP); cannam@127: Tfa = VSUB(TbP, TbO); cannam@127: T4r = VSUB(T4l, T4i); cannam@127: T4m = VADD(T4i, T4l); cannam@127: Td4 = VADD(Td2, Td3); cannam@127: TdS = VSUB(Td3, Td2); cannam@127: } cannam@127: } cannam@127: Tdc = VSUB(Td8, Tdb); cannam@127: TdA = VADD(Td8, Tdb); cannam@127: T4F = VFNMS(LDK(KP198912367), T46, T4b); cannam@127: T4c = VFMA(LDK(KP198912367), T4b, T46); cannam@127: T7V = VFMA(LDK(KP668178637), T7K, T7L); cannam@127: T7M = VFNMS(LDK(KP668178637), T7L, T7K); cannam@127: { cannam@127: V Tdh, TbR, Tfb, Tfi; cannam@127: Tdh = VADD(TbN, TbQ); cannam@127: TbR = VSUB(TbN, TbQ); cannam@127: Tfb = VFNMS(LDK(KP414213562), Tfa, Tf9); cannam@127: Tfi = VFMA(LDK(KP414213562), Tf9, Tfa); cannam@127: { cannam@127: V T4s, T7O, T4n, T7N, Tdi; cannam@127: T4s = VFMA(LDK(KP707106781), T4r, T4q); cannam@127: T7O = VFNMS(LDK(KP707106781), T4r, T4q); cannam@127: T4n = VFMA(LDK(KP707106781), T4m, T4f); cannam@127: T7N = VFNMS(LDK(KP707106781), T4m, T4f); cannam@127: Tdx = VADD(Td1, Td4); cannam@127: Td5 = VSUB(Td1, Td4); cannam@127: TdO = VSUB(Tdh, Tdg); cannam@127: Tdi = VADD(Tdg, Tdh); cannam@127: Tc1 = VSUB(TbR, TbK); cannam@127: TbS = VADD(TbK, TbR); cannam@127: TgB = VSUB(Tfb, Tf8); cannam@127: Tfc = VADD(Tf8, Tfb); cannam@127: Tgy = VSUB(Tfi, Tfh); cannam@127: Tfj = VADD(Tfh, Tfi); cannam@127: T4G = VFMA(LDK(KP198912367), T4n, T4s); cannam@127: T4t = VFNMS(LDK(KP198912367), T4s, T4n); cannam@127: T7W = VFNMS(LDK(KP668178637), T7N, T7O); cannam@127: T7P = VFMA(LDK(KP668178637), T7O, T7N); cannam@127: TdB = VADD(Tdf, Tdi); cannam@127: Tdj = VSUB(Tdf, Tdi); cannam@127: } cannam@127: } cannam@127: } cannam@127: T62 = VSUB(T4G, T4F); cannam@127: T4H = VADD(T4F, T4G); cannam@127: T65 = VSUB(T4t, T4c); cannam@127: T4u = VADD(T4c, T4t); cannam@127: T9c = VSUB(T7V, T7W); cannam@127: T7X = VADD(T7V, T7W); cannam@127: T9f = VSUB(T7P, T7M); cannam@127: T7Q = VADD(T7M, T7P); cannam@127: TdE = VSUB(TdB, TdA); cannam@127: TdC = VADD(TdA, TdB); cannam@127: Tdt = VSUB(Tdj, Tdc); cannam@127: Tdk = VADD(Tdc, Tdj); cannam@127: } cannam@127: { cannam@127: V TdT, Tdl, Tdv, TdJ, Te1, Te2, TdQ, Tdz, TdD, Tdu, Tdw; cannam@127: { cannam@127: V TdI, TdP, TdV, TdW, TdM, Tds, Tdy; cannam@127: TdI = VADD(TdG, TdH); cannam@127: TdT = VSUB(TdH, TdG); cannam@127: TdP = VFNMS(LDK(KP414213562), TdO, TdN); cannam@127: TdV = VFMA(LDK(KP414213562), TdN, TdO); cannam@127: TdW = VFMA(LDK(KP414213562), TdK, TdL); cannam@127: TdM = VFNMS(LDK(KP414213562), TdL, TdK); cannam@127: Tdl = VFNMS(LDK(KP707106781), Tdk, Td5); cannam@127: Tdv = VFMA(LDK(KP707106781), Tdk, Td5); cannam@127: Tds = VSUB(Tdo, Tdr); cannam@127: Tdy = VADD(Tdr, Tdo); cannam@127: TdJ = VFMA(LDK(KP707106781), TdI, TdF); cannam@127: Te1 = VFNMS(LDK(KP707106781), TdI, TdF); cannam@127: TdX = VSUB(TdV, TdW); cannam@127: Te2 = VADD(TdW, TdV); cannam@127: Te5 = VSUB(TdP, TdM); cannam@127: TdQ = VADD(TdM, TdP); cannam@127: Tdz = VADD(Tdx, Tdy); cannam@127: TdD = VSUB(Tdx, Tdy); cannam@127: Tdu = VFNMS(LDK(KP707106781), Tdt, Tds); cannam@127: Tdw = VFMA(LDK(KP707106781), Tdt, Tds); cannam@127: } cannam@127: TdZ = VFMA(LDK(KP923879532), TdQ, TdJ); cannam@127: TdR = VFNMS(LDK(KP923879532), TdQ, TdJ); cannam@127: Te7 = VFMA(LDK(KP923879532), Te2, Te1); cannam@127: Te3 = VFNMS(LDK(KP923879532), Te2, Te1); cannam@127: ST(&(xo[WS(os, 32)]), VFMAI(TdE, TdD), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 96)]), VFNMSI(TdE, TdD), ovs, &(xo[0])); cannam@127: ST(&(xo[0]), VADD(Tdz, TdC), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 64)]), VSUB(Tdz, TdC), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 16)]), VFMAI(Tdw, Tdv), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 112)]), VFNMSI(Tdw, Tdv), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 80)]), VFMAI(Tdu, Tdl), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 48)]), VFNMSI(Tdu, Tdl), ovs, &(xo[0])); cannam@127: TdU = VFMA(LDK(KP707106781), TdT, TdS); cannam@127: Te4 = VFNMS(LDK(KP707106781), TdT, TdS); cannam@127: } cannam@127: } cannam@127: { cannam@127: V Tcx, TcJ, TcI, Tcy, TcA, Tbm, Tcp, TaZ, Tcs, Tci, Tbv, TcB, TcD, TbT, Tc2; cannam@127: V TcE, Tat, TaY; cannam@127: Tcx = VFNMS(LDK(KP707106781), Tas, Tad); cannam@127: Tat = VFMA(LDK(KP707106781), Tas, Tad); cannam@127: TaY = VADD(TaI, TaX); cannam@127: TcJ = VSUB(TaX, TaI); cannam@127: { cannam@127: V Tce, Tch, Te8, Te6, TdY, Te0; cannam@127: TcI = VFNMS(LDK(KP707106781), Tcd, Tcc); cannam@127: Tce = VFMA(LDK(KP707106781), Tcd, Tcc); cannam@127: Tch = VSUB(Tcf, Tcg); cannam@127: Tcy = VADD(Tcg, Tcf); cannam@127: Te8 = VFNMS(LDK(KP923879532), Te5, Te4); cannam@127: Te6 = VFMA(LDK(KP923879532), Te5, Te4); cannam@127: TdY = VFNMS(LDK(KP923879532), TdX, TdU); cannam@127: Te0 = VFMA(LDK(KP923879532), TdX, TdU); cannam@127: TcA = VFNMS(LDK(KP707106781), Tbl, Tb6); cannam@127: Tbm = VFMA(LDK(KP707106781), Tbl, Tb6); cannam@127: Tcp = VFNMS(LDK(KP923879532), TaY, Tat); cannam@127: TaZ = VFMA(LDK(KP923879532), TaY, Tat); cannam@127: Tcs = VFNMS(LDK(KP923879532), Tch, Tce); cannam@127: Tci = VFMA(LDK(KP923879532), Tch, Tce); cannam@127: ST(&(xo[WS(os, 88)]), VFNMSI(Te6, Te3), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 40)]), VFMAI(Te6, Te3), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 104)]), VFMAI(Te8, Te7), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 24)]), VFNMSI(Te8, Te7), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 8)]), VFMAI(Te0, TdZ), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 120)]), VFNMSI(Te0, TdZ), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 72)]), VFMAI(TdY, TdR), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 56)]), VFNMSI(TdY, TdR), ovs, &(xo[0])); cannam@127: Tbv = VFMA(LDK(KP707106781), Tbu, Tbt); cannam@127: TcB = VFNMS(LDK(KP707106781), Tbu, Tbt); cannam@127: TcD = VFNMS(LDK(KP707106781), TbS, TbD); cannam@127: TbT = VFMA(LDK(KP707106781), TbS, TbD); cannam@127: Tc2 = VFMA(LDK(KP707106781), Tc1, Tc0); cannam@127: TcE = VFNMS(LDK(KP707106781), Tc1, Tc0); cannam@127: } cannam@127: { cannam@127: V TcR, Tcz, TcU, TcK, Tcq, Tcl, Tct, Tc4; cannam@127: { cannam@127: V Tck, Tbw, Tcj, Tc3; cannam@127: Tck = VFMA(LDK(KP198912367), Tbm, Tbv); cannam@127: Tbw = VFNMS(LDK(KP198912367), Tbv, Tbm); cannam@127: Tcj = VFMA(LDK(KP198912367), TbT, Tc2); cannam@127: Tc3 = VFNMS(LDK(KP198912367), Tc2, TbT); cannam@127: TcR = VFNMS(LDK(KP923879532), Tcy, Tcx); cannam@127: Tcz = VFMA(LDK(KP923879532), Tcy, Tcx); cannam@127: TcU = VFMA(LDK(KP923879532), TcJ, TcI); cannam@127: TcK = VFNMS(LDK(KP923879532), TcJ, TcI); cannam@127: Tcq = VADD(Tck, Tcj); cannam@127: Tcl = VSUB(Tcj, Tck); cannam@127: Tct = VSUB(Tc3, Tbw); cannam@127: Tc4 = VADD(Tbw, Tc3); cannam@127: } cannam@127: { cannam@127: V TfN, Tel, TfY, Tfu, Tfw, Tfv, TcT, TcX, TcQ, TcO, TcW, TcY, TcP, TcH, TfZ; cannam@127: V TeE; cannam@127: { cannam@127: V Teu, TcS, TcN, TcV, TcG, TeD; cannam@127: TfN = VFNMS(LDK(KP923879532), Tek, Ted); cannam@127: Tel = VFMA(LDK(KP923879532), Tek, Ted); cannam@127: { cannam@127: V TcM, TcC, Tcr, Tcv; cannam@127: TcM = VFNMS(LDK(KP668178637), TcA, TcB); cannam@127: TcC = VFMA(LDK(KP668178637), TcB, TcA); cannam@127: Tcr = VFNMS(LDK(KP980785280), Tcq, Tcp); cannam@127: Tcv = VFMA(LDK(KP980785280), Tcq, Tcp); cannam@127: { cannam@127: V Tco, Tcm, Tcu, Tcw; cannam@127: Tco = VFMA(LDK(KP980785280), Tcl, Tci); cannam@127: Tcm = VFNMS(LDK(KP980785280), Tcl, Tci); cannam@127: Tcu = VFMA(LDK(KP980785280), Tct, Tcs); cannam@127: Tcw = VFNMS(LDK(KP980785280), Tct, Tcs); cannam@127: { cannam@127: V Tcn, Tc5, TcL, TcF; cannam@127: Tcn = VFMA(LDK(KP980785280), Tc4, TaZ); cannam@127: Tc5 = VFNMS(LDK(KP980785280), Tc4, TaZ); cannam@127: TcL = VFNMS(LDK(KP668178637), TcD, TcE); cannam@127: TcF = VFMA(LDK(KP668178637), TcE, TcD); cannam@127: TfY = VFNMS(LDK(KP923879532), Tft, Tfq); cannam@127: Tfu = VFMA(LDK(KP923879532), Tft, Tfq); cannam@127: Tfw = VFMA(LDK(KP198912367), Teq, Tet); cannam@127: Teu = VFNMS(LDK(KP198912367), Tet, Teq); cannam@127: ST(&(xo[WS(os, 92)]), VFNMSI(Tcu, Tcr), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 36)]), VFMAI(Tcu, Tcr), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 100)]), VFMAI(Tcw, Tcv), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 28)]), VFNMSI(Tcw, Tcv), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 4)]), VFMAI(Tco, Tcn), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 124)]), VFNMSI(Tco, Tcn), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 68)]), VFMAI(Tcm, Tc5), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 60)]), VFNMSI(Tcm, Tc5), ovs, &(xo[0])); cannam@127: TcS = VADD(TcM, TcL); cannam@127: TcN = VSUB(TcL, TcM); cannam@127: TcV = VSUB(TcF, TcC); cannam@127: TcG = VADD(TcC, TcF); cannam@127: TeD = VFNMS(LDK(KP198912367), TeC, Tez); cannam@127: Tfv = VFMA(LDK(KP198912367), Tez, TeC); cannam@127: } cannam@127: } cannam@127: } cannam@127: TcT = VFMA(LDK(KP831469612), TcS, TcR); cannam@127: TcX = VFNMS(LDK(KP831469612), TcS, TcR); cannam@127: TcQ = VFMA(LDK(KP831469612), TcN, TcK); cannam@127: TcO = VFNMS(LDK(KP831469612), TcN, TcK); cannam@127: TcW = VFNMS(LDK(KP831469612), TcV, TcU); cannam@127: TcY = VFMA(LDK(KP831469612), TcV, TcU); cannam@127: TcP = VFMA(LDK(KP831469612), TcG, Tcz); cannam@127: TcH = VFNMS(LDK(KP831469612), TcG, Tcz); cannam@127: TfZ = VSUB(TeD, Teu); cannam@127: TeE = VADD(Teu, TeD); cannam@127: } cannam@127: { cannam@127: V TfQ, TeS, TfO, Tfx, TeZ, TfR, Tfd, Tfk; cannam@127: TfQ = VFNMS(LDK(KP923879532), TeR, TeK); cannam@127: TeS = VFMA(LDK(KP923879532), TeR, TeK); cannam@127: ST(&(xo[WS(os, 84)]), VFMAI(TcW, TcT), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 44)]), VFNMSI(TcW, TcT), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 108)]), VFNMSI(TcY, TcX), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 20)]), VFMAI(TcY, TcX), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 116)]), VFMAI(TcQ, TcP), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 12)]), VFNMSI(TcQ, TcP), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 52)]), VFMAI(TcO, TcH), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 76)]), VFNMSI(TcO, TcH), ovs, &(xo[0])); cannam@127: Tg0 = VFNMS(LDK(KP980785280), TfZ, TfY); cannam@127: Tga = VFMA(LDK(KP980785280), TfZ, TfY); cannam@127: TfF = VFNMS(LDK(KP980785280), TeE, Tel); cannam@127: TeF = VFMA(LDK(KP980785280), TeE, Tel); cannam@127: TfO = VADD(Tfw, Tfv); cannam@127: Tfx = VSUB(Tfv, Tfw); cannam@127: TeZ = VFMA(LDK(KP923879532), TeY, TeV); cannam@127: TfR = VFNMS(LDK(KP923879532), TeY, TeV); cannam@127: TfT = VFNMS(LDK(KP923879532), Tfc, Tf5); cannam@127: Tfd = VFMA(LDK(KP923879532), Tfc, Tf5); cannam@127: Tfk = VFMA(LDK(KP923879532), Tfj, Tfg); cannam@127: TfU = VFNMS(LDK(KP923879532), Tfj, Tfg); cannam@127: TfP = VFMA(LDK(KP980785280), TfO, TfN); cannam@127: Tg7 = VFNMS(LDK(KP980785280), TfO, TfN); cannam@127: TfI = VFNMS(LDK(KP980785280), Tfx, Tfu); cannam@127: Tfy = VFMA(LDK(KP980785280), Tfx, Tfu); cannam@127: TfA = VFMA(LDK(KP098491403), TeS, TeZ); cannam@127: Tf0 = VFNMS(LDK(KP098491403), TeZ, TeS); cannam@127: Tfz = VFMA(LDK(KP098491403), Tfd, Tfk); cannam@127: Tfl = VFNMS(LDK(KP098491403), Tfk, Tfd); cannam@127: Tg2 = VFNMS(LDK(KP820678790), TfQ, TfR); cannam@127: TfS = VFMA(LDK(KP820678790), TfR, TfQ); cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: { cannam@127: V T8x, T8y, T8F, T8w, T8k, T8f, T8n, T80, T9l, T76, T87, T8U, T89, T7e, T7l; cannam@127: V T8a; cannam@127: { cannam@127: V The, Tho, TgT, Tgp, Th7, Th8, Thg, Th6, Th3, Thl, TgW, TgM, TgU, TgP, TgX; cannam@127: V TgE; cannam@127: { cannam@127: V Th1, TgI, TgK, TgJ; cannam@127: { cannam@127: V Tgh, Thc, Tgk, TfG, TfB, TfJ, Tfm, Tg1, TfV, Tgn, TfL, TfH; cannam@127: Th1 = VFMA(LDK(KP923879532), Tgg, Tgf); cannam@127: Tgh = VFNMS(LDK(KP923879532), Tgg, Tgf); cannam@127: Thc = VFNMS(LDK(KP923879532), TgH, TgG); cannam@127: TgI = VFMA(LDK(KP923879532), TgH, TgG); cannam@127: TgK = VFMA(LDK(KP668178637), Tgi, Tgj); cannam@127: Tgk = VFNMS(LDK(KP668178637), Tgj, Tgi); cannam@127: TfG = VADD(TfA, Tfz); cannam@127: TfB = VSUB(Tfz, TfA); cannam@127: TfJ = VSUB(Tfl, Tf0); cannam@127: Tfm = VADD(Tf0, Tfl); cannam@127: Tg1 = VFNMS(LDK(KP820678790), TfT, TfU); cannam@127: TfV = VFMA(LDK(KP820678790), TfU, TfT); cannam@127: Tgn = VFNMS(LDK(KP668178637), Tgm, Tgl); cannam@127: TgJ = VFMA(LDK(KP668178637), Tgl, Tgm); cannam@127: TfL = VFMA(LDK(KP995184726), TfG, TfF); cannam@127: TfH = VFNMS(LDK(KP995184726), TfG, TfF); cannam@127: { cannam@127: V TfE, TfC, TfM, TfK; cannam@127: TfE = VFMA(LDK(KP995184726), TfB, Tfy); cannam@127: TfC = VFNMS(LDK(KP995184726), TfB, Tfy); cannam@127: TfM = VFNMS(LDK(KP995184726), TfJ, TfI); cannam@127: TfK = VFMA(LDK(KP995184726), TfJ, TfI); cannam@127: { cannam@127: V TfD, Tfn, Tg8, Tg3; cannam@127: TfD = VFMA(LDK(KP995184726), Tfm, TeF); cannam@127: Tfn = VFNMS(LDK(KP995184726), Tfm, TeF); cannam@127: Tg8 = VADD(Tg2, Tg1); cannam@127: Tg3 = VSUB(Tg1, Tg2); cannam@127: { cannam@127: V Tgb, TfW, Thd, Tgo; cannam@127: Tgb = VSUB(TfV, TfS); cannam@127: TfW = VADD(TfS, TfV); cannam@127: Thd = VSUB(Tgn, Tgk); cannam@127: Tgo = VADD(Tgk, Tgn); cannam@127: ST(&(xo[WS(os, 98)]), VFMAI(TfM, TfL), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 30)]), VFNMSI(TfM, TfL), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 94)]), VFNMSI(TfK, TfH), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 34)]), VFMAI(TfK, TfH), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 2)]), VFMAI(TfE, TfD), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 126)]), VFNMSI(TfE, TfD), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 66)]), VFMAI(TfC, Tfn), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 62)]), VFNMSI(TfC, Tfn), ovs, &(xo[0])); cannam@127: { cannam@127: V Tgd, Tg9, Tg6, Tg4; cannam@127: Tgd = VFNMS(LDK(KP773010453), Tg8, Tg7); cannam@127: Tg9 = VFMA(LDK(KP773010453), Tg8, Tg7); cannam@127: Tg6 = VFMA(LDK(KP773010453), Tg3, Tg0); cannam@127: Tg4 = VFNMS(LDK(KP773010453), Tg3, Tg0); cannam@127: { cannam@127: V Tge, Tgc, Tg5, TfX; cannam@127: Tge = VFMA(LDK(KP773010453), Tgb, Tga); cannam@127: Tgc = VFNMS(LDK(KP773010453), Tgb, Tga); cannam@127: Tg5 = VFMA(LDK(KP773010453), TfW, TfP); cannam@127: TfX = VFNMS(LDK(KP773010453), TfW, TfP); cannam@127: The = VFMA(LDK(KP831469612), Thd, Thc); cannam@127: Tho = VFNMS(LDK(KP831469612), Thd, Thc); cannam@127: TgT = VFMA(LDK(KP831469612), Tgo, Tgh); cannam@127: Tgp = VFNMS(LDK(KP831469612), Tgo, Tgh); cannam@127: ST(&(xo[WS(os, 110)]), VFNMSI(Tge, Tgd), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 18)]), VFMAI(Tge, Tgd), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 82)]), VFMAI(Tgc, Tg9), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 46)]), VFNMSI(Tgc, Tg9), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 114)]), VFMAI(Tg6, Tg5), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 14)]), VFNMSI(Tg6, Tg5), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 50)]), VFMAI(Tg4, TfX), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 78)]), VFNMSI(Tg4, TfX), ovs, &(xo[0])); cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: { cannam@127: V Th4, Tgs, Tgv, Th5, Tgz, TgC, Th2, TgL; cannam@127: Th4 = VFMA(LDK(KP923879532), Tgr, Tgq); cannam@127: Tgs = VFNMS(LDK(KP923879532), Tgr, Tgq); cannam@127: Tgv = VFMA(LDK(KP923879532), Tgu, Tgt); cannam@127: Th5 = VFNMS(LDK(KP923879532), Tgu, Tgt); cannam@127: Th7 = VFMA(LDK(KP923879532), Tgy, Tgx); cannam@127: Tgz = VFNMS(LDK(KP923879532), Tgy, Tgx); cannam@127: TgC = VFMA(LDK(KP923879532), TgB, TgA); cannam@127: Th8 = VFNMS(LDK(KP923879532), TgB, TgA); cannam@127: Th2 = VADD(TgK, TgJ); cannam@127: TgL = VSUB(TgJ, TgK); cannam@127: { cannam@127: V TgO, Tgw, TgN, TgD; cannam@127: TgO = VFMA(LDK(KP534511135), Tgs, Tgv); cannam@127: Tgw = VFNMS(LDK(KP534511135), Tgv, Tgs); cannam@127: TgN = VFMA(LDK(KP534511135), Tgz, TgC); cannam@127: TgD = VFNMS(LDK(KP534511135), TgC, Tgz); cannam@127: Thg = VFNMS(LDK(KP303346683), Th4, Th5); cannam@127: Th6 = VFMA(LDK(KP303346683), Th5, Th4); cannam@127: Th3 = VFMA(LDK(KP831469612), Th2, Th1); cannam@127: Thl = VFNMS(LDK(KP831469612), Th2, Th1); cannam@127: TgW = VFNMS(LDK(KP831469612), TgL, TgI); cannam@127: TgM = VFMA(LDK(KP831469612), TgL, TgI); cannam@127: TgU = VADD(TgO, TgN); cannam@127: TgP = VSUB(TgN, TgO); cannam@127: TgX = VSUB(TgD, Tgw); cannam@127: TgE = VADD(Tgw, TgD); cannam@127: } cannam@127: } cannam@127: } cannam@127: { cannam@127: V T8u, T8v, T7R, T8d, T7G, Thm, Thh, Thp, Tha, T7Y, Thr, Thn; cannam@127: { cannam@127: V T7y, T7F, TgZ, TgV; cannam@127: T8u = VFNMS(LDK(KP831469612), T7x, T7q); cannam@127: T7y = VFMA(LDK(KP831469612), T7x, T7q); cannam@127: T7F = VFMA(LDK(KP831469612), T7E, T7B); cannam@127: T8v = VFNMS(LDK(KP831469612), T7E, T7B); cannam@127: T8x = VFNMS(LDK(KP831469612), T7Q, T7J); cannam@127: T7R = VFMA(LDK(KP831469612), T7Q, T7J); cannam@127: TgZ = VFMA(LDK(KP881921264), TgU, TgT); cannam@127: TgV = VFNMS(LDK(KP881921264), TgU, TgT); cannam@127: { cannam@127: V TgS, TgQ, Th0, TgY; cannam@127: TgS = VFMA(LDK(KP881921264), TgP, TgM); cannam@127: TgQ = VFNMS(LDK(KP881921264), TgP, TgM); cannam@127: Th0 = VFNMS(LDK(KP881921264), TgX, TgW); cannam@127: TgY = VFMA(LDK(KP881921264), TgX, TgW); cannam@127: { cannam@127: V TgR, TgF, Thf, Th9; cannam@127: TgR = VFMA(LDK(KP881921264), TgE, Tgp); cannam@127: TgF = VFNMS(LDK(KP881921264), TgE, Tgp); cannam@127: Thf = VFNMS(LDK(KP303346683), Th7, Th8); cannam@127: Th9 = VFMA(LDK(KP303346683), Th8, Th7); cannam@127: T8d = VFNMS(LDK(KP148335987), T7y, T7F); cannam@127: T7G = VFMA(LDK(KP148335987), T7F, T7y); cannam@127: ST(&(xo[WS(os, 106)]), VFMAI(Th0, TgZ), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 22)]), VFNMSI(Th0, TgZ), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 86)]), VFNMSI(TgY, TgV), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 42)]), VFMAI(TgY, TgV), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 10)]), VFMAI(TgS, TgR), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 118)]), VFNMSI(TgS, TgR), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 74)]), VFMAI(TgQ, TgF), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 54)]), VFNMSI(TgQ, TgF), ovs, &(xo[0])); cannam@127: Thm = VADD(Thg, Thf); cannam@127: Thh = VSUB(Thf, Thg); cannam@127: Thp = VSUB(Th9, Th6); cannam@127: Tha = VADD(Th6, Th9); cannam@127: T7Y = VFMA(LDK(KP831469612), T7X, T7U); cannam@127: T8y = VFNMS(LDK(KP831469612), T7X, T7U); cannam@127: } cannam@127: } cannam@127: } cannam@127: Thr = VFNMS(LDK(KP956940335), Thm, Thl); cannam@127: Thn = VFMA(LDK(KP956940335), Thm, Thl); cannam@127: { cannam@127: V Thk, Thi, Ths, Thq; cannam@127: Thk = VFMA(LDK(KP956940335), Thh, The); cannam@127: Thi = VFNMS(LDK(KP956940335), Thh, The); cannam@127: Ths = VFMA(LDK(KP956940335), Thp, Tho); cannam@127: Thq = VFNMS(LDK(KP956940335), Thp, Tho); cannam@127: { cannam@127: V Thj, Thb, T8e, T7Z; cannam@127: Thj = VFMA(LDK(KP956940335), Tha, Th3); cannam@127: Thb = VFNMS(LDK(KP956940335), Tha, Th3); cannam@127: T8e = VFNMS(LDK(KP148335987), T7R, T7Y); cannam@127: T7Z = VFMA(LDK(KP148335987), T7Y, T7R); cannam@127: T8F = VFMA(LDK(KP741650546), T8u, T8v); cannam@127: T8w = VFNMS(LDK(KP741650546), T8v, T8u); cannam@127: ST(&(xo[WS(os, 102)]), VFNMSI(Ths, Thr), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 26)]), VFMAI(Ths, Thr), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 90)]), VFMAI(Thq, Thn), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 38)]), VFNMSI(Thq, Thn), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 122)]), VFMAI(Thk, Thj), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 6)]), VFNMSI(Thk, Thj), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 58)]), VFMAI(Thi, Thb), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 70)]), VFNMSI(Thi, Thb), ovs, &(xo[0])); cannam@127: T8k = VADD(T8d, T8e); cannam@127: T8f = VSUB(T8d, T8e); cannam@127: T8n = VSUB(T7Z, T7G); cannam@127: T80 = VADD(T7G, T7Z); cannam@127: } cannam@127: } cannam@127: T9l = VSUB(T75, T72); cannam@127: T76 = VADD(T72, T75); cannam@127: T87 = VSUB(T85, T86); cannam@127: T8U = VADD(T85, T86); cannam@127: T89 = VFNMS(LDK(KP303346683), T7a, T7d); cannam@127: T7e = VFMA(LDK(KP303346683), T7d, T7a); cannam@127: T7l = VFMA(LDK(KP303346683), T7k, T7h); cannam@127: T8a = VFNMS(LDK(KP303346683), T7h, T7k); cannam@127: } cannam@127: } cannam@127: { cannam@127: V T11, T5h, T5a, T55, T5d, T4K, T5C, T5x, T5F, T5q, T4X, T4Z, T1C, T2d, T50; cannam@127: { cannam@127: V T5k, T3g, T3t, T5l, T5n, T4v, T4I, T5o, T8G, T8z; cannam@127: T5k = VFNMS(LDK(KP980785280), T3f, T2G); cannam@127: T3g = VFMA(LDK(KP980785280), T3f, T2G); cannam@127: T8G = VFMA(LDK(KP741650546), T8x, T8y); cannam@127: T8z = VFNMS(LDK(KP741650546), T8y, T8x); cannam@127: { cannam@127: V T8r, T77, T8C, T88; cannam@127: T8r = VFNMS(LDK(KP831469612), T76, T6Z); cannam@127: T77 = VFMA(LDK(KP831469612), T76, T6Z); cannam@127: T8C = VFNMS(LDK(KP831469612), T87, T84); cannam@127: T88 = VFMA(LDK(KP831469612), T87, T84); cannam@127: { cannam@127: V T8D, T7m, T8s, T8b; cannam@127: T8D = VSUB(T7l, T7e); cannam@127: T7m = VADD(T7e, T7l); cannam@127: T8s = VADD(T89, T8a); cannam@127: T8b = VSUB(T89, T8a); cannam@127: { cannam@127: V T8M, T8H, T8P, T8A; cannam@127: T8M = VADD(T8F, T8G); cannam@127: T8H = VSUB(T8F, T8G); cannam@127: T8P = VSUB(T8z, T8w); cannam@127: T8A = VADD(T8w, T8z); cannam@127: { cannam@127: V T8E, T8O, T8j, T7n; cannam@127: T8E = VFNMS(LDK(KP956940335), T8D, T8C); cannam@127: T8O = VFMA(LDK(KP956940335), T8D, T8C); cannam@127: T8j = VFNMS(LDK(KP956940335), T7m, T77); cannam@127: T7n = VFMA(LDK(KP956940335), T7m, T77); cannam@127: { cannam@127: V T8t, T8L, T8m, T8c; cannam@127: T8t = VFNMS(LDK(KP956940335), T8s, T8r); cannam@127: T8L = VFMA(LDK(KP956940335), T8s, T8r); cannam@127: T8m = VFNMS(LDK(KP956940335), T8b, T88); cannam@127: T8c = VFMA(LDK(KP956940335), T8b, T88); cannam@127: { cannam@127: V T8K, T8I, T8S, T8Q; cannam@127: T8K = VFMA(LDK(KP803207531), T8H, T8E); cannam@127: T8I = VFNMS(LDK(KP803207531), T8H, T8E); cannam@127: T8S = VFMA(LDK(KP803207531), T8P, T8O); cannam@127: T8Q = VFNMS(LDK(KP803207531), T8P, T8O); cannam@127: { cannam@127: V T8p, T8l, T8h, T81; cannam@127: T8p = VFNMS(LDK(KP989176509), T8k, T8j); cannam@127: T8l = VFMA(LDK(KP989176509), T8k, T8j); cannam@127: T8h = VFMA(LDK(KP989176509), T80, T7n); cannam@127: T81 = VFNMS(LDK(KP989176509), T80, T7n); cannam@127: { cannam@127: V T8J, T8B, T8R, T8N; cannam@127: T8J = VFMA(LDK(KP803207531), T8A, T8t); cannam@127: T8B = VFNMS(LDK(KP803207531), T8A, T8t); cannam@127: T8R = VFMA(LDK(KP803207531), T8M, T8L); cannam@127: T8N = VFNMS(LDK(KP803207531), T8M, T8L); cannam@127: { cannam@127: V T8q, T8o, T8i, T8g; cannam@127: T8q = VFNMS(LDK(KP989176509), T8n, T8m); cannam@127: T8o = VFMA(LDK(KP989176509), T8n, T8m); cannam@127: T8i = VFMA(LDK(KP989176509), T8f, T8c); cannam@127: T8g = VFNMS(LDK(KP989176509), T8f, T8c); cannam@127: ST(&(xo[WS(os, 115)]), VFMAI(T8K, T8J), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 13)]), VFNMSI(T8K, T8J), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 51)]), VFMAI(T8I, T8B), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 77)]), VFNMSI(T8I, T8B), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 109)]), VFNMSI(T8S, T8R), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 19)]), VFMAI(T8S, T8R), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 83)]), VFMAI(T8Q, T8N), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 45)]), VFNMSI(T8Q, T8N), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 99)]), VFMAI(T8q, T8p), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 29)]), VFNMSI(T8q, T8p), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 93)]), VFNMSI(T8o, T8l), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 35)]), VFMAI(T8o, T8l), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 3)]), VFMAI(T8i, T8h), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 125)]), VFNMSI(T8i, T8h), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 67)]), VFMAI(T8g, T81), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 61)]), VFNMSI(T8g, T81), ovs, &(xo[WS(os, 1)])); cannam@127: T3t = VFMA(LDK(KP980785280), T3s, T3p); cannam@127: T5l = VFNMS(LDK(KP980785280), T3s, T3p); cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: T5n = VFNMS(LDK(KP980785280), T4u, T3V); cannam@127: T4v = VFMA(LDK(KP980785280), T4u, T3V); cannam@127: T4I = VFMA(LDK(KP980785280), T4H, T4E); cannam@127: T5o = VFNMS(LDK(KP980785280), T4H, T4E); cannam@127: { cannam@127: V T53, T3u, T54, T4J, T5v, T5m, T5w, T5p, T10; cannam@127: T6b = VSUB(TZ, TI); cannam@127: T10 = VADD(TI, TZ); cannam@127: T53 = VFMA(LDK(KP049126849), T3g, T3t); cannam@127: T3u = VFNMS(LDK(KP049126849), T3t, T3g); cannam@127: T54 = VFMA(LDK(KP049126849), T4v, T4I); cannam@127: T4J = VFNMS(LDK(KP049126849), T4I, T4v); cannam@127: T5v = VFNMS(LDK(KP906347169), T5k, T5l); cannam@127: T5m = VFMA(LDK(KP906347169), T5l, T5k); cannam@127: T5w = VFNMS(LDK(KP906347169), T5n, T5o); cannam@127: T5p = VFMA(LDK(KP906347169), T5o, T5n); cannam@127: T11 = VFMA(LDK(KP980785280), T10, Tr); cannam@127: T5h = VFNMS(LDK(KP980785280), T10, Tr); cannam@127: T5a = VADD(T53, T54); cannam@127: T55 = VSUB(T53, T54); cannam@127: T5d = VSUB(T4J, T3u); cannam@127: T4K = VADD(T3u, T4J); cannam@127: T5C = VADD(T5v, T5w); cannam@127: T5x = VSUB(T5v, T5w); cannam@127: T5F = VSUB(T5p, T5m); cannam@127: T5q = VADD(T5m, T5p); cannam@127: T4X = VSUB(T4V, T4W); cannam@127: T5K = VADD(T4V, T4W); cannam@127: } cannam@127: T4Z = VFMA(LDK(KP098491403), T1s, T1B); cannam@127: T1C = VFNMS(LDK(KP098491403), T1B, T1s); cannam@127: T2d = VFNMS(LDK(KP098491403), T2c, T23); cannam@127: T50 = VFMA(LDK(KP098491403), T23, T2c); cannam@127: } cannam@127: { cannam@127: V T9y, T9t, T9B, T9i, T9o, T9n, T9F, T8V, T9Q, T9m, T9R, T92, Ta0, T9V, Ta3; cannam@127: V T9O; cannam@127: { cannam@127: V T9I, T9J, T9L, T9d, T5s, T4Y, T5t, T2e, T5i, T51, T9r, T9a, T9g, T9M, T96; cannam@127: V T99; cannam@127: T9I = VFMA(LDK(KP831469612), T95, T94); cannam@127: T96 = VFNMS(LDK(KP831469612), T95, T94); cannam@127: T99 = VFNMS(LDK(KP831469612), T98, T97); cannam@127: T9J = VFMA(LDK(KP831469612), T98, T97); cannam@127: T9L = VFMA(LDK(KP831469612), T9c, T9b); cannam@127: T9d = VFNMS(LDK(KP831469612), T9c, T9b); cannam@127: T5s = VFNMS(LDK(KP980785280), T4X, T4U); cannam@127: T4Y = VFMA(LDK(KP980785280), T4X, T4U); cannam@127: T5t = VSUB(T2d, T1C); cannam@127: T2e = VADD(T1C, T2d); cannam@127: T5i = VADD(T4Z, T50); cannam@127: T51 = VSUB(T4Z, T50); cannam@127: T9r = VFNMS(LDK(KP599376933), T96, T99); cannam@127: T9a = VFMA(LDK(KP599376933), T99, T96); cannam@127: T9g = VFNMS(LDK(KP831469612), T9f, T9e); cannam@127: T9M = VFMA(LDK(KP831469612), T9f, T9e); cannam@127: { cannam@127: V T5u, T5E, T8Y, T91; cannam@127: T5u = VFMA(LDK(KP995184726), T5t, T5s); cannam@127: T5E = VFNMS(LDK(KP995184726), T5t, T5s); cannam@127: { cannam@127: V T59, T2f, T5j, T5B; cannam@127: T59 = VFNMS(LDK(KP995184726), T2e, T11); cannam@127: T2f = VFMA(LDK(KP995184726), T2e, T11); cannam@127: T5j = VFMA(LDK(KP995184726), T5i, T5h); cannam@127: T5B = VFNMS(LDK(KP995184726), T5i, T5h); cannam@127: { cannam@127: V T5c, T52, T9s, T9h; cannam@127: T5c = VFNMS(LDK(KP995184726), T51, T4Y); cannam@127: T52 = VFMA(LDK(KP995184726), T51, T4Y); cannam@127: T9s = VFNMS(LDK(KP599376933), T9d, T9g); cannam@127: T9h = VFMA(LDK(KP599376933), T9g, T9d); cannam@127: { cannam@127: V T5A, T5y, T5I, T5G; cannam@127: T5A = VFMA(LDK(KP740951125), T5x, T5u); cannam@127: T5y = VFNMS(LDK(KP740951125), T5x, T5u); cannam@127: T5I = VFNMS(LDK(KP740951125), T5F, T5E); cannam@127: T5G = VFMA(LDK(KP740951125), T5F, T5E); cannam@127: { cannam@127: V T5f, T5b, T57, T4L; cannam@127: T5f = VFMA(LDK(KP998795456), T5a, T59); cannam@127: T5b = VFNMS(LDK(KP998795456), T5a, T59); cannam@127: T57 = VFMA(LDK(KP998795456), T4K, T2f); cannam@127: T4L = VFNMS(LDK(KP998795456), T4K, T2f); cannam@127: { cannam@127: V T5z, T5r, T5H, T5D; cannam@127: T5z = VFMA(LDK(KP740951125), T5q, T5j); cannam@127: T5r = VFNMS(LDK(KP740951125), T5q, T5j); cannam@127: T5H = VFNMS(LDK(KP740951125), T5C, T5B); cannam@127: T5D = VFMA(LDK(KP740951125), T5C, T5B); cannam@127: { cannam@127: V T5g, T5e, T58, T56; cannam@127: T5g = VFMA(LDK(KP998795456), T5d, T5c); cannam@127: T5e = VFNMS(LDK(KP998795456), T5d, T5c); cannam@127: T58 = VFMA(LDK(KP998795456), T55, T52); cannam@127: T56 = VFNMS(LDK(KP998795456), T55, T52); cannam@127: T9y = VADD(T9r, T9s); cannam@127: T9t = VSUB(T9r, T9s); cannam@127: T9B = VSUB(T9h, T9a); cannam@127: T9i = VADD(T9a, T9h); cannam@127: ST(&(xo[WS(os, 15)]), VFMAI(T5A, T5z), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 113)]), VFNMSI(T5A, T5z), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 79)]), VFMAI(T5y, T5r), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 49)]), VFNMSI(T5y, T5r), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 111)]), VFMAI(T5I, T5H), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 17)]), VFNMSI(T5I, T5H), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 81)]), VFNMSI(T5G, T5D), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 47)]), VFMAI(T5G, T5D), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 97)]), VFNMSI(T5g, T5f), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 31)]), VFMAI(T5g, T5f), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 95)]), VFMAI(T5e, T5b), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 33)]), VFNMSI(T5e, T5b), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 127)]), VFMAI(T58, T57), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 1)]), VFNMSI(T58, T57), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 63)]), VFMAI(T56, T4L), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 65)]), VFNMSI(T56, T4L), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: T9o = VFNMS(LDK(KP534511135), T8W, T8X); cannam@127: T8Y = VFMA(LDK(KP534511135), T8X, T8W); cannam@127: T91 = VFMA(LDK(KP534511135), T90, T8Z); cannam@127: T9n = VFNMS(LDK(KP534511135), T8Z, T90); cannam@127: { cannam@127: V T9T, T9K, T9U, T9N; cannam@127: T9T = VFMA(LDK(KP250486960), T9I, T9J); cannam@127: T9K = VFNMS(LDK(KP250486960), T9J, T9I); cannam@127: T9U = VFMA(LDK(KP250486960), T9L, T9M); cannam@127: T9N = VFNMS(LDK(KP250486960), T9M, T9L); cannam@127: T9F = VFNMS(LDK(KP831469612), T8U, T8T); cannam@127: T8V = VFMA(LDK(KP831469612), T8U, T8T); cannam@127: T9Q = VFNMS(LDK(KP831469612), T9l, T9k); cannam@127: T9m = VFMA(LDK(KP831469612), T9l, T9k); cannam@127: T9R = VSUB(T8Y, T91); cannam@127: T92 = VADD(T8Y, T91); cannam@127: Ta0 = VADD(T9T, T9U); cannam@127: T9V = VSUB(T9T, T9U); cannam@127: Ta3 = VSUB(T9N, T9K); cannam@127: T9O = VADD(T9K, T9N); cannam@127: } cannam@127: } cannam@127: } cannam@127: { cannam@127: V T6y, T6z, T63, T9Y, T9W, Ta6, Ta4, T9D, T9z, T9v, T9j, T6h, T60, T9H, T9Z; cannam@127: V T9A, T9q, T66, T9X, T9P; cannam@127: { cannam@127: V T5W, T9S, Ta2, T9x, T93, T5Z, T9G, T9p; cannam@127: T6y = VFMA(LDK(KP980785280), T5V, T5U); cannam@127: T5W = VFNMS(LDK(KP980785280), T5V, T5U); cannam@127: T9S = VFMA(LDK(KP881921264), T9R, T9Q); cannam@127: Ta2 = VFNMS(LDK(KP881921264), T9R, T9Q); cannam@127: T9x = VFNMS(LDK(KP881921264), T92, T8V); cannam@127: T93 = VFMA(LDK(KP881921264), T92, T8V); cannam@127: T5Z = VFMA(LDK(KP980785280), T5Y, T5X); cannam@127: T6z = VFNMS(LDK(KP980785280), T5Y, T5X); cannam@127: T6B = VFMA(LDK(KP980785280), T62, T61); cannam@127: T63 = VFNMS(LDK(KP980785280), T62, T61); cannam@127: T9G = VADD(T9o, T9n); cannam@127: T9p = VSUB(T9n, T9o); cannam@127: T9Y = VFMA(LDK(KP970031253), T9V, T9S); cannam@127: T9W = VFNMS(LDK(KP970031253), T9V, T9S); cannam@127: Ta6 = VFMA(LDK(KP970031253), Ta3, Ta2); cannam@127: Ta4 = VFNMS(LDK(KP970031253), Ta3, Ta2); cannam@127: T9D = VFNMS(LDK(KP857728610), T9y, T9x); cannam@127: T9z = VFMA(LDK(KP857728610), T9y, T9x); cannam@127: T9v = VFMA(LDK(KP857728610), T9i, T93); cannam@127: T9j = VFNMS(LDK(KP857728610), T9i, T93); cannam@127: T6h = VFMA(LDK(KP472964775), T5W, T5Z); cannam@127: T60 = VFNMS(LDK(KP472964775), T5Z, T5W); cannam@127: T9H = VFMA(LDK(KP881921264), T9G, T9F); cannam@127: T9Z = VFNMS(LDK(KP881921264), T9G, T9F); cannam@127: T9A = VFNMS(LDK(KP881921264), T9p, T9m); cannam@127: T9q = VFMA(LDK(KP881921264), T9p, T9m); cannam@127: T66 = VFMA(LDK(KP980785280), T65, T64); cannam@127: T6C = VFNMS(LDK(KP980785280), T65, T64); cannam@127: } cannam@127: T9X = VFMA(LDK(KP970031253), T9O, T9H); cannam@127: T9P = VFNMS(LDK(KP970031253), T9O, T9H); cannam@127: { cannam@127: V Ta5, Ta1, T9E, T9C; cannam@127: Ta5 = VFMA(LDK(KP970031253), Ta0, T9Z); cannam@127: Ta1 = VFNMS(LDK(KP970031253), Ta0, T9Z); cannam@127: T9E = VFNMS(LDK(KP857728610), T9B, T9A); cannam@127: T9C = VFMA(LDK(KP857728610), T9B, T9A); cannam@127: { cannam@127: V T9w, T9u, T6i, T67; cannam@127: T9w = VFMA(LDK(KP857728610), T9t, T9q); cannam@127: T9u = VFNMS(LDK(KP857728610), T9t, T9q); cannam@127: T6i = VFMA(LDK(KP472964775), T63, T66); cannam@127: T67 = VFNMS(LDK(KP472964775), T66, T63); cannam@127: T6J = VFNMS(LDK(KP357805721), T6y, T6z); cannam@127: T6A = VFMA(LDK(KP357805721), T6z, T6y); cannam@127: ST(&(xo[WS(os, 123)]), VFMAI(T9Y, T9X), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 5)]), VFNMSI(T9Y, T9X), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 59)]), VFMAI(T9W, T9P), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 69)]), VFNMSI(T9W, T9P), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 101)]), VFNMSI(Ta6, Ta5), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 27)]), VFMAI(Ta6, Ta5), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 91)]), VFMAI(Ta4, Ta1), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 37)]), VFNMSI(Ta4, Ta1), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 107)]), VFMAI(T9E, T9D), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 21)]), VFNMSI(T9E, T9D), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 85)]), VFNMSI(T9C, T9z), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 43)]), VFMAI(T9C, T9z), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 11)]), VFMAI(T9w, T9v), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 117)]), VFNMSI(T9w, T9v), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 75)]), VFMAI(T9u, T9j), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 53)]), VFNMSI(T9u, T9j), ovs, &(xo[WS(os, 1)])); cannam@127: T6o = VADD(T6h, T6i); cannam@127: T6j = VSUB(T6h, T6i); cannam@127: T6r = VSUB(T67, T60); cannam@127: T68 = VADD(T60, T67); cannam@127: } cannam@127: } cannam@127: T6e = VFMA(LDK(KP820678790), T5M, T5N); cannam@127: T5O = VFNMS(LDK(KP820678790), T5N, T5M); cannam@127: T5R = VFNMS(LDK(KP820678790), T5Q, T5P); cannam@127: T6d = VFMA(LDK(KP820678790), T5P, T5Q); cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: T6D = VFMA(LDK(KP357805721), T6C, T6B); cannam@127: T6K = VFNMS(LDK(KP357805721), T6B, T6C); cannam@127: { cannam@127: V T5L, T6v, T6c, T6G; cannam@127: T5L = VFNMS(LDK(KP980785280), T5K, T5J); cannam@127: T6v = VFMA(LDK(KP980785280), T5K, T5J); cannam@127: T6c = VFNMS(LDK(KP980785280), T6b, T6a); cannam@127: T6G = VFMA(LDK(KP980785280), T6b, T6a); cannam@127: { cannam@127: V T5S, T6H, T6f, T6w; cannam@127: T5S = VADD(T5O, T5R); cannam@127: T6H = VSUB(T5O, T5R); cannam@127: T6f = VSUB(T6d, T6e); cannam@127: T6w = VADD(T6e, T6d); cannam@127: { cannam@127: V T6L, T6Q, T6E, T6T; cannam@127: T6L = VSUB(T6J, T6K); cannam@127: T6Q = VADD(T6J, T6K); cannam@127: T6E = VADD(T6A, T6D); cannam@127: T6T = VSUB(T6D, T6A); cannam@127: { cannam@127: V T6S, T6I, T5T, T6n; cannam@127: T6S = VFNMS(LDK(KP773010453), T6H, T6G); cannam@127: T6I = VFMA(LDK(KP773010453), T6H, T6G); cannam@127: T5T = VFNMS(LDK(KP773010453), T5S, T5L); cannam@127: T6n = VFMA(LDK(KP773010453), T5S, T5L); cannam@127: { cannam@127: V T6P, T6x, T6g, T6q; cannam@127: T6P = VFNMS(LDK(KP773010453), T6w, T6v); cannam@127: T6x = VFMA(LDK(KP773010453), T6w, T6v); cannam@127: T6g = VFNMS(LDK(KP773010453), T6f, T6c); cannam@127: T6q = VFMA(LDK(KP773010453), T6f, T6c); cannam@127: { cannam@127: V T6M, T6O, T6U, T6W; cannam@127: T6M = VFNMS(LDK(KP941544065), T6L, T6I); cannam@127: T6O = VFMA(LDK(KP941544065), T6L, T6I); cannam@127: T6U = VFMA(LDK(KP941544065), T6T, T6S); cannam@127: T6W = VFNMS(LDK(KP941544065), T6T, T6S); cannam@127: { cannam@127: V T6p, T6t, T69, T6l; cannam@127: T6p = VFNMS(LDK(KP903989293), T6o, T6n); cannam@127: T6t = VFMA(LDK(KP903989293), T6o, T6n); cannam@127: T69 = VFNMS(LDK(KP903989293), T68, T5T); cannam@127: T6l = VFMA(LDK(KP903989293), T68, T5T); cannam@127: { cannam@127: V T6F, T6N, T6R, T6V; cannam@127: T6F = VFNMS(LDK(KP941544065), T6E, T6x); cannam@127: T6N = VFMA(LDK(KP941544065), T6E, T6x); cannam@127: T6R = VFMA(LDK(KP941544065), T6Q, T6P); cannam@127: T6V = VFNMS(LDK(KP941544065), T6Q, T6P); cannam@127: { cannam@127: V T6s, T6u, T6k, T6m; cannam@127: T6s = VFNMS(LDK(KP903989293), T6r, T6q); cannam@127: T6u = VFMA(LDK(KP903989293), T6r, T6q); cannam@127: T6k = VFNMS(LDK(KP903989293), T6j, T6g); cannam@127: T6m = VFMA(LDK(KP903989293), T6j, T6g); cannam@127: ST(&(xo[WS(os, 7)]), VFMAI(T6O, T6N), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 121)]), VFNMSI(T6O, T6N), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 71)]), VFMAI(T6M, T6F), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 57)]), VFNMSI(T6M, T6F), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 103)]), VFMAI(T6W, T6V), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 25)]), VFNMSI(T6W, T6V), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 89)]), VFNMSI(T6U, T6R), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 39)]), VFMAI(T6U, T6R), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 105)]), VFNMSI(T6u, T6t), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 23)]), VFMAI(T6u, T6t), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 87)]), VFMAI(T6s, T6p), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 41)]), VFNMSI(T6s, T6p), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 119)]), VFMAI(T6m, T6l), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 9)]), VFNMSI(T6m, T6l), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 55)]), VFMAI(T6k, T69), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 73)]), VFNMSI(T6k, T69), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: VLEAVE(); cannam@127: } cannam@127: cannam@127: static const kdft_desc desc = { 128, XSIMD_STRING("n1fv_128"), {440, 0, 642, 0}, &GENUS, 0, 0, 0, 0 }; cannam@127: cannam@127: void XSIMD(codelet_n1fv_128) (planner *p) { cannam@127: X(kdft_register) (p, n1fv_128, &desc); cannam@127: } cannam@127: cannam@127: #else /* HAVE_FMA */ cannam@127: cannam@127: /* Generated by: ../../../genfft/gen_notw_c.native -simd -compact -variables 4 -pipeline-latency 8 -n 128 -name n1fv_128 -include n1f.h */ cannam@127: cannam@127: /* cannam@127: * This function contains 1082 FP additions, 330 FP multiplications, cannam@127: * (or, 938 additions, 186 multiplications, 144 fused multiply/add), cannam@127: * 194 stack variables, 31 constants, and 256 memory accesses cannam@127: */ cannam@127: #include "n1f.h" cannam@127: cannam@127: static void n1fv_128(const R *ri, const R *ii, R *ro, R *io, stride is, stride os, INT v, INT ivs, INT ovs) cannam@127: { cannam@127: DVK(KP941544065, +0.941544065183020778412509402599502357185589796); cannam@127: DVK(KP336889853, +0.336889853392220050689253212619147570477766780); cannam@127: DVK(KP903989293, +0.903989293123443331586200297230537048710132025); cannam@127: DVK(KP427555093, +0.427555093430282094320966856888798534304578629); cannam@127: DVK(KP970031253, +0.970031253194543992603984207286100251456865962); cannam@127: DVK(KP242980179, +0.242980179903263889948274162077471118320990783); cannam@127: DVK(KP857728610, +0.857728610000272069902269984284770137042490799); cannam@127: DVK(KP514102744, +0.514102744193221726593693838968815772608049120); cannam@127: DVK(KP671558954, +0.671558954847018400625376850427421803228750632); cannam@127: DVK(KP740951125, +0.740951125354959091175616897495162729728955309); cannam@127: DVK(KP049067674, +0.049067674327418014254954976942682658314745363); cannam@127: DVK(KP998795456, +0.998795456205172392714771604759100694443203615); cannam@127: DVK(KP595699304, +0.595699304492433343467036528829969889511926338); cannam@127: DVK(KP803207531, +0.803207531480644909806676512963141923879569427); cannam@127: DVK(KP146730474, +0.146730474455361751658850129646717819706215317); cannam@127: DVK(KP989176509, +0.989176509964780973451673738016243063983689533); cannam@127: DVK(KP956940335, +0.956940335732208864935797886980269969482849206); cannam@127: DVK(KP290284677, +0.290284677254462367636192375817395274691476278); cannam@127: DVK(KP881921264, +0.881921264348355029712756863660388349508442621); cannam@127: DVK(KP471396736, +0.471396736825997648556387625905254377657460319); cannam@127: DVK(KP634393284, +0.634393284163645498215171613225493370675687095); cannam@127: DVK(KP773010453, +0.773010453362736960810906609758469800971041293); cannam@127: DVK(KP098017140, +0.098017140329560601994195563888641845861136673); cannam@127: DVK(KP995184726, +0.995184726672196886244836953109479921575474869); cannam@127: DVK(KP555570233, +0.555570233019602224742830813948532874374937191); cannam@127: DVK(KP831469612, +0.831469612302545237078788377617905756738560812); cannam@127: DVK(KP195090322, +0.195090322016128267848284868477022240927691618); cannam@127: DVK(KP980785280, +0.980785280403230449126182236134239036973933731); cannam@127: DVK(KP382683432, +0.382683432365089771728459984030398866761344562); cannam@127: DVK(KP923879532, +0.923879532511286756128183189396788286822416626); cannam@127: DVK(KP707106781, +0.707106781186547524400844362104849039284835938); cannam@127: { cannam@127: INT i; cannam@127: const R *xi; cannam@127: R *xo; cannam@127: xi = ri; cannam@127: xo = ro; cannam@127: for (i = v; i > 0; i = i - VL, xi = xi + (VL * ivs), xo = xo + (VL * ovs), MAKE_VOLATILE_STRIDE(256, is), MAKE_VOLATILE_STRIDE(256, os)) { cannam@127: V Tr, T5J, Ted, Tgf, Tfq, TgH, T4U, T6b, T6Z, T8T, Tad, TcZ, Tcc, Td0, T84; cannam@127: V T9l, Tb6, Tbt, T2G, T5X, TeV, Tgr, T3p, T5V, T7B, T95, TeK, Tgt, T7q, T97; cannam@127: V Td8, TdK, TbD, Tc0, T3V, T61, Tfg, TgB, T4E, T65, T7U, T9f, Tf5, Tgx, T7J; cannam@127: V T9b, Tdf, TdN, Td2, Td3, TI, T4V, Tft, Tgg, TZ, T4W, T75, T86, Tek, TgG; cannam@127: V T72, T85, Tas, Tcd, Tdp, Tdq, TdG, Teq, Tgm, Tet, Tgl, T1s, T5P, T1B, T5Q; cannam@127: V T7d, T8Z, TaI, Tcf, T7a, T90, Tdm, Tdn, TdH, Tez, Tgi, TeC, Tgj, T23, T5N; cannam@127: V T2c, T5M, T7k, T8X, TaX, Tcg, T7h, T8W, Tbl, Tbu, Tdb, TdL, TeY, Tgu, TeR; cannam@127: V Tgq, T7x, T98, T7E, T94, T3f, T5Y, T3s, T5U, TbS, Tc1, Tdi, TdO, Tfj, Tgy; cannam@127: V Tfc, TgA, T7Q, T9e, T7X, T9c, T4u, T64, T4H, T62; cannam@127: { cannam@127: V T3, Ta7, T4P, Ta8, Ta, Tab, T4M, Taa, Tc9, Tca, Ti, Tea, T4S, Tc6, Tc7; cannam@127: V Tp, Teb, T4R; cannam@127: { cannam@127: V T1, T2, T4N, T4O; cannam@127: T1 = LD(&(xi[0]), ivs, &(xi[0])); cannam@127: T2 = LD(&(xi[WS(is, 64)]), ivs, &(xi[0])); cannam@127: T3 = VSUB(T1, T2); cannam@127: Ta7 = VADD(T1, T2); cannam@127: T4N = LD(&(xi[WS(is, 32)]), ivs, &(xi[0])); cannam@127: T4O = LD(&(xi[WS(is, 96)]), ivs, &(xi[0])); cannam@127: T4P = VSUB(T4N, T4O); cannam@127: Ta8 = VADD(T4N, T4O); cannam@127: } cannam@127: { cannam@127: V T4, T5, T6, T7, T8, T9; cannam@127: T4 = LD(&(xi[WS(is, 16)]), ivs, &(xi[0])); cannam@127: T5 = LD(&(xi[WS(is, 80)]), ivs, &(xi[0])); cannam@127: T6 = VSUB(T4, T5); cannam@127: T7 = LD(&(xi[WS(is, 112)]), ivs, &(xi[0])); cannam@127: T8 = LD(&(xi[WS(is, 48)]), ivs, &(xi[0])); cannam@127: T9 = VSUB(T7, T8); cannam@127: Ta = VMUL(LDK(KP707106781), VADD(T6, T9)); cannam@127: Tab = VADD(T7, T8); cannam@127: T4M = VMUL(LDK(KP707106781), VSUB(T9, T6)); cannam@127: Taa = VADD(T4, T5); cannam@127: } cannam@127: { cannam@127: V Te, Th, Tl, To; cannam@127: { cannam@127: V Tc, Td, Tf, Tg; cannam@127: Tc = LD(&(xi[WS(is, 8)]), ivs, &(xi[0])); cannam@127: Td = LD(&(xi[WS(is, 72)]), ivs, &(xi[0])); cannam@127: Te = VSUB(Tc, Td); cannam@127: Tc9 = VADD(Tc, Td); cannam@127: Tf = LD(&(xi[WS(is, 40)]), ivs, &(xi[0])); cannam@127: Tg = LD(&(xi[WS(is, 104)]), ivs, &(xi[0])); cannam@127: Th = VSUB(Tf, Tg); cannam@127: Tca = VADD(Tf, Tg); cannam@127: } cannam@127: Ti = VFNMS(LDK(KP382683432), Th, VMUL(LDK(KP923879532), Te)); cannam@127: Tea = VSUB(Tc9, Tca); cannam@127: T4S = VFMA(LDK(KP382683432), Te, VMUL(LDK(KP923879532), Th)); cannam@127: { cannam@127: V Tj, Tk, Tm, Tn; cannam@127: Tj = LD(&(xi[WS(is, 120)]), ivs, &(xi[0])); cannam@127: Tk = LD(&(xi[WS(is, 56)]), ivs, &(xi[0])); cannam@127: Tl = VSUB(Tj, Tk); cannam@127: Tc6 = VADD(Tj, Tk); cannam@127: Tm = LD(&(xi[WS(is, 24)]), ivs, &(xi[0])); cannam@127: Tn = LD(&(xi[WS(is, 88)]), ivs, &(xi[0])); cannam@127: To = VSUB(Tm, Tn); cannam@127: Tc7 = VADD(Tm, Tn); cannam@127: } cannam@127: Tp = VFMA(LDK(KP923879532), Tl, VMUL(LDK(KP382683432), To)); cannam@127: Teb = VSUB(Tc6, Tc7); cannam@127: T4R = VFNMS(LDK(KP923879532), To, VMUL(LDK(KP382683432), Tl)); cannam@127: } cannam@127: { cannam@127: V Tb, Tq, Te9, Tec; cannam@127: Tb = VADD(T3, Ta); cannam@127: Tq = VADD(Ti, Tp); cannam@127: Tr = VADD(Tb, Tq); cannam@127: T5J = VSUB(Tb, Tq); cannam@127: Te9 = VSUB(Ta7, Ta8); cannam@127: Tec = VMUL(LDK(KP707106781), VADD(Tea, Teb)); cannam@127: Ted = VADD(Te9, Tec); cannam@127: Tgf = VSUB(Te9, Tec); cannam@127: } cannam@127: { cannam@127: V Tfo, Tfp, T4Q, T4T; cannam@127: Tfo = VSUB(Tab, Taa); cannam@127: Tfp = VMUL(LDK(KP707106781), VSUB(Teb, Tea)); cannam@127: Tfq = VADD(Tfo, Tfp); cannam@127: TgH = VSUB(Tfp, Tfo); cannam@127: T4Q = VSUB(T4M, T4P); cannam@127: T4T = VSUB(T4R, T4S); cannam@127: T4U = VADD(T4Q, T4T); cannam@127: T6b = VSUB(T4T, T4Q); cannam@127: } cannam@127: { cannam@127: V T6X, T6Y, Ta9, Tac; cannam@127: T6X = VSUB(T3, Ta); cannam@127: T6Y = VADD(T4S, T4R); cannam@127: T6Z = VADD(T6X, T6Y); cannam@127: T8T = VSUB(T6X, T6Y); cannam@127: Ta9 = VADD(Ta7, Ta8); cannam@127: Tac = VADD(Taa, Tab); cannam@127: Tad = VSUB(Ta9, Tac); cannam@127: TcZ = VADD(Ta9, Tac); cannam@127: } cannam@127: { cannam@127: V Tc8, Tcb, T82, T83; cannam@127: Tc8 = VADD(Tc6, Tc7); cannam@127: Tcb = VADD(Tc9, Tca); cannam@127: Tcc = VSUB(Tc8, Tcb); cannam@127: Td0 = VADD(Tcb, Tc8); cannam@127: T82 = VADD(T4P, T4M); cannam@127: T83 = VSUB(Tp, Ti); cannam@127: T84 = VADD(T82, T83); cannam@127: T9l = VSUB(T83, T82); cannam@127: } cannam@127: } cannam@127: { cannam@127: V Tb0, Tb1, T2i, Tb2, T3k, Tb3, Tb4, T2p, Tb5, T3h, T2x, TeH, T3n, Tbs, T2E; cannam@127: V TeI, T3m, Tbp, T2l, T2o, TeG, TeJ; cannam@127: { cannam@127: V T2g, T2h, T3i, T3j; cannam@127: T2g = LD(&(xi[WS(is, 1)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2h = LD(&(xi[WS(is, 65)]), ivs, &(xi[WS(is, 1)])); cannam@127: Tb0 = VADD(T2g, T2h); cannam@127: T3i = LD(&(xi[WS(is, 33)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3j = LD(&(xi[WS(is, 97)]), ivs, &(xi[WS(is, 1)])); cannam@127: Tb1 = VADD(T3i, T3j); cannam@127: T2i = VSUB(T2g, T2h); cannam@127: Tb2 = VADD(Tb0, Tb1); cannam@127: T3k = VSUB(T3i, T3j); cannam@127: } cannam@127: { cannam@127: V T2j, T2k, T2m, T2n; cannam@127: T2j = LD(&(xi[WS(is, 17)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2k = LD(&(xi[WS(is, 81)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2l = VSUB(T2j, T2k); cannam@127: Tb3 = VADD(T2j, T2k); cannam@127: T2m = LD(&(xi[WS(is, 113)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2n = LD(&(xi[WS(is, 49)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2o = VSUB(T2m, T2n); cannam@127: Tb4 = VADD(T2m, T2n); cannam@127: } cannam@127: T2p = VMUL(LDK(KP707106781), VADD(T2l, T2o)); cannam@127: Tb5 = VADD(Tb3, Tb4); cannam@127: T3h = VMUL(LDK(KP707106781), VSUB(T2o, T2l)); cannam@127: { cannam@127: V T2t, Tbq, T2w, Tbr; cannam@127: { cannam@127: V T2r, T2s, T2u, T2v; cannam@127: T2r = LD(&(xi[WS(is, 9)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2s = LD(&(xi[WS(is, 73)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2t = VSUB(T2r, T2s); cannam@127: Tbq = VADD(T2r, T2s); cannam@127: T2u = LD(&(xi[WS(is, 41)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2v = LD(&(xi[WS(is, 105)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2w = VSUB(T2u, T2v); cannam@127: Tbr = VADD(T2u, T2v); cannam@127: } cannam@127: T2x = VFNMS(LDK(KP382683432), T2w, VMUL(LDK(KP923879532), T2t)); cannam@127: TeH = VSUB(Tbq, Tbr); cannam@127: T3n = VFMA(LDK(KP382683432), T2t, VMUL(LDK(KP923879532), T2w)); cannam@127: Tbs = VADD(Tbq, Tbr); cannam@127: } cannam@127: { cannam@127: V T2A, Tbn, T2D, Tbo; cannam@127: { cannam@127: V T2y, T2z, T2B, T2C; cannam@127: T2y = LD(&(xi[WS(is, 121)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2z = LD(&(xi[WS(is, 57)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2A = VSUB(T2y, T2z); cannam@127: Tbn = VADD(T2y, T2z); cannam@127: T2B = LD(&(xi[WS(is, 25)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2C = LD(&(xi[WS(is, 89)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2D = VSUB(T2B, T2C); cannam@127: Tbo = VADD(T2B, T2C); cannam@127: } cannam@127: T2E = VFMA(LDK(KP923879532), T2A, VMUL(LDK(KP382683432), T2D)); cannam@127: TeI = VSUB(Tbn, Tbo); cannam@127: T3m = VFNMS(LDK(KP923879532), T2D, VMUL(LDK(KP382683432), T2A)); cannam@127: Tbp = VADD(Tbn, Tbo); cannam@127: } cannam@127: Tb6 = VSUB(Tb2, Tb5); cannam@127: Tbt = VSUB(Tbp, Tbs); cannam@127: { cannam@127: V T2q, T2F, TeT, TeU; cannam@127: T2q = VADD(T2i, T2p); cannam@127: T2F = VADD(T2x, T2E); cannam@127: T2G = VADD(T2q, T2F); cannam@127: T5X = VSUB(T2q, T2F); cannam@127: TeT = VSUB(Tb4, Tb3); cannam@127: TeU = VMUL(LDK(KP707106781), VSUB(TeI, TeH)); cannam@127: TeV = VADD(TeT, TeU); cannam@127: Tgr = VSUB(TeU, TeT); cannam@127: } cannam@127: { cannam@127: V T3l, T3o, T7z, T7A; cannam@127: T3l = VSUB(T3h, T3k); cannam@127: T3o = VSUB(T3m, T3n); cannam@127: T3p = VADD(T3l, T3o); cannam@127: T5V = VSUB(T3o, T3l); cannam@127: T7z = VADD(T3k, T3h); cannam@127: T7A = VSUB(T2E, T2x); cannam@127: T7B = VADD(T7z, T7A); cannam@127: T95 = VSUB(T7A, T7z); cannam@127: } cannam@127: TeG = VSUB(Tb0, Tb1); cannam@127: TeJ = VMUL(LDK(KP707106781), VADD(TeH, TeI)); cannam@127: TeK = VADD(TeG, TeJ); cannam@127: Tgt = VSUB(TeG, TeJ); cannam@127: { cannam@127: V T7o, T7p, Td6, Td7; cannam@127: T7o = VSUB(T2i, T2p); cannam@127: T7p = VADD(T3n, T3m); cannam@127: T7q = VADD(T7o, T7p); cannam@127: T97 = VSUB(T7o, T7p); cannam@127: Td6 = VADD(Tb2, Tb5); cannam@127: Td7 = VADD(Tbs, Tbp); cannam@127: Td8 = VADD(Td6, Td7); cannam@127: TdK = VSUB(Td6, Td7); cannam@127: } cannam@127: } cannam@127: { cannam@127: V Tbx, Tby, T3x, Tbz, T4z, TbA, TbB, T3E, TbC, T4w, T3M, Tf2, T4C, TbZ, T3T; cannam@127: V Tf3, T4B, TbW, T3A, T3D, Tf1, Tf4; cannam@127: { cannam@127: V T3v, T3w, T4x, T4y; cannam@127: T3v = LD(&(xi[WS(is, 127)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3w = LD(&(xi[WS(is, 63)]), ivs, &(xi[WS(is, 1)])); cannam@127: Tbx = VADD(T3v, T3w); cannam@127: T4x = LD(&(xi[WS(is, 31)]), ivs, &(xi[WS(is, 1)])); cannam@127: T4y = LD(&(xi[WS(is, 95)]), ivs, &(xi[WS(is, 1)])); cannam@127: Tby = VADD(T4x, T4y); cannam@127: T3x = VSUB(T3v, T3w); cannam@127: Tbz = VADD(Tbx, Tby); cannam@127: T4z = VSUB(T4x, T4y); cannam@127: } cannam@127: { cannam@127: V T3y, T3z, T3B, T3C; cannam@127: T3y = LD(&(xi[WS(is, 15)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3z = LD(&(xi[WS(is, 79)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3A = VSUB(T3y, T3z); cannam@127: TbA = VADD(T3y, T3z); cannam@127: T3B = LD(&(xi[WS(is, 111)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3C = LD(&(xi[WS(is, 47)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3D = VSUB(T3B, T3C); cannam@127: TbB = VADD(T3B, T3C); cannam@127: } cannam@127: T3E = VMUL(LDK(KP707106781), VADD(T3A, T3D)); cannam@127: TbC = VADD(TbA, TbB); cannam@127: T4w = VMUL(LDK(KP707106781), VSUB(T3D, T3A)); cannam@127: { cannam@127: V T3I, TbX, T3L, TbY; cannam@127: { cannam@127: V T3G, T3H, T3J, T3K; cannam@127: T3G = LD(&(xi[WS(is, 7)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3H = LD(&(xi[WS(is, 71)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3I = VSUB(T3G, T3H); cannam@127: TbX = VADD(T3G, T3H); cannam@127: T3J = LD(&(xi[WS(is, 39)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3K = LD(&(xi[WS(is, 103)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3L = VSUB(T3J, T3K); cannam@127: TbY = VADD(T3J, T3K); cannam@127: } cannam@127: T3M = VFNMS(LDK(KP382683432), T3L, VMUL(LDK(KP923879532), T3I)); cannam@127: Tf2 = VSUB(TbX, TbY); cannam@127: T4C = VFMA(LDK(KP382683432), T3I, VMUL(LDK(KP923879532), T3L)); cannam@127: TbZ = VADD(TbX, TbY); cannam@127: } cannam@127: { cannam@127: V T3P, TbU, T3S, TbV; cannam@127: { cannam@127: V T3N, T3O, T3Q, T3R; cannam@127: T3N = LD(&(xi[WS(is, 119)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3O = LD(&(xi[WS(is, 55)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3P = VSUB(T3N, T3O); cannam@127: TbU = VADD(T3N, T3O); cannam@127: T3Q = LD(&(xi[WS(is, 23)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3R = LD(&(xi[WS(is, 87)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3S = VSUB(T3Q, T3R); cannam@127: TbV = VADD(T3Q, T3R); cannam@127: } cannam@127: T3T = VFMA(LDK(KP923879532), T3P, VMUL(LDK(KP382683432), T3S)); cannam@127: Tf3 = VSUB(TbU, TbV); cannam@127: T4B = VFNMS(LDK(KP923879532), T3S, VMUL(LDK(KP382683432), T3P)); cannam@127: TbW = VADD(TbU, TbV); cannam@127: } cannam@127: TbD = VSUB(Tbz, TbC); cannam@127: Tc0 = VSUB(TbW, TbZ); cannam@127: { cannam@127: V T3F, T3U, Tfe, Tff; cannam@127: T3F = VADD(T3x, T3E); cannam@127: T3U = VADD(T3M, T3T); cannam@127: T3V = VADD(T3F, T3U); cannam@127: T61 = VSUB(T3F, T3U); cannam@127: Tfe = VSUB(TbB, TbA); cannam@127: Tff = VMUL(LDK(KP707106781), VSUB(Tf3, Tf2)); cannam@127: Tfg = VADD(Tfe, Tff); cannam@127: TgB = VSUB(Tff, Tfe); cannam@127: } cannam@127: { cannam@127: V T4A, T4D, T7S, T7T; cannam@127: T4A = VSUB(T4w, T4z); cannam@127: T4D = VSUB(T4B, T4C); cannam@127: T4E = VADD(T4A, T4D); cannam@127: T65 = VSUB(T4D, T4A); cannam@127: T7S = VADD(T4z, T4w); cannam@127: T7T = VSUB(T3T, T3M); cannam@127: T7U = VADD(T7S, T7T); cannam@127: T9f = VSUB(T7T, T7S); cannam@127: } cannam@127: Tf1 = VSUB(Tbx, Tby); cannam@127: Tf4 = VMUL(LDK(KP707106781), VADD(Tf2, Tf3)); cannam@127: Tf5 = VADD(Tf1, Tf4); cannam@127: Tgx = VSUB(Tf1, Tf4); cannam@127: { cannam@127: V T7H, T7I, Tdd, Tde; cannam@127: T7H = VSUB(T3x, T3E); cannam@127: T7I = VADD(T4C, T4B); cannam@127: T7J = VADD(T7H, T7I); cannam@127: T9b = VSUB(T7H, T7I); cannam@127: Tdd = VADD(Tbz, TbC); cannam@127: Tde = VADD(TbZ, TbW); cannam@127: Tdf = VADD(Tdd, Tde); cannam@127: TdN = VSUB(Tdd, Tde); cannam@127: } cannam@127: } cannam@127: { cannam@127: V Tu, Tee, TG, Tag, TL, Teh, TX, Tan, TB, Tef, TD, Taj, TS, Tei, TU; cannam@127: V Taq, Teg, Tej; cannam@127: { cannam@127: V Ts, Tt, Tae, TE, TF, Taf; cannam@127: Ts = LD(&(xi[WS(is, 4)]), ivs, &(xi[0])); cannam@127: Tt = LD(&(xi[WS(is, 68)]), ivs, &(xi[0])); cannam@127: Tae = VADD(Ts, Tt); cannam@127: TE = LD(&(xi[WS(is, 36)]), ivs, &(xi[0])); cannam@127: TF = LD(&(xi[WS(is, 100)]), ivs, &(xi[0])); cannam@127: Taf = VADD(TE, TF); cannam@127: Tu = VSUB(Ts, Tt); cannam@127: Tee = VSUB(Tae, Taf); cannam@127: TG = VSUB(TE, TF); cannam@127: Tag = VADD(Tae, Taf); cannam@127: } cannam@127: { cannam@127: V TJ, TK, Tal, TV, TW, Tam; cannam@127: TJ = LD(&(xi[WS(is, 124)]), ivs, &(xi[0])); cannam@127: TK = LD(&(xi[WS(is, 60)]), ivs, &(xi[0])); cannam@127: Tal = VADD(TJ, TK); cannam@127: TV = LD(&(xi[WS(is, 28)]), ivs, &(xi[0])); cannam@127: TW = LD(&(xi[WS(is, 92)]), ivs, &(xi[0])); cannam@127: Tam = VADD(TV, TW); cannam@127: TL = VSUB(TJ, TK); cannam@127: Teh = VSUB(Tal, Tam); cannam@127: TX = VSUB(TV, TW); cannam@127: Tan = VADD(Tal, Tam); cannam@127: } cannam@127: { cannam@127: V Tx, Tah, TA, Tai; cannam@127: { cannam@127: V Tv, Tw, Ty, Tz; cannam@127: Tv = LD(&(xi[WS(is, 20)]), ivs, &(xi[0])); cannam@127: Tw = LD(&(xi[WS(is, 84)]), ivs, &(xi[0])); cannam@127: Tx = VSUB(Tv, Tw); cannam@127: Tah = VADD(Tv, Tw); cannam@127: Ty = LD(&(xi[WS(is, 116)]), ivs, &(xi[0])); cannam@127: Tz = LD(&(xi[WS(is, 52)]), ivs, &(xi[0])); cannam@127: TA = VSUB(Ty, Tz); cannam@127: Tai = VADD(Ty, Tz); cannam@127: } cannam@127: TB = VMUL(LDK(KP707106781), VADD(Tx, TA)); cannam@127: Tef = VSUB(Tai, Tah); cannam@127: TD = VMUL(LDK(KP707106781), VSUB(TA, Tx)); cannam@127: Taj = VADD(Tah, Tai); cannam@127: } cannam@127: { cannam@127: V TO, Tao, TR, Tap; cannam@127: { cannam@127: V TM, TN, TP, TQ; cannam@127: TM = LD(&(xi[WS(is, 12)]), ivs, &(xi[0])); cannam@127: TN = LD(&(xi[WS(is, 76)]), ivs, &(xi[0])); cannam@127: TO = VSUB(TM, TN); cannam@127: Tao = VADD(TM, TN); cannam@127: TP = LD(&(xi[WS(is, 108)]), ivs, &(xi[0])); cannam@127: TQ = LD(&(xi[WS(is, 44)]), ivs, &(xi[0])); cannam@127: TR = VSUB(TP, TQ); cannam@127: Tap = VADD(TP, TQ); cannam@127: } cannam@127: TS = VMUL(LDK(KP707106781), VADD(TO, TR)); cannam@127: Tei = VSUB(Tap, Tao); cannam@127: TU = VMUL(LDK(KP707106781), VSUB(TR, TO)); cannam@127: Taq = VADD(Tao, Tap); cannam@127: } cannam@127: Td2 = VADD(Tag, Taj); cannam@127: Td3 = VADD(Tan, Taq); cannam@127: { cannam@127: V TC, TH, Tfr, Tfs; cannam@127: TC = VADD(Tu, TB); cannam@127: TH = VSUB(TD, TG); cannam@127: TI = VFMA(LDK(KP980785280), TC, VMUL(LDK(KP195090322), TH)); cannam@127: T4V = VFNMS(LDK(KP195090322), TC, VMUL(LDK(KP980785280), TH)); cannam@127: Tfr = VFNMS(LDK(KP382683432), Tee, VMUL(LDK(KP923879532), Tef)); cannam@127: Tfs = VFMA(LDK(KP382683432), Teh, VMUL(LDK(KP923879532), Tei)); cannam@127: Tft = VADD(Tfr, Tfs); cannam@127: Tgg = VSUB(Tfs, Tfr); cannam@127: } cannam@127: { cannam@127: V TT, TY, T73, T74; cannam@127: TT = VADD(TL, TS); cannam@127: TY = VSUB(TU, TX); cannam@127: TZ = VFNMS(LDK(KP195090322), TY, VMUL(LDK(KP980785280), TT)); cannam@127: T4W = VFMA(LDK(KP195090322), TT, VMUL(LDK(KP980785280), TY)); cannam@127: T73 = VSUB(TL, TS); cannam@127: T74 = VADD(TX, TU); cannam@127: T75 = VFNMS(LDK(KP555570233), T74, VMUL(LDK(KP831469612), T73)); cannam@127: T86 = VFMA(LDK(KP555570233), T73, VMUL(LDK(KP831469612), T74)); cannam@127: } cannam@127: Teg = VFMA(LDK(KP923879532), Tee, VMUL(LDK(KP382683432), Tef)); cannam@127: Tej = VFNMS(LDK(KP382683432), Tei, VMUL(LDK(KP923879532), Teh)); cannam@127: Tek = VADD(Teg, Tej); cannam@127: TgG = VSUB(Tej, Teg); cannam@127: { cannam@127: V T70, T71, Tak, Tar; cannam@127: T70 = VSUB(Tu, TB); cannam@127: T71 = VADD(TG, TD); cannam@127: T72 = VFMA(LDK(KP831469612), T70, VMUL(LDK(KP555570233), T71)); cannam@127: T85 = VFNMS(LDK(KP555570233), T70, VMUL(LDK(KP831469612), T71)); cannam@127: Tak = VSUB(Tag, Taj); cannam@127: Tar = VSUB(Tan, Taq); cannam@127: Tas = VMUL(LDK(KP707106781), VADD(Tak, Tar)); cannam@127: Tcd = VMUL(LDK(KP707106781), VSUB(Tar, Tak)); cannam@127: } cannam@127: } cannam@127: { cannam@127: V Tav, Tau, T1b, Taw, T1v, Tay, Tax, T18, Taz, T1w, T1j, Teo, T1z, TaD, T1q; cannam@127: V Ten, T1y, TaG, T14, T17, Tem, Tep; cannam@127: { cannam@127: V T19, T1a, T1t, T1u; cannam@127: T19 = LD(&(xi[WS(is, 34)]), ivs, &(xi[0])); cannam@127: T1a = LD(&(xi[WS(is, 98)]), ivs, &(xi[0])); cannam@127: Tav = VADD(T19, T1a); cannam@127: T1t = LD(&(xi[WS(is, 2)]), ivs, &(xi[0])); cannam@127: T1u = LD(&(xi[WS(is, 66)]), ivs, &(xi[0])); cannam@127: Tau = VADD(T1t, T1u); cannam@127: T1b = VSUB(T19, T1a); cannam@127: Taw = VADD(Tau, Tav); cannam@127: T1v = VSUB(T1t, T1u); cannam@127: } cannam@127: { cannam@127: V T12, T13, T15, T16; cannam@127: T12 = LD(&(xi[WS(is, 114)]), ivs, &(xi[0])); cannam@127: T13 = LD(&(xi[WS(is, 50)]), ivs, &(xi[0])); cannam@127: T14 = VSUB(T12, T13); cannam@127: Tay = VADD(T12, T13); cannam@127: T15 = LD(&(xi[WS(is, 18)]), ivs, &(xi[0])); cannam@127: T16 = LD(&(xi[WS(is, 82)]), ivs, &(xi[0])); cannam@127: T17 = VSUB(T15, T16); cannam@127: Tax = VADD(T15, T16); cannam@127: } cannam@127: T18 = VMUL(LDK(KP707106781), VSUB(T14, T17)); cannam@127: Taz = VADD(Tax, Tay); cannam@127: T1w = VMUL(LDK(KP707106781), VADD(T17, T14)); cannam@127: { cannam@127: V T1f, TaB, T1i, TaC; cannam@127: { cannam@127: V T1d, T1e, T1g, T1h; cannam@127: T1d = LD(&(xi[WS(is, 122)]), ivs, &(xi[0])); cannam@127: T1e = LD(&(xi[WS(is, 58)]), ivs, &(xi[0])); cannam@127: T1f = VSUB(T1d, T1e); cannam@127: TaB = VADD(T1d, T1e); cannam@127: T1g = LD(&(xi[WS(is, 26)]), ivs, &(xi[0])); cannam@127: T1h = LD(&(xi[WS(is, 90)]), ivs, &(xi[0])); cannam@127: T1i = VSUB(T1g, T1h); cannam@127: TaC = VADD(T1g, T1h); cannam@127: } cannam@127: T1j = VFNMS(LDK(KP923879532), T1i, VMUL(LDK(KP382683432), T1f)); cannam@127: Teo = VSUB(TaB, TaC); cannam@127: T1z = VFMA(LDK(KP923879532), T1f, VMUL(LDK(KP382683432), T1i)); cannam@127: TaD = VADD(TaB, TaC); cannam@127: } cannam@127: { cannam@127: V T1m, TaE, T1p, TaF; cannam@127: { cannam@127: V T1k, T1l, T1n, T1o; cannam@127: T1k = LD(&(xi[WS(is, 10)]), ivs, &(xi[0])); cannam@127: T1l = LD(&(xi[WS(is, 74)]), ivs, &(xi[0])); cannam@127: T1m = VSUB(T1k, T1l); cannam@127: TaE = VADD(T1k, T1l); cannam@127: T1n = LD(&(xi[WS(is, 42)]), ivs, &(xi[0])); cannam@127: T1o = LD(&(xi[WS(is, 106)]), ivs, &(xi[0])); cannam@127: T1p = VSUB(T1n, T1o); cannam@127: TaF = VADD(T1n, T1o); cannam@127: } cannam@127: T1q = VFMA(LDK(KP382683432), T1m, VMUL(LDK(KP923879532), T1p)); cannam@127: Ten = VSUB(TaE, TaF); cannam@127: T1y = VFNMS(LDK(KP382683432), T1p, VMUL(LDK(KP923879532), T1m)); cannam@127: TaG = VADD(TaE, TaF); cannam@127: } cannam@127: Tdp = VADD(Taw, Taz); cannam@127: Tdq = VADD(TaG, TaD); cannam@127: TdG = VSUB(Tdp, Tdq); cannam@127: Tem = VSUB(Tau, Tav); cannam@127: Tep = VMUL(LDK(KP707106781), VADD(Ten, Teo)); cannam@127: Teq = VADD(Tem, Tep); cannam@127: Tgm = VSUB(Tem, Tep); cannam@127: { cannam@127: V Ter, Tes, T1c, T1r; cannam@127: Ter = VSUB(Tay, Tax); cannam@127: Tes = VMUL(LDK(KP707106781), VSUB(Teo, Ten)); cannam@127: Tet = VADD(Ter, Tes); cannam@127: Tgl = VSUB(Tes, Ter); cannam@127: T1c = VSUB(T18, T1b); cannam@127: T1r = VSUB(T1j, T1q); cannam@127: T1s = VADD(T1c, T1r); cannam@127: T5P = VSUB(T1r, T1c); cannam@127: } cannam@127: { cannam@127: V T1x, T1A, T7b, T7c; cannam@127: T1x = VADD(T1v, T1w); cannam@127: T1A = VADD(T1y, T1z); cannam@127: T1B = VADD(T1x, T1A); cannam@127: T5Q = VSUB(T1x, T1A); cannam@127: T7b = VADD(T1b, T18); cannam@127: T7c = VSUB(T1z, T1y); cannam@127: T7d = VADD(T7b, T7c); cannam@127: T8Z = VSUB(T7c, T7b); cannam@127: } cannam@127: { cannam@127: V TaA, TaH, T78, T79; cannam@127: TaA = VSUB(Taw, Taz); cannam@127: TaH = VSUB(TaD, TaG); cannam@127: TaI = VFMA(LDK(KP923879532), TaA, VMUL(LDK(KP382683432), TaH)); cannam@127: Tcf = VFNMS(LDK(KP382683432), TaA, VMUL(LDK(KP923879532), TaH)); cannam@127: T78 = VSUB(T1v, T1w); cannam@127: T79 = VADD(T1q, T1j); cannam@127: T7a = VADD(T78, T79); cannam@127: T90 = VSUB(T78, T79); cannam@127: } cannam@127: } cannam@127: { cannam@127: V TaJ, TaK, T1F, TaL, T27, TaM, TaN, T1M, TaO, T24, T1U, Tew, T2a, TaV, T21; cannam@127: V Tex, T29, TaS, T1I, T1L, Tev, Tey; cannam@127: { cannam@127: V T1D, T1E, T25, T26; cannam@127: T1D = LD(&(xi[WS(is, 126)]), ivs, &(xi[0])); cannam@127: T1E = LD(&(xi[WS(is, 62)]), ivs, &(xi[0])); cannam@127: TaJ = VADD(T1D, T1E); cannam@127: T25 = LD(&(xi[WS(is, 30)]), ivs, &(xi[0])); cannam@127: T26 = LD(&(xi[WS(is, 94)]), ivs, &(xi[0])); cannam@127: TaK = VADD(T25, T26); cannam@127: T1F = VSUB(T1D, T1E); cannam@127: TaL = VADD(TaJ, TaK); cannam@127: T27 = VSUB(T25, T26); cannam@127: } cannam@127: { cannam@127: V T1G, T1H, T1J, T1K; cannam@127: T1G = LD(&(xi[WS(is, 14)]), ivs, &(xi[0])); cannam@127: T1H = LD(&(xi[WS(is, 78)]), ivs, &(xi[0])); cannam@127: T1I = VSUB(T1G, T1H); cannam@127: TaM = VADD(T1G, T1H); cannam@127: T1J = LD(&(xi[WS(is, 110)]), ivs, &(xi[0])); cannam@127: T1K = LD(&(xi[WS(is, 46)]), ivs, &(xi[0])); cannam@127: T1L = VSUB(T1J, T1K); cannam@127: TaN = VADD(T1J, T1K); cannam@127: } cannam@127: T1M = VMUL(LDK(KP707106781), VADD(T1I, T1L)); cannam@127: TaO = VADD(TaM, TaN); cannam@127: T24 = VMUL(LDK(KP707106781), VSUB(T1L, T1I)); cannam@127: { cannam@127: V T1Q, TaT, T1T, TaU; cannam@127: { cannam@127: V T1O, T1P, T1R, T1S; cannam@127: T1O = LD(&(xi[WS(is, 6)]), ivs, &(xi[0])); cannam@127: T1P = LD(&(xi[WS(is, 70)]), ivs, &(xi[0])); cannam@127: T1Q = VSUB(T1O, T1P); cannam@127: TaT = VADD(T1O, T1P); cannam@127: T1R = LD(&(xi[WS(is, 38)]), ivs, &(xi[0])); cannam@127: T1S = LD(&(xi[WS(is, 102)]), ivs, &(xi[0])); cannam@127: T1T = VSUB(T1R, T1S); cannam@127: TaU = VADD(T1R, T1S); cannam@127: } cannam@127: T1U = VFNMS(LDK(KP382683432), T1T, VMUL(LDK(KP923879532), T1Q)); cannam@127: Tew = VSUB(TaT, TaU); cannam@127: T2a = VFMA(LDK(KP382683432), T1Q, VMUL(LDK(KP923879532), T1T)); cannam@127: TaV = VADD(TaT, TaU); cannam@127: } cannam@127: { cannam@127: V T1X, TaQ, T20, TaR; cannam@127: { cannam@127: V T1V, T1W, T1Y, T1Z; cannam@127: T1V = LD(&(xi[WS(is, 118)]), ivs, &(xi[0])); cannam@127: T1W = LD(&(xi[WS(is, 54)]), ivs, &(xi[0])); cannam@127: T1X = VSUB(T1V, T1W); cannam@127: TaQ = VADD(T1V, T1W); cannam@127: T1Y = LD(&(xi[WS(is, 22)]), ivs, &(xi[0])); cannam@127: T1Z = LD(&(xi[WS(is, 86)]), ivs, &(xi[0])); cannam@127: T20 = VSUB(T1Y, T1Z); cannam@127: TaR = VADD(T1Y, T1Z); cannam@127: } cannam@127: T21 = VFMA(LDK(KP923879532), T1X, VMUL(LDK(KP382683432), T20)); cannam@127: Tex = VSUB(TaQ, TaR); cannam@127: T29 = VFNMS(LDK(KP923879532), T20, VMUL(LDK(KP382683432), T1X)); cannam@127: TaS = VADD(TaQ, TaR); cannam@127: } cannam@127: Tdm = VADD(TaL, TaO); cannam@127: Tdn = VADD(TaV, TaS); cannam@127: TdH = VSUB(Tdm, Tdn); cannam@127: Tev = VSUB(TaJ, TaK); cannam@127: Tey = VMUL(LDK(KP707106781), VADD(Tew, Tex)); cannam@127: Tez = VADD(Tev, Tey); cannam@127: Tgi = VSUB(Tev, Tey); cannam@127: { cannam@127: V TeA, TeB, T1N, T22; cannam@127: TeA = VSUB(TaN, TaM); cannam@127: TeB = VMUL(LDK(KP707106781), VSUB(Tex, Tew)); cannam@127: TeC = VADD(TeA, TeB); cannam@127: Tgj = VSUB(TeB, TeA); cannam@127: T1N = VADD(T1F, T1M); cannam@127: T22 = VADD(T1U, T21); cannam@127: T23 = VADD(T1N, T22); cannam@127: T5N = VSUB(T1N, T22); cannam@127: } cannam@127: { cannam@127: V T28, T2b, T7i, T7j; cannam@127: T28 = VSUB(T24, T27); cannam@127: T2b = VSUB(T29, T2a); cannam@127: T2c = VADD(T28, T2b); cannam@127: T5M = VSUB(T2b, T28); cannam@127: T7i = VADD(T27, T24); cannam@127: T7j = VSUB(T21, T1U); cannam@127: T7k = VADD(T7i, T7j); cannam@127: T8X = VSUB(T7j, T7i); cannam@127: } cannam@127: { cannam@127: V TaP, TaW, T7f, T7g; cannam@127: TaP = VSUB(TaL, TaO); cannam@127: TaW = VSUB(TaS, TaV); cannam@127: TaX = VFNMS(LDK(KP382683432), TaW, VMUL(LDK(KP923879532), TaP)); cannam@127: Tcg = VFMA(LDK(KP382683432), TaP, VMUL(LDK(KP923879532), TaW)); cannam@127: T7f = VSUB(T1F, T1M); cannam@127: T7g = VADD(T2a, T29); cannam@127: T7h = VADD(T7f, T7g); cannam@127: T8W = VSUB(T7f, T7g); cannam@127: } cannam@127: } cannam@127: { cannam@127: V T2J, TeL, T2V, Tb9, T30, TeO, T3c, Tbg, T2Q, TeM, T2S, Tbc, T37, TeP, T39; cannam@127: V Tbj; cannam@127: { cannam@127: V T2H, T2I, Tb7, T2T, T2U, Tb8; cannam@127: T2H = LD(&(xi[WS(is, 5)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2I = LD(&(xi[WS(is, 69)]), ivs, &(xi[WS(is, 1)])); cannam@127: Tb7 = VADD(T2H, T2I); cannam@127: T2T = LD(&(xi[WS(is, 37)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2U = LD(&(xi[WS(is, 101)]), ivs, &(xi[WS(is, 1)])); cannam@127: Tb8 = VADD(T2T, T2U); cannam@127: T2J = VSUB(T2H, T2I); cannam@127: TeL = VSUB(Tb7, Tb8); cannam@127: T2V = VSUB(T2T, T2U); cannam@127: Tb9 = VADD(Tb7, Tb8); cannam@127: } cannam@127: { cannam@127: V T2Y, T2Z, Tbe, T3a, T3b, Tbf; cannam@127: T2Y = LD(&(xi[WS(is, 125)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2Z = LD(&(xi[WS(is, 61)]), ivs, &(xi[WS(is, 1)])); cannam@127: Tbe = VADD(T2Y, T2Z); cannam@127: T3a = LD(&(xi[WS(is, 29)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3b = LD(&(xi[WS(is, 93)]), ivs, &(xi[WS(is, 1)])); cannam@127: Tbf = VADD(T3a, T3b); cannam@127: T30 = VSUB(T2Y, T2Z); cannam@127: TeO = VSUB(Tbe, Tbf); cannam@127: T3c = VSUB(T3a, T3b); cannam@127: Tbg = VADD(Tbe, Tbf); cannam@127: } cannam@127: { cannam@127: V T2M, Tba, T2P, Tbb; cannam@127: { cannam@127: V T2K, T2L, T2N, T2O; cannam@127: T2K = LD(&(xi[WS(is, 21)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2L = LD(&(xi[WS(is, 85)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2M = VSUB(T2K, T2L); cannam@127: Tba = VADD(T2K, T2L); cannam@127: T2N = LD(&(xi[WS(is, 117)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2O = LD(&(xi[WS(is, 53)]), ivs, &(xi[WS(is, 1)])); cannam@127: T2P = VSUB(T2N, T2O); cannam@127: Tbb = VADD(T2N, T2O); cannam@127: } cannam@127: T2Q = VMUL(LDK(KP707106781), VADD(T2M, T2P)); cannam@127: TeM = VSUB(Tbb, Tba); cannam@127: T2S = VMUL(LDK(KP707106781), VSUB(T2P, T2M)); cannam@127: Tbc = VADD(Tba, Tbb); cannam@127: } cannam@127: { cannam@127: V T33, Tbh, T36, Tbi; cannam@127: { cannam@127: V T31, T32, T34, T35; cannam@127: T31 = LD(&(xi[WS(is, 13)]), ivs, &(xi[WS(is, 1)])); cannam@127: T32 = LD(&(xi[WS(is, 77)]), ivs, &(xi[WS(is, 1)])); cannam@127: T33 = VSUB(T31, T32); cannam@127: Tbh = VADD(T31, T32); cannam@127: T34 = LD(&(xi[WS(is, 109)]), ivs, &(xi[WS(is, 1)])); cannam@127: T35 = LD(&(xi[WS(is, 45)]), ivs, &(xi[WS(is, 1)])); cannam@127: T36 = VSUB(T34, T35); cannam@127: Tbi = VADD(T34, T35); cannam@127: } cannam@127: T37 = VMUL(LDK(KP707106781), VADD(T33, T36)); cannam@127: TeP = VSUB(Tbi, Tbh); cannam@127: T39 = VMUL(LDK(KP707106781), VSUB(T36, T33)); cannam@127: Tbj = VADD(Tbh, Tbi); cannam@127: } cannam@127: { cannam@127: V Tbd, Tbk, TeN, TeQ; cannam@127: Tbd = VSUB(Tb9, Tbc); cannam@127: Tbk = VSUB(Tbg, Tbj); cannam@127: Tbl = VMUL(LDK(KP707106781), VADD(Tbd, Tbk)); cannam@127: Tbu = VMUL(LDK(KP707106781), VSUB(Tbk, Tbd)); cannam@127: { cannam@127: V Td9, Tda, TeW, TeX; cannam@127: Td9 = VADD(Tb9, Tbc); cannam@127: Tda = VADD(Tbg, Tbj); cannam@127: Tdb = VADD(Td9, Tda); cannam@127: TdL = VSUB(Tda, Td9); cannam@127: TeW = VFNMS(LDK(KP382683432), TeL, VMUL(LDK(KP923879532), TeM)); cannam@127: TeX = VFMA(LDK(KP382683432), TeO, VMUL(LDK(KP923879532), TeP)); cannam@127: TeY = VADD(TeW, TeX); cannam@127: Tgu = VSUB(TeX, TeW); cannam@127: } cannam@127: TeN = VFMA(LDK(KP923879532), TeL, VMUL(LDK(KP382683432), TeM)); cannam@127: TeQ = VFNMS(LDK(KP382683432), TeP, VMUL(LDK(KP923879532), TeO)); cannam@127: TeR = VADD(TeN, TeQ); cannam@127: Tgq = VSUB(TeQ, TeN); cannam@127: { cannam@127: V T7t, T7C, T7w, T7D; cannam@127: { cannam@127: V T7r, T7s, T7u, T7v; cannam@127: T7r = VSUB(T2J, T2Q); cannam@127: T7s = VADD(T2V, T2S); cannam@127: T7t = VFMA(LDK(KP831469612), T7r, VMUL(LDK(KP555570233), T7s)); cannam@127: T7C = VFNMS(LDK(KP555570233), T7r, VMUL(LDK(KP831469612), T7s)); cannam@127: T7u = VSUB(T30, T37); cannam@127: T7v = VADD(T3c, T39); cannam@127: T7w = VFNMS(LDK(KP555570233), T7v, VMUL(LDK(KP831469612), T7u)); cannam@127: T7D = VFMA(LDK(KP555570233), T7u, VMUL(LDK(KP831469612), T7v)); cannam@127: } cannam@127: T7x = VADD(T7t, T7w); cannam@127: T98 = VSUB(T7D, T7C); cannam@127: T7E = VADD(T7C, T7D); cannam@127: T94 = VSUB(T7w, T7t); cannam@127: } cannam@127: { cannam@127: V T2X, T3q, T3e, T3r; cannam@127: { cannam@127: V T2R, T2W, T38, T3d; cannam@127: T2R = VADD(T2J, T2Q); cannam@127: T2W = VSUB(T2S, T2V); cannam@127: T2X = VFMA(LDK(KP980785280), T2R, VMUL(LDK(KP195090322), T2W)); cannam@127: T3q = VFNMS(LDK(KP195090322), T2R, VMUL(LDK(KP980785280), T2W)); cannam@127: T38 = VADD(T30, T37); cannam@127: T3d = VSUB(T39, T3c); cannam@127: T3e = VFNMS(LDK(KP195090322), T3d, VMUL(LDK(KP980785280), T38)); cannam@127: T3r = VFMA(LDK(KP195090322), T38, VMUL(LDK(KP980785280), T3d)); cannam@127: } cannam@127: T3f = VADD(T2X, T3e); cannam@127: T5Y = VSUB(T3r, T3q); cannam@127: T3s = VADD(T3q, T3r); cannam@127: T5U = VSUB(T3e, T2X); cannam@127: } cannam@127: } cannam@127: } cannam@127: { cannam@127: V T3Y, Tf6, T4a, TbG, T4f, Tf9, T4r, TbN, T45, Tf7, T47, TbJ, T4m, Tfa, T4o; cannam@127: V TbQ; cannam@127: { cannam@127: V T3W, T3X, TbE, T48, T49, TbF; cannam@127: T3W = LD(&(xi[WS(is, 3)]), ivs, &(xi[WS(is, 1)])); cannam@127: T3X = LD(&(xi[WS(is, 67)]), ivs, &(xi[WS(is, 1)])); cannam@127: TbE = VADD(T3W, T3X); cannam@127: T48 = LD(&(xi[WS(is, 35)]), ivs, &(xi[WS(is, 1)])); cannam@127: T49 = LD(&(xi[WS(is, 99)]), ivs, &(xi[WS(is, 1)])); cannam@127: TbF = VADD(T48, T49); cannam@127: T3Y = VSUB(T3W, T3X); cannam@127: Tf6 = VSUB(TbE, TbF); cannam@127: T4a = VSUB(T48, T49); cannam@127: TbG = VADD(TbE, TbF); cannam@127: } cannam@127: { cannam@127: V T4d, T4e, TbL, T4p, T4q, TbM; cannam@127: T4d = LD(&(xi[WS(is, 123)]), ivs, &(xi[WS(is, 1)])); cannam@127: T4e = LD(&(xi[WS(is, 59)]), ivs, &(xi[WS(is, 1)])); cannam@127: TbL = VADD(T4d, T4e); cannam@127: T4p = LD(&(xi[WS(is, 27)]), ivs, &(xi[WS(is, 1)])); cannam@127: T4q = LD(&(xi[WS(is, 91)]), ivs, &(xi[WS(is, 1)])); cannam@127: TbM = VADD(T4p, T4q); cannam@127: T4f = VSUB(T4d, T4e); cannam@127: Tf9 = VSUB(TbL, TbM); cannam@127: T4r = VSUB(T4p, T4q); cannam@127: TbN = VADD(TbL, TbM); cannam@127: } cannam@127: { cannam@127: V T41, TbH, T44, TbI; cannam@127: { cannam@127: V T3Z, T40, T42, T43; cannam@127: T3Z = LD(&(xi[WS(is, 19)]), ivs, &(xi[WS(is, 1)])); cannam@127: T40 = LD(&(xi[WS(is, 83)]), ivs, &(xi[WS(is, 1)])); cannam@127: T41 = VSUB(T3Z, T40); cannam@127: TbH = VADD(T3Z, T40); cannam@127: T42 = LD(&(xi[WS(is, 115)]), ivs, &(xi[WS(is, 1)])); cannam@127: T43 = LD(&(xi[WS(is, 51)]), ivs, &(xi[WS(is, 1)])); cannam@127: T44 = VSUB(T42, T43); cannam@127: TbI = VADD(T42, T43); cannam@127: } cannam@127: T45 = VMUL(LDK(KP707106781), VADD(T41, T44)); cannam@127: Tf7 = VSUB(TbI, TbH); cannam@127: T47 = VMUL(LDK(KP707106781), VSUB(T44, T41)); cannam@127: TbJ = VADD(TbH, TbI); cannam@127: } cannam@127: { cannam@127: V T4i, TbO, T4l, TbP; cannam@127: { cannam@127: V T4g, T4h, T4j, T4k; cannam@127: T4g = LD(&(xi[WS(is, 11)]), ivs, &(xi[WS(is, 1)])); cannam@127: T4h = LD(&(xi[WS(is, 75)]), ivs, &(xi[WS(is, 1)])); cannam@127: T4i = VSUB(T4g, T4h); cannam@127: TbO = VADD(T4g, T4h); cannam@127: T4j = LD(&(xi[WS(is, 107)]), ivs, &(xi[WS(is, 1)])); cannam@127: T4k = LD(&(xi[WS(is, 43)]), ivs, &(xi[WS(is, 1)])); cannam@127: T4l = VSUB(T4j, T4k); cannam@127: TbP = VADD(T4j, T4k); cannam@127: } cannam@127: T4m = VMUL(LDK(KP707106781), VADD(T4i, T4l)); cannam@127: Tfa = VSUB(TbP, TbO); cannam@127: T4o = VMUL(LDK(KP707106781), VSUB(T4l, T4i)); cannam@127: TbQ = VADD(TbO, TbP); cannam@127: } cannam@127: { cannam@127: V TbK, TbR, Tf8, Tfb; cannam@127: TbK = VSUB(TbG, TbJ); cannam@127: TbR = VSUB(TbN, TbQ); cannam@127: TbS = VMUL(LDK(KP707106781), VADD(TbK, TbR)); cannam@127: Tc1 = VMUL(LDK(KP707106781), VSUB(TbR, TbK)); cannam@127: { cannam@127: V Tdg, Tdh, Tfh, Tfi; cannam@127: Tdg = VADD(TbG, TbJ); cannam@127: Tdh = VADD(TbN, TbQ); cannam@127: Tdi = VADD(Tdg, Tdh); cannam@127: TdO = VSUB(Tdh, Tdg); cannam@127: Tfh = VFNMS(LDK(KP382683432), Tf6, VMUL(LDK(KP923879532), Tf7)); cannam@127: Tfi = VFMA(LDK(KP382683432), Tf9, VMUL(LDK(KP923879532), Tfa)); cannam@127: Tfj = VADD(Tfh, Tfi); cannam@127: Tgy = VSUB(Tfi, Tfh); cannam@127: } cannam@127: Tf8 = VFMA(LDK(KP923879532), Tf6, VMUL(LDK(KP382683432), Tf7)); cannam@127: Tfb = VFNMS(LDK(KP382683432), Tfa, VMUL(LDK(KP923879532), Tf9)); cannam@127: Tfc = VADD(Tf8, Tfb); cannam@127: TgA = VSUB(Tfb, Tf8); cannam@127: { cannam@127: V T7M, T7V, T7P, T7W; cannam@127: { cannam@127: V T7K, T7L, T7N, T7O; cannam@127: T7K = VSUB(T3Y, T45); cannam@127: T7L = VADD(T4a, T47); cannam@127: T7M = VFMA(LDK(KP831469612), T7K, VMUL(LDK(KP555570233), T7L)); cannam@127: T7V = VFNMS(LDK(KP555570233), T7K, VMUL(LDK(KP831469612), T7L)); cannam@127: T7N = VSUB(T4f, T4m); cannam@127: T7O = VADD(T4r, T4o); cannam@127: T7P = VFNMS(LDK(KP555570233), T7O, VMUL(LDK(KP831469612), T7N)); cannam@127: T7W = VFMA(LDK(KP555570233), T7N, VMUL(LDK(KP831469612), T7O)); cannam@127: } cannam@127: T7Q = VADD(T7M, T7P); cannam@127: T9e = VSUB(T7P, T7M); cannam@127: T7X = VADD(T7V, T7W); cannam@127: T9c = VSUB(T7W, T7V); cannam@127: } cannam@127: { cannam@127: V T4c, T4F, T4t, T4G; cannam@127: { cannam@127: V T46, T4b, T4n, T4s; cannam@127: T46 = VADD(T3Y, T45); cannam@127: T4b = VSUB(T47, T4a); cannam@127: T4c = VFMA(LDK(KP980785280), T46, VMUL(LDK(KP195090322), T4b)); cannam@127: T4F = VFNMS(LDK(KP195090322), T46, VMUL(LDK(KP980785280), T4b)); cannam@127: T4n = VADD(T4f, T4m); cannam@127: T4s = VSUB(T4o, T4r); cannam@127: T4t = VFNMS(LDK(KP195090322), T4s, VMUL(LDK(KP980785280), T4n)); cannam@127: T4G = VFMA(LDK(KP195090322), T4n, VMUL(LDK(KP980785280), T4s)); cannam@127: } cannam@127: T4u = VADD(T4c, T4t); cannam@127: T64 = VSUB(T4t, T4c); cannam@127: T4H = VADD(T4F, T4G); cannam@127: T62 = VSUB(T4G, T4F); cannam@127: } cannam@127: } cannam@127: } cannam@127: { cannam@127: V Td5, Tdx, TdC, TdE, Tdk, Tdt, Tds, Tdy, Tdz, TdD; cannam@127: { cannam@127: V Td1, Td4, TdA, TdB; cannam@127: Td1 = VADD(TcZ, Td0); cannam@127: Td4 = VADD(Td2, Td3); cannam@127: Td5 = VSUB(Td1, Td4); cannam@127: Tdx = VADD(Td1, Td4); cannam@127: TdA = VADD(Td8, Tdb); cannam@127: TdB = VADD(Tdf, Tdi); cannam@127: TdC = VADD(TdA, TdB); cannam@127: TdE = VBYI(VSUB(TdB, TdA)); cannam@127: } cannam@127: { cannam@127: V Tdc, Tdj, Tdo, Tdr; cannam@127: Tdc = VSUB(Td8, Tdb); cannam@127: Tdj = VSUB(Tdf, Tdi); cannam@127: Tdk = VMUL(LDK(KP707106781), VADD(Tdc, Tdj)); cannam@127: Tdt = VMUL(LDK(KP707106781), VSUB(Tdj, Tdc)); cannam@127: Tdo = VADD(Tdm, Tdn); cannam@127: Tdr = VADD(Tdp, Tdq); cannam@127: Tds = VSUB(Tdo, Tdr); cannam@127: Tdy = VADD(Tdr, Tdo); cannam@127: } cannam@127: Tdz = VADD(Tdx, Tdy); cannam@127: ST(&(xo[WS(os, 64)]), VSUB(Tdz, TdC), ovs, &(xo[0])); cannam@127: ST(&(xo[0]), VADD(Tdz, TdC), ovs, &(xo[0])); cannam@127: TdD = VSUB(Tdx, Tdy); cannam@127: ST(&(xo[WS(os, 96)]), VSUB(TdD, TdE), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 32)]), VADD(TdD, TdE), ovs, &(xo[0])); cannam@127: { cannam@127: V Tdl, Tdu, Tdv, Tdw; cannam@127: Tdl = VADD(Td5, Tdk); cannam@127: Tdu = VBYI(VADD(Tds, Tdt)); cannam@127: ST(&(xo[WS(os, 112)]), VSUB(Tdl, Tdu), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 16)]), VADD(Tdl, Tdu), ovs, &(xo[0])); cannam@127: Tdv = VSUB(Td5, Tdk); cannam@127: Tdw = VBYI(VSUB(Tdt, Tds)); cannam@127: ST(&(xo[WS(os, 80)]), VSUB(Tdv, Tdw), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 48)]), VADD(Tdv, Tdw), ovs, &(xo[0])); cannam@127: } cannam@127: } cannam@127: { cannam@127: V TdJ, Te4, TdX, Te5, TdQ, Te1, TdU, Te2; cannam@127: { cannam@127: V TdF, TdI, TdV, TdW; cannam@127: TdF = VSUB(TcZ, Td0); cannam@127: TdI = VMUL(LDK(KP707106781), VADD(TdG, TdH)); cannam@127: TdJ = VADD(TdF, TdI); cannam@127: Te4 = VSUB(TdF, TdI); cannam@127: TdV = VFNMS(LDK(KP382683432), TdK, VMUL(LDK(KP923879532), TdL)); cannam@127: TdW = VFMA(LDK(KP382683432), TdN, VMUL(LDK(KP923879532), TdO)); cannam@127: TdX = VADD(TdV, TdW); cannam@127: Te5 = VSUB(TdW, TdV); cannam@127: } cannam@127: { cannam@127: V TdM, TdP, TdS, TdT; cannam@127: TdM = VFMA(LDK(KP923879532), TdK, VMUL(LDK(KP382683432), TdL)); cannam@127: TdP = VFNMS(LDK(KP382683432), TdO, VMUL(LDK(KP923879532), TdN)); cannam@127: TdQ = VADD(TdM, TdP); cannam@127: Te1 = VSUB(TdP, TdM); cannam@127: TdS = VSUB(Td3, Td2); cannam@127: TdT = VMUL(LDK(KP707106781), VSUB(TdH, TdG)); cannam@127: TdU = VADD(TdS, TdT); cannam@127: Te2 = VSUB(TdT, TdS); cannam@127: } cannam@127: { cannam@127: V TdR, TdY, Te7, Te8; cannam@127: TdR = VADD(TdJ, TdQ); cannam@127: TdY = VBYI(VADD(TdU, TdX)); cannam@127: ST(&(xo[WS(os, 120)]), VSUB(TdR, TdY), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 8)]), VADD(TdR, TdY), ovs, &(xo[0])); cannam@127: Te7 = VBYI(VADD(Te2, Te1)); cannam@127: Te8 = VADD(Te4, Te5); cannam@127: ST(&(xo[WS(os, 24)]), VADD(Te7, Te8), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 104)]), VSUB(Te8, Te7), ovs, &(xo[0])); cannam@127: } cannam@127: { cannam@127: V TdZ, Te0, Te3, Te6; cannam@127: TdZ = VSUB(TdJ, TdQ); cannam@127: Te0 = VBYI(VSUB(TdX, TdU)); cannam@127: ST(&(xo[WS(os, 72)]), VSUB(TdZ, Te0), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 56)]), VADD(TdZ, Te0), ovs, &(xo[0])); cannam@127: Te3 = VBYI(VSUB(Te1, Te2)); cannam@127: Te6 = VSUB(Te4, Te5); cannam@127: ST(&(xo[WS(os, 40)]), VADD(Te3, Te6), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 88)]), VSUB(Te6, Te3), ovs, &(xo[0])); cannam@127: } cannam@127: } cannam@127: { cannam@127: V TaZ, Tcs, Tci, Tcq, Tc4, Tct, Tcl, Tcp; cannam@127: { cannam@127: V Tat, TaY, Tce, Tch; cannam@127: Tat = VADD(Tad, Tas); cannam@127: TaY = VADD(TaI, TaX); cannam@127: TaZ = VADD(Tat, TaY); cannam@127: Tcs = VSUB(Tat, TaY); cannam@127: Tce = VADD(Tcc, Tcd); cannam@127: Tch = VADD(Tcf, Tcg); cannam@127: Tci = VADD(Tce, Tch); cannam@127: Tcq = VSUB(Tch, Tce); cannam@127: { cannam@127: V Tbw, Tcj, Tc3, Tck; cannam@127: { cannam@127: V Tbm, Tbv, TbT, Tc2; cannam@127: Tbm = VADD(Tb6, Tbl); cannam@127: Tbv = VADD(Tbt, Tbu); cannam@127: Tbw = VFMA(LDK(KP980785280), Tbm, VMUL(LDK(KP195090322), Tbv)); cannam@127: Tcj = VFNMS(LDK(KP195090322), Tbm, VMUL(LDK(KP980785280), Tbv)); cannam@127: TbT = VADD(TbD, TbS); cannam@127: Tc2 = VADD(Tc0, Tc1); cannam@127: Tc3 = VFNMS(LDK(KP195090322), Tc2, VMUL(LDK(KP980785280), TbT)); cannam@127: Tck = VFMA(LDK(KP195090322), TbT, VMUL(LDK(KP980785280), Tc2)); cannam@127: } cannam@127: Tc4 = VADD(Tbw, Tc3); cannam@127: Tct = VSUB(Tck, Tcj); cannam@127: Tcl = VADD(Tcj, Tck); cannam@127: Tcp = VSUB(Tc3, Tbw); cannam@127: } cannam@127: } cannam@127: { cannam@127: V Tc5, Tcm, Tcv, Tcw; cannam@127: Tc5 = VADD(TaZ, Tc4); cannam@127: Tcm = VBYI(VADD(Tci, Tcl)); cannam@127: ST(&(xo[WS(os, 124)]), VSUB(Tc5, Tcm), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 4)]), VADD(Tc5, Tcm), ovs, &(xo[0])); cannam@127: Tcv = VBYI(VADD(Tcq, Tcp)); cannam@127: Tcw = VADD(Tcs, Tct); cannam@127: ST(&(xo[WS(os, 28)]), VADD(Tcv, Tcw), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 100)]), VSUB(Tcw, Tcv), ovs, &(xo[0])); cannam@127: } cannam@127: { cannam@127: V Tcn, Tco, Tcr, Tcu; cannam@127: Tcn = VSUB(TaZ, Tc4); cannam@127: Tco = VBYI(VSUB(Tcl, Tci)); cannam@127: ST(&(xo[WS(os, 68)]), VSUB(Tcn, Tco), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 60)]), VADD(Tcn, Tco), ovs, &(xo[0])); cannam@127: Tcr = VBYI(VSUB(Tcp, Tcq)); cannam@127: Tcu = VSUB(Tcs, Tct); cannam@127: ST(&(xo[WS(os, 36)]), VADD(Tcr, Tcu), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 92)]), VSUB(Tcu, Tcr), ovs, &(xo[0])); cannam@127: } cannam@127: } cannam@127: { cannam@127: V Tcz, TcU, TcK, TcS, TcG, TcV, TcN, TcR; cannam@127: { cannam@127: V Tcx, Tcy, TcI, TcJ; cannam@127: Tcx = VSUB(Tad, Tas); cannam@127: Tcy = VSUB(Tcg, Tcf); cannam@127: Tcz = VADD(Tcx, Tcy); cannam@127: TcU = VSUB(Tcx, Tcy); cannam@127: TcI = VSUB(Tcd, Tcc); cannam@127: TcJ = VSUB(TaX, TaI); cannam@127: TcK = VADD(TcI, TcJ); cannam@127: TcS = VSUB(TcJ, TcI); cannam@127: { cannam@127: V TcC, TcL, TcF, TcM; cannam@127: { cannam@127: V TcA, TcB, TcD, TcE; cannam@127: TcA = VSUB(Tb6, Tbl); cannam@127: TcB = VSUB(Tbu, Tbt); cannam@127: TcC = VFMA(LDK(KP831469612), TcA, VMUL(LDK(KP555570233), TcB)); cannam@127: TcL = VFNMS(LDK(KP555570233), TcA, VMUL(LDK(KP831469612), TcB)); cannam@127: TcD = VSUB(TbD, TbS); cannam@127: TcE = VSUB(Tc1, Tc0); cannam@127: TcF = VFNMS(LDK(KP555570233), TcE, VMUL(LDK(KP831469612), TcD)); cannam@127: TcM = VFMA(LDK(KP555570233), TcD, VMUL(LDK(KP831469612), TcE)); cannam@127: } cannam@127: TcG = VADD(TcC, TcF); cannam@127: TcV = VSUB(TcM, TcL); cannam@127: TcN = VADD(TcL, TcM); cannam@127: TcR = VSUB(TcF, TcC); cannam@127: } cannam@127: } cannam@127: { cannam@127: V TcH, TcO, TcX, TcY; cannam@127: TcH = VADD(Tcz, TcG); cannam@127: TcO = VBYI(VADD(TcK, TcN)); cannam@127: ST(&(xo[WS(os, 116)]), VSUB(TcH, TcO), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 12)]), VADD(TcH, TcO), ovs, &(xo[0])); cannam@127: TcX = VBYI(VADD(TcS, TcR)); cannam@127: TcY = VADD(TcU, TcV); cannam@127: ST(&(xo[WS(os, 20)]), VADD(TcX, TcY), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 108)]), VSUB(TcY, TcX), ovs, &(xo[0])); cannam@127: } cannam@127: { cannam@127: V TcP, TcQ, TcT, TcW; cannam@127: TcP = VSUB(Tcz, TcG); cannam@127: TcQ = VBYI(VSUB(TcN, TcK)); cannam@127: ST(&(xo[WS(os, 76)]), VSUB(TcP, TcQ), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 52)]), VADD(TcP, TcQ), ovs, &(xo[0])); cannam@127: TcT = VBYI(VSUB(TcR, TcS)); cannam@127: TcW = VSUB(TcU, TcV); cannam@127: ST(&(xo[WS(os, 44)]), VADD(TcT, TcW), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 84)]), VSUB(TcW, TcT), ovs, &(xo[0])); cannam@127: } cannam@127: } cannam@127: { cannam@127: V TeF, Tg8, TfI, Tg0, Tfy, Tga, TfG, TfP, Tfm, TfJ, TfB, TfF, TfW, Tgb, Tg3; cannam@127: V Tg7; cannam@127: { cannam@127: V Tel, TfY, TeE, TfZ, Teu, TeD; cannam@127: Tel = VADD(Ted, Tek); cannam@127: TfY = VSUB(Tft, Tfq); cannam@127: Teu = VFMA(LDK(KP980785280), Teq, VMUL(LDK(KP195090322), Tet)); cannam@127: TeD = VFNMS(LDK(KP195090322), TeC, VMUL(LDK(KP980785280), Tez)); cannam@127: TeE = VADD(Teu, TeD); cannam@127: TfZ = VSUB(TeD, Teu); cannam@127: TeF = VADD(Tel, TeE); cannam@127: Tg8 = VSUB(TfZ, TfY); cannam@127: TfI = VSUB(Tel, TeE); cannam@127: Tg0 = VADD(TfY, TfZ); cannam@127: } cannam@127: { cannam@127: V Tfu, TfN, Tfx, TfO, Tfv, Tfw; cannam@127: Tfu = VADD(Tfq, Tft); cannam@127: TfN = VSUB(Ted, Tek); cannam@127: Tfv = VFNMS(LDK(KP195090322), Teq, VMUL(LDK(KP980785280), Tet)); cannam@127: Tfw = VFMA(LDK(KP195090322), Tez, VMUL(LDK(KP980785280), TeC)); cannam@127: Tfx = VADD(Tfv, Tfw); cannam@127: TfO = VSUB(Tfw, Tfv); cannam@127: Tfy = VADD(Tfu, Tfx); cannam@127: Tga = VSUB(TfN, TfO); cannam@127: TfG = VSUB(Tfx, Tfu); cannam@127: TfP = VADD(TfN, TfO); cannam@127: } cannam@127: { cannam@127: V Tf0, Tfz, Tfl, TfA; cannam@127: { cannam@127: V TeS, TeZ, Tfd, Tfk; cannam@127: TeS = VADD(TeK, TeR); cannam@127: TeZ = VADD(TeV, TeY); cannam@127: Tf0 = VFMA(LDK(KP995184726), TeS, VMUL(LDK(KP098017140), TeZ)); cannam@127: Tfz = VFNMS(LDK(KP098017140), TeS, VMUL(LDK(KP995184726), TeZ)); cannam@127: Tfd = VADD(Tf5, Tfc); cannam@127: Tfk = VADD(Tfg, Tfj); cannam@127: Tfl = VFNMS(LDK(KP098017140), Tfk, VMUL(LDK(KP995184726), Tfd)); cannam@127: TfA = VFMA(LDK(KP098017140), Tfd, VMUL(LDK(KP995184726), Tfk)); cannam@127: } cannam@127: Tfm = VADD(Tf0, Tfl); cannam@127: TfJ = VSUB(TfA, Tfz); cannam@127: TfB = VADD(Tfz, TfA); cannam@127: TfF = VSUB(Tfl, Tf0); cannam@127: } cannam@127: { cannam@127: V TfS, Tg1, TfV, Tg2; cannam@127: { cannam@127: V TfQ, TfR, TfT, TfU; cannam@127: TfQ = VSUB(TeK, TeR); cannam@127: TfR = VSUB(TeY, TeV); cannam@127: TfS = VFMA(LDK(KP773010453), TfQ, VMUL(LDK(KP634393284), TfR)); cannam@127: Tg1 = VFNMS(LDK(KP634393284), TfQ, VMUL(LDK(KP773010453), TfR)); cannam@127: TfT = VSUB(Tf5, Tfc); cannam@127: TfU = VSUB(Tfj, Tfg); cannam@127: TfV = VFNMS(LDK(KP634393284), TfU, VMUL(LDK(KP773010453), TfT)); cannam@127: Tg2 = VFMA(LDK(KP634393284), TfT, VMUL(LDK(KP773010453), TfU)); cannam@127: } cannam@127: TfW = VADD(TfS, TfV); cannam@127: Tgb = VSUB(Tg2, Tg1); cannam@127: Tg3 = VADD(Tg1, Tg2); cannam@127: Tg7 = VSUB(TfV, TfS); cannam@127: } cannam@127: { cannam@127: V Tfn, TfC, Tg9, Tgc; cannam@127: Tfn = VADD(TeF, Tfm); cannam@127: TfC = VBYI(VADD(Tfy, TfB)); cannam@127: ST(&(xo[WS(os, 126)]), VSUB(Tfn, TfC), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 2)]), VADD(Tfn, TfC), ovs, &(xo[0])); cannam@127: Tg9 = VBYI(VSUB(Tg7, Tg8)); cannam@127: Tgc = VSUB(Tga, Tgb); cannam@127: ST(&(xo[WS(os, 46)]), VADD(Tg9, Tgc), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 82)]), VSUB(Tgc, Tg9), ovs, &(xo[0])); cannam@127: } cannam@127: { cannam@127: V Tgd, Tge, TfD, TfE; cannam@127: Tgd = VBYI(VADD(Tg8, Tg7)); cannam@127: Tge = VADD(Tga, Tgb); cannam@127: ST(&(xo[WS(os, 18)]), VADD(Tgd, Tge), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 110)]), VSUB(Tge, Tgd), ovs, &(xo[0])); cannam@127: TfD = VSUB(TeF, Tfm); cannam@127: TfE = VBYI(VSUB(TfB, Tfy)); cannam@127: ST(&(xo[WS(os, 66)]), VSUB(TfD, TfE), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 62)]), VADD(TfD, TfE), ovs, &(xo[0])); cannam@127: } cannam@127: { cannam@127: V TfH, TfK, TfX, Tg4; cannam@127: TfH = VBYI(VSUB(TfF, TfG)); cannam@127: TfK = VSUB(TfI, TfJ); cannam@127: ST(&(xo[WS(os, 34)]), VADD(TfH, TfK), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 94)]), VSUB(TfK, TfH), ovs, &(xo[0])); cannam@127: TfX = VADD(TfP, TfW); cannam@127: Tg4 = VBYI(VADD(Tg0, Tg3)); cannam@127: ST(&(xo[WS(os, 114)]), VSUB(TfX, Tg4), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 14)]), VADD(TfX, Tg4), ovs, &(xo[0])); cannam@127: } cannam@127: { cannam@127: V Tg5, Tg6, TfL, TfM; cannam@127: Tg5 = VSUB(TfP, TfW); cannam@127: Tg6 = VBYI(VSUB(Tg3, Tg0)); cannam@127: ST(&(xo[WS(os, 78)]), VSUB(Tg5, Tg6), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 50)]), VADD(Tg5, Tg6), ovs, &(xo[0])); cannam@127: TfL = VBYI(VADD(TfG, TfF)); cannam@127: TfM = VADD(TfI, TfJ); cannam@127: ST(&(xo[WS(os, 30)]), VADD(TfL, TfM), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 98)]), VSUB(TfM, TfL), ovs, &(xo[0])); cannam@127: } cannam@127: } cannam@127: { cannam@127: V Tgp, Thm, TgW, The, TgM, Tho, TgU, Th3, TgE, TgX, TgP, TgT, Tha, Thp, Thh; cannam@127: V Thl; cannam@127: { cannam@127: V Tgh, Thc, Tgo, Thd, Tgk, Tgn; cannam@127: Tgh = VSUB(Tgf, Tgg); cannam@127: Thc = VADD(TgH, TgG); cannam@127: Tgk = VFMA(LDK(KP555570233), Tgi, VMUL(LDK(KP831469612), Tgj)); cannam@127: Tgn = VFNMS(LDK(KP555570233), Tgm, VMUL(LDK(KP831469612), Tgl)); cannam@127: Tgo = VSUB(Tgk, Tgn); cannam@127: Thd = VADD(Tgn, Tgk); cannam@127: Tgp = VADD(Tgh, Tgo); cannam@127: Thm = VSUB(Thd, Thc); cannam@127: TgW = VSUB(Tgh, Tgo); cannam@127: The = VADD(Thc, Thd); cannam@127: } cannam@127: { cannam@127: V TgI, Th1, TgL, Th2, TgJ, TgK; cannam@127: TgI = VSUB(TgG, TgH); cannam@127: Th1 = VADD(Tgf, Tgg); cannam@127: TgJ = VFNMS(LDK(KP555570233), Tgj, VMUL(LDK(KP831469612), Tgi)); cannam@127: TgK = VFMA(LDK(KP831469612), Tgm, VMUL(LDK(KP555570233), Tgl)); cannam@127: TgL = VSUB(TgJ, TgK); cannam@127: Th2 = VADD(TgK, TgJ); cannam@127: TgM = VADD(TgI, TgL); cannam@127: Tho = VSUB(Th1, Th2); cannam@127: TgU = VSUB(TgL, TgI); cannam@127: Th3 = VADD(Th1, Th2); cannam@127: } cannam@127: { cannam@127: V Tgw, TgN, TgD, TgO; cannam@127: { cannam@127: V Tgs, Tgv, Tgz, TgC; cannam@127: Tgs = VSUB(Tgq, Tgr); cannam@127: Tgv = VSUB(Tgt, Tgu); cannam@127: Tgw = VFMA(LDK(KP471396736), Tgs, VMUL(LDK(KP881921264), Tgv)); cannam@127: TgN = VFNMS(LDK(KP471396736), Tgv, VMUL(LDK(KP881921264), Tgs)); cannam@127: Tgz = VSUB(Tgx, Tgy); cannam@127: TgC = VSUB(TgA, TgB); cannam@127: TgD = VFNMS(LDK(KP471396736), TgC, VMUL(LDK(KP881921264), Tgz)); cannam@127: TgO = VFMA(LDK(KP881921264), TgC, VMUL(LDK(KP471396736), Tgz)); cannam@127: } cannam@127: TgE = VADD(Tgw, TgD); cannam@127: TgX = VSUB(TgO, TgN); cannam@127: TgP = VADD(TgN, TgO); cannam@127: TgT = VSUB(TgD, Tgw); cannam@127: } cannam@127: { cannam@127: V Th6, Thf, Th9, Thg; cannam@127: { cannam@127: V Th4, Th5, Th7, Th8; cannam@127: Th4 = VADD(Tgr, Tgq); cannam@127: Th5 = VADD(Tgt, Tgu); cannam@127: Th6 = VFMA(LDK(KP290284677), Th4, VMUL(LDK(KP956940335), Th5)); cannam@127: Thf = VFNMS(LDK(KP290284677), Th5, VMUL(LDK(KP956940335), Th4)); cannam@127: Th7 = VADD(Tgx, Tgy); cannam@127: Th8 = VADD(TgB, TgA); cannam@127: Th9 = VFNMS(LDK(KP290284677), Th8, VMUL(LDK(KP956940335), Th7)); cannam@127: Thg = VFMA(LDK(KP956940335), Th8, VMUL(LDK(KP290284677), Th7)); cannam@127: } cannam@127: Tha = VADD(Th6, Th9); cannam@127: Thp = VSUB(Thg, Thf); cannam@127: Thh = VADD(Thf, Thg); cannam@127: Thl = VSUB(Th9, Th6); cannam@127: } cannam@127: { cannam@127: V TgF, TgQ, Thn, Thq; cannam@127: TgF = VADD(Tgp, TgE); cannam@127: TgQ = VBYI(VADD(TgM, TgP)); cannam@127: ST(&(xo[WS(os, 118)]), VSUB(TgF, TgQ), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 10)]), VADD(TgF, TgQ), ovs, &(xo[0])); cannam@127: Thn = VBYI(VSUB(Thl, Thm)); cannam@127: Thq = VSUB(Tho, Thp); cannam@127: ST(&(xo[WS(os, 38)]), VADD(Thn, Thq), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 90)]), VSUB(Thq, Thn), ovs, &(xo[0])); cannam@127: } cannam@127: { cannam@127: V Thr, Ths, TgR, TgS; cannam@127: Thr = VBYI(VADD(Thm, Thl)); cannam@127: Ths = VADD(Tho, Thp); cannam@127: ST(&(xo[WS(os, 26)]), VADD(Thr, Ths), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 102)]), VSUB(Ths, Thr), ovs, &(xo[0])); cannam@127: TgR = VSUB(Tgp, TgE); cannam@127: TgS = VBYI(VSUB(TgP, TgM)); cannam@127: ST(&(xo[WS(os, 74)]), VSUB(TgR, TgS), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 54)]), VADD(TgR, TgS), ovs, &(xo[0])); cannam@127: } cannam@127: { cannam@127: V TgV, TgY, Thb, Thi; cannam@127: TgV = VBYI(VSUB(TgT, TgU)); cannam@127: TgY = VSUB(TgW, TgX); cannam@127: ST(&(xo[WS(os, 42)]), VADD(TgV, TgY), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 86)]), VSUB(TgY, TgV), ovs, &(xo[0])); cannam@127: Thb = VADD(Th3, Tha); cannam@127: Thi = VBYI(VADD(The, Thh)); cannam@127: ST(&(xo[WS(os, 122)]), VSUB(Thb, Thi), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 6)]), VADD(Thb, Thi), ovs, &(xo[0])); cannam@127: } cannam@127: { cannam@127: V Thj, Thk, TgZ, Th0; cannam@127: Thj = VSUB(Th3, Tha); cannam@127: Thk = VBYI(VSUB(Thh, The)); cannam@127: ST(&(xo[WS(os, 70)]), VSUB(Thj, Thk), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 58)]), VADD(Thj, Thk), ovs, &(xo[0])); cannam@127: TgZ = VBYI(VADD(TgU, TgT)); cannam@127: Th0 = VADD(TgW, TgX); cannam@127: ST(&(xo[WS(os, 22)]), VADD(TgZ, Th0), ovs, &(xo[0])); cannam@127: ST(&(xo[WS(os, 106)]), VSUB(Th0, TgZ), ovs, &(xo[0])); cannam@127: } cannam@127: } cannam@127: { cannam@127: V T80, T8n, T8f, T8j, T8A, T8P, T8H, T8L, T7n, T8M, T8O, T8c, T8k, T8t, T8E; cannam@127: V T8m; cannam@127: { cannam@127: V T7G, T8d, T7Z, T8e; cannam@127: { cannam@127: V T7y, T7F, T7R, T7Y; cannam@127: T7y = VADD(T7q, T7x); cannam@127: T7F = VADD(T7B, T7E); cannam@127: T7G = VFMA(LDK(KP989176509), T7y, VMUL(LDK(KP146730474), T7F)); cannam@127: T8d = VFNMS(LDK(KP146730474), T7y, VMUL(LDK(KP989176509), T7F)); cannam@127: T7R = VADD(T7J, T7Q); cannam@127: T7Y = VADD(T7U, T7X); cannam@127: T7Z = VFNMS(LDK(KP146730474), T7Y, VMUL(LDK(KP989176509), T7R)); cannam@127: T8e = VFMA(LDK(KP146730474), T7R, VMUL(LDK(KP989176509), T7Y)); cannam@127: } cannam@127: T80 = VADD(T7G, T7Z); cannam@127: T8n = VSUB(T8e, T8d); cannam@127: T8f = VADD(T8d, T8e); cannam@127: T8j = VSUB(T7Z, T7G); cannam@127: } cannam@127: { cannam@127: V T8w, T8F, T8z, T8G; cannam@127: { cannam@127: V T8u, T8v, T8x, T8y; cannam@127: T8u = VSUB(T7q, T7x); cannam@127: T8v = VSUB(T7E, T7B); cannam@127: T8w = VFMA(LDK(KP803207531), T8u, VMUL(LDK(KP595699304), T8v)); cannam@127: T8F = VFNMS(LDK(KP595699304), T8u, VMUL(LDK(KP803207531), T8v)); cannam@127: T8x = VSUB(T7J, T7Q); cannam@127: T8y = VSUB(T7X, T7U); cannam@127: T8z = VFNMS(LDK(KP595699304), T8y, VMUL(LDK(KP803207531), T8x)); cannam@127: T8G = VFMA(LDK(KP595699304), T8x, VMUL(LDK(KP803207531), T8y)); cannam@127: } cannam@127: T8A = VADD(T8w, T8z); cannam@127: T8P = VSUB(T8G, T8F); cannam@127: T8H = VADD(T8F, T8G); cannam@127: T8L = VSUB(T8z, T8w); cannam@127: } cannam@127: { cannam@127: V T77, T8r, T88, T8C, T7m, T8D, T8b, T8s, T76, T87; cannam@127: T76 = VADD(T72, T75); cannam@127: T77 = VADD(T6Z, T76); cannam@127: T8r = VSUB(T6Z, T76); cannam@127: T87 = VADD(T85, T86); cannam@127: T88 = VADD(T84, T87); cannam@127: T8C = VSUB(T87, T84); cannam@127: { cannam@127: V T7e, T7l, T89, T8a; cannam@127: T7e = VFMA(LDK(KP956940335), T7a, VMUL(LDK(KP290284677), T7d)); cannam@127: T7l = VFNMS(LDK(KP290284677), T7k, VMUL(LDK(KP956940335), T7h)); cannam@127: T7m = VADD(T7e, T7l); cannam@127: T8D = VSUB(T7l, T7e); cannam@127: T89 = VFNMS(LDK(KP290284677), T7a, VMUL(LDK(KP956940335), T7d)); cannam@127: T8a = VFMA(LDK(KP290284677), T7h, VMUL(LDK(KP956940335), T7k)); cannam@127: T8b = VADD(T89, T8a); cannam@127: T8s = VSUB(T8a, T89); cannam@127: } cannam@127: T7n = VADD(T77, T7m); cannam@127: T8M = VSUB(T8D, T8C); cannam@127: T8O = VSUB(T8r, T8s); cannam@127: T8c = VADD(T88, T8b); cannam@127: T8k = VSUB(T8b, T88); cannam@127: T8t = VADD(T8r, T8s); cannam@127: T8E = VADD(T8C, T8D); cannam@127: T8m = VSUB(T77, T7m); cannam@127: } cannam@127: { cannam@127: V T81, T8g, T8N, T8Q; cannam@127: T81 = VADD(T7n, T80); cannam@127: T8g = VBYI(VADD(T8c, T8f)); cannam@127: ST(&(xo[WS(os, 125)]), VSUB(T81, T8g), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 3)]), VADD(T81, T8g), ovs, &(xo[WS(os, 1)])); cannam@127: T8N = VBYI(VSUB(T8L, T8M)); cannam@127: T8Q = VSUB(T8O, T8P); cannam@127: ST(&(xo[WS(os, 45)]), VADD(T8N, T8Q), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 83)]), VSUB(T8Q, T8N), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: { cannam@127: V T8R, T8S, T8h, T8i; cannam@127: T8R = VBYI(VADD(T8M, T8L)); cannam@127: T8S = VADD(T8O, T8P); cannam@127: ST(&(xo[WS(os, 19)]), VADD(T8R, T8S), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 109)]), VSUB(T8S, T8R), ovs, &(xo[WS(os, 1)])); cannam@127: T8h = VSUB(T7n, T80); cannam@127: T8i = VBYI(VSUB(T8f, T8c)); cannam@127: ST(&(xo[WS(os, 67)]), VSUB(T8h, T8i), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 61)]), VADD(T8h, T8i), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: { cannam@127: V T8l, T8o, T8B, T8I; cannam@127: T8l = VBYI(VSUB(T8j, T8k)); cannam@127: T8o = VSUB(T8m, T8n); cannam@127: ST(&(xo[WS(os, 35)]), VADD(T8l, T8o), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 93)]), VSUB(T8o, T8l), ovs, &(xo[WS(os, 1)])); cannam@127: T8B = VADD(T8t, T8A); cannam@127: T8I = VBYI(VADD(T8E, T8H)); cannam@127: ST(&(xo[WS(os, 115)]), VSUB(T8B, T8I), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 13)]), VADD(T8B, T8I), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: { cannam@127: V T8J, T8K, T8p, T8q; cannam@127: T8J = VSUB(T8t, T8A); cannam@127: T8K = VBYI(VSUB(T8H, T8E)); cannam@127: ST(&(xo[WS(os, 77)]), VSUB(T8J, T8K), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 51)]), VADD(T8J, T8K), ovs, &(xo[WS(os, 1)])); cannam@127: T8p = VBYI(VADD(T8k, T8j)); cannam@127: T8q = VADD(T8m, T8n); cannam@127: ST(&(xo[WS(os, 29)]), VADD(T8p, T8q), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 99)]), VSUB(T8q, T8p), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: } cannam@127: { cannam@127: V T4K, T5d, T55, T59, T5q, T5F, T5x, T5B, T2f, T5C, T5E, T52, T5a, T5j, T5u; cannam@127: V T5c; cannam@127: { cannam@127: V T3u, T53, T4J, T54; cannam@127: { cannam@127: V T3g, T3t, T4v, T4I; cannam@127: T3g = VADD(T2G, T3f); cannam@127: T3t = VADD(T3p, T3s); cannam@127: T3u = VFMA(LDK(KP998795456), T3g, VMUL(LDK(KP049067674), T3t)); cannam@127: T53 = VFNMS(LDK(KP049067674), T3g, VMUL(LDK(KP998795456), T3t)); cannam@127: T4v = VADD(T3V, T4u); cannam@127: T4I = VADD(T4E, T4H); cannam@127: T4J = VFNMS(LDK(KP049067674), T4I, VMUL(LDK(KP998795456), T4v)); cannam@127: T54 = VFMA(LDK(KP049067674), T4v, VMUL(LDK(KP998795456), T4I)); cannam@127: } cannam@127: T4K = VADD(T3u, T4J); cannam@127: T5d = VSUB(T54, T53); cannam@127: T55 = VADD(T53, T54); cannam@127: T59 = VSUB(T4J, T3u); cannam@127: } cannam@127: { cannam@127: V T5m, T5v, T5p, T5w; cannam@127: { cannam@127: V T5k, T5l, T5n, T5o; cannam@127: T5k = VSUB(T2G, T3f); cannam@127: T5l = VSUB(T3s, T3p); cannam@127: T5m = VFMA(LDK(KP740951125), T5k, VMUL(LDK(KP671558954), T5l)); cannam@127: T5v = VFNMS(LDK(KP671558954), T5k, VMUL(LDK(KP740951125), T5l)); cannam@127: T5n = VSUB(T3V, T4u); cannam@127: T5o = VSUB(T4H, T4E); cannam@127: T5p = VFNMS(LDK(KP671558954), T5o, VMUL(LDK(KP740951125), T5n)); cannam@127: T5w = VFMA(LDK(KP671558954), T5n, VMUL(LDK(KP740951125), T5o)); cannam@127: } cannam@127: T5q = VADD(T5m, T5p); cannam@127: T5F = VSUB(T5w, T5v); cannam@127: T5x = VADD(T5v, T5w); cannam@127: T5B = VSUB(T5p, T5m); cannam@127: } cannam@127: { cannam@127: V T11, T5h, T4Y, T5s, T2e, T5t, T51, T5i, T10, T4X; cannam@127: T10 = VADD(TI, TZ); cannam@127: T11 = VADD(Tr, T10); cannam@127: T5h = VSUB(Tr, T10); cannam@127: T4X = VADD(T4V, T4W); cannam@127: T4Y = VADD(T4U, T4X); cannam@127: T5s = VSUB(T4X, T4U); cannam@127: { cannam@127: V T1C, T2d, T4Z, T50; cannam@127: T1C = VFMA(LDK(KP098017140), T1s, VMUL(LDK(KP995184726), T1B)); cannam@127: T2d = VFNMS(LDK(KP098017140), T2c, VMUL(LDK(KP995184726), T23)); cannam@127: T2e = VADD(T1C, T2d); cannam@127: T5t = VSUB(T2d, T1C); cannam@127: T4Z = VFNMS(LDK(KP098017140), T1B, VMUL(LDK(KP995184726), T1s)); cannam@127: T50 = VFMA(LDK(KP995184726), T2c, VMUL(LDK(KP098017140), T23)); cannam@127: T51 = VADD(T4Z, T50); cannam@127: T5i = VSUB(T50, T4Z); cannam@127: } cannam@127: T2f = VADD(T11, T2e); cannam@127: T5C = VSUB(T5t, T5s); cannam@127: T5E = VSUB(T5h, T5i); cannam@127: T52 = VADD(T4Y, T51); cannam@127: T5a = VSUB(T51, T4Y); cannam@127: T5j = VADD(T5h, T5i); cannam@127: T5u = VADD(T5s, T5t); cannam@127: T5c = VSUB(T11, T2e); cannam@127: } cannam@127: { cannam@127: V T4L, T56, T5D, T5G; cannam@127: T4L = VADD(T2f, T4K); cannam@127: T56 = VBYI(VADD(T52, T55)); cannam@127: ST(&(xo[WS(os, 127)]), VSUB(T4L, T56), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 1)]), VADD(T4L, T56), ovs, &(xo[WS(os, 1)])); cannam@127: T5D = VBYI(VSUB(T5B, T5C)); cannam@127: T5G = VSUB(T5E, T5F); cannam@127: ST(&(xo[WS(os, 47)]), VADD(T5D, T5G), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 81)]), VSUB(T5G, T5D), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: { cannam@127: V T5H, T5I, T57, T58; cannam@127: T5H = VBYI(VADD(T5C, T5B)); cannam@127: T5I = VADD(T5E, T5F); cannam@127: ST(&(xo[WS(os, 17)]), VADD(T5H, T5I), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 111)]), VSUB(T5I, T5H), ovs, &(xo[WS(os, 1)])); cannam@127: T57 = VSUB(T2f, T4K); cannam@127: T58 = VBYI(VSUB(T55, T52)); cannam@127: ST(&(xo[WS(os, 65)]), VSUB(T57, T58), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 63)]), VADD(T57, T58), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: { cannam@127: V T5b, T5e, T5r, T5y; cannam@127: T5b = VBYI(VSUB(T59, T5a)); cannam@127: T5e = VSUB(T5c, T5d); cannam@127: ST(&(xo[WS(os, 33)]), VADD(T5b, T5e), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 95)]), VSUB(T5e, T5b), ovs, &(xo[WS(os, 1)])); cannam@127: T5r = VADD(T5j, T5q); cannam@127: T5y = VBYI(VADD(T5u, T5x)); cannam@127: ST(&(xo[WS(os, 113)]), VSUB(T5r, T5y), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 15)]), VADD(T5r, T5y), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: { cannam@127: V T5z, T5A, T5f, T5g; cannam@127: T5z = VSUB(T5j, T5q); cannam@127: T5A = VBYI(VSUB(T5x, T5u)); cannam@127: ST(&(xo[WS(os, 79)]), VSUB(T5z, T5A), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 49)]), VADD(T5z, T5A), ovs, &(xo[WS(os, 1)])); cannam@127: T5f = VBYI(VADD(T5a, T59)); cannam@127: T5g = VADD(T5c, T5d); cannam@127: ST(&(xo[WS(os, 31)]), VADD(T5f, T5g), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 97)]), VSUB(T5g, T5f), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: } cannam@127: { cannam@127: V T9i, T9B, T9t, T9x, T9O, Ta3, T9V, T9Z, T93, Ta0, Ta2, T9q, T9y, T9H, T9S; cannam@127: V T9A; cannam@127: { cannam@127: V T9a, T9r, T9h, T9s; cannam@127: { cannam@127: V T96, T99, T9d, T9g; cannam@127: T96 = VSUB(T94, T95); cannam@127: T99 = VSUB(T97, T98); cannam@127: T9a = VFMA(LDK(KP514102744), T96, VMUL(LDK(KP857728610), T99)); cannam@127: T9r = VFNMS(LDK(KP514102744), T99, VMUL(LDK(KP857728610), T96)); cannam@127: T9d = VSUB(T9b, T9c); cannam@127: T9g = VSUB(T9e, T9f); cannam@127: T9h = VFNMS(LDK(KP514102744), T9g, VMUL(LDK(KP857728610), T9d)); cannam@127: T9s = VFMA(LDK(KP857728610), T9g, VMUL(LDK(KP514102744), T9d)); cannam@127: } cannam@127: T9i = VADD(T9a, T9h); cannam@127: T9B = VSUB(T9s, T9r); cannam@127: T9t = VADD(T9r, T9s); cannam@127: T9x = VSUB(T9h, T9a); cannam@127: } cannam@127: { cannam@127: V T9K, T9T, T9N, T9U; cannam@127: { cannam@127: V T9I, T9J, T9L, T9M; cannam@127: T9I = VADD(T95, T94); cannam@127: T9J = VADD(T97, T98); cannam@127: T9K = VFMA(LDK(KP242980179), T9I, VMUL(LDK(KP970031253), T9J)); cannam@127: T9T = VFNMS(LDK(KP242980179), T9J, VMUL(LDK(KP970031253), T9I)); cannam@127: T9L = VADD(T9b, T9c); cannam@127: T9M = VADD(T9f, T9e); cannam@127: T9N = VFNMS(LDK(KP242980179), T9M, VMUL(LDK(KP970031253), T9L)); cannam@127: T9U = VFMA(LDK(KP970031253), T9M, VMUL(LDK(KP242980179), T9L)); cannam@127: } cannam@127: T9O = VADD(T9K, T9N); cannam@127: Ta3 = VSUB(T9U, T9T); cannam@127: T9V = VADD(T9T, T9U); cannam@127: T9Z = VSUB(T9N, T9K); cannam@127: } cannam@127: { cannam@127: V T8V, T9F, T9m, T9Q, T92, T9R, T9p, T9G, T8U, T9k; cannam@127: T8U = VSUB(T86, T85); cannam@127: T8V = VSUB(T8T, T8U); cannam@127: T9F = VADD(T8T, T8U); cannam@127: T9k = VSUB(T75, T72); cannam@127: T9m = VSUB(T9k, T9l); cannam@127: T9Q = VADD(T9l, T9k); cannam@127: { cannam@127: V T8Y, T91, T9n, T9o; cannam@127: T8Y = VFMA(LDK(KP471396736), T8W, VMUL(LDK(KP881921264), T8X)); cannam@127: T91 = VFNMS(LDK(KP471396736), T90, VMUL(LDK(KP881921264), T8Z)); cannam@127: T92 = VSUB(T8Y, T91); cannam@127: T9R = VADD(T91, T8Y); cannam@127: T9n = VFNMS(LDK(KP471396736), T8X, VMUL(LDK(KP881921264), T8W)); cannam@127: T9o = VFMA(LDK(KP881921264), T90, VMUL(LDK(KP471396736), T8Z)); cannam@127: T9p = VSUB(T9n, T9o); cannam@127: T9G = VADD(T9o, T9n); cannam@127: } cannam@127: T93 = VADD(T8V, T92); cannam@127: Ta0 = VSUB(T9R, T9Q); cannam@127: Ta2 = VSUB(T9F, T9G); cannam@127: T9q = VADD(T9m, T9p); cannam@127: T9y = VSUB(T9p, T9m); cannam@127: T9H = VADD(T9F, T9G); cannam@127: T9S = VADD(T9Q, T9R); cannam@127: T9A = VSUB(T8V, T92); cannam@127: } cannam@127: { cannam@127: V T9j, T9u, Ta1, Ta4; cannam@127: T9j = VADD(T93, T9i); cannam@127: T9u = VBYI(VADD(T9q, T9t)); cannam@127: ST(&(xo[WS(os, 117)]), VSUB(T9j, T9u), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 11)]), VADD(T9j, T9u), ovs, &(xo[WS(os, 1)])); cannam@127: Ta1 = VBYI(VSUB(T9Z, Ta0)); cannam@127: Ta4 = VSUB(Ta2, Ta3); cannam@127: ST(&(xo[WS(os, 37)]), VADD(Ta1, Ta4), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 91)]), VSUB(Ta4, Ta1), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: { cannam@127: V Ta5, Ta6, T9v, T9w; cannam@127: Ta5 = VBYI(VADD(Ta0, T9Z)); cannam@127: Ta6 = VADD(Ta2, Ta3); cannam@127: ST(&(xo[WS(os, 27)]), VADD(Ta5, Ta6), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 101)]), VSUB(Ta6, Ta5), ovs, &(xo[WS(os, 1)])); cannam@127: T9v = VSUB(T93, T9i); cannam@127: T9w = VBYI(VSUB(T9t, T9q)); cannam@127: ST(&(xo[WS(os, 75)]), VSUB(T9v, T9w), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 53)]), VADD(T9v, T9w), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: { cannam@127: V T9z, T9C, T9P, T9W; cannam@127: T9z = VBYI(VSUB(T9x, T9y)); cannam@127: T9C = VSUB(T9A, T9B); cannam@127: ST(&(xo[WS(os, 43)]), VADD(T9z, T9C), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 85)]), VSUB(T9C, T9z), ovs, &(xo[WS(os, 1)])); cannam@127: T9P = VADD(T9H, T9O); cannam@127: T9W = VBYI(VADD(T9S, T9V)); cannam@127: ST(&(xo[WS(os, 123)]), VSUB(T9P, T9W), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 5)]), VADD(T9P, T9W), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: { cannam@127: V T9X, T9Y, T9D, T9E; cannam@127: T9X = VSUB(T9H, T9O); cannam@127: T9Y = VBYI(VSUB(T9V, T9S)); cannam@127: ST(&(xo[WS(os, 69)]), VSUB(T9X, T9Y), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 59)]), VADD(T9X, T9Y), ovs, &(xo[WS(os, 1)])); cannam@127: T9D = VBYI(VADD(T9y, T9x)); cannam@127: T9E = VADD(T9A, T9B); cannam@127: ST(&(xo[WS(os, 21)]), VADD(T9D, T9E), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 107)]), VSUB(T9E, T9D), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: } cannam@127: { cannam@127: V T68, T6r, T6j, T6n, T6E, T6T, T6L, T6P, T5T, T6Q, T6S, T6g, T6o, T6x, T6I; cannam@127: V T6q; cannam@127: { cannam@127: V T60, T6h, T67, T6i; cannam@127: { cannam@127: V T5W, T5Z, T63, T66; cannam@127: T5W = VSUB(T5U, T5V); cannam@127: T5Z = VSUB(T5X, T5Y); cannam@127: T60 = VFMA(LDK(KP427555093), T5W, VMUL(LDK(KP903989293), T5Z)); cannam@127: T6h = VFNMS(LDK(KP427555093), T5Z, VMUL(LDK(KP903989293), T5W)); cannam@127: T63 = VSUB(T61, T62); cannam@127: T66 = VSUB(T64, T65); cannam@127: T67 = VFNMS(LDK(KP427555093), T66, VMUL(LDK(KP903989293), T63)); cannam@127: T6i = VFMA(LDK(KP903989293), T66, VMUL(LDK(KP427555093), T63)); cannam@127: } cannam@127: T68 = VADD(T60, T67); cannam@127: T6r = VSUB(T6i, T6h); cannam@127: T6j = VADD(T6h, T6i); cannam@127: T6n = VSUB(T67, T60); cannam@127: } cannam@127: { cannam@127: V T6A, T6J, T6D, T6K; cannam@127: { cannam@127: V T6y, T6z, T6B, T6C; cannam@127: T6y = VADD(T5V, T5U); cannam@127: T6z = VADD(T5X, T5Y); cannam@127: T6A = VFMA(LDK(KP336889853), T6y, VMUL(LDK(KP941544065), T6z)); cannam@127: T6J = VFNMS(LDK(KP336889853), T6z, VMUL(LDK(KP941544065), T6y)); cannam@127: T6B = VADD(T61, T62); cannam@127: T6C = VADD(T65, T64); cannam@127: T6D = VFNMS(LDK(KP336889853), T6C, VMUL(LDK(KP941544065), T6B)); cannam@127: T6K = VFMA(LDK(KP941544065), T6C, VMUL(LDK(KP336889853), T6B)); cannam@127: } cannam@127: T6E = VADD(T6A, T6D); cannam@127: T6T = VSUB(T6K, T6J); cannam@127: T6L = VADD(T6J, T6K); cannam@127: T6P = VSUB(T6D, T6A); cannam@127: } cannam@127: { cannam@127: V T5L, T6v, T6c, T6G, T5S, T6H, T6f, T6w, T5K, T6a; cannam@127: T5K = VSUB(T4W, T4V); cannam@127: T5L = VSUB(T5J, T5K); cannam@127: T6v = VADD(T5J, T5K); cannam@127: T6a = VSUB(TZ, TI); cannam@127: T6c = VSUB(T6a, T6b); cannam@127: T6G = VADD(T6b, T6a); cannam@127: { cannam@127: V T5O, T5R, T6d, T6e; cannam@127: T5O = VFMA(LDK(KP773010453), T5M, VMUL(LDK(KP634393284), T5N)); cannam@127: T5R = VFNMS(LDK(KP634393284), T5Q, VMUL(LDK(KP773010453), T5P)); cannam@127: T5S = VSUB(T5O, T5R); cannam@127: T6H = VADD(T5R, T5O); cannam@127: T6d = VFNMS(LDK(KP634393284), T5M, VMUL(LDK(KP773010453), T5N)); cannam@127: T6e = VFMA(LDK(KP634393284), T5P, VMUL(LDK(KP773010453), T5Q)); cannam@127: T6f = VSUB(T6d, T6e); cannam@127: T6w = VADD(T6e, T6d); cannam@127: } cannam@127: T5T = VADD(T5L, T5S); cannam@127: T6Q = VSUB(T6H, T6G); cannam@127: T6S = VSUB(T6v, T6w); cannam@127: T6g = VADD(T6c, T6f); cannam@127: T6o = VSUB(T6f, T6c); cannam@127: T6x = VADD(T6v, T6w); cannam@127: T6I = VADD(T6G, T6H); cannam@127: T6q = VSUB(T5L, T5S); cannam@127: } cannam@127: { cannam@127: V T69, T6k, T6R, T6U; cannam@127: T69 = VADD(T5T, T68); cannam@127: T6k = VBYI(VADD(T6g, T6j)); cannam@127: ST(&(xo[WS(os, 119)]), VSUB(T69, T6k), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 9)]), VADD(T69, T6k), ovs, &(xo[WS(os, 1)])); cannam@127: T6R = VBYI(VSUB(T6P, T6Q)); cannam@127: T6U = VSUB(T6S, T6T); cannam@127: ST(&(xo[WS(os, 39)]), VADD(T6R, T6U), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 89)]), VSUB(T6U, T6R), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: { cannam@127: V T6V, T6W, T6l, T6m; cannam@127: T6V = VBYI(VADD(T6Q, T6P)); cannam@127: T6W = VADD(T6S, T6T); cannam@127: ST(&(xo[WS(os, 25)]), VADD(T6V, T6W), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 103)]), VSUB(T6W, T6V), ovs, &(xo[WS(os, 1)])); cannam@127: T6l = VSUB(T5T, T68); cannam@127: T6m = VBYI(VSUB(T6j, T6g)); cannam@127: ST(&(xo[WS(os, 73)]), VSUB(T6l, T6m), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 55)]), VADD(T6l, T6m), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: { cannam@127: V T6p, T6s, T6F, T6M; cannam@127: T6p = VBYI(VSUB(T6n, T6o)); cannam@127: T6s = VSUB(T6q, T6r); cannam@127: ST(&(xo[WS(os, 41)]), VADD(T6p, T6s), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 87)]), VSUB(T6s, T6p), ovs, &(xo[WS(os, 1)])); cannam@127: T6F = VADD(T6x, T6E); cannam@127: T6M = VBYI(VADD(T6I, T6L)); cannam@127: ST(&(xo[WS(os, 121)]), VSUB(T6F, T6M), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 7)]), VADD(T6F, T6M), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: { cannam@127: V T6N, T6O, T6t, T6u; cannam@127: T6N = VSUB(T6x, T6E); cannam@127: T6O = VBYI(VSUB(T6L, T6I)); cannam@127: ST(&(xo[WS(os, 71)]), VSUB(T6N, T6O), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 57)]), VADD(T6N, T6O), ovs, &(xo[WS(os, 1)])); cannam@127: T6t = VBYI(VADD(T6o, T6n)); cannam@127: T6u = VADD(T6q, T6r); cannam@127: ST(&(xo[WS(os, 23)]), VADD(T6t, T6u), ovs, &(xo[WS(os, 1)])); cannam@127: ST(&(xo[WS(os, 105)]), VSUB(T6u, T6t), ovs, &(xo[WS(os, 1)])); cannam@127: } cannam@127: } cannam@127: } cannam@127: } cannam@127: VLEAVE(); cannam@127: } cannam@127: cannam@127: static const kdft_desc desc = { 128, XSIMD_STRING("n1fv_128"), {938, 186, 144, 0}, &GENUS, 0, 0, 0, 0 }; cannam@127: cannam@127: void XSIMD(codelet_n1fv_128) (planner *p) { cannam@127: X(kdft_register) (p, n1fv_128, &desc); cannam@127: } cannam@127: cannam@127: #endif /* HAVE_FMA */