Mercurial > hg > sv-dependency-builds

annotate src/fftw-3.3.8/dft/simd/common/n1fv_128.c @ 83:ae30d91d2ffe

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Replace these with versions built using an older toolset (so as to avoid ABI compatibilities when linking on Ubuntu 14.04 for packaging purposes)
author Chris Cannam
date Fri, 07 Feb 2020 11:51:13 +0000
parents d0c2a83c1364
children
rev   line source
Chris@82 1 /*
Chris@82 2 * Copyright (c) 2003, 2007-14 Matteo Frigo
Chris@82 3 * Copyright (c) 2003, 2007-14 Massachusetts Institute of Technology
Chris@82 4 *
Chris@82 5 * This program is free software; you can redistribute it and/or modify
Chris@82 6 * it under the terms of the GNU General Public License as published by
Chris@82 7 * the Free Software Foundation; either version 2 of the License, or
Chris@82 8 * (at your option) any later version.
Chris@82 9 *
Chris@82 10 * This program is distributed in the hope that it will be useful,
Chris@82 11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
Chris@82 12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
Chris@82 13 * GNU General Public License for more details.
Chris@82 14 *
Chris@82 15 * You should have received a copy of the GNU General Public License
Chris@82 16 * along with this program; if not, write to the Free Software
Chris@82 17 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
Chris@82 18 *
Chris@82 19 */
Chris@82 20
Chris@82 21 /* This file was automatically generated --- DO NOT EDIT */
Chris@82 22 /* Generated on Thu May 24 08:04:53 EDT 2018 */
Chris@82 23
Chris@82 24 #include "dft/codelet-dft.h"
Chris@82 25
Chris@82 26 #if defined(ARCH_PREFERS_FMA) || defined(ISA_EXTENSION_PREFERS_FMA)
Chris@82 27
Chris@82 28 /* Generated by: ../../../genfft/gen_notw_c.native -fma -simd -compact -variables 4 -pipeline-latency 8 -n 128 -name n1fv_128 -include dft/simd/n1f.h */
Chris@82 29
Chris@82 30 /*
Chris@82 31 * This function contains 1082 FP additions, 642 FP multiplications,
Chris@82 32 * (or, 440 additions, 0 multiplications, 642 fused multiply/add),
Chris@82 33 * 194 stack variables, 31 constants, and 256 memory accesses
Chris@82 34 */
Chris@82 35 #include "dft/simd/n1f.h"
Chris@82 36
Chris@82 37 static void n1fv_128(const R *ri, const R *ii, R *ro, R *io, stride is, stride os, INT v, INT ivs, INT ovs)
Chris@82 38 {
Chris@82 39 DVK(KP941544065, +0.941544065183020778412509402599502357185589796);
Chris@82 40 DVK(KP903989293, +0.903989293123443331586200297230537048710132025);
Chris@82 41 DVK(KP357805721, +0.357805721314524104672487743774474392487532769);
Chris@82 42 DVK(KP472964775, +0.472964775891319928124438237972992463904131113);
Chris@82 43 DVK(KP970031253, +0.970031253194543992603984207286100251456865962);
Chris@82 44 DVK(KP857728610, +0.857728610000272069902269984284770137042490799);
Chris@82 45 DVK(KP250486960, +0.250486960191305461595702160124721208578685568);
Chris@82 46 DVK(KP599376933, +0.599376933681923766271389869014404232837890546);
Chris@82 47 DVK(KP740951125, +0.740951125354959091175616897495162729728955309);
Chris@82 48 DVK(KP998795456, +0.998795456205172392714771604759100694443203615);
Chris@82 49 DVK(KP906347169, +0.906347169019147157946142717268914412664134293);
Chris@82 50 DVK(KP049126849, +0.049126849769467254105343321271313617079695752);
Chris@82 51 DVK(KP803207531, +0.803207531480644909806676512963141923879569427);
Chris@82 52 DVK(KP989176509, +0.989176509964780973451673738016243063983689533);
Chris@82 53 DVK(KP741650546, +0.741650546272035369581266691172079863842265220);
Chris@82 54 DVK(KP148335987, +0.148335987538347428753676511486911367000625355);
Chris@82 55 DVK(KP956940335, +0.956940335732208864935797886980269969482849206);
Chris@82 56 DVK(KP881921264, +0.881921264348355029712756863660388349508442621);
Chris@82 57 DVK(KP303346683, +0.303346683607342391675883946941299872384187453);
Chris@82 58 DVK(KP534511135, +0.534511135950791641089685961295362908582039528);
Chris@82 59 DVK(KP773010453, +0.773010453362736960810906609758469800971041293);
Chris@82 60 DVK(KP995184726, +0.995184726672196886244836953109479921575474869);
Chris@82 61 DVK(KP820678790, +0.820678790828660330972281985331011598767386482);
Chris@82 62 DVK(KP098491403, +0.098491403357164253077197521291327432293052451);
Chris@82 63 DVK(KP831469612, +0.831469612302545237078788377617905756738560812);
Chris@82 64 DVK(KP980785280, +0.980785280403230449126182236134239036973933731);
Chris@82 65 DVK(KP668178637, +0.668178637919298919997757686523080761552472251);
Chris@82 66 DVK(KP198912367, +0.198912367379658006911597622644676228597850501);
Chris@82 67 DVK(KP923879532, +0.923879532511286756128183189396788286822416626);
Chris@82 68 DVK(KP707106781, +0.707106781186547524400844362104849039284835938);
Chris@82 69 DVK(KP414213562, +0.414213562373095048801688724209698078569671875);
Chris@82 70 {
Chris@82 71 INT i;
Chris@82 72 const R *xi;
Chris@82 73 R *xo;
Chris@82 74 xi = ri;
Chris@82 75 xo = ro;
Chris@82 76 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)) {
Chris@82 77 V Tr, T5J, Ted, Tgf, Tfq, TgG, T4U, T6a, T6Z, T8T, Tad, TcZ, Tcc, Td0, T84;
Chris@82 78 V T9k, Tb6, Tbt, T2G, T5U, TeV, Tgt, T3p, T5X, T7B, T97, TeK, Tgq, T7q, T94;
Chris@82 79 V Td8, TdK, TbD, Tc0, T3V, T61, Tfg, TgA, T4E, T64, T7U, T9e, Tf5, Tgx, T7J;
Chris@82 80 V T9b, Tdf, TdN, Td2, Td3, TI, T4V, Tft, Tgg, TZ, T4W, T75, T86, Tek, TgH;
Chris@82 81 V T72, T85, Tas, Tcd, Tdp, Tdq, TdG, Teq, Tgj, Tet, Tgi, T1s, T5N, T1B, T5M;
Chris@82 82 V T7d, T8W, TaI, Tcg, T7a, T8X, Tdm, Tdn, TdH, Tez, Tgm, TeC, Tgl, T23, T5Q;
Chris@82 83 V T2c, T5P, T7k, T8Z, TaX, Tcf, T7h, T90, Tbl, Tbu, Tdb, TdL, TeY, Tgr, TeR;
Chris@82 84 V Tgu, T7x, T98, T7E, T95, T3f, T5Y, T3s, T5V, TbS, Tc1, Tdi, TdO, Tfj, Tgy;
Chris@82 85 V Tfc, TgB, T7Q, T9f, T7X, T9c, T4u, T65, T4H, T62;
Chris@82 86 {
Chris@82 87 V T3, Ta7, T4O, Ta8, Ta, Tab, T4P, Taa, Tc9, Tca, Ti, Tea, T4R, Tc6, Tc7;
Chris@82 88 V Tp, Teb, T4S;
Chris@82 89 {
Chris@82 90 V T1, T2, T4M, T4N;
Chris@82 91 T1 = LD(&(xi[0]), ivs, &(xi[0]));
Chris@82 92 T2 = LD(&(xi[WS(is, 64)]), ivs, &(xi[0]));
Chris@82 93 T3 = VSUB(T1, T2);
Chris@82 94 Ta7 = VADD(T1, T2);
Chris@82 95 T4M = LD(&(xi[WS(is, 32)]), ivs, &(xi[0]));
Chris@82 96 T4N = LD(&(xi[WS(is, 96)]), ivs, &(xi[0]));
Chris@82 97 T4O = VSUB(T4M, T4N);
Chris@82 98 Ta8 = VADD(T4M, T4N);
Chris@82 99 }
Chris@82 100 {
Chris@82 101 V T4, T5, T6, T7, T8, T9;
Chris@82 102 T4 = LD(&(xi[WS(is, 16)]), ivs, &(xi[0]));
Chris@82 103 T5 = LD(&(xi[WS(is, 80)]), ivs, &(xi[0]));
Chris@82 104 T6 = VSUB(T4, T5);
Chris@82 105 T7 = LD(&(xi[WS(is, 112)]), ivs, &(xi[0]));
Chris@82 106 T8 = LD(&(xi[WS(is, 48)]), ivs, &(xi[0]));
Chris@82 107 T9 = VSUB(T7, T8);
Chris@82 108 Ta = VADD(T6, T9);
Chris@82 109 Tab = VADD(T7, T8);
Chris@82 110 T4P = VSUB(T9, T6);
Chris@82 111 Taa = VADD(T4, T5);
Chris@82 112 }
Chris@82 113 {
Chris@82 114 V Te, Th, Tl, To;
Chris@82 115 {
Chris@82 116 V Tc, Td, Tf, Tg;
Chris@82 117 Tc = LD(&(xi[WS(is, 8)]), ivs, &(xi[0]));
Chris@82 118 Td = LD(&(xi[WS(is, 72)]), ivs, &(xi[0]));
Chris@82 119 Te = VSUB(Tc, Td);
Chris@82 120 Tc9 = VADD(Tc, Td);
Chris@82 121 Tf = LD(&(xi[WS(is, 40)]), ivs, &(xi[0]));
Chris@82 122 Tg = LD(&(xi[WS(is, 104)]), ivs, &(xi[0]));
Chris@82 123 Th = VSUB(Tf, Tg);
Chris@82 124 Tca = VADD(Tf, Tg);
Chris@82 125 }
Chris@82 126 Ti = VFNMS(LDK(KP414213562), Th, Te);
Chris@82 127 Tea = VSUB(Tc9, Tca);
Chris@82 128 T4R = VFMA(LDK(KP414213562), Te, Th);
Chris@82 129 {
Chris@82 130 V Tj, Tk, Tm, Tn;
Chris@82 131 Tj = LD(&(xi[WS(is, 120)]), ivs, &(xi[0]));
Chris@82 132 Tk = LD(&(xi[WS(is, 56)]), ivs, &(xi[0]));
Chris@82 133 Tl = VSUB(Tj, Tk);
Chris@82 134 Tc6 = VADD(Tj, Tk);
Chris@82 135 Tm = LD(&(xi[WS(is, 88)]), ivs, &(xi[0]));
Chris@82 136 Tn = LD(&(xi[WS(is, 24)]), ivs, &(xi[0]));
Chris@82 137 To = VSUB(Tm, Tn);
Chris@82 138 Tc7 = VADD(Tn, Tm);
Chris@82 139 }
Chris@82 140 Tp = VFNMS(LDK(KP414213562), To, Tl);
Chris@82 141 Teb = VSUB(Tc6, Tc7);
Chris@82 142 T4S = VFMA(LDK(KP414213562), Tl, To);
Chris@82 143 }
Chris@82 144 {
Chris@82 145 V Tb, Tq, Te9, Tec;
Chris@82 146 Tb = VFMA(LDK(KP707106781), Ta, T3);
Chris@82 147 Tq = VADD(Ti, Tp);
Chris@82 148 Tr = VFMA(LDK(KP923879532), Tq, Tb);
Chris@82 149 T5J = VFNMS(LDK(KP923879532), Tq, Tb);
Chris@82 150 Te9 = VSUB(Ta7, Ta8);
Chris@82 151 Tec = VADD(Tea, Teb);
Chris@82 152 Ted = VFMA(LDK(KP707106781), Tec, Te9);
Chris@82 153 Tgf = VFNMS(LDK(KP707106781), Tec, Te9);
Chris@82 154 }
Chris@82 155 {
Chris@82 156 V Tfo, Tfp, T4Q, T4T;
Chris@82 157 Tfo = VSUB(Tab, Taa);
Chris@82 158 Tfp = VSUB(Teb, Tea);
Chris@82 159 Tfq = VFMA(LDK(KP707106781), Tfp, Tfo);
Chris@82 160 TgG = VFNMS(LDK(KP707106781), Tfp, Tfo);
Chris@82 161 T4Q = VFNMS(LDK(KP707106781), T4P, T4O);
Chris@82 162 T4T = VSUB(T4R, T4S);
Chris@82 163 T4U = VFMA(LDK(KP923879532), T4T, T4Q);
Chris@82 164 T6a = VFNMS(LDK(KP923879532), T4T, T4Q);
Chris@82 165 }
Chris@82 166 {
Chris@82 167 V T6X, T6Y, Ta9, Tac;
Chris@82 168 T6X = VFNMS(LDK(KP707106781), Ta, T3);
Chris@82 169 T6Y = VADD(T4R, T4S);
Chris@82 170 T6Z = VFMA(LDK(KP923879532), T6Y, T6X);
Chris@82 171 T8T = VFNMS(LDK(KP923879532), T6Y, T6X);
Chris@82 172 Ta9 = VADD(Ta7, Ta8);
Chris@82 173 Tac = VADD(Taa, Tab);
Chris@82 174 Tad = VSUB(Ta9, Tac);
Chris@82 175 TcZ = VADD(Ta9, Tac);
Chris@82 176 }
Chris@82 177 {
Chris@82 178 V Tc8, Tcb, T82, T83;
Chris@82 179 Tc8 = VADD(Tc6, Tc7);
Chris@82 180 Tcb = VADD(Tc9, Tca);
Chris@82 181 Tcc = VSUB(Tc8, Tcb);
Chris@82 182 Td0 = VADD(Tcb, Tc8);
Chris@82 183 T82 = VFMA(LDK(KP707106781), T4P, T4O);
Chris@82 184 T83 = VSUB(Tp, Ti);
Chris@82 185 T84 = VFMA(LDK(KP923879532), T83, T82);
Chris@82 186 T9k = VFNMS(LDK(KP923879532), T83, T82);
Chris@82 187 }
Chris@82 188 }
Chris@82 189 {
Chris@82 190 V Tb0, Tb1, T2i, Tb2, T3j, Tb3, Tb4, T2p, Tb5, T3k, T2x, TeH, T3m, Tbp, T2E;
Chris@82 191 V TeI, T3n, Tbs, T2l, T2o, TeG, TeJ;
Chris@82 192 {
Chris@82 193 V T2g, T2h, T3h, T3i;
Chris@82 194 T2g = LD(&(xi[WS(is, 1)]), ivs, &(xi[WS(is, 1)]));
Chris@82 195 T2h = LD(&(xi[WS(is, 65)]), ivs, &(xi[WS(is, 1)]));
Chris@82 196 Tb0 = VADD(T2g, T2h);
Chris@82 197 T3h = LD(&(xi[WS(is, 33)]), ivs, &(xi[WS(is, 1)]));
Chris@82 198 T3i = LD(&(xi[WS(is, 97)]), ivs, &(xi[WS(is, 1)]));
Chris@82 199 Tb1 = VADD(T3h, T3i);
Chris@82 200 T2i = VSUB(T2g, T2h);
Chris@82 201 Tb2 = VADD(Tb0, Tb1);
Chris@82 202 T3j = VSUB(T3h, T3i);
Chris@82 203 }
Chris@82 204 {
Chris@82 205 V T2j, T2k, T2m, T2n;
Chris@82 206 T2j = LD(&(xi[WS(is, 17)]), ivs, &(xi[WS(is, 1)]));
Chris@82 207 T2k = LD(&(xi[WS(is, 81)]), ivs, &(xi[WS(is, 1)]));
Chris@82 208 T2l = VSUB(T2j, T2k);
Chris@82 209 Tb3 = VADD(T2j, T2k);
Chris@82 210 T2m = LD(&(xi[WS(is, 113)]), ivs, &(xi[WS(is, 1)]));
Chris@82 211 T2n = LD(&(xi[WS(is, 49)]), ivs, &(xi[WS(is, 1)]));
Chris@82 212 T2o = VSUB(T2m, T2n);
Chris@82 213 Tb4 = VADD(T2m, T2n);
Chris@82 214 }
Chris@82 215 T2p = VADD(T2l, T2o);
Chris@82 216 Tb5 = VADD(Tb3, Tb4);
Chris@82 217 T3k = VSUB(T2l, T2o);
Chris@82 218 {
Chris@82 219 V T2t, Tbn, T2w, Tbo;
Chris@82 220 {
Chris@82 221 V T2r, T2s, T2u, T2v;
Chris@82 222 T2r = LD(&(xi[WS(is, 9)]), ivs, &(xi[WS(is, 1)]));
Chris@82 223 T2s = LD(&(xi[WS(is, 73)]), ivs, &(xi[WS(is, 1)]));
Chris@82 224 T2t = VSUB(T2r, T2s);
Chris@82 225 Tbn = VADD(T2r, T2s);
Chris@82 226 T2u = LD(&(xi[WS(is, 41)]), ivs, &(xi[WS(is, 1)]));
Chris@82 227 T2v = LD(&(xi[WS(is, 105)]), ivs, &(xi[WS(is, 1)]));
Chris@82 228 T2w = VSUB(T2u, T2v);
Chris@82 229 Tbo = VADD(T2u, T2v);
Chris@82 230 }
Chris@82 231 T2x = VFNMS(LDK(KP414213562), T2w, T2t);
Chris@82 232 TeH = VSUB(Tbn, Tbo);
Chris@82 233 T3m = VFMA(LDK(KP414213562), T2t, T2w);
Chris@82 234 Tbp = VADD(Tbn, Tbo);
Chris@82 235 }
Chris@82 236 {
Chris@82 237 V T2A, Tbq, T2D, Tbr;
Chris@82 238 {
Chris@82 239 V T2y, T2z, T2B, T2C;
Chris@82 240 T2y = LD(&(xi[WS(is, 121)]), ivs, &(xi[WS(is, 1)]));
Chris@82 241 T2z = LD(&(xi[WS(is, 57)]), ivs, &(xi[WS(is, 1)]));
Chris@82 242 T2A = VSUB(T2y, T2z);
Chris@82 243 Tbq = VADD(T2y, T2z);
Chris@82 244 T2B = LD(&(xi[WS(is, 25)]), ivs, &(xi[WS(is, 1)]));
Chris@82 245 T2C = LD(&(xi[WS(is, 89)]), ivs, &(xi[WS(is, 1)]));
Chris@82 246 T2D = VSUB(T2B, T2C);
Chris@82 247 Tbr = VADD(T2B, T2C);
Chris@82 248 }
Chris@82 249 T2E = VFMA(LDK(KP414213562), T2D, T2A);
Chris@82 250 TeI = VSUB(Tbq, Tbr);
Chris@82 251 T3n = VFNMS(LDK(KP414213562), T2A, T2D);
Chris@82 252 Tbs = VADD(Tbq, Tbr);
Chris@82 253 }
Chris@82 254 Tb6 = VSUB(Tb2, Tb5);
Chris@82 255 Tbt = VSUB(Tbp, Tbs);
Chris@82 256 {
Chris@82 257 V T2q, T2F, TeT, TeU;
Chris@82 258 T2q = VFMA(LDK(KP707106781), T2p, T2i);
Chris@82 259 T2F = VADD(T2x, T2E);
Chris@82 260 T2G = VFMA(LDK(KP923879532), T2F, T2q);
Chris@82 261 T5U = VFNMS(LDK(KP923879532), T2F, T2q);
Chris@82 262 TeT = VSUB(Tb3, Tb4);
Chris@82 263 TeU = VSUB(TeH, TeI);
Chris@82 264 TeV = VFMA(LDK(KP707106781), TeU, TeT);
Chris@82 265 Tgt = VFNMS(LDK(KP707106781), TeU, TeT);
Chris@82 266 }
Chris@82 267 {
Chris@82 268 V T3l, T3o, T7z, T7A;
Chris@82 269 T3l = VFMA(LDK(KP707106781), T3k, T3j);
Chris@82 270 T3o = VADD(T3m, T3n);
Chris@82 271 T3p = VFMA(LDK(KP923879532), T3o, T3l);
Chris@82 272 T5X = VFNMS(LDK(KP923879532), T3o, T3l);
Chris@82 273 T7z = VFNMS(LDK(KP707106781), T3k, T3j);
Chris@82 274 T7A = VSUB(T2x, T2E);
Chris@82 275 T7B = VFNMS(LDK(KP923879532), T7A, T7z);
Chris@82 276 T97 = VFMA(LDK(KP923879532), T7A, T7z);
Chris@82 277 }
Chris@82 278 TeG = VSUB(Tb0, Tb1);
Chris@82 279 TeJ = VADD(TeH, TeI);
Chris@82 280 TeK = VFMA(LDK(KP707106781), TeJ, TeG);
Chris@82 281 Tgq = VFNMS(LDK(KP707106781), TeJ, TeG);
Chris@82 282 {
Chris@82 283 V T7o, T7p, Td6, Td7;
Chris@82 284 T7o = VFNMS(LDK(KP707106781), T2p, T2i);
Chris@82 285 T7p = VSUB(T3m, T3n);
Chris@82 286 T7q = VFMA(LDK(KP923879532), T7p, T7o);
Chris@82 287 T94 = VFNMS(LDK(KP923879532), T7p, T7o);
Chris@82 288 Td6 = VADD(Tb2, Tb5);
Chris@82 289 Td7 = VADD(Tbp, Tbs);
Chris@82 290 Td8 = VADD(Td6, Td7);
Chris@82 291 TdK = VSUB(Td6, Td7);
Chris@82 292 }
Chris@82 293 }
Chris@82 294 {
Chris@82 295 V Tbx, Tby, T3x, Tbz, T4y, TbA, TbB, T3E, TbC, T4z, T3M, Tf2, T4B, TbZ, T3T;
Chris@82 296 V Tf3, T4C, TbW, T3A, T3D, Tf1, Tf4;
Chris@82 297 {
Chris@82 298 V T3v, T3w, T4w, T4x;
Chris@82 299 T3v = LD(&(xi[WS(is, 127)]), ivs, &(xi[WS(is, 1)]));
Chris@82 300 T3w = LD(&(xi[WS(is, 63)]), ivs, &(xi[WS(is, 1)]));
Chris@82 301 Tbx = VADD(T3v, T3w);
Chris@82 302 T4w = LD(&(xi[WS(is, 95)]), ivs, &(xi[WS(is, 1)]));
Chris@82 303 T4x = LD(&(xi[WS(is, 31)]), ivs, &(xi[WS(is, 1)]));
Chris@82 304 Tby = VADD(T4x, T4w);
Chris@82 305 T3x = VSUB(T3v, T3w);
Chris@82 306 Tbz = VADD(Tbx, Tby);
Chris@82 307 T4y = VSUB(T4w, T4x);
Chris@82 308 }
Chris@82 309 {
Chris@82 310 V T3y, T3z, T3B, T3C;
Chris@82 311 T3y = LD(&(xi[WS(is, 15)]), ivs, &(xi[WS(is, 1)]));
Chris@82 312 T3z = LD(&(xi[WS(is, 79)]), ivs, &(xi[WS(is, 1)]));
Chris@82 313 T3A = VSUB(T3y, T3z);
Chris@82 314 TbA = VADD(T3y, T3z);
Chris@82 315 T3B = LD(&(xi[WS(is, 111)]), ivs, &(xi[WS(is, 1)]));
Chris@82 316 T3C = LD(&(xi[WS(is, 47)]), ivs, &(xi[WS(is, 1)]));
Chris@82 317 T3D = VSUB(T3B, T3C);
Chris@82 318 TbB = VADD(T3B, T3C);
Chris@82 319 }
Chris@82 320 T3E = VADD(T3A, T3D);
Chris@82 321 TbC = VADD(TbA, TbB);
Chris@82 322 T4z = VSUB(T3D, T3A);
Chris@82 323 {
Chris@82 324 V T3I, TbX, T3L, TbY;
Chris@82 325 {
Chris@82 326 V T3G, T3H, T3J, T3K;
Chris@82 327 T3G = LD(&(xi[WS(is, 7)]), ivs, &(xi[WS(is, 1)]));
Chris@82 328 T3H = LD(&(xi[WS(is, 71)]), ivs, &(xi[WS(is, 1)]));
Chris@82 329 T3I = VSUB(T3G, T3H);
Chris@82 330 TbX = VADD(T3G, T3H);
Chris@82 331 T3J = LD(&(xi[WS(is, 103)]), ivs, &(xi[WS(is, 1)]));
Chris@82 332 T3K = LD(&(xi[WS(is, 39)]), ivs, &(xi[WS(is, 1)]));
Chris@82 333 T3L = VSUB(T3J, T3K);
Chris@82 334 TbY = VADD(T3K, T3J);
Chris@82 335 }
Chris@82 336 T3M = VFMA(LDK(KP414213562), T3L, T3I);
Chris@82 337 Tf2 = VSUB(TbX, TbY);
Chris@82 338 T4B = VFNMS(LDK(KP414213562), T3I, T3L);
Chris@82 339 TbZ = VADD(TbX, TbY);
Chris@82 340 }
Chris@82 341 {
Chris@82 342 V T3P, TbU, T3S, TbV;
Chris@82 343 {
Chris@82 344 V T3N, T3O, T3Q, T3R;
Chris@82 345 T3N = LD(&(xi[WS(is, 119)]), ivs, &(xi[WS(is, 1)]));
Chris@82 346 T3O = LD(&(xi[WS(is, 55)]), ivs, &(xi[WS(is, 1)]));
Chris@82 347 T3P = VSUB(T3N, T3O);
Chris@82 348 TbU = VADD(T3N, T3O);
Chris@82 349 T3Q = LD(&(xi[WS(is, 87)]), ivs, &(xi[WS(is, 1)]));
Chris@82 350 T3R = LD(&(xi[WS(is, 23)]), ivs, &(xi[WS(is, 1)]));
Chris@82 351 T3S = VSUB(T3Q, T3R);
Chris@82 352 TbV = VADD(T3R, T3Q);
Chris@82 353 }
Chris@82 354 T3T = VFNMS(LDK(KP414213562), T3S, T3P);
Chris@82 355 Tf3 = VSUB(TbU, TbV);
Chris@82 356 T4C = VFMA(LDK(KP414213562), T3P, T3S);
Chris@82 357 TbW = VADD(TbU, TbV);
Chris@82 358 }
Chris@82 359 TbD = VSUB(Tbz, TbC);
Chris@82 360 Tc0 = VSUB(TbW, TbZ);
Chris@82 361 {
Chris@82 362 V T3F, T3U, Tfe, Tff;
Chris@82 363 T3F = VFMA(LDK(KP707106781), T3E, T3x);
Chris@82 364 T3U = VADD(T3M, T3T);
Chris@82 365 T3V = VFMA(LDK(KP923879532), T3U, T3F);
Chris@82 366 T61 = VFNMS(LDK(KP923879532), T3U, T3F);
Chris@82 367 Tfe = VSUB(TbB, TbA);
Chris@82 368 Tff = VSUB(Tf3, Tf2);
Chris@82 369 Tfg = VFMA(LDK(KP707106781), Tff, Tfe);
Chris@82 370 TgA = VFNMS(LDK(KP707106781), Tff, Tfe);
Chris@82 371 }
Chris@82 372 {
Chris@82 373 V T4A, T4D, T7S, T7T;
Chris@82 374 T4A = VFMA(LDK(KP707106781), T4z, T4y);
Chris@82 375 T4D = VADD(T4B, T4C);
Chris@82 376 T4E = VFMA(LDK(KP923879532), T4D, T4A);
Chris@82 377 T64 = VFNMS(LDK(KP923879532), T4D, T4A);
Chris@82 378 T7S = VFNMS(LDK(KP707106781), T4z, T4y);
Chris@82 379 T7T = VSUB(T3T, T3M);
Chris@82 380 T7U = VFNMS(LDK(KP923879532), T7T, T7S);
Chris@82 381 T9e = VFMA(LDK(KP923879532), T7T, T7S);
Chris@82 382 }
Chris@82 383 Tf1 = VSUB(Tbx, Tby);
Chris@82 384 Tf4 = VADD(Tf2, Tf3);
Chris@82 385 Tf5 = VFMA(LDK(KP707106781), Tf4, Tf1);
Chris@82 386 Tgx = VFNMS(LDK(KP707106781), Tf4, Tf1);
Chris@82 387 {
Chris@82 388 V T7H, T7I, Tdd, Tde;
Chris@82 389 T7H = VFNMS(LDK(KP707106781), T3E, T3x);
Chris@82 390 T7I = VSUB(T4C, T4B);
Chris@82 391 T7J = VFMA(LDK(KP923879532), T7I, T7H);
Chris@82 392 T9b = VFNMS(LDK(KP923879532), T7I, T7H);
Chris@82 393 Tdd = VADD(Tbz, TbC);
Chris@82 394 Tde = VADD(TbZ, TbW);
Chris@82 395 Tdf = VADD(Tdd, Tde);
Chris@82 396 TdN = VSUB(Tdd, Tde);
Chris@82 397 }
Chris@82 398 }
Chris@82 399 {
Chris@82 400 V Tu, Tee, TF, Tag, TL, Teh, TW, Tan, TB, Tef, TG, Taj, TS, Tei, TX;
Chris@82 401 V Taq, Teg, Tej;
Chris@82 402 {
Chris@82 403 V Ts, Tt, Tae, TD, TE, Taf;
Chris@82 404 Ts = LD(&(xi[WS(is, 4)]), ivs, &(xi[0]));
Chris@82 405 Tt = LD(&(xi[WS(is, 68)]), ivs, &(xi[0]));
Chris@82 406 Tae = VADD(Ts, Tt);
Chris@82 407 TD = LD(&(xi[WS(is, 36)]), ivs, &(xi[0]));
Chris@82 408 TE = LD(&(xi[WS(is, 100)]), ivs, &(xi[0]));
Chris@82 409 Taf = VADD(TD, TE);
Chris@82 410 Tu = VSUB(Ts, Tt);
Chris@82 411 Tee = VSUB(Tae, Taf);
Chris@82 412 TF = VSUB(TD, TE);
Chris@82 413 Tag = VADD(Tae, Taf);
Chris@82 414 }
Chris@82 415 {
Chris@82 416 V TJ, TK, Tal, TU, TV, Tam;
Chris@82 417 TJ = LD(&(xi[WS(is, 124)]), ivs, &(xi[0]));
Chris@82 418 TK = LD(&(xi[WS(is, 60)]), ivs, &(xi[0]));
Chris@82 419 Tal = VADD(TJ, TK);
Chris@82 420 TU = LD(&(xi[WS(is, 92)]), ivs, &(xi[0]));
Chris@82 421 TV = LD(&(xi[WS(is, 28)]), ivs, &(xi[0]));
Chris@82 422 Tam = VADD(TV, TU);
Chris@82 423 TL = VSUB(TJ, TK);
Chris@82 424 Teh = VSUB(Tal, Tam);
Chris@82 425 TW = VSUB(TU, TV);
Chris@82 426 Tan = VADD(Tal, Tam);
Chris@82 427 }
Chris@82 428 {
Chris@82 429 V Tx, Tah, TA, Tai;
Chris@82 430 {
Chris@82 431 V Tv, Tw, Ty, Tz;
Chris@82 432 Tv = LD(&(xi[WS(is, 20)]), ivs, &(xi[0]));
Chris@82 433 Tw = LD(&(xi[WS(is, 84)]), ivs, &(xi[0]));
Chris@82 434 Tx = VSUB(Tv, Tw);
Chris@82 435 Tah = VADD(Tv, Tw);
Chris@82 436 Ty = LD(&(xi[WS(is, 116)]), ivs, &(xi[0]));
Chris@82 437 Tz = LD(&(xi[WS(is, 52)]), ivs, &(xi[0]));
Chris@82 438 TA = VSUB(Ty, Tz);
Chris@82 439 Tai = VADD(Ty, Tz);
Chris@82 440 }
Chris@82 441 TB = VADD(Tx, TA);
Chris@82 442 Tef = VSUB(Tah, Tai);
Chris@82 443 TG = VSUB(Tx, TA);
Chris@82 444 Taj = VADD(Tah, Tai);
Chris@82 445 }
Chris@82 446 {
Chris@82 447 V TO, Tao, TR, Tap;
Chris@82 448 {
Chris@82 449 V TM, TN, TP, TQ;
Chris@82 450 TM = LD(&(xi[WS(is, 12)]), ivs, &(xi[0]));
Chris@82 451 TN = LD(&(xi[WS(is, 76)]), ivs, &(xi[0]));
Chris@82 452 TO = VSUB(TM, TN);
Chris@82 453 Tao = VADD(TM, TN);
Chris@82 454 TP = LD(&(xi[WS(is, 108)]), ivs, &(xi[0]));
Chris@82 455 TQ = LD(&(xi[WS(is, 44)]), ivs, &(xi[0]));
Chris@82 456 TR = VSUB(TP, TQ);
Chris@82 457 Tap = VADD(TP, TQ);
Chris@82 458 }
Chris@82 459 TS = VADD(TO, TR);
Chris@82 460 Tei = VSUB(Tap, Tao);
Chris@82 461 TX = VSUB(TR, TO);
Chris@82 462 Taq = VADD(Tao, Tap);
Chris@82 463 }
Chris@82 464 Td2 = VADD(Tag, Taj);
Chris@82 465 Td3 = VADD(Tan, Taq);
Chris@82 466 {
Chris@82 467 V TC, TH, Tfr, Tfs;
Chris@82 468 TC = VFMA(LDK(KP707106781), TB, Tu);
Chris@82 469 TH = VFMA(LDK(KP707106781), TG, TF);
Chris@82 470 TI = VFNMS(LDK(KP198912367), TH, TC);
Chris@82 471 T4V = VFMA(LDK(KP198912367), TC, TH);
Chris@82 472 Tfr = VFMA(LDK(KP414213562), Teh, Tei);
Chris@82 473 Tfs = VFMA(LDK(KP414213562), Tee, Tef);
Chris@82 474 Tft = VSUB(Tfr, Tfs);
Chris@82 475 Tgg = VADD(Tfs, Tfr);
Chris@82 476 }
Chris@82 477 {
Chris@82 478 V TT, TY, T73, T74;
Chris@82 479 TT = VFMA(LDK(KP707106781), TS, TL);
Chris@82 480 TY = VFMA(LDK(KP707106781), TX, TW);
Chris@82 481 TZ = VFNMS(LDK(KP198912367), TY, TT);
Chris@82 482 T4W = VFMA(LDK(KP198912367), TT, TY);
Chris@82 483 T73 = VFNMS(LDK(KP707106781), TS, TL);
Chris@82 484 T74 = VFNMS(LDK(KP707106781), TX, TW);
Chris@82 485 T75 = VFMA(LDK(KP668178637), T74, T73);
Chris@82 486 T86 = VFNMS(LDK(KP668178637), T73, T74);
Chris@82 487 }
Chris@82 488 Teg = VFNMS(LDK(KP414213562), Tef, Tee);
Chris@82 489 Tej = VFNMS(LDK(KP414213562), Tei, Teh);
Chris@82 490 Tek = VADD(Teg, Tej);
Chris@82 491 TgH = VSUB(Tej, Teg);
Chris@82 492 {
Chris@82 493 V T70, T71, Tak, Tar;
Chris@82 494 T70 = VFNMS(LDK(KP707106781), TB, Tu);
Chris@82 495 T71 = VFNMS(LDK(KP707106781), TG, TF);
Chris@82 496 T72 = VFMA(LDK(KP668178637), T71, T70);
Chris@82 497 T85 = VFNMS(LDK(KP668178637), T70, T71);
Chris@82 498 Tak = VSUB(Tag, Taj);
Chris@82 499 Tar = VSUB(Tan, Taq);
Chris@82 500 Tas = VADD(Tak, Tar);
Chris@82 501 Tcd = VSUB(Tar, Tak);
Chris@82 502 }
Chris@82 503 }
Chris@82 504 {
Chris@82 505 V Tau, Tav, T14, Taw, T1v, Tax, Tay, T1b, Taz, T1w, T1j, Ten, T1y, TaD, T1q;
Chris@82 506 V Teo, T1z, TaG, T17, T1a, Tem, Tep;
Chris@82 507 {
Chris@82 508 V T12, T13, T1t, T1u;
Chris@82 509 T12 = LD(&(xi[WS(is, 2)]), ivs, &(xi[0]));
Chris@82 510 T13 = LD(&(xi[WS(is, 66)]), ivs, &(xi[0]));
Chris@82 511 Tau = VADD(T12, T13);
Chris@82 512 T1t = LD(&(xi[WS(is, 34)]), ivs, &(xi[0]));
Chris@82 513 T1u = LD(&(xi[WS(is, 98)]), ivs, &(xi[0]));
Chris@82 514 Tav = VADD(T1t, T1u);
Chris@82 515 T14 = VSUB(T12, T13);
Chris@82 516 Taw = VADD(Tau, Tav);
Chris@82 517 T1v = VSUB(T1t, T1u);
Chris@82 518 }
Chris@82 519 {
Chris@82 520 V T15, T16, T18, T19;
Chris@82 521 T15 = LD(&(xi[WS(is, 18)]), ivs, &(xi[0]));
Chris@82 522 T16 = LD(&(xi[WS(is, 82)]), ivs, &(xi[0]));
Chris@82 523 T17 = VSUB(T15, T16);
Chris@82 524 Tax = VADD(T15, T16);
Chris@82 525 T18 = LD(&(xi[WS(is, 114)]), ivs, &(xi[0]));
Chris@82 526 T19 = LD(&(xi[WS(is, 50)]), ivs, &(xi[0]));
Chris@82 527 T1a = VSUB(T18, T19);
Chris@82 528 Tay = VADD(T18, T19);
Chris@82 529 }
Chris@82 530 T1b = VADD(T17, T1a);
Chris@82 531 Taz = VADD(Tax, Tay);
Chris@82 532 T1w = VSUB(T17, T1a);
Chris@82 533 {
Chris@82 534 V T1f, TaB, T1i, TaC;
Chris@82 535 {
Chris@82 536 V T1d, T1e, T1g, T1h;
Chris@82 537 T1d = LD(&(xi[WS(is, 10)]), ivs, &(xi[0]));
Chris@82 538 T1e = LD(&(xi[WS(is, 74)]), ivs, &(xi[0]));
Chris@82 539 T1f = VSUB(T1d, T1e);
Chris@82 540 TaB = VADD(T1d, T1e);
Chris@82 541 T1g = LD(&(xi[WS(is, 42)]), ivs, &(xi[0]));
Chris@82 542 T1h = LD(&(xi[WS(is, 106)]), ivs, &(xi[0]));
Chris@82 543 T1i = VSUB(T1g, T1h);
Chris@82 544 TaC = VADD(T1g, T1h);
Chris@82 545 }
Chris@82 546 T1j = VFNMS(LDK(KP414213562), T1i, T1f);
Chris@82 547 Ten = VSUB(TaB, TaC);
Chris@82 548 T1y = VFMA(LDK(KP414213562), T1f, T1i);
Chris@82 549 TaD = VADD(TaB, TaC);
Chris@82 550 }
Chris@82 551 {
Chris@82 552 V T1m, TaE, T1p, TaF;
Chris@82 553 {
Chris@82 554 V T1k, T1l, T1n, T1o;
Chris@82 555 T1k = LD(&(xi[WS(is, 122)]), ivs, &(xi[0]));
Chris@82 556 T1l = LD(&(xi[WS(is, 58)]), ivs, &(xi[0]));
Chris@82 557 T1m = VSUB(T1k, T1l);
Chris@82 558 TaE = VADD(T1k, T1l);
Chris@82 559 T1n = LD(&(xi[WS(is, 26)]), ivs, &(xi[0]));
Chris@82 560 T1o = LD(&(xi[WS(is, 90)]), ivs, &(xi[0]));
Chris@82 561 T1p = VSUB(T1n, T1o);
Chris@82 562 TaF = VADD(T1n, T1o);
Chris@82 563 }
Chris@82 564 T1q = VFMA(LDK(KP414213562), T1p, T1m);
Chris@82 565 Teo = VSUB(TaE, TaF);
Chris@82 566 T1z = VFNMS(LDK(KP414213562), T1m, T1p);
Chris@82 567 TaG = VADD(TaE, TaF);
Chris@82 568 }
Chris@82 569 Tdp = VADD(Taw, Taz);
Chris@82 570 Tdq = VADD(TaD, TaG);
Chris@82 571 TdG = VSUB(Tdp, Tdq);
Chris@82 572 Tem = VSUB(Tau, Tav);
Chris@82 573 Tep = VADD(Ten, Teo);
Chris@82 574 Teq = VFMA(LDK(KP707106781), Tep, Tem);
Chris@82 575 Tgj = VFNMS(LDK(KP707106781), Tep, Tem);
Chris@82 576 {
Chris@82 577 V Ter, Tes, T1c, T1r;
Chris@82 578 Ter = VSUB(Tax, Tay);
Chris@82 579 Tes = VSUB(Ten, Teo);
Chris@82 580 Tet = VFMA(LDK(KP707106781), Tes, Ter);
Chris@82 581 Tgi = VFNMS(LDK(KP707106781), Tes, Ter);
Chris@82 582 T1c = VFMA(LDK(KP707106781), T1b, T14);
Chris@82 583 T1r = VADD(T1j, T1q);
Chris@82 584 T1s = VFMA(LDK(KP923879532), T1r, T1c);
Chris@82 585 T5N = VFNMS(LDK(KP923879532), T1r, T1c);
Chris@82 586 }
Chris@82 587 {
Chris@82 588 V T1x, T1A, T7b, T7c;
Chris@82 589 T1x = VFMA(LDK(KP707106781), T1w, T1v);
Chris@82 590 T1A = VADD(T1y, T1z);
Chris@82 591 T1B = VFMA(LDK(KP923879532), T1A, T1x);
Chris@82 592 T5M = VFNMS(LDK(KP923879532), T1A, T1x);
Chris@82 593 T7b = VFNMS(LDK(KP707106781), T1w, T1v);
Chris@82 594 T7c = VSUB(T1j, T1q);
Chris@82 595 T7d = VFNMS(LDK(KP923879532), T7c, T7b);
Chris@82 596 T8W = VFMA(LDK(KP923879532), T7c, T7b);
Chris@82 597 }
Chris@82 598 {
Chris@82 599 V TaA, TaH, T78, T79;
Chris@82 600 TaA = VSUB(Taw, Taz);
Chris@82 601 TaH = VSUB(TaD, TaG);
Chris@82 602 TaI = VFNMS(LDK(KP414213562), TaH, TaA);
Chris@82 603 Tcg = VFMA(LDK(KP414213562), TaA, TaH);
Chris@82 604 T78 = VFNMS(LDK(KP707106781), T1b, T14);
Chris@82 605 T79 = VSUB(T1y, T1z);
Chris@82 606 T7a = VFMA(LDK(KP923879532), T79, T78);
Chris@82 607 T8X = VFNMS(LDK(KP923879532), T79, T78);
Chris@82 608 }
Chris@82 609 }
Chris@82 610 {
Chris@82 611 V TaJ, TaK, T1F, TaL, T26, TaM, TaN, T1M, TaO, T27, T1U, Tew, T29, TaV, T21;
Chris@82 612 V Tex, T2a, TaS, T1I, T1L, Tev, Tey;
Chris@82 613 {
Chris@82 614 V T1D, T1E, T24, T25;
Chris@82 615 T1D = LD(&(xi[WS(is, 126)]), ivs, &(xi[0]));
Chris@82 616 T1E = LD(&(xi[WS(is, 62)]), ivs, &(xi[0]));
Chris@82 617 TaJ = VADD(T1D, T1E);
Chris@82 618 T24 = LD(&(xi[WS(is, 94)]), ivs, &(xi[0]));
Chris@82 619 T25 = LD(&(xi[WS(is, 30)]), ivs, &(xi[0]));
Chris@82 620 TaK = VADD(T25, T24);
Chris@82 621 T1F = VSUB(T1D, T1E);
Chris@82 622 TaL = VADD(TaJ, TaK);
Chris@82 623 T26 = VSUB(T24, T25);
Chris@82 624 }
Chris@82 625 {
Chris@82 626 V T1G, T1H, T1J, T1K;
Chris@82 627 T1G = LD(&(xi[WS(is, 14)]), ivs, &(xi[0]));
Chris@82 628 T1H = LD(&(xi[WS(is, 78)]), ivs, &(xi[0]));
Chris@82 629 T1I = VSUB(T1G, T1H);
Chris@82 630 TaM = VADD(T1G, T1H);
Chris@82 631 T1J = LD(&(xi[WS(is, 110)]), ivs, &(xi[0]));
Chris@82 632 T1K = LD(&(xi[WS(is, 46)]), ivs, &(xi[0]));
Chris@82 633 T1L = VSUB(T1J, T1K);
Chris@82 634 TaN = VADD(T1J, T1K);
Chris@82 635 }
Chris@82 636 T1M = VADD(T1I, T1L);
Chris@82 637 TaO = VADD(TaM, TaN);
Chris@82 638 T27 = VSUB(T1L, T1I);
Chris@82 639 {
Chris@82 640 V T1Q, TaT, T1T, TaU;
Chris@82 641 {
Chris@82 642 V T1O, T1P, T1R, T1S;
Chris@82 643 T1O = LD(&(xi[WS(is, 6)]), ivs, &(xi[0]));
Chris@82 644 T1P = LD(&(xi[WS(is, 70)]), ivs, &(xi[0]));
Chris@82 645 T1Q = VSUB(T1O, T1P);
Chris@82 646 TaT = VADD(T1O, T1P);
Chris@82 647 T1R = LD(&(xi[WS(is, 102)]), ivs, &(xi[0]));
Chris@82 648 T1S = LD(&(xi[WS(is, 38)]), ivs, &(xi[0]));
Chris@82 649 T1T = VSUB(T1R, T1S);
Chris@82 650 TaU = VADD(T1S, T1R);
Chris@82 651 }
Chris@82 652 T1U = VFMA(LDK(KP414213562), T1T, T1Q);
Chris@82 653 Tew = VSUB(TaT, TaU);
Chris@82 654 T29 = VFNMS(LDK(KP414213562), T1Q, T1T);
Chris@82 655 TaV = VADD(TaT, TaU);
Chris@82 656 }
Chris@82 657 {
Chris@82 658 V T1X, TaQ, T20, TaR;
Chris@82 659 {
Chris@82 660 V T1V, T1W, T1Y, T1Z;
Chris@82 661 T1V = LD(&(xi[WS(is, 118)]), ivs, &(xi[0]));
Chris@82 662 T1W = LD(&(xi[WS(is, 54)]), ivs, &(xi[0]));
Chris@82 663 T1X = VSUB(T1V, T1W);
Chris@82 664 TaQ = VADD(T1V, T1W);
Chris@82 665 T1Y = LD(&(xi[WS(is, 86)]), ivs, &(xi[0]));
Chris@82 666 T1Z = LD(&(xi[WS(is, 22)]), ivs, &(xi[0]));
Chris@82 667 T20 = VSUB(T1Y, T1Z);
Chris@82 668 TaR = VADD(T1Z, T1Y);
Chris@82 669 }
Chris@82 670 T21 = VFNMS(LDK(KP414213562), T20, T1X);
Chris@82 671 Tex = VSUB(TaQ, TaR);
Chris@82 672 T2a = VFMA(LDK(KP414213562), T1X, T20);
Chris@82 673 TaS = VADD(TaQ, TaR);
Chris@82 674 }
Chris@82 675 Tdm = VADD(TaL, TaO);
Chris@82 676 Tdn = VADD(TaV, TaS);
Chris@82 677 TdH = VSUB(Tdm, Tdn);
Chris@82 678 Tev = VSUB(TaJ, TaK);
Chris@82 679 Tey = VADD(Tew, Tex);
Chris@82 680 Tez = VFMA(LDK(KP707106781), Tey, Tev);
Chris@82 681 Tgm = VFNMS(LDK(KP707106781), Tey, Tev);
Chris@82 682 {
Chris@82 683 V TeA, TeB, T1N, T22;
Chris@82 684 TeA = VSUB(TaN, TaM);
Chris@82 685 TeB = VSUB(Tex, Tew);
Chris@82 686 TeC = VFMA(LDK(KP707106781), TeB, TeA);
Chris@82 687 Tgl = VFNMS(LDK(KP707106781), TeB, TeA);
Chris@82 688 T1N = VFMA(LDK(KP707106781), T1M, T1F);
Chris@82 689 T22 = VADD(T1U, T21);
Chris@82 690 T23 = VFMA(LDK(KP923879532), T22, T1N);
Chris@82 691 T5Q = VFNMS(LDK(KP923879532), T22, T1N);
Chris@82 692 }
Chris@82 693 {
Chris@82 694 V T28, T2b, T7i, T7j;
Chris@82 695 T28 = VFMA(LDK(KP707106781), T27, T26);
Chris@82 696 T2b = VADD(T29, T2a);
Chris@82 697 T2c = VFMA(LDK(KP923879532), T2b, T28);
Chris@82 698 T5P = VFNMS(LDK(KP923879532), T2b, T28);
Chris@82 699 T7i = VFNMS(LDK(KP707106781), T27, T26);
Chris@82 700 T7j = VSUB(T21, T1U);
Chris@82 701 T7k = VFNMS(LDK(KP923879532), T7j, T7i);
Chris@82 702 T8Z = VFMA(LDK(KP923879532), T7j, T7i);
Chris@82 703 }
Chris@82 704 {
Chris@82 705 V TaP, TaW, T7f, T7g;
Chris@82 706 TaP = VSUB(TaL, TaO);
Chris@82 707 TaW = VSUB(TaS, TaV);
Chris@82 708 TaX = VFNMS(LDK(KP414213562), TaW, TaP);
Chris@82 709 Tcf = VFMA(LDK(KP414213562), TaP, TaW);
Chris@82 710 T7f = VFNMS(LDK(KP707106781), T1M, T1F);
Chris@82 711 T7g = VSUB(T2a, T29);
Chris@82 712 T7h = VFMA(LDK(KP923879532), T7g, T7f);
Chris@82 713 T90 = VFNMS(LDK(KP923879532), T7g, T7f);
Chris@82 714 }
Chris@82 715 }
Chris@82 716 {
Chris@82 717 V T2J, TeL, T2U, Tb9, T30, TeO, T3b, Tbg, T2Q, TeM, T2V, Tbc, T37, TeP, T3c;
Chris@82 718 V Tbj;
Chris@82 719 {
Chris@82 720 V T2H, T2I, Tb7, T2S, T2T, Tb8;
Chris@82 721 T2H = LD(&(xi[WS(is, 5)]), ivs, &(xi[WS(is, 1)]));
Chris@82 722 T2I = LD(&(xi[WS(is, 69)]), ivs, &(xi[WS(is, 1)]));
Chris@82 723 Tb7 = VADD(T2H, T2I);
Chris@82 724 T2S = LD(&(xi[WS(is, 37)]), ivs, &(xi[WS(is, 1)]));
Chris@82 725 T2T = LD(&(xi[WS(is, 101)]), ivs, &(xi[WS(is, 1)]));
Chris@82 726 Tb8 = VADD(T2S, T2T);
Chris@82 727 T2J = VSUB(T2H, T2I);
Chris@82 728 TeL = VSUB(Tb7, Tb8);
Chris@82 729 T2U = VSUB(T2S, T2T);
Chris@82 730 Tb9 = VADD(Tb7, Tb8);
Chris@82 731 }
Chris@82 732 {
Chris@82 733 V T2Y, T2Z, Tbe, T39, T3a, Tbf;
Chris@82 734 T2Y = LD(&(xi[WS(is, 125)]), ivs, &(xi[WS(is, 1)]));
Chris@82 735 T2Z = LD(&(xi[WS(is, 61)]), ivs, &(xi[WS(is, 1)]));
Chris@82 736 Tbe = VADD(T2Y, T2Z);
Chris@82 737 T39 = LD(&(xi[WS(is, 29)]), ivs, &(xi[WS(is, 1)]));
Chris@82 738 T3a = LD(&(xi[WS(is, 93)]), ivs, &(xi[WS(is, 1)]));
Chris@82 739 Tbf = VADD(T39, T3a);
Chris@82 740 T30 = VSUB(T2Y, T2Z);
Chris@82 741 TeO = VSUB(Tbe, Tbf);
Chris@82 742 T3b = VSUB(T39, T3a);
Chris@82 743 Tbg = VADD(Tbe, Tbf);
Chris@82 744 }
Chris@82 745 {
Chris@82 746 V T2M, Tba, T2P, Tbb;
Chris@82 747 {
Chris@82 748 V T2K, T2L, T2N, T2O;
Chris@82 749 T2K = LD(&(xi[WS(is, 21)]), ivs, &(xi[WS(is, 1)]));
Chris@82 750 T2L = LD(&(xi[WS(is, 85)]), ivs, &(xi[WS(is, 1)]));
Chris@82 751 T2M = VSUB(T2K, T2L);
Chris@82 752 Tba = VADD(T2K, T2L);
Chris@82 753 T2N = LD(&(xi[WS(is, 117)]), ivs, &(xi[WS(is, 1)]));
Chris@82 754 T2O = LD(&(xi[WS(is, 53)]), ivs, &(xi[WS(is, 1)]));
Chris@82 755 T2P = VSUB(T2N, T2O);
Chris@82 756 Tbb = VADD(T2N, T2O);
Chris@82 757 }
Chris@82 758 T2Q = VADD(T2M, T2P);
Chris@82 759 TeM = VSUB(Tba, Tbb);
Chris@82 760 T2V = VSUB(T2M, T2P);
Chris@82 761 Tbc = VADD(Tba, Tbb);
Chris@82 762 }
Chris@82 763 {
Chris@82 764 V T33, Tbh, T36, Tbi;
Chris@82 765 {
Chris@82 766 V T31, T32, T34, T35;
Chris@82 767 T31 = LD(&(xi[WS(is, 13)]), ivs, &(xi[WS(is, 1)]));
Chris@82 768 T32 = LD(&(xi[WS(is, 77)]), ivs, &(xi[WS(is, 1)]));
Chris@82 769 T33 = VSUB(T31, T32);
Chris@82 770 Tbh = VADD(T31, T32);
Chris@82 771 T34 = LD(&(xi[WS(is, 109)]), ivs, &(xi[WS(is, 1)]));
Chris@82 772 T35 = LD(&(xi[WS(is, 45)]), ivs, &(xi[WS(is, 1)]));
Chris@82 773 T36 = VSUB(T34, T35);
Chris@82 774 Tbi = VADD(T34, T35);
Chris@82 775 }
Chris@82 776 T37 = VADD(T33, T36);
Chris@82 777 TeP = VSUB(Tbh, Tbi);
Chris@82 778 T3c = VSUB(T33, T36);
Chris@82 779 Tbj = VADD(Tbh, Tbi);
Chris@82 780 }
Chris@82 781 {
Chris@82 782 V Tbd, Tbk, TeN, TeQ;
Chris@82 783 Tbd = VSUB(Tb9, Tbc);
Chris@82 784 Tbk = VSUB(Tbg, Tbj);
Chris@82 785 Tbl = VADD(Tbd, Tbk);
Chris@82 786 Tbu = VSUB(Tbd, Tbk);
Chris@82 787 {
Chris@82 788 V Td9, Tda, TeW, TeX;
Chris@82 789 Td9 = VADD(Tb9, Tbc);
Chris@82 790 Tda = VADD(Tbg, Tbj);
Chris@82 791 Tdb = VADD(Td9, Tda);
Chris@82 792 TdL = VSUB(Td9, Tda);
Chris@82 793 TeW = VFMA(LDK(KP414213562), TeL, TeM);
Chris@82 794 TeX = VFNMS(LDK(KP414213562), TeO, TeP);
Chris@82 795 TeY = VADD(TeW, TeX);
Chris@82 796 Tgr = VSUB(TeW, TeX);
Chris@82 797 }
Chris@82 798 TeN = VFNMS(LDK(KP414213562), TeM, TeL);
Chris@82 799 TeQ = VFMA(LDK(KP414213562), TeP, TeO);
Chris@82 800 TeR = VADD(TeN, TeQ);
Chris@82 801 Tgu = VSUB(TeN, TeQ);
Chris@82 802 {
Chris@82 803 V T7t, T7C, T7w, T7D;
Chris@82 804 {
Chris@82 805 V T7r, T7s, T7u, T7v;
Chris@82 806 T7r = VFNMS(LDK(KP707106781), T2Q, T2J);
Chris@82 807 T7s = VFNMS(LDK(KP707106781), T2V, T2U);
Chris@82 808 T7t = VFMA(LDK(KP668178637), T7s, T7r);
Chris@82 809 T7C = VFNMS(LDK(KP668178637), T7r, T7s);
Chris@82 810 T7u = VFNMS(LDK(KP707106781), T37, T30);
Chris@82 811 T7v = VFNMS(LDK(KP707106781), T3c, T3b);
Chris@82 812 T7w = VFNMS(LDK(KP668178637), T7v, T7u);
Chris@82 813 T7D = VFMA(LDK(KP668178637), T7u, T7v);
Chris@82 814 }
Chris@82 815 T7x = VADD(T7t, T7w);
Chris@82 816 T98 = VSUB(T7t, T7w);
Chris@82 817 T7E = VADD(T7C, T7D);
Chris@82 818 T95 = VSUB(T7D, T7C);
Chris@82 819 }
Chris@82 820 {
Chris@82 821 V T2X, T3q, T3e, T3r;
Chris@82 822 {
Chris@82 823 V T2R, T2W, T38, T3d;
Chris@82 824 T2R = VFMA(LDK(KP707106781), T2Q, T2J);
Chris@82 825 T2W = VFMA(LDK(KP707106781), T2V, T2U);
Chris@82 826 T2X = VFNMS(LDK(KP198912367), T2W, T2R);
Chris@82 827 T3q = VFMA(LDK(KP198912367), T2R, T2W);
Chris@82 828 T38 = VFMA(LDK(KP707106781), T37, T30);
Chris@82 829 T3d = VFMA(LDK(KP707106781), T3c, T3b);
Chris@82 830 T3e = VFMA(LDK(KP198912367), T3d, T38);
Chris@82 831 T3r = VFNMS(LDK(KP198912367), T38, T3d);
Chris@82 832 }
Chris@82 833 T3f = VADD(T2X, T3e);
Chris@82 834 T5Y = VSUB(T2X, T3e);
Chris@82 835 T3s = VADD(T3q, T3r);
Chris@82 836 T5V = VSUB(T3q, T3r);
Chris@82 837 }
Chris@82 838 }
Chris@82 839 }
Chris@82 840 {
Chris@82 841 V T3Y, Tf6, T49, TbG, T4f, Tf9, T4q, TbN, T45, Tf7, T4a, TbJ, T4m, Tfa, T4r;
Chris@82 842 V TbQ;
Chris@82 843 {
Chris@82 844 V T3W, T3X, TbE, T47, T48, TbF;
Chris@82 845 T3W = LD(&(xi[WS(is, 3)]), ivs, &(xi[WS(is, 1)]));
Chris@82 846 T3X = LD(&(xi[WS(is, 67)]), ivs, &(xi[WS(is, 1)]));
Chris@82 847 TbE = VADD(T3W, T3X);
Chris@82 848 T47 = LD(&(xi[WS(is, 99)]), ivs, &(xi[WS(is, 1)]));
Chris@82 849 T48 = LD(&(xi[WS(is, 35)]), ivs, &(xi[WS(is, 1)]));
Chris@82 850 TbF = VADD(T48, T47);
Chris@82 851 T3Y = VSUB(T3W, T3X);
Chris@82 852 Tf6 = VSUB(TbE, TbF);
Chris@82 853 T49 = VSUB(T47, T48);
Chris@82 854 TbG = VADD(TbE, TbF);
Chris@82 855 }
Chris@82 856 {
Chris@82 857 V T4d, T4e, TbL, T4o, T4p, TbM;
Chris@82 858 T4d = LD(&(xi[WS(is, 123)]), ivs, &(xi[WS(is, 1)]));
Chris@82 859 T4e = LD(&(xi[WS(is, 59)]), ivs, &(xi[WS(is, 1)]));
Chris@82 860 TbL = VADD(T4d, T4e);
Chris@82 861 T4o = LD(&(xi[WS(is, 91)]), ivs, &(xi[WS(is, 1)]));
Chris@82 862 T4p = LD(&(xi[WS(is, 27)]), ivs, &(xi[WS(is, 1)]));
Chris@82 863 TbM = VADD(T4p, T4o);
Chris@82 864 T4f = VSUB(T4d, T4e);
Chris@82 865 Tf9 = VSUB(TbL, TbM);
Chris@82 866 T4q = VSUB(T4o, T4p);
Chris@82 867 TbN = VADD(TbL, TbM);
Chris@82 868 }
Chris@82 869 {
Chris@82 870 V T41, TbH, T44, TbI;
Chris@82 871 {
Chris@82 872 V T3Z, T40, T42, T43;
Chris@82 873 T3Z = LD(&(xi[WS(is, 19)]), ivs, &(xi[WS(is, 1)]));
Chris@82 874 T40 = LD(&(xi[WS(is, 83)]), ivs, &(xi[WS(is, 1)]));
Chris@82 875 T41 = VSUB(T3Z, T40);
Chris@82 876 TbH = VADD(T3Z, T40);
Chris@82 877 T42 = LD(&(xi[WS(is, 115)]), ivs, &(xi[WS(is, 1)]));
Chris@82 878 T43 = LD(&(xi[WS(is, 51)]), ivs, &(xi[WS(is, 1)]));
Chris@82 879 T44 = VSUB(T42, T43);
Chris@82 880 TbI = VADD(T42, T43);
Chris@82 881 }
Chris@82 882 T45 = VADD(T41, T44);
Chris@82 883 Tf7 = VSUB(TbI, TbH);
Chris@82 884 T4a = VSUB(T44, T41);
Chris@82 885 TbJ = VADD(TbH, TbI);
Chris@82 886 }
Chris@82 887 {
Chris@82 888 V T4i, TbO, T4l, TbP;
Chris@82 889 {
Chris@82 890 V T4g, T4h, T4j, T4k;
Chris@82 891 T4g = LD(&(xi[WS(is, 11)]), ivs, &(xi[WS(is, 1)]));
Chris@82 892 T4h = LD(&(xi[WS(is, 75)]), ivs, &(xi[WS(is, 1)]));
Chris@82 893 T4i = VSUB(T4g, T4h);
Chris@82 894 TbO = VADD(T4g, T4h);
Chris@82 895 T4j = LD(&(xi[WS(is, 107)]), ivs, &(xi[WS(is, 1)]));
Chris@82 896 T4k = LD(&(xi[WS(is, 43)]), ivs, &(xi[WS(is, 1)]));
Chris@82 897 T4l = VSUB(T4j, T4k);
Chris@82 898 TbP = VADD(T4j, T4k);
Chris@82 899 }
Chris@82 900 T4m = VADD(T4i, T4l);
Chris@82 901 Tfa = VSUB(TbP, TbO);
Chris@82 902 T4r = VSUB(T4l, T4i);
Chris@82 903 TbQ = VADD(TbO, TbP);
Chris@82 904 }
Chris@82 905 {
Chris@82 906 V TbK, TbR, Tf8, Tfb;
Chris@82 907 TbK = VSUB(TbG, TbJ);
Chris@82 908 TbR = VSUB(TbN, TbQ);
Chris@82 909 TbS = VADD(TbK, TbR);
Chris@82 910 Tc1 = VSUB(TbR, TbK);
Chris@82 911 {
Chris@82 912 V Tdg, Tdh, Tfh, Tfi;
Chris@82 913 Tdg = VADD(TbG, TbJ);
Chris@82 914 Tdh = VADD(TbN, TbQ);
Chris@82 915 Tdi = VADD(Tdg, Tdh);
Chris@82 916 TdO = VSUB(Tdh, Tdg);
Chris@82 917 Tfh = VFNMS(LDK(KP414213562), Tf6, Tf7);
Chris@82 918 Tfi = VFMA(LDK(KP414213562), Tf9, Tfa);
Chris@82 919 Tfj = VADD(Tfh, Tfi);
Chris@82 920 Tgy = VSUB(Tfi, Tfh);
Chris@82 921 }
Chris@82 922 Tf8 = VFMA(LDK(KP414213562), Tf7, Tf6);
Chris@82 923 Tfb = VFNMS(LDK(KP414213562), Tfa, Tf9);
Chris@82 924 Tfc = VADD(Tf8, Tfb);
Chris@82 925 TgB = VSUB(Tfb, Tf8);
Chris@82 926 {
Chris@82 927 V T7M, T7V, T7P, T7W;
Chris@82 928 {
Chris@82 929 V T7K, T7L, T7N, T7O;
Chris@82 930 T7K = VFNMS(LDK(KP707106781), T45, T3Y);
Chris@82 931 T7L = VFNMS(LDK(KP707106781), T4a, T49);
Chris@82 932 T7M = VFNMS(LDK(KP668178637), T7L, T7K);
Chris@82 933 T7V = VFMA(LDK(KP668178637), T7K, T7L);
Chris@82 934 T7N = VFNMS(LDK(KP707106781), T4m, T4f);
Chris@82 935 T7O = VFNMS(LDK(KP707106781), T4r, T4q);
Chris@82 936 T7P = VFMA(LDK(KP668178637), T7O, T7N);
Chris@82 937 T7W = VFNMS(LDK(KP668178637), T7N, T7O);
Chris@82 938 }
Chris@82 939 T7Q = VADD(T7M, T7P);
Chris@82 940 T9f = VSUB(T7P, T7M);
Chris@82 941 T7X = VADD(T7V, T7W);
Chris@82 942 T9c = VSUB(T7V, T7W);
Chris@82 943 }
Chris@82 944 {
Chris@82 945 V T4c, T4F, T4t, T4G;
Chris@82 946 {
Chris@82 947 V T46, T4b, T4n, T4s;
Chris@82 948 T46 = VFMA(LDK(KP707106781), T45, T3Y);
Chris@82 949 T4b = VFMA(LDK(KP707106781), T4a, T49);
Chris@82 950 T4c = VFMA(LDK(KP198912367), T4b, T46);
Chris@82 951 T4F = VFNMS(LDK(KP198912367), T46, T4b);
Chris@82 952 T4n = VFMA(LDK(KP707106781), T4m, T4f);
Chris@82 953 T4s = VFMA(LDK(KP707106781), T4r, T4q);
Chris@82 954 T4t = VFNMS(LDK(KP198912367), T4s, T4n);
Chris@82 955 T4G = VFMA(LDK(KP198912367), T4n, T4s);
Chris@82 956 }
Chris@82 957 T4u = VADD(T4c, T4t);
Chris@82 958 T65 = VSUB(T4t, T4c);
Chris@82 959 T4H = VADD(T4F, T4G);
Chris@82 960 T62 = VSUB(T4G, T4F);
Chris@82 961 }
Chris@82 962 }
Chris@82 963 }
Chris@82 964 {
Chris@82 965 V Td5, Tdx, TdC, TdE, Tdk, Tdt, Tds, Tdy, Tdz, TdD;
Chris@82 966 {
Chris@82 967 V Td1, Td4, TdA, TdB;
Chris@82 968 Td1 = VADD(TcZ, Td0);
Chris@82 969 Td4 = VADD(Td2, Td3);
Chris@82 970 Td5 = VSUB(Td1, Td4);
Chris@82 971 Tdx = VADD(Td1, Td4);
Chris@82 972 TdA = VADD(Td8, Tdb);
Chris@82 973 TdB = VADD(Tdf, Tdi);
Chris@82 974 TdC = VADD(TdA, TdB);
Chris@82 975 TdE = VSUB(TdB, TdA);
Chris@82 976 }
Chris@82 977 {
Chris@82 978 V Tdc, Tdj, Tdo, Tdr;
Chris@82 979 Tdc = VSUB(Td8, Tdb);
Chris@82 980 Tdj = VSUB(Tdf, Tdi);
Chris@82 981 Tdk = VADD(Tdc, Tdj);
Chris@82 982 Tdt = VSUB(Tdj, Tdc);
Chris@82 983 Tdo = VADD(Tdm, Tdn);
Chris@82 984 Tdr = VADD(Tdp, Tdq);
Chris@82 985 Tds = VSUB(Tdo, Tdr);
Chris@82 986 Tdy = VADD(Tdr, Tdo);
Chris@82 987 }
Chris@82 988 Tdz = VADD(Tdx, Tdy);
Chris@82 989 ST(&(xo[WS(os, 64)]), VSUB(Tdz, TdC), ovs, &(xo[0]));
Chris@82 990 ST(&(xo[0]), VADD(Tdz, TdC), ovs, &(xo[0]));
Chris@82 991 TdD = VSUB(Tdx, Tdy);
Chris@82 992 ST(&(xo[WS(os, 96)]), VFNMSI(TdE, TdD), ovs, &(xo[0]));
Chris@82 993 ST(&(xo[WS(os, 32)]), VFMAI(TdE, TdD), ovs, &(xo[0]));
Chris@82 994 {
Chris@82 995 V Tdl, Tdu, Tdv, Tdw;
Chris@82 996 Tdl = VFNMS(LDK(KP707106781), Tdk, Td5);
Chris@82 997 Tdu = VFNMS(LDK(KP707106781), Tdt, Tds);
Chris@82 998 ST(&(xo[WS(os, 48)]), VFNMSI(Tdu, Tdl), ovs, &(xo[0]));
Chris@82 999 ST(&(xo[WS(os, 80)]), VFMAI(Tdu, Tdl), ovs, &(xo[0]));
Chris@82 1000 Tdv = VFMA(LDK(KP707106781), Tdk, Td5);
Chris@82 1001 Tdw = VFMA(LDK(KP707106781), Tdt, Tds);
Chris@82 1002 ST(&(xo[WS(os, 112)]), VFNMSI(Tdw, Tdv), ovs, &(xo[0]));
Chris@82 1003 ST(&(xo[WS(os, 16)]), VFMAI(Tdw, Tdv), ovs, &(xo[0]));
Chris@82 1004 }
Chris@82 1005 }
Chris@82 1006 {
Chris@82 1007 V TdJ, Te1, TdX, Te2, TdQ, Te5, TdU, Te4;
Chris@82 1008 {
Chris@82 1009 V TdF, TdI, TdV, TdW;
Chris@82 1010 TdF = VSUB(TcZ, Td0);
Chris@82 1011 TdI = VADD(TdG, TdH);
Chris@82 1012 TdJ = VFMA(LDK(KP707106781), TdI, TdF);
Chris@82 1013 Te1 = VFNMS(LDK(KP707106781), TdI, TdF);
Chris@82 1014 TdV = VFMA(LDK(KP414213562), TdN, TdO);
Chris@82 1015 TdW = VFMA(LDK(KP414213562), TdK, TdL);
Chris@82 1016 TdX = VSUB(TdV, TdW);
Chris@82 1017 Te2 = VADD(TdW, TdV);
Chris@82 1018 }
Chris@82 1019 {
Chris@82 1020 V TdM, TdP, TdS, TdT;
Chris@82 1021 TdM = VFNMS(LDK(KP414213562), TdL, TdK);
Chris@82 1022 TdP = VFNMS(LDK(KP414213562), TdO, TdN);
Chris@82 1023 TdQ = VADD(TdM, TdP);
Chris@82 1024 Te5 = VSUB(TdP, TdM);
Chris@82 1025 TdS = VSUB(Td3, Td2);
Chris@82 1026 TdT = VSUB(TdH, TdG);
Chris@82 1027 TdU = VFMA(LDK(KP707106781), TdT, TdS);
Chris@82 1028 Te4 = VFNMS(LDK(KP707106781), TdT, TdS);
Chris@82 1029 }
Chris@82 1030 {
Chris@82 1031 V TdR, TdY, Te7, Te8;
Chris@82 1032 TdR = VFNMS(LDK(KP923879532), TdQ, TdJ);
Chris@82 1033 TdY = VFNMS(LDK(KP923879532), TdX, TdU);
Chris@82 1034 ST(&(xo[WS(os, 56)]), VFNMSI(TdY, TdR), ovs, &(xo[0]));
Chris@82 1035 ST(&(xo[WS(os, 72)]), VFMAI(TdY, TdR), ovs, &(xo[0]));
Chris@82 1036 Te7 = VFMA(LDK(KP923879532), Te2, Te1);
Chris@82 1037 Te8 = VFNMS(LDK(KP923879532), Te5, Te4);
Chris@82 1038 ST(&(xo[WS(os, 24)]), VFNMSI(Te8, Te7), ovs, &(xo[0]));
Chris@82 1039 ST(&(xo[WS(os, 104)]), VFMAI(Te8, Te7), ovs, &(xo[0]));
Chris@82 1040 }
Chris@82 1041 {
Chris@82 1042 V TdZ, Te0, Te3, Te6;
Chris@82 1043 TdZ = VFMA(LDK(KP923879532), TdQ, TdJ);
Chris@82 1044 Te0 = VFMA(LDK(KP923879532), TdX, TdU);
Chris@82 1045 ST(&(xo[WS(os, 120)]), VFNMSI(Te0, TdZ), ovs, &(xo[0]));
Chris@82 1046 ST(&(xo[WS(os, 8)]), VFMAI(Te0, TdZ), ovs, &(xo[0]));
Chris@82 1047 Te3 = VFNMS(LDK(KP923879532), Te2, Te1);
Chris@82 1048 Te6 = VFMA(LDK(KP923879532), Te5, Te4);
Chris@82 1049 ST(&(xo[WS(os, 40)]), VFMAI(Te6, Te3), ovs, &(xo[0]));
Chris@82 1050 ST(&(xo[WS(os, 88)]), VFNMSI(Te6, Te3), ovs, &(xo[0]));
Chris@82 1051 }
Chris@82 1052 }
Chris@82 1053 {
Chris@82 1054 V TaZ, Tcp, Tci, Tcs, Tc4, Tct, Tcl, Tcq;
Chris@82 1055 {
Chris@82 1056 V Tat, TaY, Tce, Tch;
Chris@82 1057 Tat = VFMA(LDK(KP707106781), Tas, Tad);
Chris@82 1058 TaY = VADD(TaI, TaX);
Chris@82 1059 TaZ = VFMA(LDK(KP923879532), TaY, Tat);
Chris@82 1060 Tcp = VFNMS(LDK(KP923879532), TaY, Tat);
Chris@82 1061 Tce = VFMA(LDK(KP707106781), Tcd, Tcc);
Chris@82 1062 Tch = VSUB(Tcf, Tcg);
Chris@82 1063 Tci = VFMA(LDK(KP923879532), Tch, Tce);
Chris@82 1064 Tcs = VFNMS(LDK(KP923879532), Tch, Tce);
Chris@82 1065 {
Chris@82 1066 V Tbw, Tck, Tc3, Tcj;
Chris@82 1067 {
Chris@82 1068 V Tbm, Tbv, TbT, Tc2;
Chris@82 1069 Tbm = VFMA(LDK(KP707106781), Tbl, Tb6);
Chris@82 1070 Tbv = VFMA(LDK(KP707106781), Tbu, Tbt);
Chris@82 1071 Tbw = VFNMS(LDK(KP198912367), Tbv, Tbm);
Chris@82 1072 Tck = VFMA(LDK(KP198912367), Tbm, Tbv);
Chris@82 1073 TbT = VFMA(LDK(KP707106781), TbS, TbD);
Chris@82 1074 Tc2 = VFMA(LDK(KP707106781), Tc1, Tc0);
Chris@82 1075 Tc3 = VFNMS(LDK(KP198912367), Tc2, TbT);
Chris@82 1076 Tcj = VFMA(LDK(KP198912367), TbT, Tc2);
Chris@82 1077 }
Chris@82 1078 Tc4 = VADD(Tbw, Tc3);
Chris@82 1079 Tct = VSUB(Tc3, Tbw);
Chris@82 1080 Tcl = VSUB(Tcj, Tck);
Chris@82 1081 Tcq = VADD(Tck, Tcj);
Chris@82 1082 }
Chris@82 1083 }
Chris@82 1084 {
Chris@82 1085 V Tc5, Tcm, Tcv, Tcw;
Chris@82 1086 Tc5 = VFNMS(LDK(KP980785280), Tc4, TaZ);
Chris@82 1087 Tcm = VFNMS(LDK(KP980785280), Tcl, Tci);
Chris@82 1088 ST(&(xo[WS(os, 60)]), VFNMSI(Tcm, Tc5), ovs, &(xo[0]));
Chris@82 1089 ST(&(xo[WS(os, 68)]), VFMAI(Tcm, Tc5), ovs, &(xo[0]));
Chris@82 1090 Tcv = VFMA(LDK(KP980785280), Tcq, Tcp);
Chris@82 1091 Tcw = VFNMS(LDK(KP980785280), Tct, Tcs);
Chris@82 1092 ST(&(xo[WS(os, 28)]), VFNMSI(Tcw, Tcv), ovs, &(xo[0]));
Chris@82 1093 ST(&(xo[WS(os, 100)]), VFMAI(Tcw, Tcv), ovs, &(xo[0]));
Chris@82 1094 }
Chris@82 1095 {
Chris@82 1096 V Tcn, Tco, Tcr, Tcu;
Chris@82 1097 Tcn = VFMA(LDK(KP980785280), Tc4, TaZ);
Chris@82 1098 Tco = VFMA(LDK(KP980785280), Tcl, Tci);
Chris@82 1099 ST(&(xo[WS(os, 124)]), VFNMSI(Tco, Tcn), ovs, &(xo[0]));
Chris@82 1100 ST(&(xo[WS(os, 4)]), VFMAI(Tco, Tcn), ovs, &(xo[0]));
Chris@82 1101 Tcr = VFNMS(LDK(KP980785280), Tcq, Tcp);
Chris@82 1102 Tcu = VFMA(LDK(KP980785280), Tct, Tcs);
Chris@82 1103 ST(&(xo[WS(os, 36)]), VFMAI(Tcu, Tcr), ovs, &(xo[0]));
Chris@82 1104 ST(&(xo[WS(os, 92)]), VFNMSI(Tcu, Tcr), ovs, &(xo[0]));
Chris@82 1105 }
Chris@82 1106 }
Chris@82 1107 {
Chris@82 1108 V Tcz, TcR, TcK, TcU, TcG, TcV, TcN, TcS;
Chris@82 1109 {
Chris@82 1110 V Tcx, Tcy, TcI, TcJ;
Chris@82 1111 Tcx = VFNMS(LDK(KP707106781), Tas, Tad);
Chris@82 1112 Tcy = VADD(Tcg, Tcf);
Chris@82 1113 Tcz = VFMA(LDK(KP923879532), Tcy, Tcx);
Chris@82 1114 TcR = VFNMS(LDK(KP923879532), Tcy, Tcx);
Chris@82 1115 TcI = VFNMS(LDK(KP707106781), Tcd, Tcc);
Chris@82 1116 TcJ = VSUB(TaX, TaI);
Chris@82 1117 TcK = VFNMS(LDK(KP923879532), TcJ, TcI);
Chris@82 1118 TcU = VFMA(LDK(KP923879532), TcJ, TcI);
Chris@82 1119 {
Chris@82 1120 V TcC, TcM, TcF, TcL;
Chris@82 1121 {
Chris@82 1122 V TcA, TcB, TcD, TcE;
Chris@82 1123 TcA = VFNMS(LDK(KP707106781), Tbl, Tb6);
Chris@82 1124 TcB = VFNMS(LDK(KP707106781), Tbu, Tbt);
Chris@82 1125 TcC = VFMA(LDK(KP668178637), TcB, TcA);
Chris@82 1126 TcM = VFNMS(LDK(KP668178637), TcA, TcB);
Chris@82 1127 TcD = VFNMS(LDK(KP707106781), TbS, TbD);
Chris@82 1128 TcE = VFNMS(LDK(KP707106781), Tc1, Tc0);
Chris@82 1129 TcF = VFMA(LDK(KP668178637), TcE, TcD);
Chris@82 1130 TcL = VFNMS(LDK(KP668178637), TcD, TcE);
Chris@82 1131 }
Chris@82 1132 TcG = VADD(TcC, TcF);
Chris@82 1133 TcV = VSUB(TcF, TcC);
Chris@82 1134 TcN = VSUB(TcL, TcM);
Chris@82 1135 TcS = VADD(TcM, TcL);
Chris@82 1136 }
Chris@82 1137 }
Chris@82 1138 {
Chris@82 1139 V TcH, TcO, TcX, TcY;
Chris@82 1140 TcH = VFNMS(LDK(KP831469612), TcG, Tcz);
Chris@82 1141 TcO = VFNMS(LDK(KP831469612), TcN, TcK);
Chris@82 1142 ST(&(xo[WS(os, 76)]), VFNMSI(TcO, TcH), ovs, &(xo[0]));
Chris@82 1143 ST(&(xo[WS(os, 52)]), VFMAI(TcO, TcH), ovs, &(xo[0]));
Chris@82 1144 TcX = VFNMS(LDK(KP831469612), TcS, TcR);
Chris@82 1145 TcY = VFMA(LDK(KP831469612), TcV, TcU);
Chris@82 1146 ST(&(xo[WS(os, 20)]), VFMAI(TcY, TcX), ovs, &(xo[0]));
Chris@82 1147 ST(&(xo[WS(os, 108)]), VFNMSI(TcY, TcX), ovs, &(xo[0]));
Chris@82 1148 }
Chris@82 1149 {
Chris@82 1150 V TcP, TcQ, TcT, TcW;
Chris@82 1151 TcP = VFMA(LDK(KP831469612), TcG, Tcz);
Chris@82 1152 TcQ = VFMA(LDK(KP831469612), TcN, TcK);
Chris@82 1153 ST(&(xo[WS(os, 12)]), VFNMSI(TcQ, TcP), ovs, &(xo[0]));
Chris@82 1154 ST(&(xo[WS(os, 116)]), VFMAI(TcQ, TcP), ovs, &(xo[0]));
Chris@82 1155 TcT = VFMA(LDK(KP831469612), TcS, TcR);
Chris@82 1156 TcW = VFNMS(LDK(KP831469612), TcV, TcU);
Chris@82 1157 ST(&(xo[WS(os, 44)]), VFNMSI(TcW, TcT), ovs, &(xo[0]));
Chris@82 1158 ST(&(xo[WS(os, 84)]), VFMAI(TcW, TcT), ovs, &(xo[0]));
Chris@82 1159 }
Chris@82 1160 }
Chris@82 1161 {
Chris@82 1162 V TeF, Tga, TfF, Tg0, Tfy, Tg7, TfI, TfP, Tfm, TfJ, TfB, TfG, TfW, Tgb, Tg3;
Chris@82 1163 V Tg8;
Chris@82 1164 {
Chris@82 1165 V Tel, TfY, TeE, TfZ, Teu, TeD;
Chris@82 1166 Tel = VFMA(LDK(KP923879532), Tek, Ted);
Chris@82 1167 TfY = VFNMS(LDK(KP923879532), Tft, Tfq);
Chris@82 1168 Teu = VFNMS(LDK(KP198912367), Tet, Teq);
Chris@82 1169 TeD = VFNMS(LDK(KP198912367), TeC, Tez);
Chris@82 1170 TeE = VADD(Teu, TeD);
Chris@82 1171 TfZ = VSUB(TeD, Teu);
Chris@82 1172 TeF = VFMA(LDK(KP980785280), TeE, Tel);
Chris@82 1173 Tga = VFMA(LDK(KP980785280), TfZ, TfY);
Chris@82 1174 TfF = VFNMS(LDK(KP980785280), TeE, Tel);
Chris@82 1175 Tg0 = VFNMS(LDK(KP980785280), TfZ, TfY);
Chris@82 1176 }
Chris@82 1177 {
Chris@82 1178 V Tfu, TfN, Tfx, TfO, Tfv, Tfw;
Chris@82 1179 Tfu = VFMA(LDK(KP923879532), Tft, Tfq);
Chris@82 1180 TfN = VFNMS(LDK(KP923879532), Tek, Ted);
Chris@82 1181 Tfv = VFMA(LDK(KP198912367), Tez, TeC);
Chris@82 1182 Tfw = VFMA(LDK(KP198912367), Teq, Tet);
Chris@82 1183 Tfx = VSUB(Tfv, Tfw);
Chris@82 1184 TfO = VADD(Tfw, Tfv);
Chris@82 1185 Tfy = VFMA(LDK(KP980785280), Tfx, Tfu);
Chris@82 1186 Tg7 = VFNMS(LDK(KP980785280), TfO, TfN);
Chris@82 1187 TfI = VFNMS(LDK(KP980785280), Tfx, Tfu);
Chris@82 1188 TfP = VFMA(LDK(KP980785280), TfO, TfN);
Chris@82 1189 }
Chris@82 1190 {
Chris@82 1191 V Tf0, TfA, Tfl, Tfz;
Chris@82 1192 {
Chris@82 1193 V TeS, TeZ, Tfd, Tfk;
Chris@82 1194 TeS = VFMA(LDK(KP923879532), TeR, TeK);
Chris@82 1195 TeZ = VFMA(LDK(KP923879532), TeY, TeV);
Chris@82 1196 Tf0 = VFNMS(LDK(KP098491403), TeZ, TeS);
Chris@82 1197 TfA = VFMA(LDK(KP098491403), TeS, TeZ);
Chris@82 1198 Tfd = VFMA(LDK(KP923879532), Tfc, Tf5);
Chris@82 1199 Tfk = VFMA(LDK(KP923879532), Tfj, Tfg);
Chris@82 1200 Tfl = VFNMS(LDK(KP098491403), Tfk, Tfd);
Chris@82 1201 Tfz = VFMA(LDK(KP098491403), Tfd, Tfk);
Chris@82 1202 }
Chris@82 1203 Tfm = VADD(Tf0, Tfl);
Chris@82 1204 TfJ = VSUB(Tfl, Tf0);
Chris@82 1205 TfB = VSUB(Tfz, TfA);
Chris@82 1206 TfG = VADD(TfA, Tfz);
Chris@82 1207 }
Chris@82 1208 {
Chris@82 1209 V TfS, Tg2, TfV, Tg1;
Chris@82 1210 {
Chris@82 1211 V TfQ, TfR, TfT, TfU;
Chris@82 1212 TfQ = VFNMS(LDK(KP923879532), TeR, TeK);
Chris@82 1213 TfR = VFNMS(LDK(KP923879532), TeY, TeV);
Chris@82 1214 TfS = VFMA(LDK(KP820678790), TfR, TfQ);
Chris@82 1215 Tg2 = VFNMS(LDK(KP820678790), TfQ, TfR);
Chris@82 1216 TfT = VFNMS(LDK(KP923879532), Tfc, Tf5);
Chris@82 1217 TfU = VFNMS(LDK(KP923879532), Tfj, Tfg);
Chris@82 1218 TfV = VFMA(LDK(KP820678790), TfU, TfT);
Chris@82 1219 Tg1 = VFNMS(LDK(KP820678790), TfT, TfU);
Chris@82 1220 }
Chris@82 1221 TfW = VADD(TfS, TfV);
Chris@82 1222 Tgb = VSUB(TfV, TfS);
Chris@82 1223 Tg3 = VSUB(Tg1, Tg2);
Chris@82 1224 Tg8 = VADD(Tg2, Tg1);
Chris@82 1225 }
Chris@82 1226 {
Chris@82 1227 V Tfn, TfC, Tg9, Tgc;
Chris@82 1228 Tfn = VFNMS(LDK(KP995184726), Tfm, TeF);
Chris@82 1229 TfC = VFNMS(LDK(KP995184726), TfB, Tfy);
Chris@82 1230 ST(&(xo[WS(os, 62)]), VFNMSI(TfC, Tfn), ovs, &(xo[0]));
Chris@82 1231 ST(&(xo[WS(os, 66)]), VFMAI(TfC, Tfn), ovs, &(xo[0]));
Chris@82 1232 Tg9 = VFMA(LDK(KP773010453), Tg8, Tg7);
Chris@82 1233 Tgc = VFNMS(LDK(KP773010453), Tgb, Tga);
Chris@82 1234 ST(&(xo[WS(os, 46)]), VFNMSI(Tgc, Tg9), ovs, &(xo[0]));
Chris@82 1235 ST(&(xo[WS(os, 82)]), VFMAI(Tgc, Tg9), ovs, &(xo[0]));
Chris@82 1236 }
Chris@82 1237 {
Chris@82 1238 V Tgd, Tge, TfD, TfE;
Chris@82 1239 Tgd = VFNMS(LDK(KP773010453), Tg8, Tg7);
Chris@82 1240 Tge = VFMA(LDK(KP773010453), Tgb, Tga);
Chris@82 1241 ST(&(xo[WS(os, 18)]), VFMAI(Tge, Tgd), ovs, &(xo[0]));
Chris@82 1242 ST(&(xo[WS(os, 110)]), VFNMSI(Tge, Tgd), ovs, &(xo[0]));
Chris@82 1243 TfD = VFMA(LDK(KP995184726), Tfm, TeF);
Chris@82 1244 TfE = VFMA(LDK(KP995184726), TfB, Tfy);
Chris@82 1245 ST(&(xo[WS(os, 126)]), VFNMSI(TfE, TfD), ovs, &(xo[0]));
Chris@82 1246 ST(&(xo[WS(os, 2)]), VFMAI(TfE, TfD), ovs, &(xo[0]));
Chris@82 1247 }
Chris@82 1248 {
Chris@82 1249 V TfH, TfK, TfX, Tg4;
Chris@82 1250 TfH = VFNMS(LDK(KP995184726), TfG, TfF);
Chris@82 1251 TfK = VFMA(LDK(KP995184726), TfJ, TfI);
Chris@82 1252 ST(&(xo[WS(os, 34)]), VFMAI(TfK, TfH), ovs, &(xo[0]));
Chris@82 1253 ST(&(xo[WS(os, 94)]), VFNMSI(TfK, TfH), ovs, &(xo[0]));
Chris@82 1254 TfX = VFNMS(LDK(KP773010453), TfW, TfP);
Chris@82 1255 Tg4 = VFNMS(LDK(KP773010453), Tg3, Tg0);
Chris@82 1256 ST(&(xo[WS(os, 78)]), VFNMSI(Tg4, TfX), ovs, &(xo[0]));
Chris@82 1257 ST(&(xo[WS(os, 50)]), VFMAI(Tg4, TfX), ovs, &(xo[0]));
Chris@82 1258 }
Chris@82 1259 {
Chris@82 1260 V Tg5, Tg6, TfL, TfM;
Chris@82 1261 Tg5 = VFMA(LDK(KP773010453), TfW, TfP);
Chris@82 1262 Tg6 = VFMA(LDK(KP773010453), Tg3, Tg0);
Chris@82 1263 ST(&(xo[WS(os, 14)]), VFNMSI(Tg6, Tg5), ovs, &(xo[0]));
Chris@82 1264 ST(&(xo[WS(os, 114)]), VFMAI(Tg6, Tg5), ovs, &(xo[0]));
Chris@82 1265 TfL = VFMA(LDK(KP995184726), TfG, TfF);
Chris@82 1266 TfM = VFNMS(LDK(KP995184726), TfJ, TfI);
Chris@82 1267 ST(&(xo[WS(os, 30)]), VFNMSI(TfM, TfL), ovs, &(xo[0]));
Chris@82 1268 ST(&(xo[WS(os, 98)]), VFMAI(TfM, TfL), ovs, &(xo[0]));
Chris@82 1269 }
Chris@82 1270 }
Chris@82 1271 {
Chris@82 1272 V Tgp, Tho, TgT, The, TgM, Thl, TgW, Th3, TgE, TgX, TgP, TgU, Tha, Thp, Thh;
Chris@82 1273 V Thm;
Chris@82 1274 {
Chris@82 1275 V Tgh, Thc, Tgo, Thd, Tgk, Tgn;
Chris@82 1276 Tgh = VFNMS(LDK(KP923879532), Tgg, Tgf);
Chris@82 1277 Thc = VFNMS(LDK(KP923879532), TgH, TgG);
Chris@82 1278 Tgk = VFNMS(LDK(KP668178637), Tgj, Tgi);
Chris@82 1279 Tgn = VFNMS(LDK(KP668178637), Tgm, Tgl);
Chris@82 1280 Tgo = VADD(Tgk, Tgn);
Chris@82 1281 Thd = VSUB(Tgn, Tgk);
Chris@82 1282 Tgp = VFNMS(LDK(KP831469612), Tgo, Tgh);
Chris@82 1283 Tho = VFNMS(LDK(KP831469612), Thd, Thc);
Chris@82 1284 TgT = VFMA(LDK(KP831469612), Tgo, Tgh);
Chris@82 1285 The = VFMA(LDK(KP831469612), Thd, Thc);
Chris@82 1286 }
Chris@82 1287 {
Chris@82 1288 V TgI, Th1, TgL, Th2, TgJ, TgK;
Chris@82 1289 TgI = VFMA(LDK(KP923879532), TgH, TgG);
Chris@82 1290 Th1 = VFMA(LDK(KP923879532), Tgg, Tgf);
Chris@82 1291 TgJ = VFMA(LDK(KP668178637), Tgl, Tgm);
Chris@82 1292 TgK = VFMA(LDK(KP668178637), Tgi, Tgj);
Chris@82 1293 TgL = VSUB(TgJ, TgK);
Chris@82 1294 Th2 = VADD(TgK, TgJ);
Chris@82 1295 TgM = VFMA(LDK(KP831469612), TgL, TgI);
Chris@82 1296 Thl = VFNMS(LDK(KP831469612), Th2, Th1);
Chris@82 1297 TgW = VFNMS(LDK(KP831469612), TgL, TgI);
Chris@82 1298 Th3 = VFMA(LDK(KP831469612), Th2, Th1);
Chris@82 1299 }
Chris@82 1300 {
Chris@82 1301 V Tgw, TgO, TgD, TgN;
Chris@82 1302 {
Chris@82 1303 V Tgs, Tgv, Tgz, TgC;
Chris@82 1304 Tgs = VFNMS(LDK(KP923879532), Tgr, Tgq);
Chris@82 1305 Tgv = VFMA(LDK(KP923879532), Tgu, Tgt);
Chris@82 1306 Tgw = VFNMS(LDK(KP534511135), Tgv, Tgs);
Chris@82 1307 TgO = VFMA(LDK(KP534511135), Tgs, Tgv);
Chris@82 1308 Tgz = VFNMS(LDK(KP923879532), Tgy, Tgx);
Chris@82 1309 TgC = VFMA(LDK(KP923879532), TgB, TgA);
Chris@82 1310 TgD = VFNMS(LDK(KP534511135), TgC, Tgz);
Chris@82 1311 TgN = VFMA(LDK(KP534511135), Tgz, TgC);
Chris@82 1312 }
Chris@82 1313 TgE = VADD(Tgw, TgD);
Chris@82 1314 TgX = VSUB(TgD, Tgw);
Chris@82 1315 TgP = VSUB(TgN, TgO);
Chris@82 1316 TgU = VADD(TgO, TgN);
Chris@82 1317 }
Chris@82 1318 {
Chris@82 1319 V Th6, Thg, Th9, Thf;
Chris@82 1320 {
Chris@82 1321 V Th4, Th5, Th7, Th8;
Chris@82 1322 Th4 = VFMA(LDK(KP923879532), Tgr, Tgq);
Chris@82 1323 Th5 = VFNMS(LDK(KP923879532), Tgu, Tgt);
Chris@82 1324 Th6 = VFMA(LDK(KP303346683), Th5, Th4);
Chris@82 1325 Thg = VFNMS(LDK(KP303346683), Th4, Th5);
Chris@82 1326 Th7 = VFMA(LDK(KP923879532), Tgy, Tgx);
Chris@82 1327 Th8 = VFNMS(LDK(KP923879532), TgB, TgA);
Chris@82 1328 Th9 = VFMA(LDK(KP303346683), Th8, Th7);
Chris@82 1329 Thf = VFNMS(LDK(KP303346683), Th7, Th8);
Chris@82 1330 }
Chris@82 1331 Tha = VADD(Th6, Th9);
Chris@82 1332 Thp = VSUB(Th9, Th6);
Chris@82 1333 Thh = VSUB(Thf, Thg);
Chris@82 1334 Thm = VADD(Thg, Thf);
Chris@82 1335 }
Chris@82 1336 {
Chris@82 1337 V TgF, TgQ, Thn, Thq;
Chris@82 1338 TgF = VFNMS(LDK(KP881921264), TgE, Tgp);
Chris@82 1339 TgQ = VFNMS(LDK(KP881921264), TgP, TgM);
Chris@82 1340 ST(&(xo[WS(os, 54)]), VFNMSI(TgQ, TgF), ovs, &(xo[0]));
Chris@82 1341 ST(&(xo[WS(os, 74)]), VFMAI(TgQ, TgF), ovs, &(xo[0]));
Chris@82 1342 Thn = VFMA(LDK(KP956940335), Thm, Thl);
Chris@82 1343 Thq = VFNMS(LDK(KP956940335), Thp, Tho);
Chris@82 1344 ST(&(xo[WS(os, 38)]), VFNMSI(Thq, Thn), ovs, &(xo[0]));
Chris@82 1345 ST(&(xo[WS(os, 90)]), VFMAI(Thq, Thn), ovs, &(xo[0]));
Chris@82 1346 }
Chris@82 1347 {
Chris@82 1348 V Thr, Ths, TgR, TgS;
Chris@82 1349 Thr = VFNMS(LDK(KP956940335), Thm, Thl);
Chris@82 1350 Ths = VFMA(LDK(KP956940335), Thp, Tho);
Chris@82 1351 ST(&(xo[WS(os, 26)]), VFMAI(Ths, Thr), ovs, &(xo[0]));
Chris@82 1352 ST(&(xo[WS(os, 102)]), VFNMSI(Ths, Thr), ovs, &(xo[0]));
Chris@82 1353 TgR = VFMA(LDK(KP881921264), TgE, Tgp);
Chris@82 1354 TgS = VFMA(LDK(KP881921264), TgP, TgM);
Chris@82 1355 ST(&(xo[WS(os, 118)]), VFNMSI(TgS, TgR), ovs, &(xo[0]));
Chris@82 1356 ST(&(xo[WS(os, 10)]), VFMAI(TgS, TgR), ovs, &(xo[0]));
Chris@82 1357 }
Chris@82 1358 {
Chris@82 1359 V TgV, TgY, Thb, Thi;
Chris@82 1360 TgV = VFNMS(LDK(KP881921264), TgU, TgT);
Chris@82 1361 TgY = VFMA(LDK(KP881921264), TgX, TgW);
Chris@82 1362 ST(&(xo[WS(os, 42)]), VFMAI(TgY, TgV), ovs, &(xo[0]));
Chris@82 1363 ST(&(xo[WS(os, 86)]), VFNMSI(TgY, TgV), ovs, &(xo[0]));
Chris@82 1364 Thb = VFNMS(LDK(KP956940335), Tha, Th3);
Chris@82 1365 Thi = VFNMS(LDK(KP956940335), Thh, The);
Chris@82 1366 ST(&(xo[WS(os, 70)]), VFNMSI(Thi, Thb), ovs, &(xo[0]));
Chris@82 1367 ST(&(xo[WS(os, 58)]), VFMAI(Thi, Thb), ovs, &(xo[0]));
Chris@82 1368 }
Chris@82 1369 {
Chris@82 1370 V Thj, Thk, TgZ, Th0;
Chris@82 1371 Thj = VFMA(LDK(KP956940335), Tha, Th3);
Chris@82 1372 Thk = VFMA(LDK(KP956940335), Thh, The);
Chris@82 1373 ST(&(xo[WS(os, 6)]), VFNMSI(Thk, Thj), ovs, &(xo[0]));
Chris@82 1374 ST(&(xo[WS(os, 122)]), VFMAI(Thk, Thj), ovs, &(xo[0]));
Chris@82 1375 TgZ = VFMA(LDK(KP881921264), TgU, TgT);
Chris@82 1376 Th0 = VFNMS(LDK(KP881921264), TgX, TgW);
Chris@82 1377 ST(&(xo[WS(os, 22)]), VFNMSI(Th0, TgZ), ovs, &(xo[0]));
Chris@82 1378 ST(&(xo[WS(os, 106)]), VFMAI(Th0, TgZ), ovs, &(xo[0]));
Chris@82 1379 }
Chris@82 1380 }
Chris@82 1381 {
Chris@82 1382 V T80, T8n, T8f, T8k, T8A, T8P, T8H, T8M, T7n, T8L, T8O, T8c, T8j, T8t, T8E;
Chris@82 1383 V T8m;
Chris@82 1384 {
Chris@82 1385 V T7G, T8d, T7Z, T8e;
Chris@82 1386 {
Chris@82 1387 V T7y, T7F, T7R, T7Y;
Chris@82 1388 T7y = VFMA(LDK(KP831469612), T7x, T7q);
Chris@82 1389 T7F = VFMA(LDK(KP831469612), T7E, T7B);
Chris@82 1390 T7G = VFMA(LDK(KP148335987), T7F, T7y);
Chris@82 1391 T8d = VFNMS(LDK(KP148335987), T7y, T7F);
Chris@82 1392 T7R = VFMA(LDK(KP831469612), T7Q, T7J);
Chris@82 1393 T7Y = VFMA(LDK(KP831469612), T7X, T7U);
Chris@82 1394 T7Z = VFMA(LDK(KP148335987), T7Y, T7R);
Chris@82 1395 T8e = VFNMS(LDK(KP148335987), T7R, T7Y);
Chris@82 1396 }
Chris@82 1397 T80 = VADD(T7G, T7Z);
Chris@82 1398 T8n = VSUB(T7Z, T7G);
Chris@82 1399 T8f = VSUB(T8d, T8e);
Chris@82 1400 T8k = VADD(T8d, T8e);
Chris@82 1401 }
Chris@82 1402 {
Chris@82 1403 V T8w, T8F, T8z, T8G;
Chris@82 1404 {
Chris@82 1405 V T8u, T8v, T8x, T8y;
Chris@82 1406 T8u = VFNMS(LDK(KP831469612), T7x, T7q);
Chris@82 1407 T8v = VFNMS(LDK(KP831469612), T7E, T7B);
Chris@82 1408 T8w = VFNMS(LDK(KP741650546), T8v, T8u);
Chris@82 1409 T8F = VFMA(LDK(KP741650546), T8u, T8v);
Chris@82 1410 T8x = VFNMS(LDK(KP831469612), T7Q, T7J);
Chris@82 1411 T8y = VFNMS(LDK(KP831469612), T7X, T7U);
Chris@82 1412 T8z = VFNMS(LDK(KP741650546), T8y, T8x);
Chris@82 1413 T8G = VFMA(LDK(KP741650546), T8x, T8y);
Chris@82 1414 }
Chris@82 1415 T8A = VADD(T8w, T8z);
Chris@82 1416 T8P = VSUB(T8z, T8w);
Chris@82 1417 T8H = VSUB(T8F, T8G);
Chris@82 1418 T8M = VADD(T8F, T8G);
Chris@82 1419 }
Chris@82 1420 {
Chris@82 1421 V T77, T8r, T88, T8C, T7m, T8D, T8b, T8s, T76, T87;
Chris@82 1422 T76 = VADD(T72, T75);
Chris@82 1423 T77 = VFMA(LDK(KP831469612), T76, T6Z);
Chris@82 1424 T8r = VFNMS(LDK(KP831469612), T76, T6Z);
Chris@82 1425 T87 = VSUB(T85, T86);
Chris@82 1426 T88 = VFMA(LDK(KP831469612), T87, T84);
Chris@82 1427 T8C = VFNMS(LDK(KP831469612), T87, T84);
Chris@82 1428 {
Chris@82 1429 V T7e, T7l, T89, T8a;
Chris@82 1430 T7e = VFMA(LDK(KP303346683), T7d, T7a);
Chris@82 1431 T7l = VFMA(LDK(KP303346683), T7k, T7h);
Chris@82 1432 T7m = VADD(T7e, T7l);
Chris@82 1433 T8D = VSUB(T7l, T7e);
Chris@82 1434 T89 = VFNMS(LDK(KP303346683), T7a, T7d);
Chris@82 1435 T8a = VFNMS(LDK(KP303346683), T7h, T7k);
Chris@82 1436 T8b = VSUB(T89, T8a);
Chris@82 1437 T8s = VADD(T89, T8a);
Chris@82 1438 }
Chris@82 1439 T7n = VFMA(LDK(KP956940335), T7m, T77);
Chris@82 1440 T8L = VFMA(LDK(KP956940335), T8s, T8r);
Chris@82 1441 T8O = VFMA(LDK(KP956940335), T8D, T8C);
Chris@82 1442 T8c = VFMA(LDK(KP956940335), T8b, T88);
Chris@82 1443 T8j = VFNMS(LDK(KP956940335), T7m, T77);
Chris@82 1444 T8t = VFNMS(LDK(KP956940335), T8s, T8r);
Chris@82 1445 T8E = VFNMS(LDK(KP956940335), T8D, T8C);
Chris@82 1446 T8m = VFNMS(LDK(KP956940335), T8b, T88);
Chris@82 1447 }
Chris@82 1448 {
Chris@82 1449 V T81, T8g, T8N, T8Q;
Chris@82 1450 T81 = VFNMS(LDK(KP989176509), T80, T7n);
Chris@82 1451 T8g = VFNMS(LDK(KP989176509), T8f, T8c);
Chris@82 1452 ST(&(xo[WS(os, 61)]), VFNMSI(T8g, T81), ovs, &(xo[WS(os, 1)]));
Chris@82 1453 ST(&(xo[WS(os, 67)]), VFMAI(T8g, T81), ovs, &(xo[WS(os, 1)]));
Chris@82 1454 T8N = VFNMS(LDK(KP803207531), T8M, T8L);
Chris@82 1455 T8Q = VFNMS(LDK(KP803207531), T8P, T8O);
Chris@82 1456 ST(&(xo[WS(os, 45)]), VFNMSI(T8Q, T8N), ovs, &(xo[WS(os, 1)]));
Chris@82 1457 ST(&(xo[WS(os, 83)]), VFMAI(T8Q, T8N), ovs, &(xo[WS(os, 1)]));
Chris@82 1458 }
Chris@82 1459 {
Chris@82 1460 V T8R, T8S, T8h, T8i;
Chris@82 1461 T8R = VFMA(LDK(KP803207531), T8M, T8L);
Chris@82 1462 T8S = VFMA(LDK(KP803207531), T8P, T8O);
Chris@82 1463 ST(&(xo[WS(os, 19)]), VFMAI(T8S, T8R), ovs, &(xo[WS(os, 1)]));
Chris@82 1464 ST(&(xo[WS(os, 109)]), VFNMSI(T8S, T8R), ovs, &(xo[WS(os, 1)]));
Chris@82 1465 T8h = VFMA(LDK(KP989176509), T80, T7n);
Chris@82 1466 T8i = VFMA(LDK(KP989176509), T8f, T8c);
Chris@82 1467 ST(&(xo[WS(os, 125)]), VFNMSI(T8i, T8h), ovs, &(xo[WS(os, 1)]));
Chris@82 1468 ST(&(xo[WS(os, 3)]), VFMAI(T8i, T8h), ovs, &(xo[WS(os, 1)]));
Chris@82 1469 }
Chris@82 1470 {
Chris@82 1471 V T8l, T8o, T8B, T8I;
Chris@82 1472 T8l = VFMA(LDK(KP989176509), T8k, T8j);
Chris@82 1473 T8o = VFMA(LDK(KP989176509), T8n, T8m);
Chris@82 1474 ST(&(xo[WS(os, 35)]), VFMAI(T8o, T8l), ovs, &(xo[WS(os, 1)]));
Chris@82 1475 ST(&(xo[WS(os, 93)]), VFNMSI(T8o, T8l), ovs, &(xo[WS(os, 1)]));
Chris@82 1476 T8B = VFNMS(LDK(KP803207531), T8A, T8t);
Chris@82 1477 T8I = VFNMS(LDK(KP803207531), T8H, T8E);
Chris@82 1478 ST(&(xo[WS(os, 77)]), VFNMSI(T8I, T8B), ovs, &(xo[WS(os, 1)]));
Chris@82 1479 ST(&(xo[WS(os, 51)]), VFMAI(T8I, T8B), ovs, &(xo[WS(os, 1)]));
Chris@82 1480 }
Chris@82 1481 {
Chris@82 1482 V T8J, T8K, T8p, T8q;
Chris@82 1483 T8J = VFMA(LDK(KP803207531), T8A, T8t);
Chris@82 1484 T8K = VFMA(LDK(KP803207531), T8H, T8E);
Chris@82 1485 ST(&(xo[WS(os, 13)]), VFNMSI(T8K, T8J), ovs, &(xo[WS(os, 1)]));
Chris@82 1486 ST(&(xo[WS(os, 115)]), VFMAI(T8K, T8J), ovs, &(xo[WS(os, 1)]));
Chris@82 1487 T8p = VFNMS(LDK(KP989176509), T8k, T8j);
Chris@82 1488 T8q = VFNMS(LDK(KP989176509), T8n, T8m);
Chris@82 1489 ST(&(xo[WS(os, 29)]), VFNMSI(T8q, T8p), ovs, &(xo[WS(os, 1)]));
Chris@82 1490 ST(&(xo[WS(os, 99)]), VFMAI(T8q, T8p), ovs, &(xo[WS(os, 1)]));
Chris@82 1491 }
Chris@82 1492 }
Chris@82 1493 {
Chris@82 1494 V T4K, T5d, T55, T5a, T5q, T5F, T5x, T5C, T2f, T5B, T5E, T52, T59, T5j, T5u;
Chris@82 1495 V T5c;
Chris@82 1496 {
Chris@82 1497 V T3u, T53, T4J, T54;
Chris@82 1498 {
Chris@82 1499 V T3g, T3t, T4v, T4I;
Chris@82 1500 T3g = VFMA(LDK(KP980785280), T3f, T2G);
Chris@82 1501 T3t = VFMA(LDK(KP980785280), T3s, T3p);
Chris@82 1502 T3u = VFNMS(LDK(KP049126849), T3t, T3g);
Chris@82 1503 T53 = VFMA(LDK(KP049126849), T3g, T3t);
Chris@82 1504 T4v = VFMA(LDK(KP980785280), T4u, T3V);
Chris@82 1505 T4I = VFMA(LDK(KP980785280), T4H, T4E);
Chris@82 1506 T4J = VFNMS(LDK(KP049126849), T4I, T4v);
Chris@82 1507 T54 = VFMA(LDK(KP049126849), T4v, T4I);
Chris@82 1508 }
Chris@82 1509 T4K = VADD(T3u, T4J);
Chris@82 1510 T5d = VSUB(T4J, T3u);
Chris@82 1511 T55 = VSUB(T53, T54);
Chris@82 1512 T5a = VADD(T53, T54);
Chris@82 1513 }
Chris@82 1514 {
Chris@82 1515 V T5m, T5v, T5p, T5w;
Chris@82 1516 {
Chris@82 1517 V T5k, T5l, T5n, T5o;
Chris@82 1518 T5k = VFNMS(LDK(KP980785280), T3f, T2G);
Chris@82 1519 T5l = VFNMS(LDK(KP980785280), T3s, T3p);
Chris@82 1520 T5m = VFMA(LDK(KP906347169), T5l, T5k);
Chris@82 1521 T5v = VFNMS(LDK(KP906347169), T5k, T5l);
Chris@82 1522 T5n = VFNMS(LDK(KP980785280), T4u, T3V);
Chris@82 1523 T5o = VFNMS(LDK(KP980785280), T4H, T4E);
Chris@82 1524 T5p = VFMA(LDK(KP906347169), T5o, T5n);
Chris@82 1525 T5w = VFNMS(LDK(KP906347169), T5n, T5o);
Chris@82 1526 }
Chris@82 1527 T5q = VADD(T5m, T5p);
Chris@82 1528 T5F = VSUB(T5p, T5m);
Chris@82 1529 T5x = VSUB(T5v, T5w);
Chris@82 1530 T5C = VADD(T5v, T5w);
Chris@82 1531 }
Chris@82 1532 {
Chris@82 1533 V T11, T5h, T4Y, T5s, T2e, T5t, T51, T5i, T10, T4X;
Chris@82 1534 T10 = VADD(TI, TZ);
Chris@82 1535 T11 = VFMA(LDK(KP980785280), T10, Tr);
Chris@82 1536 T5h = VFNMS(LDK(KP980785280), T10, Tr);
Chris@82 1537 T4X = VSUB(T4V, T4W);
Chris@82 1538 T4Y = VFMA(LDK(KP980785280), T4X, T4U);
Chris@82 1539 T5s = VFNMS(LDK(KP980785280), T4X, T4U);
Chris@82 1540 {
Chris@82 1541 V T1C, T2d, T4Z, T50;
Chris@82 1542 T1C = VFNMS(LDK(KP098491403), T1B, T1s);
Chris@82 1543 T2d = VFNMS(LDK(KP098491403), T2c, T23);
Chris@82 1544 T2e = VADD(T1C, T2d);
Chris@82 1545 T5t = VSUB(T2d, T1C);
Chris@82 1546 T4Z = VFMA(LDK(KP098491403), T1s, T1B);
Chris@82 1547 T50 = VFMA(LDK(KP098491403), T23, T2c);
Chris@82 1548 T51 = VSUB(T4Z, T50);
Chris@82 1549 T5i = VADD(T4Z, T50);
Chris@82 1550 }
Chris@82 1551 T2f = VFMA(LDK(KP995184726), T2e, T11);
Chris@82 1552 T5B = VFNMS(LDK(KP995184726), T5i, T5h);
Chris@82 1553 T5E = VFNMS(LDK(KP995184726), T5t, T5s);
Chris@82 1554 T52 = VFMA(LDK(KP995184726), T51, T4Y);
Chris@82 1555 T59 = VFNMS(LDK(KP995184726), T2e, T11);
Chris@82 1556 T5j = VFMA(LDK(KP995184726), T5i, T5h);
Chris@82 1557 T5u = VFMA(LDK(KP995184726), T5t, T5s);
Chris@82 1558 T5c = VFNMS(LDK(KP995184726), T51, T4Y);
Chris@82 1559 }
Chris@82 1560 {
Chris@82 1561 V T4L, T56, T5D, T5G;
Chris@82 1562 T4L = VFNMS(LDK(KP998795456), T4K, T2f);
Chris@82 1563 T56 = VFNMS(LDK(KP998795456), T55, T52);
Chris@82 1564 ST(&(xo[WS(os, 65)]), VFNMSI(T56, T4L), ovs, &(xo[WS(os, 1)]));
Chris@82 1565 ST(&(xo[WS(os, 63)]), VFMAI(T56, T4L), ovs, &(xo[WS(os, 1)]));
Chris@82 1566 T5D = VFMA(LDK(KP740951125), T5C, T5B);
Chris@82 1567 T5G = VFMA(LDK(KP740951125), T5F, T5E);
Chris@82 1568 ST(&(xo[WS(os, 47)]), VFMAI(T5G, T5D), ovs, &(xo[WS(os, 1)]));
Chris@82 1569 ST(&(xo[WS(os, 81)]), VFNMSI(T5G, T5D), ovs, &(xo[WS(os, 1)]));
Chris@82 1570 }
Chris@82 1571 {
Chris@82 1572 V T5H, T5I, T57, T58;
Chris@82 1573 T5H = VFNMS(LDK(KP740951125), T5C, T5B);
Chris@82 1574 T5I = VFNMS(LDK(KP740951125), T5F, T5E);
Chris@82 1575 ST(&(xo[WS(os, 17)]), VFNMSI(T5I, T5H), ovs, &(xo[WS(os, 1)]));
Chris@82 1576 ST(&(xo[WS(os, 111)]), VFMAI(T5I, T5H), ovs, &(xo[WS(os, 1)]));
Chris@82 1577 T57 = VFMA(LDK(KP998795456), T4K, T2f);
Chris@82 1578 T58 = VFMA(LDK(KP998795456), T55, T52);
Chris@82 1579 ST(&(xo[WS(os, 1)]), VFNMSI(T58, T57), ovs, &(xo[WS(os, 1)]));
Chris@82 1580 ST(&(xo[WS(os, 127)]), VFMAI(T58, T57), ovs, &(xo[WS(os, 1)]));
Chris@82 1581 }
Chris@82 1582 {
Chris@82 1583 V T5b, T5e, T5r, T5y;
Chris@82 1584 T5b = VFNMS(LDK(KP998795456), T5a, T59);
Chris@82 1585 T5e = VFNMS(LDK(KP998795456), T5d, T5c);
Chris@82 1586 ST(&(xo[WS(os, 33)]), VFNMSI(T5e, T5b), ovs, &(xo[WS(os, 1)]));
Chris@82 1587 ST(&(xo[WS(os, 95)]), VFMAI(T5e, T5b), ovs, &(xo[WS(os, 1)]));
Chris@82 1588 T5r = VFNMS(LDK(KP740951125), T5q, T5j);
Chris@82 1589 T5y = VFNMS(LDK(KP740951125), T5x, T5u);
Chris@82 1590 ST(&(xo[WS(os, 49)]), VFNMSI(T5y, T5r), ovs, &(xo[WS(os, 1)]));
Chris@82 1591 ST(&(xo[WS(os, 79)]), VFMAI(T5y, T5r), ovs, &(xo[WS(os, 1)]));
Chris@82 1592 }
Chris@82 1593 {
Chris@82 1594 V T5z, T5A, T5f, T5g;
Chris@82 1595 T5z = VFMA(LDK(KP740951125), T5q, T5j);
Chris@82 1596 T5A = VFMA(LDK(KP740951125), T5x, T5u);
Chris@82 1597 ST(&(xo[WS(os, 113)]), VFNMSI(T5A, T5z), ovs, &(xo[WS(os, 1)]));
Chris@82 1598 ST(&(xo[WS(os, 15)]), VFMAI(T5A, T5z), ovs, &(xo[WS(os, 1)]));
Chris@82 1599 T5f = VFMA(LDK(KP998795456), T5a, T59);
Chris@82 1600 T5g = VFMA(LDK(KP998795456), T5d, T5c);
Chris@82 1601 ST(&(xo[WS(os, 31)]), VFMAI(T5g, T5f), ovs, &(xo[WS(os, 1)]));
Chris@82 1602 ST(&(xo[WS(os, 97)]), VFNMSI(T5g, T5f), ovs, &(xo[WS(os, 1)]));
Chris@82 1603 }
Chris@82 1604 }
Chris@82 1605 {
Chris@82 1606 V T9i, T9B, T9t, T9y, T9O, Ta3, T9V, Ta0, T93, T9Z, Ta2, T9q, T9x, T9H, T9S;
Chris@82 1607 V T9A;
Chris@82 1608 {
Chris@82 1609 V T9a, T9r, T9h, T9s;
Chris@82 1610 {
Chris@82 1611 V T96, T99, T9d, T9g;
Chris@82 1612 T96 = VFNMS(LDK(KP831469612), T95, T94);
Chris@82 1613 T99 = VFNMS(LDK(KP831469612), T98, T97);
Chris@82 1614 T9a = VFMA(LDK(KP599376933), T99, T96);
Chris@82 1615 T9r = VFNMS(LDK(KP599376933), T96, T99);
Chris@82 1616 T9d = VFNMS(LDK(KP831469612), T9c, T9b);
Chris@82 1617 T9g = VFNMS(LDK(KP831469612), T9f, T9e);
Chris@82 1618 T9h = VFMA(LDK(KP599376933), T9g, T9d);
Chris@82 1619 T9s = VFNMS(LDK(KP599376933), T9d, T9g);
Chris@82 1620 }
Chris@82 1621 T9i = VADD(T9a, T9h);
Chris@82 1622 T9B = VSUB(T9h, T9a);
Chris@82 1623 T9t = VSUB(T9r, T9s);
Chris@82 1624 T9y = VADD(T9r, T9s);
Chris@82 1625 }
Chris@82 1626 {
Chris@82 1627 V T9K, T9T, T9N, T9U;
Chris@82 1628 {
Chris@82 1629 V T9I, T9J, T9L, T9M;
Chris@82 1630 T9I = VFMA(LDK(KP831469612), T95, T94);
Chris@82 1631 T9J = VFMA(LDK(KP831469612), T98, T97);
Chris@82 1632 T9K = VFNMS(LDK(KP250486960), T9J, T9I);
Chris@82 1633 T9T = VFMA(LDK(KP250486960), T9I, T9J);
Chris@82 1634 T9L = VFMA(LDK(KP831469612), T9c, T9b);
Chris@82 1635 T9M = VFMA(LDK(KP831469612), T9f, T9e);
Chris@82 1636 T9N = VFNMS(LDK(KP250486960), T9M, T9L);
Chris@82 1637 T9U = VFMA(LDK(KP250486960), T9L, T9M);
Chris@82 1638 }
Chris@82 1639 T9O = VADD(T9K, T9N);
Chris@82 1640 Ta3 = VSUB(T9N, T9K);
Chris@82 1641 T9V = VSUB(T9T, T9U);
Chris@82 1642 Ta0 = VADD(T9T, T9U);
Chris@82 1643 }
Chris@82 1644 {
Chris@82 1645 V T8V, T9F, T9m, T9Q, T92, T9R, T9p, T9G, T8U, T9l;
Chris@82 1646 T8U = VADD(T85, T86);
Chris@82 1647 T8V = VFMA(LDK(KP831469612), T8U, T8T);
Chris@82 1648 T9F = VFNMS(LDK(KP831469612), T8U, T8T);
Chris@82 1649 T9l = VSUB(T75, T72);
Chris@82 1650 T9m = VFMA(LDK(KP831469612), T9l, T9k);
Chris@82 1651 T9Q = VFNMS(LDK(KP831469612), T9l, T9k);
Chris@82 1652 {
Chris@82 1653 V T8Y, T91, T9n, T9o;
Chris@82 1654 T8Y = VFMA(LDK(KP534511135), T8X, T8W);
Chris@82 1655 T91 = VFMA(LDK(KP534511135), T90, T8Z);
Chris@82 1656 T92 = VADD(T8Y, T91);
Chris@82 1657 T9R = VSUB(T8Y, T91);
Chris@82 1658 T9n = VFNMS(LDK(KP534511135), T8Z, T90);
Chris@82 1659 T9o = VFNMS(LDK(KP534511135), T8W, T8X);
Chris@82 1660 T9p = VSUB(T9n, T9o);
Chris@82 1661 T9G = VADD(T9o, T9n);
Chris@82 1662 }
Chris@82 1663 T93 = VFMA(LDK(KP881921264), T92, T8V);
Chris@82 1664 T9Z = VFNMS(LDK(KP881921264), T9G, T9F);
Chris@82 1665 Ta2 = VFNMS(LDK(KP881921264), T9R, T9Q);
Chris@82 1666 T9q = VFMA(LDK(KP881921264), T9p, T9m);
Chris@82 1667 T9x = VFNMS(LDK(KP881921264), T92, T8V);
Chris@82 1668 T9H = VFMA(LDK(KP881921264), T9G, T9F);
Chris@82 1669 T9S = VFMA(LDK(KP881921264), T9R, T9Q);
Chris@82 1670 T9A = VFNMS(LDK(KP881921264), T9p, T9m);
Chris@82 1671 }
Chris@82 1672 {
Chris@82 1673 V T9j, T9u, Ta1, Ta4;
Chris@82 1674 T9j = VFNMS(LDK(KP857728610), T9i, T93);
Chris@82 1675 T9u = VFNMS(LDK(KP857728610), T9t, T9q);
Chris@82 1676 ST(&(xo[WS(os, 53)]), VFNMSI(T9u, T9j), ovs, &(xo[WS(os, 1)]));
Chris@82 1677 ST(&(xo[WS(os, 75)]), VFMAI(T9u, T9j), ovs, &(xo[WS(os, 1)]));
Chris@82 1678 Ta1 = VFNMS(LDK(KP970031253), Ta0, T9Z);
Chris@82 1679 Ta4 = VFNMS(LDK(KP970031253), Ta3, Ta2);
Chris@82 1680 ST(&(xo[WS(os, 37)]), VFNMSI(Ta4, Ta1), ovs, &(xo[WS(os, 1)]));
Chris@82 1681 ST(&(xo[WS(os, 91)]), VFMAI(Ta4, Ta1), ovs, &(xo[WS(os, 1)]));
Chris@82 1682 }
Chris@82 1683 {
Chris@82 1684 V Ta5, Ta6, T9v, T9w;
Chris@82 1685 Ta5 = VFMA(LDK(KP970031253), Ta0, T9Z);
Chris@82 1686 Ta6 = VFMA(LDK(KP970031253), Ta3, Ta2);
Chris@82 1687 ST(&(xo[WS(os, 27)]), VFMAI(Ta6, Ta5), ovs, &(xo[WS(os, 1)]));
Chris@82 1688 ST(&(xo[WS(os, 101)]), VFNMSI(Ta6, Ta5), ovs, &(xo[WS(os, 1)]));
Chris@82 1689 T9v = VFMA(LDK(KP857728610), T9i, T93);
Chris@82 1690 T9w = VFMA(LDK(KP857728610), T9t, T9q);
Chris@82 1691 ST(&(xo[WS(os, 117)]), VFNMSI(T9w, T9v), ovs, &(xo[WS(os, 1)]));
Chris@82 1692 ST(&(xo[WS(os, 11)]), VFMAI(T9w, T9v), ovs, &(xo[WS(os, 1)]));
Chris@82 1693 }
Chris@82 1694 {
Chris@82 1695 V T9z, T9C, T9P, T9W;
Chris@82 1696 T9z = VFMA(LDK(KP857728610), T9y, T9x);
Chris@82 1697 T9C = VFMA(LDK(KP857728610), T9B, T9A);
Chris@82 1698 ST(&(xo[WS(os, 43)]), VFMAI(T9C, T9z), ovs, &(xo[WS(os, 1)]));
Chris@82 1699 ST(&(xo[WS(os, 85)]), VFNMSI(T9C, T9z), ovs, &(xo[WS(os, 1)]));
Chris@82 1700 T9P = VFNMS(LDK(KP970031253), T9O, T9H);
Chris@82 1701 T9W = VFNMS(LDK(KP970031253), T9V, T9S);
Chris@82 1702 ST(&(xo[WS(os, 69)]), VFNMSI(T9W, T9P), ovs, &(xo[WS(os, 1)]));
Chris@82 1703 ST(&(xo[WS(os, 59)]), VFMAI(T9W, T9P), ovs, &(xo[WS(os, 1)]));
Chris@82 1704 }
Chris@82 1705 {
Chris@82 1706 V T9X, T9Y, T9D, T9E;
Chris@82 1707 T9X = VFMA(LDK(KP970031253), T9O, T9H);
Chris@82 1708 T9Y = VFMA(LDK(KP970031253), T9V, T9S);
Chris@82 1709 ST(&(xo[WS(os, 5)]), VFNMSI(T9Y, T9X), ovs, &(xo[WS(os, 1)]));
Chris@82 1710 ST(&(xo[WS(os, 123)]), VFMAI(T9Y, T9X), ovs, &(xo[WS(os, 1)]));
Chris@82 1711 T9D = VFNMS(LDK(KP857728610), T9y, T9x);
Chris@82 1712 T9E = VFNMS(LDK(KP857728610), T9B, T9A);
Chris@82 1713 ST(&(xo[WS(os, 21)]), VFNMSI(T9E, T9D), ovs, &(xo[WS(os, 1)]));
Chris@82 1714 ST(&(xo[WS(os, 107)]), VFMAI(T9E, T9D), ovs, &(xo[WS(os, 1)]));
Chris@82 1715 }
Chris@82 1716 }
Chris@82 1717 {
Chris@82 1718 V T68, T6r, T6j, T6o, T6E, T6T, T6L, T6Q, T5T, T6P, T6S, T6g, T6n, T6x, T6I;
Chris@82 1719 V T6q;
Chris@82 1720 {
Chris@82 1721 V T60, T6h, T67, T6i;
Chris@82 1722 {
Chris@82 1723 V T5W, T5Z, T63, T66;
Chris@82 1724 T5W = VFNMS(LDK(KP980785280), T5V, T5U);
Chris@82 1725 T5Z = VFMA(LDK(KP980785280), T5Y, T5X);
Chris@82 1726 T60 = VFNMS(LDK(KP472964775), T5Z, T5W);
Chris@82 1727 T6h = VFMA(LDK(KP472964775), T5W, T5Z);
Chris@82 1728 T63 = VFNMS(LDK(KP980785280), T62, T61);
Chris@82 1729 T66 = VFMA(LDK(KP980785280), T65, T64);
Chris@82 1730 T67 = VFNMS(LDK(KP472964775), T66, T63);
Chris@82 1731 T6i = VFMA(LDK(KP472964775), T63, T66);
Chris@82 1732 }
Chris@82 1733 T68 = VADD(T60, T67);
Chris@82 1734 T6r = VSUB(T67, T60);
Chris@82 1735 T6j = VSUB(T6h, T6i);
Chris@82 1736 T6o = VADD(T6h, T6i);
Chris@82 1737 }
Chris@82 1738 {
Chris@82 1739 V T6A, T6J, T6D, T6K;
Chris@82 1740 {
Chris@82 1741 V T6y, T6z, T6B, T6C;
Chris@82 1742 T6y = VFMA(LDK(KP980785280), T5V, T5U);
Chris@82 1743 T6z = VFNMS(LDK(KP980785280), T5Y, T5X);
Chris@82 1744 T6A = VFMA(LDK(KP357805721), T6z, T6y);
Chris@82 1745 T6J = VFNMS(LDK(KP357805721), T6y, T6z);
Chris@82 1746 T6B = VFMA(LDK(KP980785280), T62, T61);
Chris@82 1747 T6C = VFNMS(LDK(KP980785280), T65, T64);
Chris@82 1748 T6D = VFMA(LDK(KP357805721), T6C, T6B);
Chris@82 1749 T6K = VFNMS(LDK(KP357805721), T6B, T6C);
Chris@82 1750 }
Chris@82 1751 T6E = VADD(T6A, T6D);
Chris@82 1752 T6T = VSUB(T6D, T6A);
Chris@82 1753 T6L = VSUB(T6J, T6K);
Chris@82 1754 T6Q = VADD(T6J, T6K);
Chris@82 1755 }
Chris@82 1756 {
Chris@82 1757 V T5L, T6v, T6c, T6G, T5S, T6H, T6f, T6w, T5K, T6b;
Chris@82 1758 T5K = VADD(T4V, T4W);
Chris@82 1759 T5L = VFNMS(LDK(KP980785280), T5K, T5J);
Chris@82 1760 T6v = VFMA(LDK(KP980785280), T5K, T5J);
Chris@82 1761 T6b = VSUB(TZ, TI);
Chris@82 1762 T6c = VFNMS(LDK(KP980785280), T6b, T6a);
Chris@82 1763 T6G = VFMA(LDK(KP980785280), T6b, T6a);
Chris@82 1764 {
Chris@82 1765 V T5O, T5R, T6d, T6e;
Chris@82 1766 T5O = VFNMS(LDK(KP820678790), T5N, T5M);
Chris@82 1767 T5R = VFNMS(LDK(KP820678790), T5Q, T5P);
Chris@82 1768 T5S = VADD(T5O, T5R);
Chris@82 1769 T6H = VSUB(T5O, T5R);
Chris@82 1770 T6d = VFMA(LDK(KP820678790), T5P, T5Q);
Chris@82 1771 T6e = VFMA(LDK(KP820678790), T5M, T5N);
Chris@82 1772 T6f = VSUB(T6d, T6e);
Chris@82 1773 T6w = VADD(T6e, T6d);
Chris@82 1774 }
Chris@82 1775 T5T = VFNMS(LDK(KP773010453), T5S, T5L);
Chris@82 1776 T6P = VFNMS(LDK(KP773010453), T6w, T6v);
Chris@82 1777 T6S = VFNMS(LDK(KP773010453), T6H, T6G);
Chris@82 1778 T6g = VFNMS(LDK(KP773010453), T6f, T6c);
Chris@82 1779 T6n = VFMA(LDK(KP773010453), T5S, T5L);
Chris@82 1780 T6x = VFMA(LDK(KP773010453), T6w, T6v);
Chris@82 1781 T6I = VFMA(LDK(KP773010453), T6H, T6G);
Chris@82 1782 T6q = VFMA(LDK(KP773010453), T6f, T6c);
Chris@82 1783 }
Chris@82 1784 {
Chris@82 1785 V T69, T6k, T6R, T6U;
Chris@82 1786 T69 = VFNMS(LDK(KP903989293), T68, T5T);
Chris@82 1787 T6k = VFNMS(LDK(KP903989293), T6j, T6g);
Chris@82 1788 ST(&(xo[WS(os, 73)]), VFNMSI(T6k, T69), ovs, &(xo[WS(os, 1)]));
Chris@82 1789 ST(&(xo[WS(os, 55)]), VFMAI(T6k, T69), ovs, &(xo[WS(os, 1)]));
Chris@82 1790 T6R = VFMA(LDK(KP941544065), T6Q, T6P);
Chris@82 1791 T6U = VFMA(LDK(KP941544065), T6T, T6S);
Chris@82 1792 ST(&(xo[WS(os, 39)]), VFMAI(T6U, T6R), ovs, &(xo[WS(os, 1)]));
Chris@82 1793 ST(&(xo[WS(os, 89)]), VFNMSI(T6U, T6R), ovs, &(xo[WS(os, 1)]));
Chris@82 1794 }
Chris@82 1795 {
Chris@82 1796 V T6V, T6W, T6l, T6m;
Chris@82 1797 T6V = VFNMS(LDK(KP941544065), T6Q, T6P);
Chris@82 1798 T6W = VFNMS(LDK(KP941544065), T6T, T6S);
Chris@82 1799 ST(&(xo[WS(os, 25)]), VFNMSI(T6W, T6V), ovs, &(xo[WS(os, 1)]));
Chris@82 1800 ST(&(xo[WS(os, 103)]), VFMAI(T6W, T6V), ovs, &(xo[WS(os, 1)]));
Chris@82 1801 T6l = VFMA(LDK(KP903989293), T68, T5T);
Chris@82 1802 T6m = VFMA(LDK(KP903989293), T6j, T6g);
Chris@82 1803 ST(&(xo[WS(os, 9)]), VFNMSI(T6m, T6l), ovs, &(xo[WS(os, 1)]));
Chris@82 1804 ST(&(xo[WS(os, 119)]), VFMAI(T6m, T6l), ovs, &(xo[WS(os, 1)]));
Chris@82 1805 }
Chris@82 1806 {
Chris@82 1807 V T6p, T6s, T6F, T6M;
Chris@82 1808 T6p = VFNMS(LDK(KP903989293), T6o, T6n);
Chris@82 1809 T6s = VFNMS(LDK(KP903989293), T6r, T6q);
Chris@82 1810 ST(&(xo[WS(os, 41)]), VFNMSI(T6s, T6p), ovs, &(xo[WS(os, 1)]));
Chris@82 1811 ST(&(xo[WS(os, 87)]), VFMAI(T6s, T6p), ovs, &(xo[WS(os, 1)]));
Chris@82 1812 T6F = VFNMS(LDK(KP941544065), T6E, T6x);
Chris@82 1813 T6M = VFNMS(LDK(KP941544065), T6L, T6I);
Chris@82 1814 ST(&(xo[WS(os, 57)]), VFNMSI(T6M, T6F), ovs, &(xo[WS(os, 1)]));
Chris@82 1815 ST(&(xo[WS(os, 71)]), VFMAI(T6M, T6F), ovs, &(xo[WS(os, 1)]));
Chris@82 1816 }
Chris@82 1817 {
Chris@82 1818 V T6N, T6O, T6t, T6u;
Chris@82 1819 T6N = VFMA(LDK(KP941544065), T6E, T6x);
Chris@82 1820 T6O = VFMA(LDK(KP941544065), T6L, T6I);
Chris@82 1821 ST(&(xo[WS(os, 121)]), VFNMSI(T6O, T6N), ovs, &(xo[WS(os, 1)]));
Chris@82 1822 ST(&(xo[WS(os, 7)]), VFMAI(T6O, T6N), ovs, &(xo[WS(os, 1)]));
Chris@82 1823 T6t = VFMA(LDK(KP903989293), T6o, T6n);
Chris@82 1824 T6u = VFMA(LDK(KP903989293), T6r, T6q);
Chris@82 1825 ST(&(xo[WS(os, 23)]), VFMAI(T6u, T6t), ovs, &(xo[WS(os, 1)]));
Chris@82 1826 ST(&(xo[WS(os, 105)]), VFNMSI(T6u, T6t), ovs, &(xo[WS(os, 1)]));
Chris@82 1827 }
Chris@82 1828 }
Chris@82 1829 }
Chris@82 1830 }
Chris@82 1831 VLEAVE();
Chris@82 1832 }
Chris@82 1833
Chris@82 1834 static const kdft_desc desc = { 128, XSIMD_STRING("n1fv_128"), {440, 0, 642, 0}, &GENUS, 0, 0, 0, 0 };
Chris@82 1835
Chris@82 1836 void XSIMD(codelet_n1fv_128) (planner *p) {
Chris@82 1837 X(kdft_register) (p, n1fv_128, &desc);
Chris@82 1838 }
Chris@82 1839
Chris@82 1840 #else
Chris@82 1841
Chris@82 1842 /* Generated by: ../../../genfft/gen_notw_c.native -simd -compact -variables 4 -pipeline-latency 8 -n 128 -name n1fv_128 -include dft/simd/n1f.h */
Chris@82 1843
Chris@82 1844 /*
Chris@82 1845 * This function contains 1082 FP additions, 330 FP multiplications,
Chris@82 1846 * (or, 938 additions, 186 multiplications, 144 fused multiply/add),
Chris@82 1847 * 194 stack variables, 31 constants, and 256 memory accesses
Chris@82 1848 */
Chris@82 1849 #include "dft/simd/n1f.h"
Chris@82 1850
Chris@82 1851 static void n1fv_128(const R *ri, const R *ii, R *ro, R *io, stride is, stride os, INT v, INT ivs, INT ovs)
Chris@82 1852 {
Chris@82 1853 DVK(KP941544065, +0.941544065183020778412509402599502357185589796);
Chris@82 1854 DVK(KP336889853, +0.336889853392220050689253212619147570477766780);
Chris@82 1855 DVK(KP903989293, +0.903989293123443331586200297230537048710132025);
Chris@82 1856 DVK(KP427555093, +0.427555093430282094320966856888798534304578629);
Chris@82 1857 DVK(KP970031253, +0.970031253194543992603984207286100251456865962);
Chris@82 1858 DVK(KP242980179, +0.242980179903263889948274162077471118320990783);
Chris@82 1859 DVK(KP857728610, +0.857728610000272069902269984284770137042490799);
Chris@82 1860 DVK(KP514102744, +0.514102744193221726593693838968815772608049120);
Chris@82 1861 DVK(KP671558954, +0.671558954847018400625376850427421803228750632);
Chris@82 1862 DVK(KP740951125, +0.740951125354959091175616897495162729728955309);
Chris@82 1863 DVK(KP049067674, +0.049067674327418014254954976942682658314745363);
Chris@82 1864 DVK(KP998795456, +0.998795456205172392714771604759100694443203615);
Chris@82 1865 DVK(KP595699304, +0.595699304492433343467036528829969889511926338);
Chris@82 1866 DVK(KP803207531, +0.803207531480644909806676512963141923879569427);
Chris@82 1867 DVK(KP146730474, +0.146730474455361751658850129646717819706215317);
Chris@82 1868 DVK(KP989176509, +0.989176509964780973451673738016243063983689533);
Chris@82 1869 DVK(KP956940335, +0.956940335732208864935797886980269969482849206);
Chris@82 1870 DVK(KP290284677, +0.290284677254462367636192375817395274691476278);
Chris@82 1871 DVK(KP881921264, +0.881921264348355029712756863660388349508442621);
Chris@82 1872 DVK(KP471396736, +0.471396736825997648556387625905254377657460319);
Chris@82 1873 DVK(KP634393284, +0.634393284163645498215171613225493370675687095);
Chris@82 1874 DVK(KP773010453, +0.773010453362736960810906609758469800971041293);
Chris@82 1875 DVK(KP098017140, +0.098017140329560601994195563888641845861136673);
Chris@82 1876 DVK(KP995184726, +0.995184726672196886244836953109479921575474869);
Chris@82 1877 DVK(KP555570233, +0.555570233019602224742830813948532874374937191);
Chris@82 1878 DVK(KP831469612, +0.831469612302545237078788377617905756738560812);
Chris@82 1879 DVK(KP195090322, +0.195090322016128267848284868477022240927691618);
Chris@82 1880 DVK(KP980785280, +0.980785280403230449126182236134239036973933731);
Chris@82 1881 DVK(KP382683432, +0.382683432365089771728459984030398866761344562);
Chris@82 1882 DVK(KP923879532, +0.923879532511286756128183189396788286822416626);
Chris@82 1883 DVK(KP707106781, +0.707106781186547524400844362104849039284835938);
Chris@82 1884 {
Chris@82 1885 INT i;
Chris@82 1886 const R *xi;
Chris@82 1887 R *xo;
Chris@82 1888 xi = ri;
Chris@82 1889 xo = ro;
Chris@82 1890 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)) {
Chris@82 1891 V Tr, T5J, Ted, Tgf, Tfq, TgH, T4U, T6b, T6Z, T8T, Tad, TcZ, Tcc, Td0, T84;
Chris@82 1892 V T9l, Tb6, Tbt, T2G, T5X, TeV, Tgr, T3p, T5V, T7B, T95, TeK, Tgt, T7q, T97;
Chris@82 1893 V Td8, TdK, TbD, Tc0, T3V, T61, Tfg, TgB, T4E, T65, T7U, T9f, Tf5, Tgx, T7J;
Chris@82 1894 V T9b, Tdf, TdN, Td2, Td3, TI, T4V, Tft, Tgg, TZ, T4W, T75, T86, Tek, TgG;
Chris@82 1895 V T72, T85, Tas, Tcd, Tdp, Tdq, TdG, Teq, Tgm, Tet, Tgl, T1s, T5P, T1B, T5Q;
Chris@82 1896 V T7d, T8Z, TaI, Tcf, T7a, T90, Tdm, Tdn, TdH, Tez, Tgi, TeC, Tgj, T23, T5N;
Chris@82 1897 V T2c, T5M, T7k, T8X, TaX, Tcg, T7h, T8W, Tbl, Tbu, Tdb, TdL, TeY, Tgu, TeR;
Chris@82 1898 V Tgq, T7x, T98, T7E, T94, T3f, T5Y, T3s, T5U, TbS, Tc1, Tdi, TdO, Tfj, Tgy;
Chris@82 1899 V Tfc, TgA, T7Q, T9e, T7X, T9c, T4u, T64, T4H, T62;
Chris@82 1900 {
Chris@82 1901 V T3, Ta7, T4P, Ta8, Ta, Tab, T4M, Taa, Tc9, Tca, Ti, Tea, T4S, Tc6, Tc7;
Chris@82 1902 V Tp, Teb, T4R;
Chris@82 1903 {
Chris@82 1904 V T1, T2, T4N, T4O;
Chris@82 1905 T1 = LD(&(xi[0]), ivs, &(xi[0]));
Chris@82 1906 T2 = LD(&(xi[WS(is, 64)]), ivs, &(xi[0]));
Chris@82 1907 T3 = VSUB(T1, T2);
Chris@82 1908 Ta7 = VADD(T1, T2);
Chris@82 1909 T4N = LD(&(xi[WS(is, 32)]), ivs, &(xi[0]));
Chris@82 1910 T4O = LD(&(xi[WS(is, 96)]), ivs, &(xi[0]));
Chris@82 1911 T4P = VSUB(T4N, T4O);
Chris@82 1912 Ta8 = VADD(T4N, T4O);
Chris@82 1913 }
Chris@82 1914 {
Chris@82 1915 V T4, T5, T6, T7, T8, T9;
Chris@82 1916 T4 = LD(&(xi[WS(is, 16)]), ivs, &(xi[0]));
Chris@82 1917 T5 = LD(&(xi[WS(is, 80)]), ivs, &(xi[0]));
Chris@82 1918 T6 = VSUB(T4, T5);
Chris@82 1919 T7 = LD(&(xi[WS(is, 112)]), ivs, &(xi[0]));
Chris@82 1920 T8 = LD(&(xi[WS(is, 48)]), ivs, &(xi[0]));
Chris@82 1921 T9 = VSUB(T7, T8);
Chris@82 1922 Ta = VMUL(LDK(KP707106781), VADD(T6, T9));
Chris@82 1923 Tab = VADD(T7, T8);
Chris@82 1924 T4M = VMUL(LDK(KP707106781), VSUB(T9, T6));
Chris@82 1925 Taa = VADD(T4, T5);
Chris@82 1926 }
Chris@82 1927 {
Chris@82 1928 V Te, Th, Tl, To;
Chris@82 1929 {
Chris@82 1930 V Tc, Td, Tf, Tg;
Chris@82 1931 Tc = LD(&(xi[WS(is, 8)]), ivs, &(xi[0]));
Chris@82 1932 Td = LD(&(xi[WS(is, 72)]), ivs, &(xi[0]));
Chris@82 1933 Te = VSUB(Tc, Td);
Chris@82 1934 Tc9 = VADD(Tc, Td);
Chris@82 1935 Tf = LD(&(xi[WS(is, 40)]), ivs, &(xi[0]));
Chris@82 1936 Tg = LD(&(xi[WS(is, 104)]), ivs, &(xi[0]));
Chris@82 1937 Th = VSUB(Tf, Tg);
Chris@82 1938 Tca = VADD(Tf, Tg);
Chris@82 1939 }
Chris@82 1940 Ti = VFNMS(LDK(KP382683432), Th, VMUL(LDK(KP923879532), Te));
Chris@82 1941 Tea = VSUB(Tc9, Tca);
Chris@82 1942 T4S = VFMA(LDK(KP382683432), Te, VMUL(LDK(KP923879532), Th));
Chris@82 1943 {
Chris@82 1944 V Tj, Tk, Tm, Tn;
Chris@82 1945 Tj = LD(&(xi[WS(is, 120)]), ivs, &(xi[0]));
Chris@82 1946 Tk = LD(&(xi[WS(is, 56)]), ivs, &(xi[0]));
Chris@82 1947 Tl = VSUB(Tj, Tk);
Chris@82 1948 Tc6 = VADD(Tj, Tk);
Chris@82 1949 Tm = LD(&(xi[WS(is, 24)]), ivs, &(xi[0]));
Chris@82 1950 Tn = LD(&(xi[WS(is, 88)]), ivs, &(xi[0]));
Chris@82 1951 To = VSUB(Tm, Tn);
Chris@82 1952 Tc7 = VADD(Tm, Tn);
Chris@82 1953 }
Chris@82 1954 Tp = VFMA(LDK(KP923879532), Tl, VMUL(LDK(KP382683432), To));
Chris@82 1955 Teb = VSUB(Tc6, Tc7);
Chris@82 1956 T4R = VFNMS(LDK(KP923879532), To, VMUL(LDK(KP382683432), Tl));
Chris@82 1957 }
Chris@82 1958 {
Chris@82 1959 V Tb, Tq, Te9, Tec;
Chris@82 1960 Tb = VADD(T3, Ta);
Chris@82 1961 Tq = VADD(Ti, Tp);
Chris@82 1962 Tr = VADD(Tb, Tq);
Chris@82 1963 T5J = VSUB(Tb, Tq);
Chris@82 1964 Te9 = VSUB(Ta7, Ta8);
Chris@82 1965 Tec = VMUL(LDK(KP707106781), VADD(Tea, Teb));
Chris@82 1966 Ted = VADD(Te9, Tec);
Chris@82 1967 Tgf = VSUB(Te9, Tec);
Chris@82 1968 }
Chris@82 1969 {
Chris@82 1970 V Tfo, Tfp, T4Q, T4T;
Chris@82 1971 Tfo = VSUB(Tab, Taa);
Chris@82 1972 Tfp = VMUL(LDK(KP707106781), VSUB(Teb, Tea));
Chris@82 1973 Tfq = VADD(Tfo, Tfp);
Chris@82 1974 TgH = VSUB(Tfp, Tfo);
Chris@82 1975 T4Q = VSUB(T4M, T4P);
Chris@82 1976 T4T = VSUB(T4R, T4S);
Chris@82 1977 T4U = VADD(T4Q, T4T);
Chris@82 1978 T6b = VSUB(T4T, T4Q);
Chris@82 1979 }
Chris@82 1980 {
Chris@82 1981 V T6X, T6Y, Ta9, Tac;
Chris@82 1982 T6X = VSUB(T3, Ta);
Chris@82 1983 T6Y = VADD(T4S, T4R);
Chris@82 1984 T6Z = VADD(T6X, T6Y);
Chris@82 1985 T8T = VSUB(T6X, T6Y);
Chris@82 1986 Ta9 = VADD(Ta7, Ta8);
Chris@82 1987 Tac = VADD(Taa, Tab);
Chris@82 1988 Tad = VSUB(Ta9, Tac);
Chris@82 1989 TcZ = VADD(Ta9, Tac);
Chris@82 1990 }
Chris@82 1991 {
Chris@82 1992 V Tc8, Tcb, T82, T83;
Chris@82 1993 Tc8 = VADD(Tc6, Tc7);
Chris@82 1994 Tcb = VADD(Tc9, Tca);
Chris@82 1995 Tcc = VSUB(Tc8, Tcb);
Chris@82 1996 Td0 = VADD(Tcb, Tc8);
Chris@82 1997 T82 = VADD(T4P, T4M);
Chris@82 1998 T83 = VSUB(Tp, Ti);
Chris@82 1999 T84 = VADD(T82, T83);
Chris@82 2000 T9l = VSUB(T83, T82);
Chris@82 2001 }
Chris@82 2002 }
Chris@82 2003 {
Chris@82 2004 V Tb0, Tb1, T2i, Tb2, T3k, Tb3, Tb4, T2p, Tb5, T3h, T2x, TeH, T3n, Tbs, T2E;
Chris@82 2005 V TeI, T3m, Tbp, T2l, T2o, TeG, TeJ;
Chris@82 2006 {
Chris@82 2007 V T2g, T2h, T3i, T3j;
Chris@82 2008 T2g = LD(&(xi[WS(is, 1)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2009 T2h = LD(&(xi[WS(is, 65)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2010 Tb0 = VADD(T2g, T2h);
Chris@82 2011 T3i = LD(&(xi[WS(is, 33)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2012 T3j = LD(&(xi[WS(is, 97)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2013 Tb1 = VADD(T3i, T3j);
Chris@82 2014 T2i = VSUB(T2g, T2h);
Chris@82 2015 Tb2 = VADD(Tb0, Tb1);
Chris@82 2016 T3k = VSUB(T3i, T3j);
Chris@82 2017 }
Chris@82 2018 {
Chris@82 2019 V T2j, T2k, T2m, T2n;
Chris@82 2020 T2j = LD(&(xi[WS(is, 17)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2021 T2k = LD(&(xi[WS(is, 81)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2022 T2l = VSUB(T2j, T2k);
Chris@82 2023 Tb3 = VADD(T2j, T2k);
Chris@82 2024 T2m = LD(&(xi[WS(is, 113)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2025 T2n = LD(&(xi[WS(is, 49)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2026 T2o = VSUB(T2m, T2n);
Chris@82 2027 Tb4 = VADD(T2m, T2n);
Chris@82 2028 }
Chris@82 2029 T2p = VMUL(LDK(KP707106781), VADD(T2l, T2o));
Chris@82 2030 Tb5 = VADD(Tb3, Tb4);
Chris@82 2031 T3h = VMUL(LDK(KP707106781), VSUB(T2o, T2l));
Chris@82 2032 {
Chris@82 2033 V T2t, Tbq, T2w, Tbr;
Chris@82 2034 {
Chris@82 2035 V T2r, T2s, T2u, T2v;
Chris@82 2036 T2r = LD(&(xi[WS(is, 9)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2037 T2s = LD(&(xi[WS(is, 73)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2038 T2t = VSUB(T2r, T2s);
Chris@82 2039 Tbq = VADD(T2r, T2s);
Chris@82 2040 T2u = LD(&(xi[WS(is, 41)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2041 T2v = LD(&(xi[WS(is, 105)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2042 T2w = VSUB(T2u, T2v);
Chris@82 2043 Tbr = VADD(T2u, T2v);
Chris@82 2044 }
Chris@82 2045 T2x = VFNMS(LDK(KP382683432), T2w, VMUL(LDK(KP923879532), T2t));
Chris@82 2046 TeH = VSUB(Tbq, Tbr);
Chris@82 2047 T3n = VFMA(LDK(KP382683432), T2t, VMUL(LDK(KP923879532), T2w));
Chris@82 2048 Tbs = VADD(Tbq, Tbr);
Chris@82 2049 }
Chris@82 2050 {
Chris@82 2051 V T2A, Tbn, T2D, Tbo;
Chris@82 2052 {
Chris@82 2053 V T2y, T2z, T2B, T2C;
Chris@82 2054 T2y = LD(&(xi[WS(is, 121)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2055 T2z = LD(&(xi[WS(is, 57)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2056 T2A = VSUB(T2y, T2z);
Chris@82 2057 Tbn = VADD(T2y, T2z);
Chris@82 2058 T2B = LD(&(xi[WS(is, 25)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2059 T2C = LD(&(xi[WS(is, 89)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2060 T2D = VSUB(T2B, T2C);
Chris@82 2061 Tbo = VADD(T2B, T2C);
Chris@82 2062 }
Chris@82 2063 T2E = VFMA(LDK(KP923879532), T2A, VMUL(LDK(KP382683432), T2D));
Chris@82 2064 TeI = VSUB(Tbn, Tbo);
Chris@82 2065 T3m = VFNMS(LDK(KP923879532), T2D, VMUL(LDK(KP382683432), T2A));
Chris@82 2066 Tbp = VADD(Tbn, Tbo);
Chris@82 2067 }
Chris@82 2068 Tb6 = VSUB(Tb2, Tb5);
Chris@82 2069 Tbt = VSUB(Tbp, Tbs);
Chris@82 2070 {
Chris@82 2071 V T2q, T2F, TeT, TeU;
Chris@82 2072 T2q = VADD(T2i, T2p);
Chris@82 2073 T2F = VADD(T2x, T2E);
Chris@82 2074 T2G = VADD(T2q, T2F);
Chris@82 2075 T5X = VSUB(T2q, T2F);
Chris@82 2076 TeT = VSUB(Tb4, Tb3);
Chris@82 2077 TeU = VMUL(LDK(KP707106781), VSUB(TeI, TeH));
Chris@82 2078 TeV = VADD(TeT, TeU);
Chris@82 2079 Tgr = VSUB(TeU, TeT);
Chris@82 2080 }
Chris@82 2081 {
Chris@82 2082 V T3l, T3o, T7z, T7A;
Chris@82 2083 T3l = VSUB(T3h, T3k);
Chris@82 2084 T3o = VSUB(T3m, T3n);
Chris@82 2085 T3p = VADD(T3l, T3o);
Chris@82 2086 T5V = VSUB(T3o, T3l);
Chris@82 2087 T7z = VADD(T3k, T3h);
Chris@82 2088 T7A = VSUB(T2E, T2x);
Chris@82 2089 T7B = VADD(T7z, T7A);
Chris@82 2090 T95 = VSUB(T7A, T7z);
Chris@82 2091 }
Chris@82 2092 TeG = VSUB(Tb0, Tb1);
Chris@82 2093 TeJ = VMUL(LDK(KP707106781), VADD(TeH, TeI));
Chris@82 2094 TeK = VADD(TeG, TeJ);
Chris@82 2095 Tgt = VSUB(TeG, TeJ);
Chris@82 2096 {
Chris@82 2097 V T7o, T7p, Td6, Td7;
Chris@82 2098 T7o = VSUB(T2i, T2p);
Chris@82 2099 T7p = VADD(T3n, T3m);
Chris@82 2100 T7q = VADD(T7o, T7p);
Chris@82 2101 T97 = VSUB(T7o, T7p);
Chris@82 2102 Td6 = VADD(Tb2, Tb5);
Chris@82 2103 Td7 = VADD(Tbs, Tbp);
Chris@82 2104 Td8 = VADD(Td6, Td7);
Chris@82 2105 TdK = VSUB(Td6, Td7);
Chris@82 2106 }
Chris@82 2107 }
Chris@82 2108 {
Chris@82 2109 V Tbx, Tby, T3x, Tbz, T4z, TbA, TbB, T3E, TbC, T4w, T3M, Tf2, T4C, TbZ, T3T;
Chris@82 2110 V Tf3, T4B, TbW, T3A, T3D, Tf1, Tf4;
Chris@82 2111 {
Chris@82 2112 V T3v, T3w, T4x, T4y;
Chris@82 2113 T3v = LD(&(xi[WS(is, 127)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2114 T3w = LD(&(xi[WS(is, 63)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2115 Tbx = VADD(T3v, T3w);
Chris@82 2116 T4x = LD(&(xi[WS(is, 31)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2117 T4y = LD(&(xi[WS(is, 95)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2118 Tby = VADD(T4x, T4y);
Chris@82 2119 T3x = VSUB(T3v, T3w);
Chris@82 2120 Tbz = VADD(Tbx, Tby);
Chris@82 2121 T4z = VSUB(T4x, T4y);
Chris@82 2122 }
Chris@82 2123 {
Chris@82 2124 V T3y, T3z, T3B, T3C;
Chris@82 2125 T3y = LD(&(xi[WS(is, 15)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2126 T3z = LD(&(xi[WS(is, 79)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2127 T3A = VSUB(T3y, T3z);
Chris@82 2128 TbA = VADD(T3y, T3z);
Chris@82 2129 T3B = LD(&(xi[WS(is, 111)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2130 T3C = LD(&(xi[WS(is, 47)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2131 T3D = VSUB(T3B, T3C);
Chris@82 2132 TbB = VADD(T3B, T3C);
Chris@82 2133 }
Chris@82 2134 T3E = VMUL(LDK(KP707106781), VADD(T3A, T3D));
Chris@82 2135 TbC = VADD(TbA, TbB);
Chris@82 2136 T4w = VMUL(LDK(KP707106781), VSUB(T3D, T3A));
Chris@82 2137 {
Chris@82 2138 V T3I, TbX, T3L, TbY;
Chris@82 2139 {
Chris@82 2140 V T3G, T3H, T3J, T3K;
Chris@82 2141 T3G = LD(&(xi[WS(is, 7)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2142 T3H = LD(&(xi[WS(is, 71)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2143 T3I = VSUB(T3G, T3H);
Chris@82 2144 TbX = VADD(T3G, T3H);
Chris@82 2145 T3J = LD(&(xi[WS(is, 39)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2146 T3K = LD(&(xi[WS(is, 103)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2147 T3L = VSUB(T3J, T3K);
Chris@82 2148 TbY = VADD(T3J, T3K);
Chris@82 2149 }
Chris@82 2150 T3M = VFNMS(LDK(KP382683432), T3L, VMUL(LDK(KP923879532), T3I));
Chris@82 2151 Tf2 = VSUB(TbX, TbY);
Chris@82 2152 T4C = VFMA(LDK(KP382683432), T3I, VMUL(LDK(KP923879532), T3L));
Chris@82 2153 TbZ = VADD(TbX, TbY);
Chris@82 2154 }
Chris@82 2155 {
Chris@82 2156 V T3P, TbU, T3S, TbV;
Chris@82 2157 {
Chris@82 2158 V T3N, T3O, T3Q, T3R;
Chris@82 2159 T3N = LD(&(xi[WS(is, 119)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2160 T3O = LD(&(xi[WS(is, 55)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2161 T3P = VSUB(T3N, T3O);
Chris@82 2162 TbU = VADD(T3N, T3O);
Chris@82 2163 T3Q = LD(&(xi[WS(is, 23)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2164 T3R = LD(&(xi[WS(is, 87)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2165 T3S = VSUB(T3Q, T3R);
Chris@82 2166 TbV = VADD(T3Q, T3R);
Chris@82 2167 }
Chris@82 2168 T3T = VFMA(LDK(KP923879532), T3P, VMUL(LDK(KP382683432), T3S));
Chris@82 2169 Tf3 = VSUB(TbU, TbV);
Chris@82 2170 T4B = VFNMS(LDK(KP923879532), T3S, VMUL(LDK(KP382683432), T3P));
Chris@82 2171 TbW = VADD(TbU, TbV);
Chris@82 2172 }
Chris@82 2173 TbD = VSUB(Tbz, TbC);
Chris@82 2174 Tc0 = VSUB(TbW, TbZ);
Chris@82 2175 {
Chris@82 2176 V T3F, T3U, Tfe, Tff;
Chris@82 2177 T3F = VADD(T3x, T3E);
Chris@82 2178 T3U = VADD(T3M, T3T);
Chris@82 2179 T3V = VADD(T3F, T3U);
Chris@82 2180 T61 = VSUB(T3F, T3U);
Chris@82 2181 Tfe = VSUB(TbB, TbA);
Chris@82 2182 Tff = VMUL(LDK(KP707106781), VSUB(Tf3, Tf2));
Chris@82 2183 Tfg = VADD(Tfe, Tff);
Chris@82 2184 TgB = VSUB(Tff, Tfe);
Chris@82 2185 }
Chris@82 2186 {
Chris@82 2187 V T4A, T4D, T7S, T7T;
Chris@82 2188 T4A = VSUB(T4w, T4z);
Chris@82 2189 T4D = VSUB(T4B, T4C);
Chris@82 2190 T4E = VADD(T4A, T4D);
Chris@82 2191 T65 = VSUB(T4D, T4A);
Chris@82 2192 T7S = VADD(T4z, T4w);
Chris@82 2193 T7T = VSUB(T3T, T3M);
Chris@82 2194 T7U = VADD(T7S, T7T);
Chris@82 2195 T9f = VSUB(T7T, T7S);
Chris@82 2196 }
Chris@82 2197 Tf1 = VSUB(Tbx, Tby);
Chris@82 2198 Tf4 = VMUL(LDK(KP707106781), VADD(Tf2, Tf3));
Chris@82 2199 Tf5 = VADD(Tf1, Tf4);
Chris@82 2200 Tgx = VSUB(Tf1, Tf4);
Chris@82 2201 {
Chris@82 2202 V T7H, T7I, Tdd, Tde;
Chris@82 2203 T7H = VSUB(T3x, T3E);
Chris@82 2204 T7I = VADD(T4C, T4B);
Chris@82 2205 T7J = VADD(T7H, T7I);
Chris@82 2206 T9b = VSUB(T7H, T7I);
Chris@82 2207 Tdd = VADD(Tbz, TbC);
Chris@82 2208 Tde = VADD(TbZ, TbW);
Chris@82 2209 Tdf = VADD(Tdd, Tde);
Chris@82 2210 TdN = VSUB(Tdd, Tde);
Chris@82 2211 }
Chris@82 2212 }
Chris@82 2213 {
Chris@82 2214 V Tu, Tee, TG, Tag, TL, Teh, TX, Tan, TB, Tef, TD, Taj, TS, Tei, TU;
Chris@82 2215 V Taq, Teg, Tej;
Chris@82 2216 {
Chris@82 2217 V Ts, Tt, Tae, TE, TF, Taf;
Chris@82 2218 Ts = LD(&(xi[WS(is, 4)]), ivs, &(xi[0]));
Chris@82 2219 Tt = LD(&(xi[WS(is, 68)]), ivs, &(xi[0]));
Chris@82 2220 Tae = VADD(Ts, Tt);
Chris@82 2221 TE = LD(&(xi[WS(is, 36)]), ivs, &(xi[0]));
Chris@82 2222 TF = LD(&(xi[WS(is, 100)]), ivs, &(xi[0]));
Chris@82 2223 Taf = VADD(TE, TF);
Chris@82 2224 Tu = VSUB(Ts, Tt);
Chris@82 2225 Tee = VSUB(Tae, Taf);
Chris@82 2226 TG = VSUB(TE, TF);
Chris@82 2227 Tag = VADD(Tae, Taf);
Chris@82 2228 }
Chris@82 2229 {
Chris@82 2230 V TJ, TK, Tal, TV, TW, Tam;
Chris@82 2231 TJ = LD(&(xi[WS(is, 124)]), ivs, &(xi[0]));
Chris@82 2232 TK = LD(&(xi[WS(is, 60)]), ivs, &(xi[0]));
Chris@82 2233 Tal = VADD(TJ, TK);
Chris@82 2234 TV = LD(&(xi[WS(is, 28)]), ivs, &(xi[0]));
Chris@82 2235 TW = LD(&(xi[WS(is, 92)]), ivs, &(xi[0]));
Chris@82 2236 Tam = VADD(TV, TW);
Chris@82 2237 TL = VSUB(TJ, TK);
Chris@82 2238 Teh = VSUB(Tal, Tam);
Chris@82 2239 TX = VSUB(TV, TW);
Chris@82 2240 Tan = VADD(Tal, Tam);
Chris@82 2241 }
Chris@82 2242 {
Chris@82 2243 V Tx, Tah, TA, Tai;
Chris@82 2244 {
Chris@82 2245 V Tv, Tw, Ty, Tz;
Chris@82 2246 Tv = LD(&(xi[WS(is, 20)]), ivs, &(xi[0]));
Chris@82 2247 Tw = LD(&(xi[WS(is, 84)]), ivs, &(xi[0]));
Chris@82 2248 Tx = VSUB(Tv, Tw);
Chris@82 2249 Tah = VADD(Tv, Tw);
Chris@82 2250 Ty = LD(&(xi[WS(is, 116)]), ivs, &(xi[0]));
Chris@82 2251 Tz = LD(&(xi[WS(is, 52)]), ivs, &(xi[0]));
Chris@82 2252 TA = VSUB(Ty, Tz);
Chris@82 2253 Tai = VADD(Ty, Tz);
Chris@82 2254 }
Chris@82 2255 TB = VMUL(LDK(KP707106781), VADD(Tx, TA));
Chris@82 2256 Tef = VSUB(Tai, Tah);
Chris@82 2257 TD = VMUL(LDK(KP707106781), VSUB(TA, Tx));
Chris@82 2258 Taj = VADD(Tah, Tai);
Chris@82 2259 }
Chris@82 2260 {
Chris@82 2261 V TO, Tao, TR, Tap;
Chris@82 2262 {
Chris@82 2263 V TM, TN, TP, TQ;
Chris@82 2264 TM = LD(&(xi[WS(is, 12)]), ivs, &(xi[0]));
Chris@82 2265 TN = LD(&(xi[WS(is, 76)]), ivs, &(xi[0]));
Chris@82 2266 TO = VSUB(TM, TN);
Chris@82 2267 Tao = VADD(TM, TN);
Chris@82 2268 TP = LD(&(xi[WS(is, 108)]), ivs, &(xi[0]));
Chris@82 2269 TQ = LD(&(xi[WS(is, 44)]), ivs, &(xi[0]));
Chris@82 2270 TR = VSUB(TP, TQ);
Chris@82 2271 Tap = VADD(TP, TQ);
Chris@82 2272 }
Chris@82 2273 TS = VMUL(LDK(KP707106781), VADD(TO, TR));
Chris@82 2274 Tei = VSUB(Tap, Tao);
Chris@82 2275 TU = VMUL(LDK(KP707106781), VSUB(TR, TO));
Chris@82 2276 Taq = VADD(Tao, Tap);
Chris@82 2277 }
Chris@82 2278 Td2 = VADD(Tag, Taj);
Chris@82 2279 Td3 = VADD(Tan, Taq);
Chris@82 2280 {
Chris@82 2281 V TC, TH, Tfr, Tfs;
Chris@82 2282 TC = VADD(Tu, TB);
Chris@82 2283 TH = VSUB(TD, TG);
Chris@82 2284 TI = VFMA(LDK(KP980785280), TC, VMUL(LDK(KP195090322), TH));
Chris@82 2285 T4V = VFNMS(LDK(KP195090322), TC, VMUL(LDK(KP980785280), TH));
Chris@82 2286 Tfr = VFNMS(LDK(KP382683432), Tee, VMUL(LDK(KP923879532), Tef));
Chris@82 2287 Tfs = VFMA(LDK(KP382683432), Teh, VMUL(LDK(KP923879532), Tei));
Chris@82 2288 Tft = VADD(Tfr, Tfs);
Chris@82 2289 Tgg = VSUB(Tfs, Tfr);
Chris@82 2290 }
Chris@82 2291 {
Chris@82 2292 V TT, TY, T73, T74;
Chris@82 2293 TT = VADD(TL, TS);
Chris@82 2294 TY = VSUB(TU, TX);
Chris@82 2295 TZ = VFNMS(LDK(KP195090322), TY, VMUL(LDK(KP980785280), TT));
Chris@82 2296 T4W = VFMA(LDK(KP195090322), TT, VMUL(LDK(KP980785280), TY));
Chris@82 2297 T73 = VSUB(TL, TS);
Chris@82 2298 T74 = VADD(TX, TU);
Chris@82 2299 T75 = VFNMS(LDK(KP555570233), T74, VMUL(LDK(KP831469612), T73));
Chris@82 2300 T86 = VFMA(LDK(KP555570233), T73, VMUL(LDK(KP831469612), T74));
Chris@82 2301 }
Chris@82 2302 Teg = VFMA(LDK(KP923879532), Tee, VMUL(LDK(KP382683432), Tef));
Chris@82 2303 Tej = VFNMS(LDK(KP382683432), Tei, VMUL(LDK(KP923879532), Teh));
Chris@82 2304 Tek = VADD(Teg, Tej);
Chris@82 2305 TgG = VSUB(Tej, Teg);
Chris@82 2306 {
Chris@82 2307 V T70, T71, Tak, Tar;
Chris@82 2308 T70 = VSUB(Tu, TB);
Chris@82 2309 T71 = VADD(TG, TD);
Chris@82 2310 T72 = VFMA(LDK(KP831469612), T70, VMUL(LDK(KP555570233), T71));
Chris@82 2311 T85 = VFNMS(LDK(KP555570233), T70, VMUL(LDK(KP831469612), T71));
Chris@82 2312 Tak = VSUB(Tag, Taj);
Chris@82 2313 Tar = VSUB(Tan, Taq);
Chris@82 2314 Tas = VMUL(LDK(KP707106781), VADD(Tak, Tar));
Chris@82 2315 Tcd = VMUL(LDK(KP707106781), VSUB(Tar, Tak));
Chris@82 2316 }
Chris@82 2317 }
Chris@82 2318 {
Chris@82 2319 V Tav, Tau, T1b, Taw, T1v, Tay, Tax, T18, Taz, T1w, T1j, Teo, T1z, TaD, T1q;
Chris@82 2320 V Ten, T1y, TaG, T14, T17, Tem, Tep;
Chris@82 2321 {
Chris@82 2322 V T19, T1a, T1t, T1u;
Chris@82 2323 T19 = LD(&(xi[WS(is, 34)]), ivs, &(xi[0]));
Chris@82 2324 T1a = LD(&(xi[WS(is, 98)]), ivs, &(xi[0]));
Chris@82 2325 Tav = VADD(T19, T1a);
Chris@82 2326 T1t = LD(&(xi[WS(is, 2)]), ivs, &(xi[0]));
Chris@82 2327 T1u = LD(&(xi[WS(is, 66)]), ivs, &(xi[0]));
Chris@82 2328 Tau = VADD(T1t, T1u);
Chris@82 2329 T1b = VSUB(T19, T1a);
Chris@82 2330 Taw = VADD(Tau, Tav);
Chris@82 2331 T1v = VSUB(T1t, T1u);
Chris@82 2332 }
Chris@82 2333 {
Chris@82 2334 V T12, T13, T15, T16;
Chris@82 2335 T12 = LD(&(xi[WS(is, 114)]), ivs, &(xi[0]));
Chris@82 2336 T13 = LD(&(xi[WS(is, 50)]), ivs, &(xi[0]));
Chris@82 2337 T14 = VSUB(T12, T13);
Chris@82 2338 Tay = VADD(T12, T13);
Chris@82 2339 T15 = LD(&(xi[WS(is, 18)]), ivs, &(xi[0]));
Chris@82 2340 T16 = LD(&(xi[WS(is, 82)]), ivs, &(xi[0]));
Chris@82 2341 T17 = VSUB(T15, T16);
Chris@82 2342 Tax = VADD(T15, T16);
Chris@82 2343 }
Chris@82 2344 T18 = VMUL(LDK(KP707106781), VSUB(T14, T17));
Chris@82 2345 Taz = VADD(Tax, Tay);
Chris@82 2346 T1w = VMUL(LDK(KP707106781), VADD(T17, T14));
Chris@82 2347 {
Chris@82 2348 V T1f, TaB, T1i, TaC;
Chris@82 2349 {
Chris@82 2350 V T1d, T1e, T1g, T1h;
Chris@82 2351 T1d = LD(&(xi[WS(is, 122)]), ivs, &(xi[0]));
Chris@82 2352 T1e = LD(&(xi[WS(is, 58)]), ivs, &(xi[0]));
Chris@82 2353 T1f = VSUB(T1d, T1e);
Chris@82 2354 TaB = VADD(T1d, T1e);
Chris@82 2355 T1g = LD(&(xi[WS(is, 26)]), ivs, &(xi[0]));
Chris@82 2356 T1h = LD(&(xi[WS(is, 90)]), ivs, &(xi[0]));
Chris@82 2357 T1i = VSUB(T1g, T1h);
Chris@82 2358 TaC = VADD(T1g, T1h);
Chris@82 2359 }
Chris@82 2360 T1j = VFNMS(LDK(KP923879532), T1i, VMUL(LDK(KP382683432), T1f));
Chris@82 2361 Teo = VSUB(TaB, TaC);
Chris@82 2362 T1z = VFMA(LDK(KP923879532), T1f, VMUL(LDK(KP382683432), T1i));
Chris@82 2363 TaD = VADD(TaB, TaC);
Chris@82 2364 }
Chris@82 2365 {
Chris@82 2366 V T1m, TaE, T1p, TaF;
Chris@82 2367 {
Chris@82 2368 V T1k, T1l, T1n, T1o;
Chris@82 2369 T1k = LD(&(xi[WS(is, 10)]), ivs, &(xi[0]));
Chris@82 2370 T1l = LD(&(xi[WS(is, 74)]), ivs, &(xi[0]));
Chris@82 2371 T1m = VSUB(T1k, T1l);
Chris@82 2372 TaE = VADD(T1k, T1l);
Chris@82 2373 T1n = LD(&(xi[WS(is, 42)]), ivs, &(xi[0]));
Chris@82 2374 T1o = LD(&(xi[WS(is, 106)]), ivs, &(xi[0]));
Chris@82 2375 T1p = VSUB(T1n, T1o);
Chris@82 2376 TaF = VADD(T1n, T1o);
Chris@82 2377 }
Chris@82 2378 T1q = VFMA(LDK(KP382683432), T1m, VMUL(LDK(KP923879532), T1p));
Chris@82 2379 Ten = VSUB(TaE, TaF);
Chris@82 2380 T1y = VFNMS(LDK(KP382683432), T1p, VMUL(LDK(KP923879532), T1m));
Chris@82 2381 TaG = VADD(TaE, TaF);
Chris@82 2382 }
Chris@82 2383 Tdp = VADD(Taw, Taz);
Chris@82 2384 Tdq = VADD(TaG, TaD);
Chris@82 2385 TdG = VSUB(Tdp, Tdq);
Chris@82 2386 Tem = VSUB(Tau, Tav);
Chris@82 2387 Tep = VMUL(LDK(KP707106781), VADD(Ten, Teo));
Chris@82 2388 Teq = VADD(Tem, Tep);
Chris@82 2389 Tgm = VSUB(Tem, Tep);
Chris@82 2390 {
Chris@82 2391 V Ter, Tes, T1c, T1r;
Chris@82 2392 Ter = VSUB(Tay, Tax);
Chris@82 2393 Tes = VMUL(LDK(KP707106781), VSUB(Teo, Ten));
Chris@82 2394 Tet = VADD(Ter, Tes);
Chris@82 2395 Tgl = VSUB(Tes, Ter);
Chris@82 2396 T1c = VSUB(T18, T1b);
Chris@82 2397 T1r = VSUB(T1j, T1q);
Chris@82 2398 T1s = VADD(T1c, T1r);
Chris@82 2399 T5P = VSUB(T1r, T1c);
Chris@82 2400 }
Chris@82 2401 {
Chris@82 2402 V T1x, T1A, T7b, T7c;
Chris@82 2403 T1x = VADD(T1v, T1w);
Chris@82 2404 T1A = VADD(T1y, T1z);
Chris@82 2405 T1B = VADD(T1x, T1A);
Chris@82 2406 T5Q = VSUB(T1x, T1A);
Chris@82 2407 T7b = VADD(T1b, T18);
Chris@82 2408 T7c = VSUB(T1z, T1y);
Chris@82 2409 T7d = VADD(T7b, T7c);
Chris@82 2410 T8Z = VSUB(T7c, T7b);
Chris@82 2411 }
Chris@82 2412 {
Chris@82 2413 V TaA, TaH, T78, T79;
Chris@82 2414 TaA = VSUB(Taw, Taz);
Chris@82 2415 TaH = VSUB(TaD, TaG);
Chris@82 2416 TaI = VFMA(LDK(KP923879532), TaA, VMUL(LDK(KP382683432), TaH));
Chris@82 2417 Tcf = VFNMS(LDK(KP382683432), TaA, VMUL(LDK(KP923879532), TaH));
Chris@82 2418 T78 = VSUB(T1v, T1w);
Chris@82 2419 T79 = VADD(T1q, T1j);
Chris@82 2420 T7a = VADD(T78, T79);
Chris@82 2421 T90 = VSUB(T78, T79);
Chris@82 2422 }
Chris@82 2423 }
Chris@82 2424 {
Chris@82 2425 V TaJ, TaK, T1F, TaL, T27, TaM, TaN, T1M, TaO, T24, T1U, Tew, T2a, TaV, T21;
Chris@82 2426 V Tex, T29, TaS, T1I, T1L, Tev, Tey;
Chris@82 2427 {
Chris@82 2428 V T1D, T1E, T25, T26;
Chris@82 2429 T1D = LD(&(xi[WS(is, 126)]), ivs, &(xi[0]));
Chris@82 2430 T1E = LD(&(xi[WS(is, 62)]), ivs, &(xi[0]));
Chris@82 2431 TaJ = VADD(T1D, T1E);
Chris@82 2432 T25 = LD(&(xi[WS(is, 30)]), ivs, &(xi[0]));
Chris@82 2433 T26 = LD(&(xi[WS(is, 94)]), ivs, &(xi[0]));
Chris@82 2434 TaK = VADD(T25, T26);
Chris@82 2435 T1F = VSUB(T1D, T1E);
Chris@82 2436 TaL = VADD(TaJ, TaK);
Chris@82 2437 T27 = VSUB(T25, T26);
Chris@82 2438 }
Chris@82 2439 {
Chris@82 2440 V T1G, T1H, T1J, T1K;
Chris@82 2441 T1G = LD(&(xi[WS(is, 14)]), ivs, &(xi[0]));
Chris@82 2442 T1H = LD(&(xi[WS(is, 78)]), ivs, &(xi[0]));
Chris@82 2443 T1I = VSUB(T1G, T1H);
Chris@82 2444 TaM = VADD(T1G, T1H);
Chris@82 2445 T1J = LD(&(xi[WS(is, 110)]), ivs, &(xi[0]));
Chris@82 2446 T1K = LD(&(xi[WS(is, 46)]), ivs, &(xi[0]));
Chris@82 2447 T1L = VSUB(T1J, T1K);
Chris@82 2448 TaN = VADD(T1J, T1K);
Chris@82 2449 }
Chris@82 2450 T1M = VMUL(LDK(KP707106781), VADD(T1I, T1L));
Chris@82 2451 TaO = VADD(TaM, TaN);
Chris@82 2452 T24 = VMUL(LDK(KP707106781), VSUB(T1L, T1I));
Chris@82 2453 {
Chris@82 2454 V T1Q, TaT, T1T, TaU;
Chris@82 2455 {
Chris@82 2456 V T1O, T1P, T1R, T1S;
Chris@82 2457 T1O = LD(&(xi[WS(is, 6)]), ivs, &(xi[0]));
Chris@82 2458 T1P = LD(&(xi[WS(is, 70)]), ivs, &(xi[0]));
Chris@82 2459 T1Q = VSUB(T1O, T1P);
Chris@82 2460 TaT = VADD(T1O, T1P);
Chris@82 2461 T1R = LD(&(xi[WS(is, 38)]), ivs, &(xi[0]));
Chris@82 2462 T1S = LD(&(xi[WS(is, 102)]), ivs, &(xi[0]));
Chris@82 2463 T1T = VSUB(T1R, T1S);
Chris@82 2464 TaU = VADD(T1R, T1S);
Chris@82 2465 }
Chris@82 2466 T1U = VFNMS(LDK(KP382683432), T1T, VMUL(LDK(KP923879532), T1Q));
Chris@82 2467 Tew = VSUB(TaT, TaU);
Chris@82 2468 T2a = VFMA(LDK(KP382683432), T1Q, VMUL(LDK(KP923879532), T1T));
Chris@82 2469 TaV = VADD(TaT, TaU);
Chris@82 2470 }
Chris@82 2471 {
Chris@82 2472 V T1X, TaQ, T20, TaR;
Chris@82 2473 {
Chris@82 2474 V T1V, T1W, T1Y, T1Z;
Chris@82 2475 T1V = LD(&(xi[WS(is, 118)]), ivs, &(xi[0]));
Chris@82 2476 T1W = LD(&(xi[WS(is, 54)]), ivs, &(xi[0]));
Chris@82 2477 T1X = VSUB(T1V, T1W);
Chris@82 2478 TaQ = VADD(T1V, T1W);
Chris@82 2479 T1Y = LD(&(xi[WS(is, 22)]), ivs, &(xi[0]));
Chris@82 2480 T1Z = LD(&(xi[WS(is, 86)]), ivs, &(xi[0]));
Chris@82 2481 T20 = VSUB(T1Y, T1Z);
Chris@82 2482 TaR = VADD(T1Y, T1Z);
Chris@82 2483 }
Chris@82 2484 T21 = VFMA(LDK(KP923879532), T1X, VMUL(LDK(KP382683432), T20));
Chris@82 2485 Tex = VSUB(TaQ, TaR);
Chris@82 2486 T29 = VFNMS(LDK(KP923879532), T20, VMUL(LDK(KP382683432), T1X));
Chris@82 2487 TaS = VADD(TaQ, TaR);
Chris@82 2488 }
Chris@82 2489 Tdm = VADD(TaL, TaO);
Chris@82 2490 Tdn = VADD(TaV, TaS);
Chris@82 2491 TdH = VSUB(Tdm, Tdn);
Chris@82 2492 Tev = VSUB(TaJ, TaK);
Chris@82 2493 Tey = VMUL(LDK(KP707106781), VADD(Tew, Tex));
Chris@82 2494 Tez = VADD(Tev, Tey);
Chris@82 2495 Tgi = VSUB(Tev, Tey);
Chris@82 2496 {
Chris@82 2497 V TeA, TeB, T1N, T22;
Chris@82 2498 TeA = VSUB(TaN, TaM);
Chris@82 2499 TeB = VMUL(LDK(KP707106781), VSUB(Tex, Tew));
Chris@82 2500 TeC = VADD(TeA, TeB);
Chris@82 2501 Tgj = VSUB(TeB, TeA);
Chris@82 2502 T1N = VADD(T1F, T1M);
Chris@82 2503 T22 = VADD(T1U, T21);
Chris@82 2504 T23 = VADD(T1N, T22);
Chris@82 2505 T5N = VSUB(T1N, T22);
Chris@82 2506 }
Chris@82 2507 {
Chris@82 2508 V T28, T2b, T7i, T7j;
Chris@82 2509 T28 = VSUB(T24, T27);
Chris@82 2510 T2b = VSUB(T29, T2a);
Chris@82 2511 T2c = VADD(T28, T2b);
Chris@82 2512 T5M = VSUB(T2b, T28);
Chris@82 2513 T7i = VADD(T27, T24);
Chris@82 2514 T7j = VSUB(T21, T1U);
Chris@82 2515 T7k = VADD(T7i, T7j);
Chris@82 2516 T8X = VSUB(T7j, T7i);
Chris@82 2517 }
Chris@82 2518 {
Chris@82 2519 V TaP, TaW, T7f, T7g;
Chris@82 2520 TaP = VSUB(TaL, TaO);
Chris@82 2521 TaW = VSUB(TaS, TaV);
Chris@82 2522 TaX = VFNMS(LDK(KP382683432), TaW, VMUL(LDK(KP923879532), TaP));
Chris@82 2523 Tcg = VFMA(LDK(KP382683432), TaP, VMUL(LDK(KP923879532), TaW));
Chris@82 2524 T7f = VSUB(T1F, T1M);
Chris@82 2525 T7g = VADD(T2a, T29);
Chris@82 2526 T7h = VADD(T7f, T7g);
Chris@82 2527 T8W = VSUB(T7f, T7g);
Chris@82 2528 }
Chris@82 2529 }
Chris@82 2530 {
Chris@82 2531 V T2J, TeL, T2V, Tb9, T30, TeO, T3c, Tbg, T2Q, TeM, T2S, Tbc, T37, TeP, T39;
Chris@82 2532 V Tbj;
Chris@82 2533 {
Chris@82 2534 V T2H, T2I, Tb7, T2T, T2U, Tb8;
Chris@82 2535 T2H = LD(&(xi[WS(is, 5)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2536 T2I = LD(&(xi[WS(is, 69)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2537 Tb7 = VADD(T2H, T2I);
Chris@82 2538 T2T = LD(&(xi[WS(is, 37)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2539 T2U = LD(&(xi[WS(is, 101)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2540 Tb8 = VADD(T2T, T2U);
Chris@82 2541 T2J = VSUB(T2H, T2I);
Chris@82 2542 TeL = VSUB(Tb7, Tb8);
Chris@82 2543 T2V = VSUB(T2T, T2U);
Chris@82 2544 Tb9 = VADD(Tb7, Tb8);
Chris@82 2545 }
Chris@82 2546 {
Chris@82 2547 V T2Y, T2Z, Tbe, T3a, T3b, Tbf;
Chris@82 2548 T2Y = LD(&(xi[WS(is, 125)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2549 T2Z = LD(&(xi[WS(is, 61)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2550 Tbe = VADD(T2Y, T2Z);
Chris@82 2551 T3a = LD(&(xi[WS(is, 29)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2552 T3b = LD(&(xi[WS(is, 93)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2553 Tbf = VADD(T3a, T3b);
Chris@82 2554 T30 = VSUB(T2Y, T2Z);
Chris@82 2555 TeO = VSUB(Tbe, Tbf);
Chris@82 2556 T3c = VSUB(T3a, T3b);
Chris@82 2557 Tbg = VADD(Tbe, Tbf);
Chris@82 2558 }
Chris@82 2559 {
Chris@82 2560 V T2M, Tba, T2P, Tbb;
Chris@82 2561 {
Chris@82 2562 V T2K, T2L, T2N, T2O;
Chris@82 2563 T2K = LD(&(xi[WS(is, 21)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2564 T2L = LD(&(xi[WS(is, 85)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2565 T2M = VSUB(T2K, T2L);
Chris@82 2566 Tba = VADD(T2K, T2L);
Chris@82 2567 T2N = LD(&(xi[WS(is, 117)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2568 T2O = LD(&(xi[WS(is, 53)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2569 T2P = VSUB(T2N, T2O);
Chris@82 2570 Tbb = VADD(T2N, T2O);
Chris@82 2571 }
Chris@82 2572 T2Q = VMUL(LDK(KP707106781), VADD(T2M, T2P));
Chris@82 2573 TeM = VSUB(Tbb, Tba);
Chris@82 2574 T2S = VMUL(LDK(KP707106781), VSUB(T2P, T2M));
Chris@82 2575 Tbc = VADD(Tba, Tbb);
Chris@82 2576 }
Chris@82 2577 {
Chris@82 2578 V T33, Tbh, T36, Tbi;
Chris@82 2579 {
Chris@82 2580 V T31, T32, T34, T35;
Chris@82 2581 T31 = LD(&(xi[WS(is, 13)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2582 T32 = LD(&(xi[WS(is, 77)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2583 T33 = VSUB(T31, T32);
Chris@82 2584 Tbh = VADD(T31, T32);
Chris@82 2585 T34 = LD(&(xi[WS(is, 109)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2586 T35 = LD(&(xi[WS(is, 45)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2587 T36 = VSUB(T34, T35);
Chris@82 2588 Tbi = VADD(T34, T35);
Chris@82 2589 }
Chris@82 2590 T37 = VMUL(LDK(KP707106781), VADD(T33, T36));
Chris@82 2591 TeP = VSUB(Tbi, Tbh);
Chris@82 2592 T39 = VMUL(LDK(KP707106781), VSUB(T36, T33));
Chris@82 2593 Tbj = VADD(Tbh, Tbi);
Chris@82 2594 }
Chris@82 2595 {
Chris@82 2596 V Tbd, Tbk, TeN, TeQ;
Chris@82 2597 Tbd = VSUB(Tb9, Tbc);
Chris@82 2598 Tbk = VSUB(Tbg, Tbj);
Chris@82 2599 Tbl = VMUL(LDK(KP707106781), VADD(Tbd, Tbk));
Chris@82 2600 Tbu = VMUL(LDK(KP707106781), VSUB(Tbk, Tbd));
Chris@82 2601 {
Chris@82 2602 V Td9, Tda, TeW, TeX;
Chris@82 2603 Td9 = VADD(Tb9, Tbc);
Chris@82 2604 Tda = VADD(Tbg, Tbj);
Chris@82 2605 Tdb = VADD(Td9, Tda);
Chris@82 2606 TdL = VSUB(Tda, Td9);
Chris@82 2607 TeW = VFNMS(LDK(KP382683432), TeL, VMUL(LDK(KP923879532), TeM));
Chris@82 2608 TeX = VFMA(LDK(KP382683432), TeO, VMUL(LDK(KP923879532), TeP));
Chris@82 2609 TeY = VADD(TeW, TeX);
Chris@82 2610 Tgu = VSUB(TeX, TeW);
Chris@82 2611 }
Chris@82 2612 TeN = VFMA(LDK(KP923879532), TeL, VMUL(LDK(KP382683432), TeM));
Chris@82 2613 TeQ = VFNMS(LDK(KP382683432), TeP, VMUL(LDK(KP923879532), TeO));
Chris@82 2614 TeR = VADD(TeN, TeQ);
Chris@82 2615 Tgq = VSUB(TeQ, TeN);
Chris@82 2616 {
Chris@82 2617 V T7t, T7C, T7w, T7D;
Chris@82 2618 {
Chris@82 2619 V T7r, T7s, T7u, T7v;
Chris@82 2620 T7r = VSUB(T2J, T2Q);
Chris@82 2621 T7s = VADD(T2V, T2S);
Chris@82 2622 T7t = VFMA(LDK(KP831469612), T7r, VMUL(LDK(KP555570233), T7s));
Chris@82 2623 T7C = VFNMS(LDK(KP555570233), T7r, VMUL(LDK(KP831469612), T7s));
Chris@82 2624 T7u = VSUB(T30, T37);
Chris@82 2625 T7v = VADD(T3c, T39);
Chris@82 2626 T7w = VFNMS(LDK(KP555570233), T7v, VMUL(LDK(KP831469612), T7u));
Chris@82 2627 T7D = VFMA(LDK(KP555570233), T7u, VMUL(LDK(KP831469612), T7v));
Chris@82 2628 }
Chris@82 2629 T7x = VADD(T7t, T7w);
Chris@82 2630 T98 = VSUB(T7D, T7C);
Chris@82 2631 T7E = VADD(T7C, T7D);
Chris@82 2632 T94 = VSUB(T7w, T7t);
Chris@82 2633 }
Chris@82 2634 {
Chris@82 2635 V T2X, T3q, T3e, T3r;
Chris@82 2636 {
Chris@82 2637 V T2R, T2W, T38, T3d;
Chris@82 2638 T2R = VADD(T2J, T2Q);
Chris@82 2639 T2W = VSUB(T2S, T2V);
Chris@82 2640 T2X = VFMA(LDK(KP980785280), T2R, VMUL(LDK(KP195090322), T2W));
Chris@82 2641 T3q = VFNMS(LDK(KP195090322), T2R, VMUL(LDK(KP980785280), T2W));
Chris@82 2642 T38 = VADD(T30, T37);
Chris@82 2643 T3d = VSUB(T39, T3c);
Chris@82 2644 T3e = VFNMS(LDK(KP195090322), T3d, VMUL(LDK(KP980785280), T38));
Chris@82 2645 T3r = VFMA(LDK(KP195090322), T38, VMUL(LDK(KP980785280), T3d));
Chris@82 2646 }
Chris@82 2647 T3f = VADD(T2X, T3e);
Chris@82 2648 T5Y = VSUB(T3r, T3q);
Chris@82 2649 T3s = VADD(T3q, T3r);
Chris@82 2650 T5U = VSUB(T3e, T2X);
Chris@82 2651 }
Chris@82 2652 }
Chris@82 2653 }
Chris@82 2654 {
Chris@82 2655 V T3Y, Tf6, T4a, TbG, T4f, Tf9, T4r, TbN, T45, Tf7, T47, TbJ, T4m, Tfa, T4o;
Chris@82 2656 V TbQ;
Chris@82 2657 {
Chris@82 2658 V T3W, T3X, TbE, T48, T49, TbF;
Chris@82 2659 T3W = LD(&(xi[WS(is, 3)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2660 T3X = LD(&(xi[WS(is, 67)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2661 TbE = VADD(T3W, T3X);
Chris@82 2662 T48 = LD(&(xi[WS(is, 35)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2663 T49 = LD(&(xi[WS(is, 99)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2664 TbF = VADD(T48, T49);
Chris@82 2665 T3Y = VSUB(T3W, T3X);
Chris@82 2666 Tf6 = VSUB(TbE, TbF);
Chris@82 2667 T4a = VSUB(T48, T49);
Chris@82 2668 TbG = VADD(TbE, TbF);
Chris@82 2669 }
Chris@82 2670 {
Chris@82 2671 V T4d, T4e, TbL, T4p, T4q, TbM;
Chris@82 2672 T4d = LD(&(xi[WS(is, 123)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2673 T4e = LD(&(xi[WS(is, 59)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2674 TbL = VADD(T4d, T4e);
Chris@82 2675 T4p = LD(&(xi[WS(is, 27)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2676 T4q = LD(&(xi[WS(is, 91)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2677 TbM = VADD(T4p, T4q);
Chris@82 2678 T4f = VSUB(T4d, T4e);
Chris@82 2679 Tf9 = VSUB(TbL, TbM);
Chris@82 2680 T4r = VSUB(T4p, T4q);
Chris@82 2681 TbN = VADD(TbL, TbM);
Chris@82 2682 }
Chris@82 2683 {
Chris@82 2684 V T41, TbH, T44, TbI;
Chris@82 2685 {
Chris@82 2686 V T3Z, T40, T42, T43;
Chris@82 2687 T3Z = LD(&(xi[WS(is, 19)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2688 T40 = LD(&(xi[WS(is, 83)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2689 T41 = VSUB(T3Z, T40);
Chris@82 2690 TbH = VADD(T3Z, T40);
Chris@82 2691 T42 = LD(&(xi[WS(is, 115)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2692 T43 = LD(&(xi[WS(is, 51)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2693 T44 = VSUB(T42, T43);
Chris@82 2694 TbI = VADD(T42, T43);
Chris@82 2695 }
Chris@82 2696 T45 = VMUL(LDK(KP707106781), VADD(T41, T44));
Chris@82 2697 Tf7 = VSUB(TbI, TbH);
Chris@82 2698 T47 = VMUL(LDK(KP707106781), VSUB(T44, T41));
Chris@82 2699 TbJ = VADD(TbH, TbI);
Chris@82 2700 }
Chris@82 2701 {
Chris@82 2702 V T4i, TbO, T4l, TbP;
Chris@82 2703 {
Chris@82 2704 V T4g, T4h, T4j, T4k;
Chris@82 2705 T4g = LD(&(xi[WS(is, 11)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2706 T4h = LD(&(xi[WS(is, 75)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2707 T4i = VSUB(T4g, T4h);
Chris@82 2708 TbO = VADD(T4g, T4h);
Chris@82 2709 T4j = LD(&(xi[WS(is, 107)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2710 T4k = LD(&(xi[WS(is, 43)]), ivs, &(xi[WS(is, 1)]));
Chris@82 2711 T4l = VSUB(T4j, T4k);
Chris@82 2712 TbP = VADD(T4j, T4k);
Chris@82 2713 }
Chris@82 2714 T4m = VMUL(LDK(KP707106781), VADD(T4i, T4l));
Chris@82 2715 Tfa = VSUB(TbP, TbO);
Chris@82 2716 T4o = VMUL(LDK(KP707106781), VSUB(T4l, T4i));
Chris@82 2717 TbQ = VADD(TbO, TbP);
Chris@82 2718 }
Chris@82 2719 {
Chris@82 2720 V TbK, TbR, Tf8, Tfb;
Chris@82 2721 TbK = VSUB(TbG, TbJ);
Chris@82 2722 TbR = VSUB(TbN, TbQ);
Chris@82 2723 TbS = VMUL(LDK(KP707106781), VADD(TbK, TbR));
Chris@82 2724 Tc1 = VMUL(LDK(KP707106781), VSUB(TbR, TbK));
Chris@82 2725 {
Chris@82 2726 V Tdg, Tdh, Tfh, Tfi;
Chris@82 2727 Tdg = VADD(TbG, TbJ);
Chris@82 2728 Tdh = VADD(TbN, TbQ);
Chris@82 2729 Tdi = VADD(Tdg, Tdh);
Chris@82 2730 TdO = VSUB(Tdh, Tdg);
Chris@82 2731 Tfh = VFNMS(LDK(KP382683432), Tf6, VMUL(LDK(KP923879532), Tf7));
Chris@82 2732 Tfi = VFMA(LDK(KP382683432), Tf9, VMUL(LDK(KP923879532), Tfa));
Chris@82 2733 Tfj = VADD(Tfh, Tfi);
Chris@82 2734 Tgy = VSUB(Tfi, Tfh);
Chris@82 2735 }
Chris@82 2736 Tf8 = VFMA(LDK(KP923879532), Tf6, VMUL(LDK(KP382683432), Tf7));
Chris@82 2737 Tfb = VFNMS(LDK(KP382683432), Tfa, VMUL(LDK(KP923879532), Tf9));
Chris@82 2738 Tfc = VADD(Tf8, Tfb);
Chris@82 2739 TgA = VSUB(Tfb, Tf8);
Chris@82 2740 {
Chris@82 2741 V T7M, T7V, T7P, T7W;
Chris@82 2742 {
Chris@82 2743 V T7K, T7L, T7N, T7O;
Chris@82 2744 T7K = VSUB(T3Y, T45);
Chris@82 2745 T7L = VADD(T4a, T47);
Chris@82 2746 T7M = VFMA(LDK(KP831469612), T7K, VMUL(LDK(KP555570233), T7L));
Chris@82 2747 T7V = VFNMS(LDK(KP555570233), T7K, VMUL(LDK(KP831469612), T7L));
Chris@82 2748 T7N = VSUB(T4f, T4m);
Chris@82 2749 T7O = VADD(T4r, T4o);
Chris@82 2750 T7P = VFNMS(LDK(KP555570233), T7O, VMUL(LDK(KP831469612), T7N));
Chris@82 2751 T7W = VFMA(LDK(KP555570233), T7N, VMUL(LDK(KP831469612), T7O));
Chris@82 2752 }
Chris@82 2753 T7Q = VADD(T7M, T7P);
Chris@82 2754 T9e = VSUB(T7P, T7M);
Chris@82 2755 T7X = VADD(T7V, T7W);
Chris@82 2756 T9c = VSUB(T7W, T7V);
Chris@82 2757 }
Chris@82 2758 {
Chris@82 2759 V T4c, T4F, T4t, T4G;
Chris@82 2760 {
Chris@82 2761 V T46, T4b, T4n, T4s;
Chris@82 2762 T46 = VADD(T3Y, T45);
Chris@82 2763 T4b = VSUB(T47, T4a);
Chris@82 2764 T4c = VFMA(LDK(KP980785280), T46, VMUL(LDK(KP195090322), T4b));
Chris@82 2765 T4F = VFNMS(LDK(KP195090322), T46, VMUL(LDK(KP980785280), T4b));
Chris@82 2766 T4n = VADD(T4f, T4m);
Chris@82 2767 T4s = VSUB(T4o, T4r);
Chris@82 2768 T4t = VFNMS(LDK(KP195090322), T4s, VMUL(LDK(KP980785280), T4n));
Chris@82 2769 T4G = VFMA(LDK(KP195090322), T4n, VMUL(LDK(KP980785280), T4s));
Chris@82 2770 }
Chris@82 2771 T4u = VADD(T4c, T4t);
Chris@82 2772 T64 = VSUB(T4t, T4c);
Chris@82 2773 T4H = VADD(T4F, T4G);
Chris@82 2774 T62 = VSUB(T4G, T4F);
Chris@82 2775 }
Chris@82 2776 }
Chris@82 2777 }
Chris@82 2778 {
Chris@82 2779 V Td5, Tdx, TdC, TdE, Tdk, Tdt, Tds, Tdy, Tdz, TdD;
Chris@82 2780 {
Chris@82 2781 V Td1, Td4, TdA, TdB;
Chris@82 2782 Td1 = VADD(TcZ, Td0);
Chris@82 2783 Td4 = VADD(Td2, Td3);
Chris@82 2784 Td5 = VSUB(Td1, Td4);
Chris@82 2785 Tdx = VADD(Td1, Td4);
Chris@82 2786 TdA = VADD(Td8, Tdb);
Chris@82 2787 TdB = VADD(Tdf, Tdi);
Chris@82 2788 TdC = VADD(TdA, TdB);
Chris@82 2789 TdE = VBYI(VSUB(TdB, TdA));
Chris@82 2790 }
Chris@82 2791 {
Chris@82 2792 V Tdc, Tdj, Tdo, Tdr;
Chris@82 2793 Tdc = VSUB(Td8, Tdb);
Chris@82 2794 Tdj = VSUB(Tdf, Tdi);
Chris@82 2795 Tdk = VMUL(LDK(KP707106781), VADD(Tdc, Tdj));
Chris@82 2796 Tdt = VMUL(LDK(KP707106781), VSUB(Tdj, Tdc));
Chris@82 2797 Tdo = VADD(Tdm, Tdn);
Chris@82 2798 Tdr = VADD(Tdp, Tdq);
Chris@82 2799 Tds = VSUB(Tdo, Tdr);
Chris@82 2800 Tdy = VADD(Tdr, Tdo);
Chris@82 2801 }
Chris@82 2802 Tdz = VADD(Tdx, Tdy);
Chris@82 2803 ST(&(xo[WS(os, 64)]), VSUB(Tdz, TdC), ovs, &(xo[0]));
Chris@82 2804 ST(&(xo[0]), VADD(Tdz, TdC), ovs, &(xo[0]));
Chris@82 2805 TdD = VSUB(Tdx, Tdy);
Chris@82 2806 ST(&(xo[WS(os, 96)]), VSUB(TdD, TdE), ovs, &(xo[0]));
Chris@82 2807 ST(&(xo[WS(os, 32)]), VADD(TdD, TdE), ovs, &(xo[0]));
Chris@82 2808 {
Chris@82 2809 V Tdl, Tdu, Tdv, Tdw;
Chris@82 2810 Tdl = VADD(Td5, Tdk);
Chris@82 2811 Tdu = VBYI(VADD(Tds, Tdt));
Chris@82 2812 ST(&(xo[WS(os, 112)]), VSUB(Tdl, Tdu), ovs, &(xo[0]));
Chris@82 2813 ST(&(xo[WS(os, 16)]), VADD(Tdl, Tdu), ovs, &(xo[0]));
Chris@82 2814 Tdv = VSUB(Td5, Tdk);
Chris@82 2815 Tdw = VBYI(VSUB(Tdt, Tds));
Chris@82 2816 ST(&(xo[WS(os, 80)]), VSUB(Tdv, Tdw), ovs, &(xo[0]));
Chris@82 2817 ST(&(xo[WS(os, 48)]), VADD(Tdv, Tdw), ovs, &(xo[0]));
Chris@82 2818 }
Chris@82 2819 }
Chris@82 2820 {
Chris@82 2821 V TdJ, Te4, TdX, Te5, TdQ, Te1, TdU, Te2;
Chris@82 2822 {
Chris@82 2823 V TdF, TdI, TdV, TdW;
Chris@82 2824 TdF = VSUB(TcZ, Td0);
Chris@82 2825 TdI = VMUL(LDK(KP707106781), VADD(TdG, TdH));
Chris@82 2826 TdJ = VADD(TdF, TdI);
Chris@82 2827 Te4 = VSUB(TdF, TdI);
Chris@82 2828 TdV = VFNMS(LDK(KP382683432), TdK, VMUL(LDK(KP923879532), TdL));
Chris@82 2829 TdW = VFMA(LDK(KP382683432), TdN, VMUL(LDK(KP923879532), TdO));
Chris@82 2830 TdX = VADD(TdV, TdW);
Chris@82 2831 Te5 = VSUB(TdW, TdV);
Chris@82 2832 }
Chris@82 2833 {
Chris@82 2834 V TdM, TdP, TdS, TdT;
Chris@82 2835 TdM = VFMA(LDK(KP923879532), TdK, VMUL(LDK(KP382683432), TdL));
Chris@82 2836 TdP = VFNMS(LDK(KP382683432), TdO, VMUL(LDK(KP923879532), TdN));
Chris@82 2837 TdQ = VADD(TdM, TdP);
Chris@82 2838 Te1 = VSUB(TdP, TdM);
Chris@82 2839 TdS = VSUB(Td3, Td2);
Chris@82 2840 TdT = VMUL(LDK(KP707106781), VSUB(TdH, TdG));
Chris@82 2841 TdU = VADD(TdS, TdT);
Chris@82 2842 Te2 = VSUB(TdT, TdS);
Chris@82 2843 }
Chris@82 2844 {
Chris@82 2845 V TdR, TdY, Te7, Te8;
Chris@82 2846 TdR = VADD(TdJ, TdQ);
Chris@82 2847 TdY = VBYI(VADD(TdU, TdX));
Chris@82 2848 ST(&(xo[WS(os, 120)]), VSUB(TdR, TdY), ovs, &(xo[0]));
Chris@82 2849 ST(&(xo[WS(os, 8)]), VADD(TdR, TdY), ovs, &(xo[0]));
Chris@82 2850 Te7 = VBYI(VADD(Te2, Te1));
Chris@82 2851 Te8 = VADD(Te4, Te5);
Chris@82 2852 ST(&(xo[WS(os, 24)]), VADD(Te7, Te8), ovs, &(xo[0]));
Chris@82 2853 ST(&(xo[WS(os, 104)]), VSUB(Te8, Te7), ovs, &(xo[0]));
Chris@82 2854 }
Chris@82 2855 {
Chris@82 2856 V TdZ, Te0, Te3, Te6;
Chris@82 2857 TdZ = VSUB(TdJ, TdQ);
Chris@82 2858 Te0 = VBYI(VSUB(TdX, TdU));
Chris@82 2859 ST(&(xo[WS(os, 72)]), VSUB(TdZ, Te0), ovs, &(xo[0]));
Chris@82 2860 ST(&(xo[WS(os, 56)]), VADD(TdZ, Te0), ovs, &(xo[0]));
Chris@82 2861 Te3 = VBYI(VSUB(Te1, Te2));
Chris@82 2862 Te6 = VSUB(Te4, Te5);
Chris@82 2863 ST(&(xo[WS(os, 40)]), VADD(Te3, Te6), ovs, &(xo[0]));
Chris@82 2864 ST(&(xo[WS(os, 88)]), VSUB(Te6, Te3), ovs, &(xo[0]));
Chris@82 2865 }
Chris@82 2866 }
Chris@82 2867 {
Chris@82 2868 V TaZ, Tcs, Tci, Tcq, Tc4, Tct, Tcl, Tcp;
Chris@82 2869 {
Chris@82 2870 V Tat, TaY, Tce, Tch;
Chris@82 2871 Tat = VADD(Tad, Tas);
Chris@82 2872 TaY = VADD(TaI, TaX);
Chris@82 2873 TaZ = VADD(Tat, TaY);
Chris@82 2874 Tcs = VSUB(Tat, TaY);
Chris@82 2875 Tce = VADD(Tcc, Tcd);
Chris@82 2876 Tch = VADD(Tcf, Tcg);
Chris@82 2877 Tci = VADD(Tce, Tch);
Chris@82 2878 Tcq = VSUB(Tch, Tce);
Chris@82 2879 {
Chris@82 2880 V Tbw, Tcj, Tc3, Tck;
Chris@82 2881 {
Chris@82 2882 V Tbm, Tbv, TbT, Tc2;
Chris@82 2883 Tbm = VADD(Tb6, Tbl);
Chris@82 2884 Tbv = VADD(Tbt, Tbu);
Chris@82 2885 Tbw = VFMA(LDK(KP980785280), Tbm, VMUL(LDK(KP195090322), Tbv));
Chris@82 2886 Tcj = VFNMS(LDK(KP195090322), Tbm, VMUL(LDK(KP980785280), Tbv));
Chris@82 2887 TbT = VADD(TbD, TbS);
Chris@82 2888 Tc2 = VADD(Tc0, Tc1);
Chris@82 2889 Tc3 = VFNMS(LDK(KP195090322), Tc2, VMUL(LDK(KP980785280), TbT));
Chris@82 2890 Tck = VFMA(LDK(KP195090322), TbT, VMUL(LDK(KP980785280), Tc2));
Chris@82 2891 }
Chris@82 2892 Tc4 = VADD(Tbw, Tc3);
Chris@82 2893 Tct = VSUB(Tck, Tcj);
Chris@82 2894 Tcl = VADD(Tcj, Tck);
Chris@82 2895 Tcp = VSUB(Tc3, Tbw);
Chris@82 2896 }
Chris@82 2897 }
Chris@82 2898 {
Chris@82 2899 V Tc5, Tcm, Tcv, Tcw;
Chris@82 2900 Tc5 = VADD(TaZ, Tc4);
Chris@82 2901 Tcm = VBYI(VADD(Tci, Tcl));
Chris@82 2902 ST(&(xo[WS(os, 124)]), VSUB(Tc5, Tcm), ovs, &(xo[0]));
Chris@82 2903 ST(&(xo[WS(os, 4)]), VADD(Tc5, Tcm), ovs, &(xo[0]));
Chris@82 2904 Tcv = VBYI(VADD(Tcq, Tcp));
Chris@82 2905 Tcw = VADD(Tcs, Tct);
Chris@82 2906 ST(&(xo[WS(os, 28)]), VADD(Tcv, Tcw), ovs, &(xo[0]));
Chris@82 2907 ST(&(xo[WS(os, 100)]), VSUB(Tcw, Tcv), ovs, &(xo[0]));
Chris@82 2908 }
Chris@82 2909 {
Chris@82 2910 V Tcn, Tco, Tcr, Tcu;
Chris@82 2911 Tcn = VSUB(TaZ, Tc4);
Chris@82 2912 Tco = VBYI(VSUB(Tcl, Tci));
Chris@82 2913 ST(&(xo[WS(os, 68)]), VSUB(Tcn, Tco), ovs, &(xo[0]));
Chris@82 2914 ST(&(xo[WS(os, 60)]), VADD(Tcn, Tco), ovs, &(xo[0]));
Chris@82 2915 Tcr = VBYI(VSUB(Tcp, Tcq));
Chris@82 2916 Tcu = VSUB(Tcs, Tct);
Chris@82 2917 ST(&(xo[WS(os, 36)]), VADD(Tcr, Tcu), ovs, &(xo[0]));
Chris@82 2918 ST(&(xo[WS(os, 92)]), VSUB(Tcu, Tcr), ovs, &(xo[0]));
Chris@82 2919 }
Chris@82 2920 }
Chris@82 2921 {
Chris@82 2922 V Tcz, TcU, TcK, TcS, TcG, TcV, TcN, TcR;
Chris@82 2923 {
Chris@82 2924 V Tcx, Tcy, TcI, TcJ;
Chris@82 2925 Tcx = VSUB(Tad, Tas);
Chris@82 2926 Tcy = VSUB(Tcg, Tcf);
Chris@82 2927 Tcz = VADD(Tcx, Tcy);
Chris@82 2928 TcU = VSUB(Tcx, Tcy);
Chris@82 2929 TcI = VSUB(Tcd, Tcc);
Chris@82 2930 TcJ = VSUB(TaX, TaI);
Chris@82 2931 TcK = VADD(TcI, TcJ);
Chris@82 2932 TcS = VSUB(TcJ, TcI);
Chris@82 2933 {
Chris@82 2934 V TcC, TcL, TcF, TcM;
Chris@82 2935 {
Chris@82 2936 V TcA, TcB, TcD, TcE;
Chris@82 2937 TcA = VSUB(Tb6, Tbl);
Chris@82 2938 TcB = VSUB(Tbu, Tbt);
Chris@82 2939 TcC = VFMA(LDK(KP831469612), TcA, VMUL(LDK(KP555570233), TcB));
Chris@82 2940 TcL = VFNMS(LDK(KP555570233), TcA, VMUL(LDK(KP831469612), TcB));
Chris@82 2941 TcD = VSUB(TbD, TbS);
Chris@82 2942 TcE = VSUB(Tc1, Tc0);
Chris@82 2943 TcF = VFNMS(LDK(KP555570233), TcE, VMUL(LDK(KP831469612), TcD));
Chris@82 2944 TcM = VFMA(LDK(KP555570233), TcD, VMUL(LDK(KP831469612), TcE));
Chris@82 2945 }
Chris@82 2946 TcG = VADD(TcC, TcF);
Chris@82 2947 TcV = VSUB(TcM, TcL);
Chris@82 2948 TcN = VADD(TcL, TcM);
Chris@82 2949 TcR = VSUB(TcF, TcC);
Chris@82 2950 }
Chris@82 2951 }
Chris@82 2952 {
Chris@82 2953 V TcH, TcO, TcX, TcY;
Chris@82 2954 TcH = VADD(Tcz, TcG);
Chris@82 2955 TcO = VBYI(VADD(TcK, TcN));
Chris@82 2956 ST(&(xo[WS(os, 116)]), VSUB(TcH, TcO), ovs, &(xo[0]));
Chris@82 2957 ST(&(xo[WS(os, 12)]), VADD(TcH, TcO), ovs, &(xo[0]));
Chris@82 2958 TcX = VBYI(VADD(TcS, TcR));
Chris@82 2959 TcY = VADD(TcU, TcV);
Chris@82 2960 ST(&(xo[WS(os, 20)]), VADD(TcX, TcY), ovs, &(xo[0]));
Chris@82 2961 ST(&(xo[WS(os, 108)]), VSUB(TcY, TcX), ovs, &(xo[0]));
Chris@82 2962 }
Chris@82 2963 {
Chris@82 2964 V TcP, TcQ, TcT, TcW;
Chris@82 2965 TcP = VSUB(Tcz, TcG);
Chris@82 2966 TcQ = VBYI(VSUB(TcN, TcK));
Chris@82 2967 ST(&(xo[WS(os, 76)]), VSUB(TcP, TcQ), ovs, &(xo[0]));
Chris@82 2968 ST(&(xo[WS(os, 52)]), VADD(TcP, TcQ), ovs, &(xo[0]));
Chris@82 2969 TcT = VBYI(VSUB(TcR, TcS));
Chris@82 2970 TcW = VSUB(TcU, TcV);
Chris@82 2971 ST(&(xo[WS(os, 44)]), VADD(TcT, TcW), ovs, &(xo[0]));
Chris@82 2972 ST(&(xo[WS(os, 84)]), VSUB(TcW, TcT), ovs, &(xo[0]));
Chris@82 2973 }
Chris@82 2974 }
Chris@82 2975 {
Chris@82 2976 V TeF, Tg8, TfI, Tg0, Tfy, Tga, TfG, TfP, Tfm, TfJ, TfB, TfF, TfW, Tgb, Tg3;
Chris@82 2977 V Tg7;
Chris@82 2978 {
Chris@82 2979 V Tel, TfY, TeE, TfZ, Teu, TeD;
Chris@82 2980 Tel = VADD(Ted, Tek);
Chris@82 2981 TfY = VSUB(Tft, Tfq);
Chris@82 2982 Teu = VFMA(LDK(KP980785280), Teq, VMUL(LDK(KP195090322), Tet));
Chris@82 2983 TeD = VFNMS(LDK(KP195090322), TeC, VMUL(LDK(KP980785280), Tez));
Chris@82 2984 TeE = VADD(Teu, TeD);
Chris@82 2985 TfZ = VSUB(TeD, Teu);
Chris@82 2986 TeF = VADD(Tel, TeE);
Chris@82 2987 Tg8 = VSUB(TfZ, TfY);
Chris@82 2988 TfI = VSUB(Tel, TeE);
Chris@82 2989 Tg0 = VADD(TfY, TfZ);
Chris@82 2990 }
Chris@82 2991 {
Chris@82 2992 V Tfu, TfN, Tfx, TfO, Tfv, Tfw;
Chris@82 2993 Tfu = VADD(Tfq, Tft);
Chris@82 2994 TfN = VSUB(Ted, Tek);
Chris@82 2995 Tfv = VFNMS(LDK(KP195090322), Teq, VMUL(LDK(KP980785280), Tet));
Chris@82 2996 Tfw = VFMA(LDK(KP195090322), Tez, VMUL(LDK(KP980785280), TeC));
Chris@82 2997 Tfx = VADD(Tfv, Tfw);
Chris@82 2998 TfO = VSUB(Tfw, Tfv);
Chris@82 2999 Tfy = VADD(Tfu, Tfx);
Chris@82 3000 Tga = VSUB(TfN, TfO);
Chris@82 3001 TfG = VSUB(Tfx, Tfu);
Chris@82 3002 TfP = VADD(TfN, TfO);
Chris@82 3003 }
Chris@82 3004 {
Chris@82 3005 V Tf0, Tfz, Tfl, TfA;
Chris@82 3006 {
Chris@82 3007 V TeS, TeZ, Tfd, Tfk;
Chris@82 3008 TeS = VADD(TeK, TeR);
Chris@82 3009 TeZ = VADD(TeV, TeY);
Chris@82 3010 Tf0 = VFMA(LDK(KP995184726), TeS, VMUL(LDK(KP098017140), TeZ));
Chris@82 3011 Tfz = VFNMS(LDK(KP098017140), TeS, VMUL(LDK(KP995184726), TeZ));
Chris@82 3012 Tfd = VADD(Tf5, Tfc);
Chris@82 3013 Tfk = VADD(Tfg, Tfj);
Chris@82 3014 Tfl = VFNMS(LDK(KP098017140), Tfk, VMUL(LDK(KP995184726), Tfd));
Chris@82 3015 TfA = VFMA(LDK(KP098017140), Tfd, VMUL(LDK(KP995184726), Tfk));
Chris@82 3016 }
Chris@82 3017 Tfm = VADD(Tf0, Tfl);
Chris@82 3018 TfJ = VSUB(TfA, Tfz);
Chris@82 3019 TfB = VADD(Tfz, TfA);
Chris@82 3020 TfF = VSUB(Tfl, Tf0);
Chris@82 3021 }
Chris@82 3022 {
Chris@82 3023 V TfS, Tg1, TfV, Tg2;
Chris@82 3024 {
Chris@82 3025 V TfQ, TfR, TfT, TfU;
Chris@82 3026 TfQ = VSUB(TeK, TeR);
Chris@82 3027 TfR = VSUB(TeY, TeV);
Chris@82 3028 TfS = VFMA(LDK(KP773010453), TfQ, VMUL(LDK(KP634393284), TfR));
Chris@82 3029 Tg1 = VFNMS(LDK(KP634393284), TfQ, VMUL(LDK(KP773010453), TfR));
Chris@82 3030 TfT = VSUB(Tf5, Tfc);
Chris@82 3031 TfU = VSUB(Tfj, Tfg);
Chris@82 3032 TfV = VFNMS(LDK(KP634393284), TfU, VMUL(LDK(KP773010453), TfT));
Chris@82 3033 Tg2 = VFMA(LDK(KP634393284), TfT, VMUL(LDK(KP773010453), TfU));
Chris@82 3034 }
Chris@82 3035 TfW = VADD(TfS, TfV);
Chris@82 3036 Tgb = VSUB(Tg2, Tg1);
Chris@82 3037 Tg3 = VADD(Tg1, Tg2);
Chris@82 3038 Tg7 = VSUB(TfV, TfS);
Chris@82 3039 }
Chris@82 3040 {
Chris@82 3041 V Tfn, TfC, Tg9, Tgc;
Chris@82 3042 Tfn = VADD(TeF, Tfm);
Chris@82 3043 TfC = VBYI(VADD(Tfy, TfB));
Chris@82 3044 ST(&(xo[WS(os, 126)]), VSUB(Tfn, TfC), ovs, &(xo[0]));
Chris@82 3045 ST(&(xo[WS(os, 2)]), VADD(Tfn, TfC), ovs, &(xo[0]));
Chris@82 3046 Tg9 = VBYI(VSUB(Tg7, Tg8));
Chris@82 3047 Tgc = VSUB(Tga, Tgb);
Chris@82 3048 ST(&(xo[WS(os, 46)]), VADD(Tg9, Tgc), ovs, &(xo[0]));
Chris@82 3049 ST(&(xo[WS(os, 82)]), VSUB(Tgc, Tg9), ovs, &(xo[0]));
Chris@82 3050 }
Chris@82 3051 {
Chris@82 3052 V Tgd, Tge, TfD, TfE;
Chris@82 3053 Tgd = VBYI(VADD(Tg8, Tg7));
Chris@82 3054 Tge = VADD(Tga, Tgb);
Chris@82 3055 ST(&(xo[WS(os, 18)]), VADD(Tgd, Tge), ovs, &(xo[0]));
Chris@82 3056 ST(&(xo[WS(os, 110)]), VSUB(Tge, Tgd), ovs, &(xo[0]));
Chris@82 3057 TfD = VSUB(TeF, Tfm);
Chris@82 3058 TfE = VBYI(VSUB(TfB, Tfy));
Chris@82 3059 ST(&(xo[WS(os, 66)]), VSUB(TfD, TfE), ovs, &(xo[0]));
Chris@82 3060 ST(&(xo[WS(os, 62)]), VADD(TfD, TfE), ovs, &(xo[0]));
Chris@82 3061 }
Chris@82 3062 {
Chris@82 3063 V TfH, TfK, TfX, Tg4;
Chris@82 3064 TfH = VBYI(VSUB(TfF, TfG));
Chris@82 3065 TfK = VSUB(TfI, TfJ);
Chris@82 3066 ST(&(xo[WS(os, 34)]), VADD(TfH, TfK), ovs, &(xo[0]));
Chris@82 3067 ST(&(xo[WS(os, 94)]), VSUB(TfK, TfH), ovs, &(xo[0]));
Chris@82 3068 TfX = VADD(TfP, TfW);
Chris@82 3069 Tg4 = VBYI(VADD(Tg0, Tg3));
Chris@82 3070 ST(&(xo[WS(os, 114)]), VSUB(TfX, Tg4), ovs, &(xo[0]));
Chris@82 3071 ST(&(xo[WS(os, 14)]), VADD(TfX, Tg4), ovs, &(xo[0]));
Chris@82 3072 }
Chris@82 3073 {
Chris@82 3074 V Tg5, Tg6, TfL, TfM;
Chris@82 3075 Tg5 = VSUB(TfP, TfW);
Chris@82 3076 Tg6 = VBYI(VSUB(Tg3, Tg0));
Chris@82 3077 ST(&(xo[WS(os, 78)]), VSUB(Tg5, Tg6), ovs, &(xo[0]));
Chris@82 3078 ST(&(xo[WS(os, 50)]), VADD(Tg5, Tg6), ovs, &(xo[0]));
Chris@82 3079 TfL = VBYI(VADD(TfG, TfF));
Chris@82 3080 TfM = VADD(TfI, TfJ);
Chris@82 3081 ST(&(xo[WS(os, 30)]), VADD(TfL, TfM), ovs, &(xo[0]));
Chris@82 3082 ST(&(xo[WS(os, 98)]), VSUB(TfM, TfL), ovs, &(xo[0]));
Chris@82 3083 }
Chris@82 3084 }
Chris@82 3085 {
Chris@82 3086 V Tgp, Thm, TgW, The, TgM, Tho, TgU, Th3, TgE, TgX, TgP, TgT, Tha, Thp, Thh;
Chris@82 3087 V Thl;
Chris@82 3088 {
Chris@82 3089 V Tgh, Thc, Tgo, Thd, Tgk, Tgn;
Chris@82 3090 Tgh = VSUB(Tgf, Tgg);
Chris@82 3091 Thc = VADD(TgH, TgG);
Chris@82 3092 Tgk = VFMA(LDK(KP555570233), Tgi, VMUL(LDK(KP831469612), Tgj));
Chris@82 3093 Tgn = VFNMS(LDK(KP555570233), Tgm, VMUL(LDK(KP831469612), Tgl));
Chris@82 3094 Tgo = VSUB(Tgk, Tgn);
Chris@82 3095 Thd = VADD(Tgn, Tgk);
Chris@82 3096 Tgp = VADD(Tgh, Tgo);
Chris@82 3097 Thm = VSUB(Thd, Thc);
Chris@82 3098 TgW = VSUB(Tgh, Tgo);
Chris@82 3099 The = VADD(Thc, Thd);
Chris@82 3100 }
Chris@82 3101 {
Chris@82 3102 V TgI, Th1, TgL, Th2, TgJ, TgK;
Chris@82 3103 TgI = VSUB(TgG, TgH);
Chris@82 3104 Th1 = VADD(Tgf, Tgg);
Chris@82 3105 TgJ = VFNMS(LDK(KP555570233), Tgj, VMUL(LDK(KP831469612), Tgi));
Chris@82 3106 TgK = VFMA(LDK(KP831469612), Tgm, VMUL(LDK(KP555570233), Tgl));
Chris@82 3107 TgL = VSUB(TgJ, TgK);
Chris@82 3108 Th2 = VADD(TgK, TgJ);
Chris@82 3109 TgM = VADD(TgI, TgL);
Chris@82 3110 Tho = VSUB(Th1, Th2);
Chris@82 3111 TgU = VSUB(TgL, TgI);
Chris@82 3112 Th3 = VADD(Th1, Th2);
Chris@82 3113 }
Chris@82 3114 {
Chris@82 3115 V Tgw, TgN, TgD, TgO;
Chris@82 3116 {
Chris@82 3117 V Tgs, Tgv, Tgz, TgC;
Chris@82 3118 Tgs = VSUB(Tgq, Tgr);
Chris@82 3119 Tgv = VSUB(Tgt, Tgu);
Chris@82 3120 Tgw = VFMA(LDK(KP471396736), Tgs, VMUL(LDK(KP881921264), Tgv));
Chris@82 3121 TgN = VFNMS(LDK(KP471396736), Tgv, VMUL(LDK(KP881921264), Tgs));
Chris@82 3122 Tgz = VSUB(Tgx, Tgy);
Chris@82 3123 TgC = VSUB(TgA, TgB);
Chris@82 3124 TgD = VFNMS(LDK(KP471396736), TgC, VMUL(LDK(KP881921264), Tgz));
Chris@82 3125 TgO = VFMA(LDK(KP881921264), TgC, VMUL(LDK(KP471396736), Tgz));
Chris@82 3126 }
Chris@82 3127 TgE = VADD(Tgw, TgD);
Chris@82 3128 TgX = VSUB(TgO, TgN);
Chris@82 3129 TgP = VADD(TgN, TgO);
Chris@82 3130 TgT = VSUB(TgD, Tgw);
Chris@82 3131 }
Chris@82 3132 {
Chris@82 3133 V Th6, Thf, Th9, Thg;
Chris@82 3134 {
Chris@82 3135 V Th4, Th5, Th7, Th8;
Chris@82 3136 Th4 = VADD(Tgr, Tgq);
Chris@82 3137 Th5 = VADD(Tgt, Tgu);
Chris@82 3138 Th6 = VFMA(LDK(KP290284677), Th4, VMUL(LDK(KP956940335), Th5));
Chris@82 3139 Thf = VFNMS(LDK(KP290284677), Th5, VMUL(LDK(KP956940335), Th4));
Chris@82 3140 Th7 = VADD(Tgx, Tgy);
Chris@82 3141 Th8 = VADD(TgB, TgA);
Chris@82 3142 Th9 = VFNMS(LDK(KP290284677), Th8, VMUL(LDK(KP956940335), Th7));
Chris@82 3143 Thg = VFMA(LDK(KP956940335), Th8, VMUL(LDK(KP290284677), Th7));
Chris@82 3144 }
Chris@82 3145 Tha = VADD(Th6, Th9);
Chris@82 3146 Thp = VSUB(Thg, Thf);
Chris@82 3147 Thh = VADD(Thf, Thg);
Chris@82 3148 Thl = VSUB(Th9, Th6);
Chris@82 3149 }
Chris@82 3150 {
Chris@82 3151 V TgF, TgQ, Thn, Thq;
Chris@82 3152 TgF = VADD(Tgp, TgE);
Chris@82 3153 TgQ = VBYI(VADD(TgM, TgP));
Chris@82 3154 ST(&(xo[WS(os, 118)]), VSUB(TgF, TgQ), ovs, &(xo[0]));
Chris@82 3155 ST(&(xo[WS(os, 10)]), VADD(TgF, TgQ), ovs, &(xo[0]));
Chris@82 3156 Thn = VBYI(VSUB(Thl, Thm));
Chris@82 3157 Thq = VSUB(Tho, Thp);
Chris@82 3158 ST(&(xo[WS(os, 38)]), VADD(Thn, Thq), ovs, &(xo[0]));
Chris@82 3159 ST(&(xo[WS(os, 90)]), VSUB(Thq, Thn), ovs, &(xo[0]));
Chris@82 3160 }
Chris@82 3161 {
Chris@82 3162 V Thr, Ths, TgR, TgS;
Chris@82 3163 Thr = VBYI(VADD(Thm, Thl));
Chris@82 3164 Ths = VADD(Tho, Thp);
Chris@82 3165 ST(&(xo[WS(os, 26)]), VADD(Thr, Ths), ovs, &(xo[0]));
Chris@82 3166 ST(&(xo[WS(os, 102)]), VSUB(Ths, Thr), ovs, &(xo[0]));
Chris@82 3167 TgR = VSUB(Tgp, TgE);
Chris@82 3168 TgS = VBYI(VSUB(TgP, TgM));
Chris@82 3169 ST(&(xo[WS(os, 74)]), VSUB(TgR, TgS), ovs, &(xo[0]));
Chris@82 3170 ST(&(xo[WS(os, 54)]), VADD(TgR, TgS), ovs, &(xo[0]));
Chris@82 3171 }
Chris@82 3172 {
Chris@82 3173 V TgV, TgY, Thb, Thi;
Chris@82 3174 TgV = VBYI(VSUB(TgT, TgU));
Chris@82 3175 TgY = VSUB(TgW, TgX);
Chris@82 3176 ST(&(xo[WS(os, 42)]), VADD(TgV, TgY), ovs, &(xo[0]));
Chris@82 3177 ST(&(xo[WS(os, 86)]), VSUB(TgY, TgV), ovs, &(xo[0]));
Chris@82 3178 Thb = VADD(Th3, Tha);
Chris@82 3179 Thi = VBYI(VADD(The, Thh));
Chris@82 3180 ST(&(xo[WS(os, 122)]), VSUB(Thb, Thi), ovs, &(xo[0]));
Chris@82 3181 ST(&(xo[WS(os, 6)]), VADD(Thb, Thi), ovs, &(xo[0]));
Chris@82 3182 }
Chris@82 3183 {
Chris@82 3184 V Thj, Thk, TgZ, Th0;
Chris@82 3185 Thj = VSUB(Th3, Tha);
Chris@82 3186 Thk = VBYI(VSUB(Thh, The));
Chris@82 3187 ST(&(xo[WS(os, 70)]), VSUB(Thj, Thk), ovs, &(xo[0]));
Chris@82 3188 ST(&(xo[WS(os, 58)]), VADD(Thj, Thk), ovs, &(xo[0]));
Chris@82 3189 TgZ = VBYI(VADD(TgU, TgT));
Chris@82 3190 Th0 = VADD(TgW, TgX);
Chris@82 3191 ST(&(xo[WS(os, 22)]), VADD(TgZ, Th0), ovs, &(xo[0]));
Chris@82 3192 ST(&(xo[WS(os, 106)]), VSUB(Th0, TgZ), ovs, &(xo[0]));
Chris@82 3193 }
Chris@82 3194 }
Chris@82 3195 {
Chris@82 3196 V T80, T8n, T8f, T8j, T8A, T8P, T8H, T8L, T7n, T8M, T8O, T8c, T8k, T8t, T8E;
Chris@82 3197 V T8m;
Chris@82 3198 {
Chris@82 3199 V T7G, T8d, T7Z, T8e;
Chris@82 3200 {
Chris@82 3201 V T7y, T7F, T7R, T7Y;
Chris@82 3202 T7y = VADD(T7q, T7x);
Chris@82 3203 T7F = VADD(T7B, T7E);
Chris@82 3204 T7G = VFMA(LDK(KP989176509), T7y, VMUL(LDK(KP146730474), T7F));
Chris@82 3205 T8d = VFNMS(LDK(KP146730474), T7y, VMUL(LDK(KP989176509), T7F));
Chris@82 3206 T7R = VADD(T7J, T7Q);
Chris@82 3207 T7Y = VADD(T7U, T7X);
Chris@82 3208 T7Z = VFNMS(LDK(KP146730474), T7Y, VMUL(LDK(KP989176509), T7R));
Chris@82 3209 T8e = VFMA(LDK(KP146730474), T7R, VMUL(LDK(KP989176509), T7Y));
Chris@82 3210 }
Chris@82 3211 T80 = VADD(T7G, T7Z);
Chris@82 3212 T8n = VSUB(T8e, T8d);
Chris@82 3213 T8f = VADD(T8d, T8e);
Chris@82 3214 T8j = VSUB(T7Z, T7G);
Chris@82 3215 }
Chris@82 3216 {
Chris@82 3217 V T8w, T8F, T8z, T8G;
Chris@82 3218 {
Chris@82 3219 V T8u, T8v, T8x, T8y;
Chris@82 3220 T8u = VSUB(T7q, T7x);
Chris@82 3221 T8v = VSUB(T7E, T7B);
Chris@82 3222 T8w = VFMA(LDK(KP803207531), T8u, VMUL(LDK(KP595699304), T8v));
Chris@82 3223 T8F = VFNMS(LDK(KP595699304), T8u, VMUL(LDK(KP803207531), T8v));
Chris@82 3224 T8x = VSUB(T7J, T7Q);
Chris@82 3225 T8y = VSUB(T7X, T7U);
Chris@82 3226 T8z = VFNMS(LDK(KP595699304), T8y, VMUL(LDK(KP803207531), T8x));
Chris@82 3227 T8G = VFMA(LDK(KP595699304), T8x, VMUL(LDK(KP803207531), T8y));
Chris@82 3228 }
Chris@82 3229 T8A = VADD(T8w, T8z);
Chris@82 3230 T8P = VSUB(T8G, T8F);
Chris@82 3231 T8H = VADD(T8F, T8G);
Chris@82 3232 T8L = VSUB(T8z, T8w);
Chris@82 3233 }
Chris@82 3234 {
Chris@82 3235 V T77, T8r, T88, T8C, T7m, T8D, T8b, T8s, T76, T87;
Chris@82 3236 T76 = VADD(T72, T75);
Chris@82 3237 T77 = VADD(T6Z, T76);
Chris@82 3238 T8r = VSUB(T6Z, T76);
Chris@82 3239 T87 = VADD(T85, T86);
Chris@82 3240 T88 = VADD(T84, T87);
Chris@82 3241 T8C = VSUB(T87, T84);
Chris@82 3242 {
Chris@82 3243 V T7e, T7l, T89, T8a;
Chris@82 3244 T7e = VFMA(LDK(KP956940335), T7a, VMUL(LDK(KP290284677), T7d));
Chris@82 3245 T7l = VFNMS(LDK(KP290284677), T7k, VMUL(LDK(KP956940335), T7h));
Chris@82 3246 T7m = VADD(T7e, T7l);
Chris@82 3247 T8D = VSUB(T7l, T7e);
Chris@82 3248 T89 = VFNMS(LDK(KP290284677), T7a, VMUL(LDK(KP956940335), T7d));
Chris@82 3249 T8a = VFMA(LDK(KP290284677), T7h, VMUL(LDK(KP956940335), T7k));
Chris@82 3250 T8b = VADD(T89, T8a);
Chris@82 3251 T8s = VSUB(T8a, T89);
Chris@82 3252 }
Chris@82 3253 T7n = VADD(T77, T7m);
Chris@82 3254 T8M = VSUB(T8D, T8C);
Chris@82 3255 T8O = VSUB(T8r, T8s);
Chris@82 3256 T8c = VADD(T88, T8b);
Chris@82 3257 T8k = VSUB(T8b, T88);
Chris@82 3258 T8t = VADD(T8r, T8s);
Chris@82 3259 T8E = VADD(T8C, T8D);
Chris@82 3260 T8m = VSUB(T77, T7m);
Chris@82 3261 }
Chris@82 3262 {
Chris@82 3263 V T81, T8g, T8N, T8Q;
Chris@82 3264 T81 = VADD(T7n, T80);
Chris@82 3265 T8g = VBYI(VADD(T8c, T8f));
Chris@82 3266 ST(&(xo[WS(os, 125)]), VSUB(T81, T8g), ovs, &(xo[WS(os, 1)]));
Chris@82 3267 ST(&(xo[WS(os, 3)]), VADD(T81, T8g), ovs, &(xo[WS(os, 1)]));
Chris@82 3268 T8N = VBYI(VSUB(T8L, T8M));
Chris@82 3269 T8Q = VSUB(T8O, T8P);
Chris@82 3270 ST(&(xo[WS(os, 45)]), VADD(T8N, T8Q), ovs, &(xo[WS(os, 1)]));
Chris@82 3271 ST(&(xo[WS(os, 83)]), VSUB(T8Q, T8N), ovs, &(xo[WS(os, 1)]));
Chris@82 3272 }
Chris@82 3273 {
Chris@82 3274 V T8R, T8S, T8h, T8i;
Chris@82 3275 T8R = VBYI(VADD(T8M, T8L));
Chris@82 3276 T8S = VADD(T8O, T8P);
Chris@82 3277 ST(&(xo[WS(os, 19)]), VADD(T8R, T8S), ovs, &(xo[WS(os, 1)]));
Chris@82 3278 ST(&(xo[WS(os, 109)]), VSUB(T8S, T8R), ovs, &(xo[WS(os, 1)]));
Chris@82 3279 T8h = VSUB(T7n, T80);
Chris@82 3280 T8i = VBYI(VSUB(T8f, T8c));
Chris@82 3281 ST(&(xo[WS(os, 67)]), VSUB(T8h, T8i), ovs, &(xo[WS(os, 1)]));
Chris@82 3282 ST(&(xo[WS(os, 61)]), VADD(T8h, T8i), ovs, &(xo[WS(os, 1)]));
Chris@82 3283 }
Chris@82 3284 {
Chris@82 3285 V T8l, T8o, T8B, T8I;
Chris@82 3286 T8l = VBYI(VSUB(T8j, T8k));
Chris@82 3287 T8o = VSUB(T8m, T8n);
Chris@82 3288 ST(&(xo[WS(os, 35)]), VADD(T8l, T8o), ovs, &(xo[WS(os, 1)]));
Chris@82 3289 ST(&(xo[WS(os, 93)]), VSUB(T8o, T8l), ovs, &(xo[WS(os, 1)]));
Chris@82 3290 T8B = VADD(T8t, T8A);
Chris@82 3291 T8I = VBYI(VADD(T8E, T8H));
Chris@82 3292 ST(&(xo[WS(os, 115)]), VSUB(T8B, T8I), ovs, &(xo[WS(os, 1)]));
Chris@82 3293 ST(&(xo[WS(os, 13)]), VADD(T8B, T8I), ovs, &(xo[WS(os, 1)]));
Chris@82 3294 }
Chris@82 3295 {
Chris@82 3296 V T8J, T8K, T8p, T8q;
Chris@82 3297 T8J = VSUB(T8t, T8A);
Chris@82 3298 T8K = VBYI(VSUB(T8H, T8E));
Chris@82 3299 ST(&(xo[WS(os, 77)]), VSUB(T8J, T8K), ovs, &(xo[WS(os, 1)]));
Chris@82 3300 ST(&(xo[WS(os, 51)]), VADD(T8J, T8K), ovs, &(xo[WS(os, 1)]));
Chris@82 3301 T8p = VBYI(VADD(T8k, T8j));
Chris@82 3302 T8q = VADD(T8m, T8n);
Chris@82 3303 ST(&(xo[WS(os, 29)]), VADD(T8p, T8q), ovs, &(xo[WS(os, 1)]));
Chris@82 3304 ST(&(xo[WS(os, 99)]), VSUB(T8q, T8p), ovs, &(xo[WS(os, 1)]));
Chris@82 3305 }
Chris@82 3306 }
Chris@82 3307 {
Chris@82 3308 V T4K, T5d, T55, T59, T5q, T5F, T5x, T5B, T2f, T5C, T5E, T52, T5a, T5j, T5u;
Chris@82 3309 V T5c;
Chris@82 3310 {
Chris@82 3311 V T3u, T53, T4J, T54;
Chris@82 3312 {
Chris@82 3313 V T3g, T3t, T4v, T4I;
Chris@82 3314 T3g = VADD(T2G, T3f);
Chris@82 3315 T3t = VADD(T3p, T3s);
Chris@82 3316 T3u = VFMA(LDK(KP998795456), T3g, VMUL(LDK(KP049067674), T3t));
Chris@82 3317 T53 = VFNMS(LDK(KP049067674), T3g, VMUL(LDK(KP998795456), T3t));
Chris@82 3318 T4v = VADD(T3V, T4u);
Chris@82 3319 T4I = VADD(T4E, T4H);
Chris@82 3320 T4J = VFNMS(LDK(KP049067674), T4I, VMUL(LDK(KP998795456), T4v));
Chris@82 3321 T54 = VFMA(LDK(KP049067674), T4v, VMUL(LDK(KP998795456), T4I));
Chris@82 3322 }
Chris@82 3323 T4K = VADD(T3u, T4J);
Chris@82 3324 T5d = VSUB(T54, T53);
Chris@82 3325 T55 = VADD(T53, T54);
Chris@82 3326 T59 = VSUB(T4J, T3u);
Chris@82 3327 }
Chris@82 3328 {
Chris@82 3329 V T5m, T5v, T5p, T5w;
Chris@82 3330 {
Chris@82 3331 V T5k, T5l, T5n, T5o;
Chris@82 3332 T5k = VSUB(T2G, T3f);
Chris@82 3333 T5l = VSUB(T3s, T3p);
Chris@82 3334 T5m = VFMA(LDK(KP740951125), T5k, VMUL(LDK(KP671558954), T5l));
Chris@82 3335 T5v = VFNMS(LDK(KP671558954), T5k, VMUL(LDK(KP740951125), T5l));
Chris@82 3336 T5n = VSUB(T3V, T4u);
Chris@82 3337 T5o = VSUB(T4H, T4E);
Chris@82 3338 T5p = VFNMS(LDK(KP671558954), T5o, VMUL(LDK(KP740951125), T5n));
Chris@82 3339 T5w = VFMA(LDK(KP671558954), T5n, VMUL(LDK(KP740951125), T5o));
Chris@82 3340 }
Chris@82 3341 T5q = VADD(T5m, T5p);
Chris@82 3342 T5F = VSUB(T5w, T5v);
Chris@82 3343 T5x = VADD(T5v, T5w);
Chris@82 3344 T5B = VSUB(T5p, T5m);
Chris@82 3345 }
Chris@82 3346 {
Chris@82 3347 V T11, T5h, T4Y, T5s, T2e, T5t, T51, T5i, T10, T4X;
Chris@82 3348 T10 = VADD(TI, TZ);
Chris@82 3349 T11 = VADD(Tr, T10);
Chris@82 3350 T5h = VSUB(Tr, T10);
Chris@82 3351 T4X = VADD(T4V, T4W);
Chris@82 3352 T4Y = VADD(T4U, T4X);
Chris@82 3353 T5s = VSUB(T4X, T4U);
Chris@82 3354 {
Chris@82 3355 V T1C, T2d, T4Z, T50;
Chris@82 3356 T1C = VFMA(LDK(KP098017140), T1s, VMUL(LDK(KP995184726), T1B));
Chris@82 3357 T2d = VFNMS(LDK(KP098017140), T2c, VMUL(LDK(KP995184726), T23));
Chris@82 3358 T2e = VADD(T1C, T2d);
Chris@82 3359 T5t = VSUB(T2d, T1C);
Chris@82 3360 T4Z = VFNMS(LDK(KP098017140), T1B, VMUL(LDK(KP995184726), T1s));
Chris@82 3361 T50 = VFMA(LDK(KP995184726), T2c, VMUL(LDK(KP098017140), T23));
Chris@82 3362 T51 = VADD(T4Z, T50);
Chris@82 3363 T5i = VSUB(T50, T4Z);
Chris@82 3364 }
Chris@82 3365 T2f = VADD(T11, T2e);
Chris@82 3366 T5C = VSUB(T5t, T5s);
Chris@82 3367 T5E = VSUB(T5h, T5i);
Chris@82 3368 T52 = VADD(T4Y, T51);
Chris@82 3369 T5a = VSUB(T51, T4Y);
Chris@82 3370 T5j = VADD(T5h, T5i);
Chris@82 3371 T5u = VADD(T5s, T5t);
Chris@82 3372 T5c = VSUB(T11, T2e);
Chris@82 3373 }
Chris@82 3374 {
Chris@82 3375 V T4L, T56, T5D, T5G;
Chris@82 3376 T4L = VADD(T2f, T4K);
Chris@82 3377 T56 = VBYI(VADD(T52, T55));
Chris@82 3378 ST(&(xo[WS(os, 127)]), VSUB(T4L, T56), ovs, &(xo[WS(os, 1)]));
Chris@82 3379 ST(&(xo[WS(os, 1)]), VADD(T4L, T56), ovs, &(xo[WS(os, 1)]));
Chris@82 3380 T5D = VBYI(VSUB(T5B, T5C));
Chris@82 3381 T5G = VSUB(T5E, T5F);
Chris@82 3382 ST(&(xo[WS(os, 47)]), VADD(T5D, T5G), ovs, &(xo[WS(os, 1)]));
Chris@82 3383 ST(&(xo[WS(os, 81)]), VSUB(T5G, T5D), ovs, &(xo[WS(os, 1)]));
Chris@82 3384 }
Chris@82 3385 {
Chris@82 3386 V T5H, T5I, T57, T58;
Chris@82 3387 T5H = VBYI(VADD(T5C, T5B));
Chris@82 3388 T5I = VADD(T5E, T5F);
Chris@82 3389 ST(&(xo[WS(os, 17)]), VADD(T5H, T5I), ovs, &(xo[WS(os, 1)]));
Chris@82 3390 ST(&(xo[WS(os, 111)]), VSUB(T5I, T5H), ovs, &(xo[WS(os, 1)]));
Chris@82 3391 T57 = VSUB(T2f, T4K);
Chris@82 3392 T58 = VBYI(VSUB(T55, T52));
Chris@82 3393 ST(&(xo[WS(os, 65)]), VSUB(T57, T58), ovs, &(xo[WS(os, 1)]));
Chris@82 3394 ST(&(xo[WS(os, 63)]), VADD(T57, T58), ovs, &(xo[WS(os, 1)]));
Chris@82 3395 }
Chris@82 3396 {
Chris@82 3397 V T5b, T5e, T5r, T5y;
Chris@82 3398 T5b = VBYI(VSUB(T59, T5a));
Chris@82 3399 T5e = VSUB(T5c, T5d);
Chris@82 3400 ST(&(xo[WS(os, 33)]), VADD(T5b, T5e), ovs, &(xo[WS(os, 1)]));
Chris@82 3401 ST(&(xo[WS(os, 95)]), VSUB(T5e, T5b), ovs, &(xo[WS(os, 1)]));
Chris@82 3402 T5r = VADD(T5j, T5q);
Chris@82 3403 T5y = VBYI(VADD(T5u, T5x));
Chris@82 3404 ST(&(xo[WS(os, 113)]), VSUB(T5r, T5y), ovs, &(xo[WS(os, 1)]));
Chris@82 3405 ST(&(xo[WS(os, 15)]), VADD(T5r, T5y), ovs, &(xo[WS(os, 1)]));
Chris@82 3406 }
Chris@82 3407 {
Chris@82 3408 V T5z, T5A, T5f, T5g;
Chris@82 3409 T5z = VSUB(T5j, T5q);
Chris@82 3410 T5A = VBYI(VSUB(T5x, T5u));
Chris@82 3411 ST(&(xo[WS(os, 79)]), VSUB(T5z, T5A), ovs, &(xo[WS(os, 1)]));
Chris@82 3412 ST(&(xo[WS(os, 49)]), VADD(T5z, T5A), ovs, &(xo[WS(os, 1)]));
Chris@82 3413 T5f = VBYI(VADD(T5a, T59));
Chris@82 3414 T5g = VADD(T5c, T5d);
Chris@82 3415 ST(&(xo[WS(os, 31)]), VADD(T5f, T5g), ovs, &(xo[WS(os, 1)]));
Chris@82 3416 ST(&(xo[WS(os, 97)]), VSUB(T5g, T5f), ovs, &(xo[WS(os, 1)]));
Chris@82 3417 }
Chris@82 3418 }
Chris@82 3419 {
Chris@82 3420 V T9i, T9B, T9t, T9x, T9O, Ta3, T9V, T9Z, T93, Ta0, Ta2, T9q, T9y, T9H, T9S;
Chris@82 3421 V T9A;
Chris@82 3422 {
Chris@82 3423 V T9a, T9r, T9h, T9s;
Chris@82 3424 {
Chris@82 3425 V T96, T99, T9d, T9g;
Chris@82 3426 T96 = VSUB(T94, T95);
Chris@82 3427 T99 = VSUB(T97, T98);
Chris@82 3428 T9a = VFMA(LDK(KP514102744), T96, VMUL(LDK(KP857728610), T99));
Chris@82 3429 T9r = VFNMS(LDK(KP514102744), T99, VMUL(LDK(KP857728610), T96));
Chris@82 3430 T9d = VSUB(T9b, T9c);
Chris@82 3431 T9g = VSUB(T9e, T9f);
Chris@82 3432 T9h = VFNMS(LDK(KP514102744), T9g, VMUL(LDK(KP857728610), T9d));
Chris@82 3433 T9s = VFMA(LDK(KP857728610), T9g, VMUL(LDK(KP514102744), T9d));
Chris@82 3434 }
Chris@82 3435 T9i = VADD(T9a, T9h);
Chris@82 3436 T9B = VSUB(T9s, T9r);
Chris@82 3437 T9t = VADD(T9r, T9s);
Chris@82 3438 T9x = VSUB(T9h, T9a);
Chris@82 3439 }
Chris@82 3440 {
Chris@82 3441 V T9K, T9T, T9N, T9U;
Chris@82 3442 {
Chris@82 3443 V T9I, T9J, T9L, T9M;
Chris@82 3444 T9I = VADD(T95, T94);
Chris@82 3445 T9J = VADD(T97, T98);
Chris@82 3446 T9K = VFMA(LDK(KP242980179), T9I, VMUL(LDK(KP970031253), T9J));
Chris@82 3447 T9T = VFNMS(LDK(KP242980179), T9J, VMUL(LDK(KP970031253), T9I));
Chris@82 3448 T9L = VADD(T9b, T9c);
Chris@82 3449 T9M = VADD(T9f, T9e);
Chris@82 3450 T9N = VFNMS(LDK(KP242980179), T9M, VMUL(LDK(KP970031253), T9L));
Chris@82 3451 T9U = VFMA(LDK(KP970031253), T9M, VMUL(LDK(KP242980179), T9L));
Chris@82 3452 }
Chris@82 3453 T9O = VADD(T9K, T9N);
Chris@82 3454 Ta3 = VSUB(T9U, T9T);
Chris@82 3455 T9V = VADD(T9T, T9U);
Chris@82 3456 T9Z = VSUB(T9N, T9K);
Chris@82 3457 }
Chris@82 3458 {
Chris@82 3459 V T8V, T9F, T9m, T9Q, T92, T9R, T9p, T9G, T8U, T9k;
Chris@82 3460 T8U = VSUB(T86, T85);
Chris@82 3461 T8V = VSUB(T8T, T8U);
Chris@82 3462 T9F = VADD(T8T, T8U);
Chris@82 3463 T9k = VSUB(T75, T72);
Chris@82 3464 T9m = VSUB(T9k, T9l);
Chris@82 3465 T9Q = VADD(T9l, T9k);
Chris@82 3466 {
Chris@82 3467 V T8Y, T91, T9n, T9o;
Chris@82 3468 T8Y = VFMA(LDK(KP471396736), T8W, VMUL(LDK(KP881921264), T8X));
Chris@82 3469 T91 = VFNMS(LDK(KP471396736), T90, VMUL(LDK(KP881921264), T8Z));
Chris@82 3470 T92 = VSUB(T8Y, T91);
Chris@82 3471 T9R = VADD(T91, T8Y);
Chris@82 3472 T9n = VFNMS(LDK(KP471396736), T8X, VMUL(LDK(KP881921264), T8W));
Chris@82 3473 T9o = VFMA(LDK(KP881921264), T90, VMUL(LDK(KP471396736), T8Z));
Chris@82 3474 T9p = VSUB(T9n, T9o);
Chris@82 3475 T9G = VADD(T9o, T9n);
Chris@82 3476 }
Chris@82 3477 T93 = VADD(T8V, T92);
Chris@82 3478 Ta0 = VSUB(T9R, T9Q);
Chris@82 3479 Ta2 = VSUB(T9F, T9G);
Chris@82 3480 T9q = VADD(T9m, T9p);
Chris@82 3481 T9y = VSUB(T9p, T9m);
Chris@82 3482 T9H = VADD(T9F, T9G);
Chris@82 3483 T9S = VADD(T9Q, T9R);
Chris@82 3484 T9A = VSUB(T8V, T92);
Chris@82 3485 }
Chris@82 3486 {
Chris@82 3487 V T9j, T9u, Ta1, Ta4;
Chris@82 3488 T9j = VADD(T93, T9i);
Chris@82 3489 T9u = VBYI(VADD(T9q, T9t));
Chris@82 3490 ST(&(xo[WS(os, 117)]), VSUB(T9j, T9u), ovs, &(xo[WS(os, 1)]));
Chris@82 3491 ST(&(xo[WS(os, 11)]), VADD(T9j, T9u), ovs, &(xo[WS(os, 1)]));
Chris@82 3492 Ta1 = VBYI(VSUB(T9Z, Ta0));
Chris@82 3493 Ta4 = VSUB(Ta2, Ta3);
Chris@82 3494 ST(&(xo[WS(os, 37)]), VADD(Ta1, Ta4), ovs, &(xo[WS(os, 1)]));
Chris@82 3495 ST(&(xo[WS(os, 91)]), VSUB(Ta4, Ta1), ovs, &(xo[WS(os, 1)]));
Chris@82 3496 }
Chris@82 3497 {
Chris@82 3498 V Ta5, Ta6, T9v, T9w;
Chris@82 3499 Ta5 = VBYI(VADD(Ta0, T9Z));
Chris@82 3500 Ta6 = VADD(Ta2, Ta3);
Chris@82 3501 ST(&(xo[WS(os, 27)]), VADD(Ta5, Ta6), ovs, &(xo[WS(os, 1)]));
Chris@82 3502 ST(&(xo[WS(os, 101)]), VSUB(Ta6, Ta5), ovs, &(xo[WS(os, 1)]));
Chris@82 3503 T9v = VSUB(T93, T9i);
Chris@82 3504 T9w = VBYI(VSUB(T9t, T9q));
Chris@82 3505 ST(&(xo[WS(os, 75)]), VSUB(T9v, T9w), ovs, &(xo[WS(os, 1)]));
Chris@82 3506 ST(&(xo[WS(os, 53)]), VADD(T9v, T9w), ovs, &(xo[WS(os, 1)]));
Chris@82 3507 }
Chris@82 3508 {
Chris@82 3509 V T9z, T9C, T9P, T9W;
Chris@82 3510 T9z = VBYI(VSUB(T9x, T9y));
Chris@82 3511 T9C = VSUB(T9A, T9B);
Chris@82 3512 ST(&(xo[WS(os, 43)]), VADD(T9z, T9C), ovs, &(xo[WS(os, 1)]));
Chris@82 3513 ST(&(xo[WS(os, 85)]), VSUB(T9C, T9z), ovs, &(xo[WS(os, 1)]));
Chris@82 3514 T9P = VADD(T9H, T9O);
Chris@82 3515 T9W = VBYI(VADD(T9S, T9V));
Chris@82 3516 ST(&(xo[WS(os, 123)]), VSUB(T9P, T9W), ovs, &(xo[WS(os, 1)]));
Chris@82 3517 ST(&(xo[WS(os, 5)]), VADD(T9P, T9W), ovs, &(xo[WS(os, 1)]));
Chris@82 3518 }
Chris@82 3519 {
Chris@82 3520 V T9X, T9Y, T9D, T9E;
Chris@82 3521 T9X = VSUB(T9H, T9O);
Chris@82 3522 T9Y = VBYI(VSUB(T9V, T9S));
Chris@82 3523 ST(&(xo[WS(os, 69)]), VSUB(T9X, T9Y), ovs, &(xo[WS(os, 1)]));
Chris@82 3524 ST(&(xo[WS(os, 59)]), VADD(T9X, T9Y), ovs, &(xo[WS(os, 1)]));
Chris@82 3525 T9D = VBYI(VADD(T9y, T9x));
Chris@82 3526 T9E = VADD(T9A, T9B);
Chris@82 3527 ST(&(xo[WS(os, 21)]), VADD(T9D, T9E), ovs, &(xo[WS(os, 1)]));
Chris@82 3528 ST(&(xo[WS(os, 107)]), VSUB(T9E, T9D), ovs, &(xo[WS(os, 1)]));
Chris@82 3529 }
Chris@82 3530 }
Chris@82 3531 {
Chris@82 3532 V T68, T6r, T6j, T6n, T6E, T6T, T6L, T6P, T5T, T6Q, T6S, T6g, T6o, T6x, T6I;
Chris@82 3533 V T6q;
Chris@82 3534 {
Chris@82 3535 V T60, T6h, T67, T6i;
Chris@82 3536 {
Chris@82 3537 V T5W, T5Z, T63, T66;
Chris@82 3538 T5W = VSUB(T5U, T5V);
Chris@82 3539 T5Z = VSUB(T5X, T5Y);
Chris@82 3540 T60 = VFMA(LDK(KP427555093), T5W, VMUL(LDK(KP903989293), T5Z));
Chris@82 3541 T6h = VFNMS(LDK(KP427555093), T5Z, VMUL(LDK(KP903989293), T5W));
Chris@82 3542 T63 = VSUB(T61, T62);
Chris@82 3543 T66 = VSUB(T64, T65);
Chris@82 3544 T67 = VFNMS(LDK(KP427555093), T66, VMUL(LDK(KP903989293), T63));
Chris@82 3545 T6i = VFMA(LDK(KP903989293), T66, VMUL(LDK(KP427555093), T63));
Chris@82 3546 }
Chris@82 3547 T68 = VADD(T60, T67);
Chris@82 3548 T6r = VSUB(T6i, T6h);
Chris@82 3549 T6j = VADD(T6h, T6i);
Chris@82 3550 T6n = VSUB(T67, T60);
Chris@82 3551 }
Chris@82 3552 {
Chris@82 3553 V T6A, T6J, T6D, T6K;
Chris@82 3554 {
Chris@82 3555 V T6y, T6z, T6B, T6C;
Chris@82 3556 T6y = VADD(T5V, T5U);
Chris@82 3557 T6z = VADD(T5X, T5Y);
Chris@82 3558 T6A = VFMA(LDK(KP336889853), T6y, VMUL(LDK(KP941544065), T6z));
Chris@82 3559 T6J = VFNMS(LDK(KP336889853), T6z, VMUL(LDK(KP941544065), T6y));
Chris@82 3560 T6B = VADD(T61, T62);
Chris@82 3561 T6C = VADD(T65, T64);
Chris@82 3562 T6D = VFNMS(LDK(KP336889853), T6C, VMUL(LDK(KP941544065), T6B));
Chris@82 3563 T6K = VFMA(LDK(KP941544065), T6C, VMUL(LDK(KP336889853), T6B));
Chris@82 3564 }
Chris@82 3565 T6E = VADD(T6A, T6D);
Chris@82 3566 T6T = VSUB(T6K, T6J);
Chris@82 3567 T6L = VADD(T6J, T6K);
Chris@82 3568 T6P = VSUB(T6D, T6A);
Chris@82 3569 }
Chris@82 3570 {
Chris@82 3571 V T5L, T6v, T6c, T6G, T5S, T6H, T6f, T6w, T5K, T6a;
Chris@82 3572 T5K = VSUB(T4W, T4V);
Chris@82 3573 T5L = VSUB(T5J, T5K);
Chris@82 3574 T6v = VADD(T5J, T5K);
Chris@82 3575 T6a = VSUB(TZ, TI);
Chris@82 3576 T6c = VSUB(T6a, T6b);
Chris@82 3577 T6G = VADD(T6b, T6a);
Chris@82 3578 {
Chris@82 3579 V T5O, T5R, T6d, T6e;
Chris@82 3580 T5O = VFMA(LDK(KP773010453), T5M, VMUL(LDK(KP634393284), T5N));
Chris@82 3581 T5R = VFNMS(LDK(KP634393284), T5Q, VMUL(LDK(KP773010453), T5P));
Chris@82 3582 T5S = VSUB(T5O, T5R);
Chris@82 3583 T6H = VADD(T5R, T5O);
Chris@82 3584 T6d = VFNMS(LDK(KP634393284), T5M, VMUL(LDK(KP773010453), T5N));
Chris@82 3585 T6e = VFMA(LDK(KP634393284), T5P, VMUL(LDK(KP773010453), T5Q));
Chris@82 3586 T6f = VSUB(T6d, T6e);
Chris@82 3587 T6w = VADD(T6e, T6d);
Chris@82 3588 }
Chris@82 3589 T5T = VADD(T5L, T5S);
Chris@82 3590 T6Q = VSUB(T6H, T6G);
Chris@82 3591 T6S = VSUB(T6v, T6w);
Chris@82 3592 T6g = VADD(T6c, T6f);
Chris@82 3593 T6o = VSUB(T6f, T6c);
Chris@82 3594 T6x = VADD(T6v, T6w);
Chris@82 3595 T6I = VADD(T6G, T6H);
Chris@82 3596 T6q = VSUB(T5L, T5S);
Chris@82 3597 }
Chris@82 3598 {
Chris@82 3599 V T69, T6k, T6R, T6U;
Chris@82 3600 T69 = VADD(T5T, T68);
Chris@82 3601 T6k = VBYI(VADD(T6g, T6j));
Chris@82 3602 ST(&(xo[WS(os, 119)]), VSUB(T69, T6k), ovs, &(xo[WS(os, 1)]));
Chris@82 3603 ST(&(xo[WS(os, 9)]), VADD(T69, T6k), ovs, &(xo[WS(os, 1)]));
Chris@82 3604 T6R = VBYI(VSUB(T6P, T6Q));
Chris@82 3605 T6U = VSUB(T6S, T6T);
Chris@82 3606 ST(&(xo[WS(os, 39)]), VADD(T6R, T6U), ovs, &(xo[WS(os, 1)]));
Chris@82 3607 ST(&(xo[WS(os, 89)]), VSUB(T6U, T6R), ovs, &(xo[WS(os, 1)]));
Chris@82 3608 }
Chris@82 3609 {
Chris@82 3610 V T6V, T6W, T6l, T6m;
Chris@82 3611 T6V = VBYI(VADD(T6Q, T6P));
Chris@82 3612 T6W = VADD(T6S, T6T);
Chris@82 3613 ST(&(xo[WS(os, 25)]), VADD(T6V, T6W), ovs, &(xo[WS(os, 1)]));
Chris@82 3614 ST(&(xo[WS(os, 103)]), VSUB(T6W, T6V), ovs, &(xo[WS(os, 1)]));
Chris@82 3615 T6l = VSUB(T5T, T68);
Chris@82 3616 T6m = VBYI(VSUB(T6j, T6g));
Chris@82 3617 ST(&(xo[WS(os, 73)]), VSUB(T6l, T6m), ovs, &(xo[WS(os, 1)]));
Chris@82 3618 ST(&(xo[WS(os, 55)]), VADD(T6l, T6m), ovs, &(xo[WS(os, 1)]));
Chris@82 3619 }
Chris@82 3620 {
Chris@82 3621 V T6p, T6s, T6F, T6M;
Chris@82 3622 T6p = VBYI(VSUB(T6n, T6o));
Chris@82 3623 T6s = VSUB(T6q, T6r);
Chris@82 3624 ST(&(xo[WS(os, 41)]), VADD(T6p, T6s), ovs, &(xo[WS(os, 1)]));
Chris@82 3625 ST(&(xo[WS(os, 87)]), VSUB(T6s, T6p), ovs, &(xo[WS(os, 1)]));
Chris@82 3626 T6F = VADD(T6x, T6E);
Chris@82 3627 T6M = VBYI(VADD(T6I, T6L));
Chris@82 3628 ST(&(xo[WS(os, 121)]), VSUB(T6F, T6M), ovs, &(xo[WS(os, 1)]));
Chris@82 3629 ST(&(xo[WS(os, 7)]), VADD(T6F, T6M), ovs, &(xo[WS(os, 1)]));
Chris@82 3630 }
Chris@82 3631 {
Chris@82 3632 V T6N, T6O, T6t, T6u;
Chris@82 3633 T6N = VSUB(T6x, T6E);
Chris@82 3634 T6O = VBYI(VSUB(T6L, T6I));
Chris@82 3635 ST(&(xo[WS(os, 71)]), VSUB(T6N, T6O), ovs, &(xo[WS(os, 1)]));
Chris@82 3636 ST(&(xo[WS(os, 57)]), VADD(T6N, T6O), ovs, &(xo[WS(os, 1)]));
Chris@82 3637 T6t = VBYI(VADD(T6o, T6n));
Chris@82 3638 T6u = VADD(T6q, T6r);
Chris@82 3639 ST(&(xo[WS(os, 23)]), VADD(T6t, T6u), ovs, &(xo[WS(os, 1)]));
Chris@82 3640 ST(&(xo[WS(os, 105)]), VSUB(T6u, T6t), ovs, &(xo[WS(os, 1)]));
Chris@82 3641 }
Chris@82 3642 }
Chris@82 3643 }
Chris@82 3644 }
Chris@82 3645 VLEAVE();
Chris@82 3646 }
Chris@82 3647
Chris@82 3648 static const kdft_desc desc = { 128, XSIMD_STRING("n1fv_128"), {938, 186, 144, 0}, &GENUS, 0, 0, 0, 0 };
Chris@82 3649
Chris@82 3650 void XSIMD(codelet_n1fv_128) (planner *p) {
Chris@82 3651 X(kdft_register) (p, n1fv_128, &desc);
Chris@82 3652 }
Chris@82 3653
Chris@82 3654 #endif