annotate src/fftw-3.3.8/dft/simd/common/n2sv_64.c @ 167:bd3cc4d1df30

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