sv-dependency-builds: src/fftw-3.3.8/dft/simd/common/n1fv

annotate src/fftw-3.3.8/dft/simd/common/n1fv_128.c @ 82:d0c2a83c1364

Add FFTW 3.3.8 source, and a Linux build

author	Chris Cannam
date	Tue, 19 Nov 2019 14:52:55 +0000
parents
children

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

Mercurial > hg > sv-dependency-builds

annotate src/fftw-3.3.8/dft/simd/common/n1fv_128.c @ 82:d0c2a83c1364