summaryrefslogtreecommitdiffstatshomepage
path: root/src/lib/netlist
diff options
context:
space:
mode:
Diffstat (limited to 'src/lib/netlist')
-rw-r--r--src/lib/netlist/build/makefile11
-rw-r--r--src/lib/netlist/generated/static_solvers.cpp8602
-rw-r--r--src/lib/netlist/macro/nlm_ttl74xx_lib.cpp6
-rwxr-xr-x[-rw-r--r--]src/lib/netlist/nl_create_mame_solvers.sh2
-rw-r--r--src/lib/netlist/nl_dice_compat.h2
-rw-r--r--src/lib/netlist/plib/pexception.cpp2
-rw-r--r--src/lib/netlist/plib/ppreprocessor.cpp2
-rw-r--r--src/lib/netlist/plib/ptests.h4
-rw-r--r--src/lib/netlist/tests/test_penum.cpp2
-rw-r--r--src/lib/netlist/tools/nl_convert.cpp2
10 files changed, 5027 insertions, 3608 deletions
diff --git a/src/lib/netlist/build/makefile b/src/lib/netlist/build/makefile
index 077b72b028f..2a63e816c0a 100644
--- a/src/lib/netlist/build/makefile
+++ b/src/lib/netlist/build/makefile
@@ -146,13 +146,12 @@ OBJDIRS = $(OBJ) \
$(OBJ)/solver \
$(OBJ)/devices \
$(OBJ)/plib \
- $(OBJ)/devices \
$(OBJ)/macro \
$(OBJ)/macro/modules \
$(OBJ)/tests \
$(OBJ)/tools \
$(OBJ)/prg \
- $(OBJ)/generated \
+ $(OBJ)/generated
MODULESOURCES += $(wildcard $(SRC)/macro/modules/*.cpp)
DEVSOURCES = $(SRC)/solver/nld_solver.cpp
@@ -171,7 +170,7 @@ CORESOURCES := \
$(SRC)/nl_setup.cpp \
$(SRC)/nl_factory.cpp \
$(SRC)/tools/nl_convert.cpp \
- $(SRC)/generated/static_solvers.cpp \
+ $(SRC)/generated/static_solvers.cpp
MAINSOURCES = $(SRC)/prg/nltool.cpp $(SRC)/prg/nlwav.cpp
@@ -196,7 +195,7 @@ PSOURCES := \
$(PSRC)/ppmf.cpp \
$(PSRC)/ppreprocessor.cpp \
$(PSRC)/ptokenizer.cpp \
- $(PSRC)/putil.cpp \
+ $(PSRC)/putil.cpp
NLOBJS = $(patsubst $(SRC)%, $(OBJ)%, $(CORESOURCES:.cpp=.o))
NLDEVOBJS = $(patsubst $(SRC)%, $(OBJ)%, $(DEVSOURCES:.cpp=.o))
@@ -213,7 +212,7 @@ VSFILES = \
$(VSBUILD)/nltool.vcxproj.filters \
$(VSBUILD)/nlwav.vcxproj \
$(VSBUILD)/nlwav.vcxproj.filters \
- $(VSBUILD)/netlist.sln \
+ $(VSBUILD)/netlist.sln
OTHERFILES = makefile
@@ -223,7 +222,7 @@ DOCS = \
$(DOC)/mainpage.dox.h \
$(DOC)/primer_1.dox.h \
$(DOC)/structure.dox.h \
- $(DOC)/test1-50r.svg \
+ $(DOC)/test1-50r.svg
ALL_OBJS = $(OBJS) $(MAINOBJS)
diff --git a/src/lib/netlist/generated/static_solvers.cpp b/src/lib/netlist/generated/static_solvers.cpp
index ff615be2670..8f01960ce72 100644
--- a/src/lib/netlist/generated/static_solvers.cpp
+++ b/src/lib/netlist/generated/static_solvers.cpp
@@ -542,2340 +542,6 @@ static void nl_gcr_90_double_double_ce766957cb26ff3e(double * __restrict V, cons
V[0] = (RHS0 - tmp0) / m_A0;
}
-// 280zzzap,sspeedr
-static void nl_gcr_113_double_double_ab9144d965a37e4(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
-
-{
-
- plib::unused_var(cnV);
- double m_A0(0.0);
- double m_A1(0.0);
- double m_A2(0.0);
- double m_A3(0.0);
- double m_A4(0.0);
- double m_A5(0.0);
- double m_A6(0.0);
- double m_A7(0.0);
- double m_A8(0.0);
- double m_A9(0.0);
- double m_A10(0.0);
- double m_A11(0.0);
- double m_A12(0.0);
- double m_A13(0.0);
- double m_A14(0.0);
- double m_A15(0.0);
- double m_A16(0.0);
- double m_A17(0.0);
- double m_A18(0.0);
- double m_A19(0.0);
- double m_A20(0.0);
- double m_A21(0.0);
- double m_A22(0.0);
- double m_A23(0.0);
- double m_A24(0.0);
- double m_A25(0.0);
- double m_A26(0.0);
- double m_A27(0.0);
- double m_A28(0.0);
- double m_A29(0.0);
- double m_A30(0.0);
- double m_A31(0.0);
- double m_A32(0.0);
- double m_A33(0.0);
- double m_A34(0.0);
- double m_A35(0.0);
- double m_A36(0.0);
- double m_A37(0.0);
- double m_A38(0.0);
- double m_A39(0.0);
- double m_A40(0.0);
- double m_A41(0.0);
- double m_A42(0.0);
- double m_A43(0.0);
- double m_A44(0.0);
- double m_A45(0.0);
- double m_A46(0.0);
- double m_A47(0.0);
- double m_A48(0.0);
- double m_A49(0.0);
- double m_A50(0.0);
- double m_A51(0.0);
- double m_A52(0.0);
- double m_A53(0.0);
- double m_A54(0.0);
- double m_A55(0.0);
- double m_A56(0.0);
- double m_A57(0.0);
- double m_A58(0.0);
- double m_A59(0.0);
- double m_A60(0.0);
- double m_A61(0.0);
- double m_A62(0.0);
- double m_A63(0.0);
- double m_A64(0.0);
- double m_A65(0.0);
- double m_A66(0.0);
- double m_A67(0.0);
- double m_A68(0.0);
- double m_A69(0.0);
- double m_A70(0.0);
- double m_A71(0.0);
- double m_A72(0.0);
- double m_A73(0.0);
- double m_A74(0.0);
- double m_A75(0.0);
- double m_A76(0.0);
- double m_A77(0.0);
- double m_A78(0.0);
- double m_A79(0.0);
- double m_A80(0.0);
- double m_A81(0.0);
- double m_A82(0.0);
- double m_A83(0.0);
- double m_A84(0.0);
- double m_A85(0.0);
- double m_A86(0.0);
- double m_A87(0.0);
- double m_A88(0.0);
- double m_A89(0.0);
- double m_A90(0.0);
- double m_A91(0.0);
- double m_A92(0.0);
- double m_A93(0.0);
- double m_A94(0.0);
- double m_A95(0.0);
- double m_A96(0.0);
- double m_A97(0.0);
- double m_A98(0.0);
- double m_A99(0.0);
- double m_A100(0.0);
- double m_A101(0.0);
- double m_A102(0.0);
- double m_A103(0.0);
- double m_A104(0.0);
- double m_A105(0.0);
- double m_A106(0.0);
- double m_A107(0.0);
- double m_A108(0.0);
- double m_A109(0.0);
- double m_A110(0.0);
- double m_A111(0.0);
- double m_A112(0.0);
- m_A0 += gt[0];
- m_A0 += gt[1];
- m_A1 += go[0];
- double RHS0 = Idr[0];
- RHS0 += Idr[1];
- RHS0 -= go[1] * *cnV[1];
- m_A2 += gt[2];
- m_A2 += gt[3];
- m_A2 += gt[4];
- m_A2 += gt[5];
- m_A5 += go[2];
- m_A4 += go[3];
- m_A3 += go[4];
- double RHS1 = Idr[2];
- RHS1 += Idr[3];
- RHS1 += Idr[4];
- RHS1 += Idr[5];
- RHS1 -= go[5] * *cnV[5];
- m_A6 += gt[6];
- m_A6 += gt[7];
- m_A7 += go[6];
- double RHS2 = Idr[6];
- RHS2 += Idr[7];
- RHS2 -= go[7] * *cnV[7];
- m_A8 += gt[8];
- m_A8 += gt[9];
- m_A9 += go[8];
- double RHS3 = Idr[8];
- RHS3 += Idr[9];
- RHS3 -= go[9] * *cnV[9];
- m_A10 += gt[10];
- m_A10 += gt[11];
- m_A10 += gt[12];
- m_A11 += go[10];
- m_A12 += go[11];
- double RHS4 = Idr[10];
- RHS4 += Idr[11];
- RHS4 += Idr[12];
- RHS4 -= go[12] * *cnV[12];
- m_A13 += gt[13];
- m_A13 += gt[14];
- m_A14 += go[13];
- double RHS5 = Idr[13];
- RHS5 += Idr[14];
- RHS5 -= go[14] * *cnV[14];
- m_A15 += gt[15];
- m_A15 += gt[16];
- m_A15 += gt[17];
- m_A15 += gt[18];
- m_A15 += gt[19];
- m_A15 += gt[20];
- m_A15 += gt[21];
- m_A18 += go[15];
- m_A19 += go[16];
- m_A17 += go[17];
- m_A16 += go[18];
- double RHS6 = Idr[15];
- RHS6 += Idr[16];
- RHS6 += Idr[17];
- RHS6 += Idr[18];
- RHS6 += Idr[19];
- RHS6 += Idr[20];
- RHS6 += Idr[21];
- RHS6 -= go[19] * *cnV[19];
- RHS6 -= go[20] * *cnV[20];
- RHS6 -= go[21] * *cnV[21];
- m_A20 += gt[22];
- m_A20 += gt[23];
- m_A20 += gt[24];
- m_A20 += gt[25];
- m_A20 += gt[26];
- m_A20 += gt[27];
- m_A20 += gt[28];
- m_A23 += go[22];
- m_A24 += go[23];
- m_A22 += go[24];
- m_A21 += go[25];
- double RHS7 = Idr[22];
- RHS7 += Idr[23];
- RHS7 += Idr[24];
- RHS7 += Idr[25];
- RHS7 += Idr[26];
- RHS7 += Idr[27];
- RHS7 += Idr[28];
- RHS7 -= go[26] * *cnV[26];
- RHS7 -= go[27] * *cnV[27];
- RHS7 -= go[28] * *cnV[28];
- m_A25 += gt[29];
- m_A25 += gt[30];
- m_A25 += gt[31];
- m_A26 += go[29];
- m_A27 += go[30];
- double RHS8 = Idr[29];
- RHS8 += Idr[30];
- RHS8 += Idr[31];
- RHS8 -= go[31] * *cnV[31];
- m_A28 += gt[32];
- m_A28 += gt[33];
- m_A29 += go[32];
- double RHS9 = Idr[32];
- RHS9 += Idr[33];
- RHS9 -= go[33] * *cnV[33];
- m_A30 += gt[34];
- m_A30 += gt[35];
- m_A30 += gt[36];
- m_A30 += gt[37];
- m_A31 += go[34];
- double RHS10 = Idr[34];
- RHS10 += Idr[35];
- RHS10 += Idr[36];
- RHS10 += Idr[37];
- RHS10 -= go[35] * *cnV[35];
- RHS10 -= go[36] * *cnV[36];
- RHS10 -= go[37] * *cnV[37];
- m_A32 += gt[38];
- m_A32 += gt[39];
- m_A33 += go[38];
- double RHS11 = Idr[38];
- RHS11 += Idr[39];
- RHS11 -= go[39] * *cnV[39];
- m_A36 += gt[40];
- m_A36 += gt[41];
- m_A36 += gt[42];
- m_A36 += gt[43];
- m_A35 += go[40];
- m_A34 += go[41];
- double RHS12 = Idr[40];
- RHS12 += Idr[41];
- RHS12 += Idr[42];
- RHS12 += Idr[43];
- RHS12 -= go[42] * *cnV[42];
- RHS12 -= go[43] * *cnV[43];
- m_A42 += gt[44];
- m_A42 += gt[45];
- m_A42 += gt[46];
- m_A42 += gt[47];
- m_A40 += go[44];
- m_A39 += go[45];
- double RHS13 = Idr[44];
- RHS13 += Idr[45];
- RHS13 += Idr[46];
- RHS13 += Idr[47];
- RHS13 -= go[46] * *cnV[46];
- RHS13 -= go[47] * *cnV[47];
- m_A51 += gt[48];
- m_A51 += gt[49];
- m_A51 += gt[50];
- m_A51 += gt[51];
- m_A53 += go[48];
- m_A48 += go[49];
- m_A47 += go[50];
- double RHS14 = Idr[48];
- RHS14 += Idr[49];
- RHS14 += Idr[50];
- RHS14 += Idr[51];
- RHS14 -= go[51] * *cnV[51];
- m_A57 += gt[52];
- m_A57 += gt[53];
- m_A57 += gt[54];
- m_A56 += go[52];
- m_A58 += go[53];
- double RHS15 = Idr[52];
- RHS15 += Idr[53];
- RHS15 += Idr[54];
- RHS15 -= go[54] * *cnV[54];
- m_A60 += gt[55];
- m_A60 += gt[56];
- m_A60 += gt[57];
- m_A60 += gt[58];
- m_A59 += go[55];
- m_A61 += go[56];
- double RHS16 = Idr[55];
- RHS16 += Idr[56];
- RHS16 += Idr[57];
- RHS16 += Idr[58];
- RHS16 -= go[57] * *cnV[57];
- RHS16 -= go[58] * *cnV[58];
- m_A67 += gt[59];
- m_A67 += gt[60];
- m_A67 += gt[61];
- m_A67 += gt[62];
- m_A67 += gt[63];
- m_A67 += gt[64];
- m_A70 += go[59];
- m_A64 += go[60];
- m_A63 += go[61];
- m_A62 += go[62];
- m_A69 += go[63];
- double RHS17 = Idr[59];
- RHS17 += Idr[60];
- RHS17 += Idr[61];
- RHS17 += Idr[62];
- RHS17 += Idr[63];
- RHS17 += Idr[64];
- RHS17 -= go[64] * *cnV[64];
- m_A74 += gt[65];
- m_A74 += gt[66];
- m_A74 += gt[67];
- m_A74 += gt[68];
- m_A73 += go[65];
- m_A72 += go[66];
- m_A75 += go[67];
- double RHS18 = Idr[65];
- RHS18 += Idr[66];
- RHS18 += Idr[67];
- RHS18 += Idr[68];
- RHS18 -= go[68] * *cnV[68];
- m_A80 += gt[69];
- m_A80 += gt[70];
- m_A80 += gt[71];
- m_A80 += gt[72];
- m_A80 += gt[73];
- m_A77 += go[69];
- m_A78 += go[70];
- m_A76 += go[71];
- double RHS19 = Idr[69];
- RHS19 += Idr[70];
- RHS19 += Idr[71];
- RHS19 += Idr[72];
- RHS19 += Idr[73];
- RHS19 -= go[72] * *cnV[72];
- RHS19 -= go[73] * *cnV[73];
- m_A89 += gt[74];
- m_A89 += gt[75];
- m_A89 += gt[76];
- m_A89 += gt[77];
- m_A84 += go[74];
- m_A85 += go[75];
- m_A87 += go[76];
- m_A86 += go[77];
- double RHS20 = Idr[74];
- RHS20 += Idr[75];
- RHS20 += Idr[76];
- RHS20 += Idr[77];
- m_A100 += gt[78];
- m_A100 += gt[79];
- m_A100 += gt[80];
- m_A100 += gt[81];
- m_A100 += gt[82];
- m_A100 += gt[83];
- m_A100 += gt[84];
- m_A96 += go[78];
- m_A93 += go[79];
- m_A101 += go[80];
- m_A92 += go[81];
- m_A97 += go[82];
- double RHS21 = Idr[78];
- RHS21 += Idr[79];
- RHS21 += Idr[80];
- RHS21 += Idr[81];
- RHS21 += Idr[82];
- RHS21 += Idr[83];
- RHS21 += Idr[84];
- RHS21 -= go[83] * *cnV[83];
- RHS21 -= go[84] * *cnV[84];
- m_A112 += gt[85];
- m_A112 += gt[86];
- m_A112 += gt[87];
- m_A112 += gt[88];
- m_A112 += gt[89];
- m_A112 += gt[90];
- m_A108 += go[85];
- m_A111 += go[86];
- m_A103 += go[87];
- m_A104 += go[88];
- m_A102 += go[89];
- double RHS22 = Idr[85];
- RHS22 += Idr[86];
- RHS22 += Idr[87];
- RHS22 += Idr[88];
- RHS22 += Idr[89];
- RHS22 += Idr[90];
- RHS22 -= go[90] * *cnV[90];
- const double f0 = 1.0 / m_A0;
- const double f0_12 = -f0 * m_A34;
- m_A36 += m_A1 * f0_12;
- RHS12 += f0_12 * RHS0;
- const double f1 = 1.0 / m_A2;
- const double f1_12 = -f1 * m_A35;
- m_A36 += m_A3 * f1_12;
- m_A37 += m_A4 * f1_12;
- m_A38 += m_A5 * f1_12;
- RHS12 += f1_12 * RHS1;
- const double f1_13 = -f1 * m_A39;
- m_A41 += m_A3 * f1_13;
- m_A42 += m_A4 * f1_13;
- m_A43 += m_A5 * f1_13;
- RHS13 += f1_13 * RHS1;
- const double f1_14 = -f1 * m_A47;
- m_A49 += m_A3 * f1_14;
- m_A50 += m_A4 * f1_14;
- m_A51 += m_A5 * f1_14;
- RHS14 += f1_14 * RHS1;
- const double f2 = 1.0 / m_A6;
- const double f2_15 = -f2 * m_A56;
- m_A57 += m_A7 * f2_15;
- RHS15 += f2_15 * RHS2;
- const double f3 = 1.0 / m_A8;
- const double f3_20 = -f3 * m_A84;
- m_A89 += m_A9 * f3_20;
- RHS20 += f3_20 * RHS3;
- const double f4 = 1.0 / m_A10;
- const double f4_17 = -f4 * m_A62;
- m_A67 += m_A11 * f4_17;
- m_A69 += m_A12 * f4_17;
- RHS17 += f4_17 * RHS4;
- const double f4_20 = -f4 * m_A85;
- m_A87 += m_A11 * f4_20;
- m_A89 += m_A12 * f4_20;
- RHS20 += f4_20 * RHS4;
- const double f5 = 1.0 / m_A13;
- const double f5_16 = -f5 * m_A59;
- m_A60 += m_A14 * f5_16;
- RHS16 += f5_16 * RHS5;
- const double f6 = 1.0 / m_A15;
- const double f6_13 = -f6 * m_A40;
- m_A42 += m_A16 * f6_13;
- m_A44 += m_A17 * f6_13;
- m_A45 += m_A18 * f6_13;
- m_A46 += m_A19 * f6_13;
- RHS13 += f6_13 * RHS6;
- const double f6_17 = -f6 * m_A63;
- m_A65 += m_A16 * f6_17;
- m_A67 += m_A17 * f6_17;
- m_A70 += m_A18 * f6_17;
- m_A71 += m_A19 * f6_17;
- RHS17 += f6_17 * RHS6;
- const double f6_21 = -f6 * m_A92;
- m_A94 += m_A16 * f6_21;
- m_A97 += m_A17 * f6_21;
- m_A100 += m_A18 * f6_21;
- m_A101 += m_A19 * f6_21;
- RHS21 += f6_21 * RHS6;
- const double f6_22 = -f6 * m_A102;
- m_A105 += m_A16 * f6_22;
- m_A107 += m_A17 * f6_22;
- m_A111 += m_A18 * f6_22;
- m_A112 += m_A19 * f6_22;
- RHS22 += f6_22 * RHS6;
- const double f7 = 1.0 / m_A20;
- const double f7_14 = -f7 * m_A48;
- m_A51 += m_A21 * f7_14;
- m_A52 += m_A22 * f7_14;
- m_A54 += m_A23 * f7_14;
- m_A55 += m_A24 * f7_14;
- RHS14 += f7_14 * RHS7;
- const double f7_17 = -f7 * m_A64;
- m_A66 += m_A21 * f7_17;
- m_A67 += m_A22 * f7_17;
- m_A70 += m_A23 * f7_17;
- m_A71 += m_A24 * f7_17;
- RHS17 += f7_17 * RHS7;
- const double f7_21 = -f7 * m_A93;
- m_A95 += m_A21 * f7_21;
- m_A97 += m_A22 * f7_21;
- m_A100 += m_A23 * f7_21;
- m_A101 += m_A24 * f7_21;
- RHS21 += f7_21 * RHS7;
- const double f7_22 = -f7 * m_A103;
- m_A106 += m_A21 * f7_22;
- m_A107 += m_A22 * f7_22;
- m_A111 += m_A23 * f7_22;
- m_A112 += m_A24 * f7_22;
- RHS22 += f7_22 * RHS7;
- const double f8 = 1.0 / m_A25;
- const double f8_18 = -f8 * m_A72;
- m_A74 += m_A26 * f8_18;
- m_A75 += m_A27 * f8_18;
- RHS18 += f8_18 * RHS8;
- const double f8_22 = -f8 * m_A104;
- m_A108 += m_A26 * f8_22;
- m_A112 += m_A27 * f8_22;
- RHS22 += f8_22 * RHS8;
- const double f9 = 1.0 / m_A28;
- const double f9_18 = -f9 * m_A73;
- m_A74 += m_A29 * f9_18;
- RHS18 += f9_18 * RHS9;
- const double f10 = 1.0 / m_A30;
- const double f10_19 = -f10 * m_A76;
- m_A80 += m_A31 * f10_19;
- RHS19 += f10_19 * RHS10;
- const double f11 = 1.0 / m_A32;
- const double f11_19 = -f11 * m_A77;
- m_A80 += m_A33 * f11_19;
- RHS19 += f11_19 * RHS11;
- const double f12 = 1.0 / m_A36;
- const double f12_13 = -f12 * m_A41;
- m_A42 += m_A37 * f12_13;
- m_A43 += m_A38 * f12_13;
- RHS13 += f12_13 * RHS12;
- const double f12_14 = -f12 * m_A49;
- m_A50 += m_A37 * f12_14;
- m_A51 += m_A38 * f12_14;
- RHS14 += f12_14 * RHS12;
- const double f13 = 1.0 / m_A42;
- const double f13_14 = -f13 * m_A50;
- m_A51 += m_A43 * f13_14;
- m_A52 += m_A44 * f13_14;
- m_A54 += m_A45 * f13_14;
- m_A55 += m_A46 * f13_14;
- RHS14 += f13_14 * RHS13;
- const double f13_17 = -f13 * m_A65;
- m_A66 += m_A43 * f13_17;
- m_A67 += m_A44 * f13_17;
- m_A70 += m_A45 * f13_17;
- m_A71 += m_A46 * f13_17;
- RHS17 += f13_17 * RHS13;
- const double f13_21 = -f13 * m_A94;
- m_A95 += m_A43 * f13_21;
- m_A97 += m_A44 * f13_21;
- m_A100 += m_A45 * f13_21;
- m_A101 += m_A46 * f13_21;
- RHS21 += f13_21 * RHS13;
- const double f13_22 = -f13 * m_A105;
- m_A106 += m_A43 * f13_22;
- m_A107 += m_A44 * f13_22;
- m_A111 += m_A45 * f13_22;
- m_A112 += m_A46 * f13_22;
- RHS22 += f13_22 * RHS13;
- const double f14 = 1.0 / m_A51;
- const double f14_17 = -f14 * m_A66;
- m_A67 += m_A52 * f14_17;
- m_A68 += m_A53 * f14_17;
- m_A70 += m_A54 * f14_17;
- m_A71 += m_A55 * f14_17;
- RHS17 += f14_17 * RHS14;
- const double f14_19 = -f14 * m_A78;
- m_A79 += m_A52 * f14_19;
- m_A80 += m_A53 * f14_19;
- m_A82 += m_A54 * f14_19;
- m_A83 += m_A55 * f14_19;
- RHS19 += f14_19 * RHS14;
- const double f14_21 = -f14 * m_A95;
- m_A97 += m_A52 * f14_21;
- m_A98 += m_A53 * f14_21;
- m_A100 += m_A54 * f14_21;
- m_A101 += m_A55 * f14_21;
- RHS21 += f14_21 * RHS14;
- const double f14_22 = -f14 * m_A106;
- m_A107 += m_A52 * f14_22;
- m_A109 += m_A53 * f14_22;
- m_A111 += m_A54 * f14_22;
- m_A112 += m_A55 * f14_22;
- RHS22 += f14_22 * RHS14;
- const double f15 = 1.0 / m_A57;
- const double f15_20 = -f15 * m_A86;
- m_A89 += m_A58 * f15_20;
- RHS20 += f15_20 * RHS15;
- const double f16 = 1.0 / m_A60;
- const double f16_21 = -f16 * m_A96;
- m_A100 += m_A61 * f16_21;
- RHS21 += f16_21 * RHS16;
- const double f17 = 1.0 / m_A67;
- const double f17_19 = -f17 * m_A79;
- m_A80 += m_A68 * f17_19;
- m_A81 += m_A69 * f17_19;
- m_A82 += m_A70 * f17_19;
- m_A83 += m_A71 * f17_19;
- RHS19 += f17_19 * RHS17;
- const double f17_20 = -f17 * m_A87;
- m_A88 += m_A68 * f17_20;
- m_A89 += m_A69 * f17_20;
- m_A90 += m_A70 * f17_20;
- m_A91 += m_A71 * f17_20;
- RHS20 += f17_20 * RHS17;
- const double f17_21 = -f17 * m_A97;
- m_A98 += m_A68 * f17_21;
- m_A99 += m_A69 * f17_21;
- m_A100 += m_A70 * f17_21;
- m_A101 += m_A71 * f17_21;
- RHS21 += f17_21 * RHS17;
- const double f17_22 = -f17 * m_A107;
- m_A109 += m_A68 * f17_22;
- m_A110 += m_A69 * f17_22;
- m_A111 += m_A70 * f17_22;
- m_A112 += m_A71 * f17_22;
- RHS22 += f17_22 * RHS17;
- const double f18 = 1.0 / m_A74;
- const double f18_22 = -f18 * m_A108;
- m_A112 += m_A75 * f18_22;
- RHS22 += f18_22 * RHS18;
- const double f19 = 1.0 / m_A80;
- const double f19_20 = -f19 * m_A88;
- m_A89 += m_A81 * f19_20;
- m_A90 += m_A82 * f19_20;
- m_A91 += m_A83 * f19_20;
- RHS20 += f19_20 * RHS19;
- const double f19_21 = -f19 * m_A98;
- m_A99 += m_A81 * f19_21;
- m_A100 += m_A82 * f19_21;
- m_A101 += m_A83 * f19_21;
- RHS21 += f19_21 * RHS19;
- const double f19_22 = -f19 * m_A109;
- m_A110 += m_A81 * f19_22;
- m_A111 += m_A82 * f19_22;
- m_A112 += m_A83 * f19_22;
- RHS22 += f19_22 * RHS19;
- const double f20 = 1.0 / m_A89;
- const double f20_21 = -f20 * m_A99;
- m_A100 += m_A90 * f20_21;
- m_A101 += m_A91 * f20_21;
- RHS21 += f20_21 * RHS20;
- const double f20_22 = -f20 * m_A110;
- m_A111 += m_A90 * f20_22;
- m_A112 += m_A91 * f20_22;
- RHS22 += f20_22 * RHS20;
- const double f21 = 1.0 / m_A100;
- const double f21_22 = -f21 * m_A111;
- m_A112 += m_A101 * f21_22;
- RHS22 += f21_22 * RHS21;
- V[22] = RHS22 / m_A112;
- double tmp21 = 0.0;
- tmp21 += m_A101 * V[22];
- V[21] = (RHS21 - tmp21) / m_A100;
- double tmp20 = 0.0;
- tmp20 += m_A90 * V[21];
- tmp20 += m_A91 * V[22];
- V[20] = (RHS20 - tmp20) / m_A89;
- double tmp19 = 0.0;
- tmp19 += m_A81 * V[20];
- tmp19 += m_A82 * V[21];
- tmp19 += m_A83 * V[22];
- V[19] = (RHS19 - tmp19) / m_A80;
- double tmp18 = 0.0;
- tmp18 += m_A75 * V[22];
- V[18] = (RHS18 - tmp18) / m_A74;
- double tmp17 = 0.0;
- tmp17 += m_A68 * V[19];
- tmp17 += m_A69 * V[20];
- tmp17 += m_A70 * V[21];
- tmp17 += m_A71 * V[22];
- V[17] = (RHS17 - tmp17) / m_A67;
- double tmp16 = 0.0;
- tmp16 += m_A61 * V[21];
- V[16] = (RHS16 - tmp16) / m_A60;
- double tmp15 = 0.0;
- tmp15 += m_A58 * V[20];
- V[15] = (RHS15 - tmp15) / m_A57;
- double tmp14 = 0.0;
- tmp14 += m_A52 * V[17];
- tmp14 += m_A53 * V[19];
- tmp14 += m_A54 * V[21];
- tmp14 += m_A55 * V[22];
- V[14] = (RHS14 - tmp14) / m_A51;
- double tmp13 = 0.0;
- tmp13 += m_A43 * V[14];
- tmp13 += m_A44 * V[17];
- tmp13 += m_A45 * V[21];
- tmp13 += m_A46 * V[22];
- V[13] = (RHS13 - tmp13) / m_A42;
- double tmp12 = 0.0;
- tmp12 += m_A37 * V[13];
- tmp12 += m_A38 * V[14];
- V[12] = (RHS12 - tmp12) / m_A36;
- double tmp11 = 0.0;
- tmp11 += m_A33 * V[19];
- V[11] = (RHS11 - tmp11) / m_A32;
- double tmp10 = 0.0;
- tmp10 += m_A31 * V[19];
- V[10] = (RHS10 - tmp10) / m_A30;
- double tmp9 = 0.0;
- tmp9 += m_A29 * V[18];
- V[9] = (RHS9 - tmp9) / m_A28;
- double tmp8 = 0.0;
- tmp8 += m_A26 * V[18];
- tmp8 += m_A27 * V[22];
- V[8] = (RHS8 - tmp8) / m_A25;
- double tmp7 = 0.0;
- tmp7 += m_A21 * V[14];
- tmp7 += m_A22 * V[17];
- tmp7 += m_A23 * V[21];
- tmp7 += m_A24 * V[22];
- V[7] = (RHS7 - tmp7) / m_A20;
- double tmp6 = 0.0;
- tmp6 += m_A16 * V[13];
- tmp6 += m_A17 * V[17];
- tmp6 += m_A18 * V[21];
- tmp6 += m_A19 * V[22];
- V[6] = (RHS6 - tmp6) / m_A15;
- double tmp5 = 0.0;
- tmp5 += m_A14 * V[16];
- V[5] = (RHS5 - tmp5) / m_A13;
- double tmp4 = 0.0;
- tmp4 += m_A11 * V[17];
- tmp4 += m_A12 * V[20];
- V[4] = (RHS4 - tmp4) / m_A10;
- double tmp3 = 0.0;
- tmp3 += m_A9 * V[20];
- V[3] = (RHS3 - tmp3) / m_A8;
- double tmp2 = 0.0;
- tmp2 += m_A7 * V[15];
- V[2] = (RHS2 - tmp2) / m_A6;
- double tmp1 = 0.0;
- tmp1 += m_A3 * V[12];
- tmp1 += m_A4 * V[13];
- tmp1 += m_A5 * V[14];
- V[1] = (RHS1 - tmp1) / m_A2;
- double tmp0 = 0.0;
- tmp0 += m_A1 * V[12];
- V[0] = (RHS0 - tmp0) / m_A0;
-}
-
-// 280zzzap,sspeedr
-static void nl_gcr_122_double_double_42c57d523cac30d0(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
-
-{
-
- plib::unused_var(cnV);
- double m_A0(0.0);
- double m_A1(0.0);
- double m_A2(0.0);
- double m_A3(0.0);
- double m_A4(0.0);
- double m_A5(0.0);
- double m_A6(0.0);
- double m_A7(0.0);
- double m_A8(0.0);
- double m_A9(0.0);
- double m_A10(0.0);
- double m_A11(0.0);
- double m_A12(0.0);
- double m_A13(0.0);
- double m_A14(0.0);
- double m_A15(0.0);
- double m_A16(0.0);
- double m_A17(0.0);
- double m_A18(0.0);
- double m_A19(0.0);
- double m_A20(0.0);
- double m_A21(0.0);
- double m_A22(0.0);
- double m_A23(0.0);
- double m_A24(0.0);
- double m_A25(0.0);
- double m_A26(0.0);
- double m_A27(0.0);
- double m_A28(0.0);
- double m_A29(0.0);
- double m_A30(0.0);
- double m_A31(0.0);
- double m_A32(0.0);
- double m_A33(0.0);
- double m_A34(0.0);
- double m_A35(0.0);
- double m_A36(0.0);
- double m_A37(0.0);
- double m_A38(0.0);
- double m_A39(0.0);
- double m_A40(0.0);
- double m_A41(0.0);
- double m_A42(0.0);
- double m_A43(0.0);
- double m_A44(0.0);
- double m_A45(0.0);
- double m_A46(0.0);
- double m_A47(0.0);
- double m_A48(0.0);
- double m_A49(0.0);
- double m_A50(0.0);
- double m_A51(0.0);
- double m_A52(0.0);
- double m_A53(0.0);
- double m_A54(0.0);
- double m_A55(0.0);
- double m_A56(0.0);
- double m_A57(0.0);
- double m_A58(0.0);
- double m_A59(0.0);
- double m_A60(0.0);
- double m_A61(0.0);
- double m_A62(0.0);
- double m_A63(0.0);
- double m_A64(0.0);
- double m_A65(0.0);
- double m_A66(0.0);
- double m_A67(0.0);
- double m_A68(0.0);
- double m_A69(0.0);
- double m_A70(0.0);
- double m_A71(0.0);
- double m_A72(0.0);
- double m_A73(0.0);
- double m_A74(0.0);
- double m_A75(0.0);
- double m_A76(0.0);
- double m_A77(0.0);
- double m_A78(0.0);
- double m_A79(0.0);
- double m_A80(0.0);
- double m_A81(0.0);
- double m_A82(0.0);
- double m_A83(0.0);
- double m_A84(0.0);
- double m_A85(0.0);
- double m_A86(0.0);
- double m_A87(0.0);
- double m_A88(0.0);
- double m_A89(0.0);
- double m_A90(0.0);
- double m_A91(0.0);
- double m_A92(0.0);
- double m_A93(0.0);
- double m_A94(0.0);
- double m_A95(0.0);
- double m_A96(0.0);
- double m_A97(0.0);
- double m_A98(0.0);
- double m_A99(0.0);
- double m_A100(0.0);
- double m_A101(0.0);
- double m_A102(0.0);
- double m_A103(0.0);
- double m_A104(0.0);
- double m_A105(0.0);
- double m_A106(0.0);
- double m_A107(0.0);
- double m_A108(0.0);
- double m_A109(0.0);
- double m_A110(0.0);
- double m_A111(0.0);
- double m_A112(0.0);
- double m_A113(0.0);
- double m_A114(0.0);
- double m_A115(0.0);
- double m_A116(0.0);
- double m_A117(0.0);
- double m_A118(0.0);
- double m_A119(0.0);
- double m_A120(0.0);
- double m_A121(0.0);
- m_A0 += gt[0];
- m_A0 += gt[1];
- m_A1 += go[0];
- double RHS0 = Idr[0];
- RHS0 += Idr[1];
- RHS0 -= go[1] * *cnV[1];
- m_A2 += gt[2];
- m_A2 += gt[3];
- m_A3 += go[2];
- double RHS1 = Idr[2];
- RHS1 += Idr[3];
- RHS1 -= go[3] * *cnV[3];
- m_A4 += gt[4];
- m_A4 += gt[5];
- m_A4 += gt[6];
- m_A5 += go[4];
- double RHS2 = Idr[4];
- RHS2 += Idr[5];
- RHS2 += Idr[6];
- RHS2 -= go[5] * *cnV[5];
- RHS2 -= go[6] * *cnV[6];
- m_A6 += gt[7];
- m_A6 += gt[8];
- m_A6 += gt[9];
- m_A6 += gt[10];
- m_A6 += gt[11];
- m_A6 += gt[12];
- m_A6 += gt[13];
- m_A7 += go[7];
- double RHS3 = Idr[7];
- RHS3 += Idr[8];
- RHS3 += Idr[9];
- RHS3 += Idr[10];
- RHS3 += Idr[11];
- RHS3 += Idr[12];
- RHS3 += Idr[13];
- RHS3 -= go[8] * *cnV[8];
- RHS3 -= go[9] * *cnV[9];
- RHS3 -= go[10] * *cnV[10];
- RHS3 -= go[11] * *cnV[11];
- RHS3 -= go[12] * *cnV[12];
- RHS3 -= go[13] * *cnV[13];
- m_A8 += gt[14];
- m_A8 += gt[15];
- m_A9 += go[14];
- double RHS4 = Idr[14];
- RHS4 += Idr[15];
- RHS4 -= go[15] * *cnV[15];
- m_A10 += gt[16];
- m_A10 += gt[17];
- m_A10 += gt[18];
- m_A10 += gt[19];
- m_A12 += go[16];
- m_A13 += go[17];
- m_A11 += go[18];
- double RHS5 = Idr[16];
- RHS5 += Idr[17];
- RHS5 += Idr[18];
- RHS5 += Idr[19];
- RHS5 -= go[19] * *cnV[19];
- m_A14 += gt[20];
- m_A14 += gt[21];
- m_A14 += gt[22];
- m_A14 += gt[23];
- m_A14 += gt[24];
- m_A14 += gt[25];
- m_A14 += gt[26];
- m_A15 += go[20];
- double RHS6 = Idr[20];
- RHS6 += Idr[21];
- RHS6 += Idr[22];
- RHS6 += Idr[23];
- RHS6 += Idr[24];
- RHS6 += Idr[25];
- RHS6 += Idr[26];
- RHS6 -= go[21] * *cnV[21];
- RHS6 -= go[22] * *cnV[22];
- RHS6 -= go[23] * *cnV[23];
- RHS6 -= go[24] * *cnV[24];
- RHS6 -= go[25] * *cnV[25];
- RHS6 -= go[26] * *cnV[26];
- m_A16 += gt[27];
- m_A16 += gt[28];
- m_A18 += go[27];
- m_A17 += go[28];
- double RHS7 = Idr[27];
- RHS7 += Idr[28];
- m_A19 += gt[29];
- m_A19 += gt[30];
- m_A19 += gt[31];
- m_A20 += go[29];
- double RHS8 = Idr[29];
- RHS8 += Idr[30];
- RHS8 += Idr[31];
- RHS8 -= go[30] * *cnV[30];
- RHS8 -= go[31] * *cnV[31];
- m_A21 += gt[32];
- m_A21 += gt[33];
- m_A22 += go[32];
- double RHS9 = Idr[32];
- RHS9 += Idr[33];
- RHS9 -= go[33] * *cnV[33];
- m_A23 += gt[34];
- m_A23 += gt[35];
- m_A23 += gt[36];
- m_A24 += go[34];
- m_A25 += go[35];
- m_A25 += go[36];
- double RHS10 = Idr[34];
- RHS10 += Idr[35];
- RHS10 += Idr[36];
- m_A26 += gt[37];
- m_A26 += gt[38];
- m_A26 += gt[39];
- m_A26 += gt[40];
- m_A26 += gt[41];
- m_A26 += gt[42];
- m_A26 += gt[43];
- m_A27 += go[37];
- double RHS11 = Idr[37];
- RHS11 += Idr[38];
- RHS11 += Idr[39];
- RHS11 += Idr[40];
- RHS11 += Idr[41];
- RHS11 += Idr[42];
- RHS11 += Idr[43];
- RHS11 -= go[38] * *cnV[38];
- RHS11 -= go[39] * *cnV[39];
- RHS11 -= go[40] * *cnV[40];
- RHS11 -= go[41] * *cnV[41];
- RHS11 -= go[42] * *cnV[42];
- RHS11 -= go[43] * *cnV[43];
- m_A28 += gt[44];
- m_A28 += gt[45];
- m_A28 += gt[46];
- m_A29 += go[44];
- double RHS12 = Idr[44];
- RHS12 += Idr[45];
- RHS12 += Idr[46];
- RHS12 -= go[45] * *cnV[45];
- RHS12 -= go[46] * *cnV[46];
- m_A30 += gt[47];
- m_A30 += gt[48];
- m_A30 += gt[49];
- m_A30 += gt[50];
- m_A32 += go[47];
- m_A31 += go[48];
- m_A33 += go[49];
- double RHS13 = Idr[47];
- RHS13 += Idr[48];
- RHS13 += Idr[49];
- RHS13 += Idr[50];
- RHS13 -= go[50] * *cnV[50];
- m_A35 += gt[51];
- m_A35 += gt[52];
- m_A34 += go[51];
- double RHS14 = Idr[51];
- RHS14 += Idr[52];
- RHS14 -= go[52] * *cnV[52];
- m_A37 += gt[53];
- m_A37 += gt[54];
- m_A37 += gt[55];
- m_A37 += gt[56];
- m_A36 += go[53];
- m_A38 += go[54];
- double RHS15 = Idr[53];
- RHS15 += Idr[54];
- RHS15 += Idr[55];
- RHS15 += Idr[56];
- RHS15 -= go[55] * *cnV[55];
- RHS15 -= go[56] * *cnV[56];
- m_A40 += gt[57];
- m_A40 += gt[58];
- m_A39 += go[57];
- double RHS16 = Idr[57];
- RHS16 += Idr[58];
- RHS16 -= go[58] * *cnV[58];
- m_A43 += gt[59];
- m_A43 += gt[60];
- m_A41 += go[59];
- m_A42 += go[60];
- double RHS17 = Idr[59];
- RHS17 += Idr[60];
- m_A47 += gt[61];
- m_A47 += gt[62];
- m_A47 += gt[63];
- m_A47 += gt[64];
- m_A47 += gt[65];
- m_A46 += go[61];
- m_A49 += go[62];
- m_A50 += go[63];
- double RHS18 = Idr[61];
- RHS18 += Idr[62];
- RHS18 += Idr[63];
- RHS18 += Idr[64];
- RHS18 += Idr[65];
- RHS18 -= go[64] * *cnV[64];
- RHS18 -= go[65] * *cnV[65];
- m_A52 += gt[66];
- m_A52 += gt[67];
- m_A51 += go[66];
- double RHS19 = Idr[66];
- RHS19 += Idr[67];
- RHS19 -= go[67] * *cnV[67];
- m_A55 += gt[68];
- m_A55 += gt[69];
- m_A54 += go[68];
- m_A53 += go[69];
- double RHS20 = Idr[68];
- RHS20 += Idr[69];
- m_A60 += gt[70];
- m_A60 += gt[71];
- m_A60 += gt[72];
- m_A60 += gt[73];
- m_A59 += go[70];
- m_A61 += go[71];
- double RHS21 = Idr[70];
- RHS21 += Idr[71];
- RHS21 += Idr[72];
- RHS21 += Idr[73];
- RHS21 -= go[72] * *cnV[72];
- RHS21 -= go[73] * *cnV[73];
- m_A69 += gt[74];
- m_A69 += gt[75];
- m_A69 += gt[76];
- m_A69 += gt[77];
- m_A69 += gt[78];
- m_A69 += gt[79];
- m_A69 += gt[80];
- m_A69 += gt[81];
- m_A69 += gt[82];
- m_A62 += go[74];
- m_A65 += go[75];
- m_A65 += go[76];
- m_A64 += go[77];
- m_A63 += go[78];
- m_A71 += go[79];
- double RHS22 = Idr[74];
- RHS22 += Idr[75];
- RHS22 += Idr[76];
- RHS22 += Idr[77];
- RHS22 += Idr[78];
- RHS22 += Idr[79];
- RHS22 += Idr[80];
- RHS22 += Idr[81];
- RHS22 += Idr[82];
- RHS22 -= go[80] * *cnV[80];
- RHS22 -= go[81] * *cnV[81];
- RHS22 -= go[82] * *cnV[82];
- m_A75 += gt[83];
- m_A75 += gt[84];
- m_A75 += gt[85];
- m_A75 += gt[86];
- m_A74 += go[83];
- m_A76 += go[84];
- double RHS23 = Idr[83];
- RHS23 += Idr[84];
- RHS23 += Idr[85];
- RHS23 += Idr[86];
- RHS23 -= go[85] * *cnV[85];
- RHS23 -= go[86] * *cnV[86];
- m_A82 += gt[87];
- m_A82 += gt[88];
- m_A82 += gt[89];
- m_A82 += gt[90];
- m_A82 += gt[91];
- m_A82 += gt[92];
- m_A77 += go[87];
- m_A78 += go[88];
- m_A84 += go[89];
- double RHS24 = Idr[87];
- RHS24 += Idr[88];
- RHS24 += Idr[89];
- RHS24 += Idr[90];
- RHS24 += Idr[91];
- RHS24 += Idr[92];
- RHS24 -= go[90] * *cnV[90];
- RHS24 -= go[91] * *cnV[91];
- RHS24 -= go[92] * *cnV[92];
- m_A93 += gt[93];
- m_A93 += gt[94];
- m_A93 += gt[95];
- m_A93 += gt[96];
- m_A93 += gt[97];
- m_A91 += go[93];
- m_A89 += go[94];
- m_A88 += go[95];
- m_A87 += go[96];
- m_A86 += go[97];
- double RHS25 = Idr[93];
- RHS25 += Idr[94];
- RHS25 += Idr[95];
- RHS25 += Idr[96];
- RHS25 += Idr[97];
- m_A104 += gt[98];
- m_A104 += gt[99];
- m_A104 += gt[100];
- m_A104 += gt[101];
- m_A104 += gt[102];
- m_A102 += go[98];
- m_A99 += go[99];
- m_A98 += go[100];
- m_A97 += go[101];
- m_A96 += go[102];
- double RHS26 = Idr[98];
- RHS26 += Idr[99];
- RHS26 += Idr[100];
- RHS26 += Idr[101];
- RHS26 += Idr[102];
- m_A113 += gt[103];
- m_A113 += gt[104];
- m_A113 += gt[105];
- m_A113 += gt[106];
- m_A107 += go[103];
- m_A106 += go[104];
- m_A114 += go[105];
- double RHS27 = Idr[103];
- RHS27 += Idr[104];
- RHS27 += Idr[105];
- RHS27 += Idr[106];
- RHS27 -= go[106] * *cnV[106];
- m_A121 += gt[107];
- m_A121 += gt[108];
- m_A121 += gt[109];
- m_A121 += gt[110];
- m_A121 += gt[111];
- m_A118 += go[107];
- m_A117 += go[108];
- m_A120 += go[109];
- m_A116 += go[110];
- m_A115 += go[111];
- double RHS28 = Idr[107];
- RHS28 += Idr[108];
- RHS28 += Idr[109];
- RHS28 += Idr[110];
- RHS28 += Idr[111];
- const double f0 = 1.0 / m_A0;
- const double f0_17 = -f0 * m_A41;
- m_A43 += m_A1 * f0_17;
- RHS17 += f0_17 * RHS0;
- const double f1 = 1.0 / m_A2;
- const double f1_14 = -f1 * m_A34;
- m_A35 += m_A3 * f1_14;
- RHS14 += f1_14 * RHS1;
- const double f1_25 = -f1 * m_A86;
- m_A89 += m_A3 * f1_25;
- RHS25 += f1_25 * RHS1;
- const double f2 = 1.0 / m_A4;
- const double f2_15 = -f2 * m_A36;
- m_A38 += m_A5 * f2_15;
- RHS15 += f2_15 * RHS2;
- const double f2_25 = -f2 * m_A87;
- m_A93 += m_A5 * f2_25;
- RHS25 += f2_25 * RHS2;
- const double f3 = 1.0 / m_A6;
- const double f3_22 = -f3 * m_A62;
- m_A66 += m_A7 * f3_22;
- RHS22 += f3_22 * RHS3;
- const double f4 = 1.0 / m_A8;
- const double f4_16 = -f4 * m_A39;
- m_A40 += m_A9 * f4_16;
- RHS16 += f4_16 * RHS4;
- const double f4_28 = -f4 * m_A115;
- m_A117 += m_A9 * f4_28;
- RHS28 += f4_28 * RHS4;
- const double f5 = 1.0 / m_A10;
- const double f5_17 = -f5 * m_A42;
- m_A43 += m_A11 * f5_17;
- m_A44 += m_A12 * f5_17;
- m_A45 += m_A13 * f5_17;
- RHS17 += f5_17 * RHS5;
- const double f5_22 = -f5 * m_A63;
- m_A67 += m_A11 * f5_22;
- m_A69 += m_A12 * f5_22;
- m_A71 += m_A13 * f5_22;
- RHS22 += f5_22 * RHS5;
- const double f5_25 = -f5 * m_A88;
- m_A90 += m_A11 * f5_25;
- m_A91 += m_A12 * f5_25;
- m_A93 += m_A13 * f5_25;
- RHS25 += f5_25 * RHS5;
- const double f6 = 1.0 / m_A14;
- const double f6_18 = -f6 * m_A46;
- m_A48 += m_A15 * f6_18;
- RHS18 += f6_18 * RHS6;
- const double f7 = 1.0 / m_A16;
- const double f7_22 = -f7 * m_A64;
- m_A69 += m_A17 * f7_22;
- m_A73 += m_A18 * f7_22;
- RHS22 += f7_22 * RHS7;
- const double f7_27 = -f7 * m_A106;
- m_A109 += m_A17 * f7_27;
- m_A113 += m_A18 * f7_27;
- RHS27 += f7_27 * RHS7;
- const double f8 = 1.0 / m_A19;
- const double f8_21 = -f8 * m_A59;
- m_A61 += m_A20 * f8_21;
- RHS21 += f8_21 * RHS8;
- const double f8_28 = -f8 * m_A116;
- m_A121 += m_A20 * f8_28;
- RHS28 += f8_28 * RHS8;
- const double f9 = 1.0 / m_A21;
- const double f9_19 = -f9 * m_A51;
- m_A52 += m_A22 * f9_19;
- RHS19 += f9_19 * RHS9;
- const double f9_26 = -f9 * m_A96;
- m_A99 += m_A22 * f9_26;
- RHS26 += f9_26 * RHS9;
- const double f10 = 1.0 / m_A23;
- const double f10_20 = -f10 * m_A53;
- m_A55 += m_A24 * f10_20;
- m_A56 += m_A25 * f10_20;
- RHS20 += f10_20 * RHS10;
- const double f10_22 = -f10 * m_A65;
- m_A68 += m_A24 * f10_22;
- m_A69 += m_A25 * f10_22;
- RHS22 += f10_22 * RHS10;
- const double f11 = 1.0 / m_A26;
- const double f11_24 = -f11 * m_A77;
- m_A81 += m_A27 * f11_24;
- RHS24 += f11_24 * RHS11;
- const double f12 = 1.0 / m_A28;
- const double f12_23 = -f12 * m_A74;
- m_A76 += m_A29 * f12_23;
- RHS23 += f12_23 * RHS12;
- const double f12_26 = -f12 * m_A97;
- m_A104 += m_A29 * f12_26;
- RHS26 += f12_26 * RHS12;
- const double f13 = 1.0 / m_A30;
- const double f13_20 = -f13 * m_A54;
- m_A55 += m_A31 * f13_20;
- m_A57 += m_A32 * f13_20;
- m_A58 += m_A33 * f13_20;
- RHS20 += f13_20 * RHS13;
- const double f13_24 = -f13 * m_A78;
- m_A79 += m_A31 * f13_24;
- m_A82 += m_A32 * f13_24;
- m_A84 += m_A33 * f13_24;
- RHS24 += f13_24 * RHS13;
- const double f13_26 = -f13 * m_A98;
- m_A100 += m_A31 * f13_26;
- m_A102 += m_A32 * f13_26;
- m_A104 += m_A33 * f13_26;
- RHS26 += f13_26 * RHS13;
- const double f14 = 1.0 / m_A35;
- const double f14_25 = -f14 * m_A89;
- RHS25 += f14_25 * RHS14;
- const double f15 = 1.0 / m_A37;
- const double f15_22 = -f15 * m_A66;
- m_A71 += m_A38 * f15_22;
- RHS22 += f15_22 * RHS15;
- const double f16 = 1.0 / m_A40;
- const double f16_28 = -f16 * m_A117;
- RHS28 += f16_28 * RHS16;
- const double f17 = 1.0 / m_A43;
- const double f17_22 = -f17 * m_A67;
- m_A69 += m_A44 * f17_22;
- m_A71 += m_A45 * f17_22;
- RHS22 += f17_22 * RHS17;
- const double f17_25 = -f17 * m_A90;
- m_A91 += m_A44 * f17_25;
- m_A93 += m_A45 * f17_25;
- RHS25 += f17_25 * RHS17;
- const double f18 = 1.0 / m_A47;
- const double f18_27 = -f18 * m_A107;
- m_A108 += m_A48 * f18_27;
- m_A113 += m_A49 * f18_27;
- m_A114 += m_A50 * f18_27;
- RHS27 += f18_27 * RHS18;
- const double f18_28 = -f18 * m_A118;
- m_A119 += m_A48 * f18_28;
- m_A120 += m_A49 * f18_28;
- m_A121 += m_A50 * f18_28;
- RHS28 += f18_28 * RHS18;
- const double f19 = 1.0 / m_A52;
- const double f19_26 = -f19 * m_A99;
- RHS26 += f19_26 * RHS19;
- const double f20 = 1.0 / m_A55;
- const double f20_22 = -f20 * m_A68;
- m_A69 += m_A56 * f20_22;
- m_A70 += m_A57 * f20_22;
- m_A72 += m_A58 * f20_22;
- RHS22 += f20_22 * RHS20;
- const double f20_24 = -f20 * m_A79;
- m_A80 += m_A56 * f20_24;
- m_A82 += m_A57 * f20_24;
- m_A84 += m_A58 * f20_24;
- RHS24 += f20_24 * RHS20;
- const double f20_26 = -f20 * m_A100;
- m_A101 += m_A56 * f20_26;
- m_A102 += m_A57 * f20_26;
- m_A104 += m_A58 * f20_26;
- RHS26 += f20_26 * RHS20;
- const double f21 = 1.0 / m_A60;
- const double f21_27 = -f21 * m_A108;
- m_A114 += m_A61 * f21_27;
- RHS27 += f21_27 * RHS21;
- const double f21_28 = -f21 * m_A119;
- m_A121 += m_A61 * f21_28;
- RHS28 += f21_28 * RHS21;
- const double f22 = 1.0 / m_A69;
- const double f22_24 = -f22 * m_A80;
- m_A82 += m_A70 * f22_24;
- m_A83 += m_A71 * f22_24;
- m_A84 += m_A72 * f22_24;
- m_A85 += m_A73 * f22_24;
- RHS24 += f22_24 * RHS22;
- const double f22_25 = -f22 * m_A91;
- m_A92 += m_A70 * f22_25;
- m_A93 += m_A71 * f22_25;
- m_A94 += m_A72 * f22_25;
- m_A95 += m_A73 * f22_25;
- RHS25 += f22_25 * RHS22;
- const double f22_26 = -f22 * m_A101;
- m_A102 += m_A70 * f22_26;
- m_A103 += m_A71 * f22_26;
- m_A104 += m_A72 * f22_26;
- m_A105 += m_A73 * f22_26;
- RHS26 += f22_26 * RHS22;
- const double f22_27 = -f22 * m_A109;
- m_A110 += m_A70 * f22_27;
- m_A111 += m_A71 * f22_27;
- m_A112 += m_A72 * f22_27;
- m_A113 += m_A73 * f22_27;
- RHS27 += f22_27 * RHS22;
- const double f23 = 1.0 / m_A75;
- const double f23_24 = -f23 * m_A81;
- m_A84 += m_A76 * f23_24;
- RHS24 += f23_24 * RHS23;
- const double f24 = 1.0 / m_A82;
- const double f24_25 = -f24 * m_A92;
- m_A93 += m_A83 * f24_25;
- m_A94 += m_A84 * f24_25;
- m_A95 += m_A85 * f24_25;
- RHS25 += f24_25 * RHS24;
- const double f24_26 = -f24 * m_A102;
- m_A103 += m_A83 * f24_26;
- m_A104 += m_A84 * f24_26;
- m_A105 += m_A85 * f24_26;
- RHS26 += f24_26 * RHS24;
- const double f24_27 = -f24 * m_A110;
- m_A111 += m_A83 * f24_27;
- m_A112 += m_A84 * f24_27;
- m_A113 += m_A85 * f24_27;
- RHS27 += f24_27 * RHS24;
- const double f25 = 1.0 / m_A93;
- const double f25_26 = -f25 * m_A103;
- m_A104 += m_A94 * f25_26;
- m_A105 += m_A95 * f25_26;
- RHS26 += f25_26 * RHS25;
- const double f25_27 = -f25 * m_A111;
- m_A112 += m_A94 * f25_27;
- m_A113 += m_A95 * f25_27;
- RHS27 += f25_27 * RHS25;
- const double f26 = 1.0 / m_A104;
- const double f26_27 = -f26 * m_A112;
- m_A113 += m_A105 * f26_27;
- RHS27 += f26_27 * RHS26;
- const double f27 = 1.0 / m_A113;
- const double f27_28 = -f27 * m_A120;
- m_A121 += m_A114 * f27_28;
- RHS28 += f27_28 * RHS27;
- V[28] = RHS28 / m_A121;
- double tmp27 = 0.0;
- tmp27 += m_A114 * V[28];
- V[27] = (RHS27 - tmp27) / m_A113;
- double tmp26 = 0.0;
- tmp26 += m_A105 * V[27];
- V[26] = (RHS26 - tmp26) / m_A104;
- double tmp25 = 0.0;
- tmp25 += m_A94 * V[26];
- tmp25 += m_A95 * V[27];
- V[25] = (RHS25 - tmp25) / m_A93;
- double tmp24 = 0.0;
- tmp24 += m_A83 * V[25];
- tmp24 += m_A84 * V[26];
- tmp24 += m_A85 * V[27];
- V[24] = (RHS24 - tmp24) / m_A82;
- double tmp23 = 0.0;
- tmp23 += m_A76 * V[26];
- V[23] = (RHS23 - tmp23) / m_A75;
- double tmp22 = 0.0;
- tmp22 += m_A70 * V[24];
- tmp22 += m_A71 * V[25];
- tmp22 += m_A72 * V[26];
- tmp22 += m_A73 * V[27];
- V[22] = (RHS22 - tmp22) / m_A69;
- double tmp21 = 0.0;
- tmp21 += m_A61 * V[28];
- V[21] = (RHS21 - tmp21) / m_A60;
- double tmp20 = 0.0;
- tmp20 += m_A56 * V[22];
- tmp20 += m_A57 * V[24];
- tmp20 += m_A58 * V[26];
- V[20] = (RHS20 - tmp20) / m_A55;
- double tmp19 = 0.0;
- V[19] = (RHS19 - tmp19) / m_A52;
- double tmp18 = 0.0;
- tmp18 += m_A48 * V[21];
- tmp18 += m_A49 * V[27];
- tmp18 += m_A50 * V[28];
- V[18] = (RHS18 - tmp18) / m_A47;
- double tmp17 = 0.0;
- tmp17 += m_A44 * V[22];
- tmp17 += m_A45 * V[25];
- V[17] = (RHS17 - tmp17) / m_A43;
- double tmp16 = 0.0;
- V[16] = (RHS16 - tmp16) / m_A40;
- double tmp15 = 0.0;
- tmp15 += m_A38 * V[25];
- V[15] = (RHS15 - tmp15) / m_A37;
- double tmp14 = 0.0;
- V[14] = (RHS14 - tmp14) / m_A35;
- double tmp13 = 0.0;
- tmp13 += m_A31 * V[20];
- tmp13 += m_A32 * V[24];
- tmp13 += m_A33 * V[26];
- V[13] = (RHS13 - tmp13) / m_A30;
- double tmp12 = 0.0;
- tmp12 += m_A29 * V[26];
- V[12] = (RHS12 - tmp12) / m_A28;
- double tmp11 = 0.0;
- tmp11 += m_A27 * V[23];
- V[11] = (RHS11 - tmp11) / m_A26;
- double tmp10 = 0.0;
- tmp10 += m_A24 * V[20];
- tmp10 += m_A25 * V[22];
- V[10] = (RHS10 - tmp10) / m_A23;
- double tmp9 = 0.0;
- tmp9 += m_A22 * V[19];
- V[9] = (RHS9 - tmp9) / m_A21;
- double tmp8 = 0.0;
- tmp8 += m_A20 * V[28];
- V[8] = (RHS8 - tmp8) / m_A19;
- double tmp7 = 0.0;
- tmp7 += m_A17 * V[22];
- tmp7 += m_A18 * V[27];
- V[7] = (RHS7 - tmp7) / m_A16;
- double tmp6 = 0.0;
- tmp6 += m_A15 * V[21];
- V[6] = (RHS6 - tmp6) / m_A14;
- double tmp5 = 0.0;
- tmp5 += m_A11 * V[17];
- tmp5 += m_A12 * V[22];
- tmp5 += m_A13 * V[25];
- V[5] = (RHS5 - tmp5) / m_A10;
- double tmp4 = 0.0;
- tmp4 += m_A9 * V[16];
- V[4] = (RHS4 - tmp4) / m_A8;
- double tmp3 = 0.0;
- tmp3 += m_A7 * V[15];
- V[3] = (RHS3 - tmp3) / m_A6;
- double tmp2 = 0.0;
- tmp2 += m_A5 * V[25];
- V[2] = (RHS2 - tmp2) / m_A4;
- double tmp1 = 0.0;
- tmp1 += m_A3 * V[14];
- V[1] = (RHS1 - tmp1) / m_A2;
- double tmp0 = 0.0;
- tmp0 += m_A1 * V[17];
- V[0] = (RHS0 - tmp0) / m_A0;
-}
-
-// 280zzzap,sspeedr
-static void nl_gcr_123_double_double_864a61c57bac9c38(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
-
-{
-
- plib::unused_var(cnV);
- double m_A0(0.0);
- double m_A1(0.0);
- double m_A2(0.0);
- double m_A3(0.0);
- double m_A4(0.0);
- double m_A5(0.0);
- double m_A6(0.0);
- double m_A7(0.0);
- double m_A8(0.0);
- double m_A9(0.0);
- double m_A10(0.0);
- double m_A11(0.0);
- double m_A12(0.0);
- double m_A13(0.0);
- double m_A14(0.0);
- double m_A15(0.0);
- double m_A16(0.0);
- double m_A17(0.0);
- double m_A18(0.0);
- double m_A19(0.0);
- double m_A20(0.0);
- double m_A21(0.0);
- double m_A22(0.0);
- double m_A23(0.0);
- double m_A24(0.0);
- double m_A25(0.0);
- double m_A26(0.0);
- double m_A27(0.0);
- double m_A28(0.0);
- double m_A29(0.0);
- double m_A30(0.0);
- double m_A31(0.0);
- double m_A32(0.0);
- double m_A33(0.0);
- double m_A34(0.0);
- double m_A35(0.0);
- double m_A36(0.0);
- double m_A37(0.0);
- double m_A38(0.0);
- double m_A39(0.0);
- double m_A40(0.0);
- double m_A41(0.0);
- double m_A42(0.0);
- double m_A43(0.0);
- double m_A44(0.0);
- double m_A45(0.0);
- double m_A46(0.0);
- double m_A47(0.0);
- double m_A48(0.0);
- double m_A49(0.0);
- double m_A50(0.0);
- double m_A51(0.0);
- double m_A52(0.0);
- double m_A53(0.0);
- double m_A54(0.0);
- double m_A55(0.0);
- double m_A56(0.0);
- double m_A57(0.0);
- double m_A58(0.0);
- double m_A59(0.0);
- double m_A60(0.0);
- double m_A61(0.0);
- double m_A62(0.0);
- double m_A63(0.0);
- double m_A64(0.0);
- double m_A65(0.0);
- double m_A66(0.0);
- double m_A67(0.0);
- double m_A68(0.0);
- double m_A69(0.0);
- double m_A70(0.0);
- double m_A71(0.0);
- double m_A72(0.0);
- double m_A73(0.0);
- double m_A74(0.0);
- double m_A75(0.0);
- double m_A76(0.0);
- double m_A77(0.0);
- double m_A78(0.0);
- double m_A79(0.0);
- double m_A80(0.0);
- double m_A81(0.0);
- double m_A82(0.0);
- double m_A83(0.0);
- double m_A84(0.0);
- double m_A85(0.0);
- double m_A86(0.0);
- double m_A87(0.0);
- double m_A88(0.0);
- double m_A89(0.0);
- double m_A90(0.0);
- double m_A91(0.0);
- double m_A92(0.0);
- double m_A93(0.0);
- double m_A94(0.0);
- double m_A95(0.0);
- double m_A96(0.0);
- double m_A97(0.0);
- double m_A98(0.0);
- double m_A99(0.0);
- double m_A100(0.0);
- double m_A101(0.0);
- double m_A102(0.0);
- double m_A103(0.0);
- double m_A104(0.0);
- double m_A105(0.0);
- double m_A106(0.0);
- double m_A107(0.0);
- double m_A108(0.0);
- double m_A109(0.0);
- double m_A110(0.0);
- double m_A111(0.0);
- double m_A112(0.0);
- double m_A113(0.0);
- double m_A114(0.0);
- double m_A115(0.0);
- double m_A116(0.0);
- double m_A117(0.0);
- double m_A118(0.0);
- double m_A119(0.0);
- double m_A120(0.0);
- double m_A121(0.0);
- double m_A122(0.0);
- m_A0 += gt[0];
- m_A0 += gt[1];
- m_A0 += gt[2];
- m_A1 += go[0];
- double RHS0 = Idr[0];
- RHS0 += Idr[1];
- RHS0 += Idr[2];
- RHS0 -= go[1] * *cnV[1];
- RHS0 -= go[2] * *cnV[2];
- m_A2 += gt[3];
- m_A2 += gt[4];
- m_A3 += go[3];
- double RHS1 = Idr[3];
- RHS1 += Idr[4];
- RHS1 -= go[4] * *cnV[4];
- m_A4 += gt[5];
- m_A4 += gt[6];
- m_A4 += gt[7];
- m_A4 += gt[8];
- m_A4 += gt[9];
- m_A4 += gt[10];
- m_A4 += gt[11];
- m_A5 += go[5];
- double RHS2 = Idr[5];
- RHS2 += Idr[6];
- RHS2 += Idr[7];
- RHS2 += Idr[8];
- RHS2 += Idr[9];
- RHS2 += Idr[10];
- RHS2 += Idr[11];
- RHS2 -= go[6] * *cnV[6];
- RHS2 -= go[7] * *cnV[7];
- RHS2 -= go[8] * *cnV[8];
- RHS2 -= go[9] * *cnV[9];
- RHS2 -= go[10] * *cnV[10];
- RHS2 -= go[11] * *cnV[11];
- m_A6 += gt[12];
- m_A6 += gt[13];
- m_A6 += gt[14];
- m_A7 += go[12];
- double RHS3 = Idr[12];
- RHS3 += Idr[13];
- RHS3 += Idr[14];
- RHS3 -= go[13] * *cnV[13];
- RHS3 -= go[14] * *cnV[14];
- m_A8 += gt[15];
- m_A8 += gt[16];
- m_A8 += gt[17];
- m_A8 += gt[18];
- m_A8 += gt[19];
- m_A8 += gt[20];
- m_A8 += gt[21];
- m_A9 += go[15];
- double RHS4 = Idr[15];
- RHS4 += Idr[16];
- RHS4 += Idr[17];
- RHS4 += Idr[18];
- RHS4 += Idr[19];
- RHS4 += Idr[20];
- RHS4 += Idr[21];
- RHS4 -= go[16] * *cnV[16];
- RHS4 -= go[17] * *cnV[17];
- RHS4 -= go[18] * *cnV[18];
- RHS4 -= go[19] * *cnV[19];
- RHS4 -= go[20] * *cnV[20];
- RHS4 -= go[21] * *cnV[21];
- m_A10 += gt[22];
- m_A10 += gt[23];
- m_A11 += go[22];
- double RHS5 = Idr[22];
- RHS5 += Idr[23];
- RHS5 -= go[23] * *cnV[23];
- m_A12 += gt[24];
- m_A12 += gt[25];
- m_A14 += go[24];
- m_A13 += go[25];
- double RHS6 = Idr[24];
- RHS6 += Idr[25];
- m_A15 += gt[26];
- m_A15 += gt[27];
- m_A16 += go[26];
- double RHS7 = Idr[26];
- RHS7 += Idr[27];
- RHS7 -= go[27] * *cnV[27];
- m_A17 += gt[28];
- m_A17 += gt[29];
- m_A18 += go[28];
- double RHS8 = Idr[28];
- RHS8 += Idr[29];
- RHS8 -= go[29] * *cnV[29];
- m_A19 += gt[30];
- m_A19 += gt[31];
- m_A19 += gt[32];
- m_A19 += gt[33];
- m_A19 += gt[34];
- m_A19 += gt[35];
- m_A19 += gt[36];
- m_A20 += go[30];
- double RHS9 = Idr[30];
- RHS9 += Idr[31];
- RHS9 += Idr[32];
- RHS9 += Idr[33];
- RHS9 += Idr[34];
- RHS9 += Idr[35];
- RHS9 += Idr[36];
- RHS9 -= go[31] * *cnV[31];
- RHS9 -= go[32] * *cnV[32];
- RHS9 -= go[33] * *cnV[33];
- RHS9 -= go[34] * *cnV[34];
- RHS9 -= go[35] * *cnV[35];
- RHS9 -= go[36] * *cnV[36];
- m_A21 += gt[37];
- m_A21 += gt[38];
- m_A21 += gt[39];
- m_A22 += go[37];
- double RHS10 = Idr[37];
- RHS10 += Idr[38];
- RHS10 += Idr[39];
- RHS10 -= go[38] * *cnV[38];
- RHS10 -= go[39] * *cnV[39];
- m_A23 += gt[40];
- m_A23 += gt[41];
- m_A23 += gt[42];
- m_A23 += gt[43];
- m_A24 += go[40];
- double RHS11 = Idr[40];
- RHS11 += Idr[41];
- RHS11 += Idr[42];
- RHS11 += Idr[43];
- RHS11 -= go[41] * *cnV[41];
- RHS11 -= go[42] * *cnV[42];
- RHS11 -= go[43] * *cnV[43];
- m_A25 += gt[44];
- m_A25 += gt[45];
- m_A25 += gt[46];
- m_A25 += gt[47];
- m_A25 += gt[48];
- m_A25 += gt[49];
- m_A25 += gt[50];
- m_A26 += go[44];
- double RHS12 = Idr[44];
- RHS12 += Idr[45];
- RHS12 += Idr[46];
- RHS12 += Idr[47];
- RHS12 += Idr[48];
- RHS12 += Idr[49];
- RHS12 += Idr[50];
- RHS12 -= go[45] * *cnV[45];
- RHS12 -= go[46] * *cnV[46];
- RHS12 -= go[47] * *cnV[47];
- RHS12 -= go[48] * *cnV[48];
- RHS12 -= go[49] * *cnV[49];
- RHS12 -= go[50] * *cnV[50];
- m_A27 += gt[51];
- m_A27 += gt[52];
- m_A28 += go[51];
- double RHS13 = Idr[51];
- RHS13 += Idr[52];
- RHS13 -= go[52] * *cnV[52];
- m_A29 += gt[53];
- m_A29 += gt[54];
- m_A30 += go[53];
- double RHS14 = Idr[53];
- RHS14 += Idr[54];
- RHS14 -= go[54] * *cnV[54];
- m_A31 += gt[55];
- m_A31 += gt[56];
- m_A32 += go[55];
- double RHS15 = Idr[55];
- RHS15 += Idr[56];
- RHS15 -= go[56] * *cnV[56];
- m_A33 += gt[57];
- m_A33 += gt[58];
- m_A33 += gt[59];
- m_A33 += gt[60];
- m_A35 += go[57];
- m_A34 += go[58];
- double RHS16 = Idr[57];
- RHS16 += Idr[58];
- RHS16 += Idr[59];
- RHS16 += Idr[60];
- RHS16 -= go[59] * *cnV[59];
- RHS16 -= go[60] * *cnV[60];
- m_A36 += gt[61];
- m_A36 += gt[62];
- m_A36 += gt[63];
- m_A37 += go[61];
- double RHS17 = Idr[61];
- RHS17 += Idr[62];
- RHS17 += Idr[63];
- RHS17 -= go[62] * *cnV[62];
- RHS17 -= go[63] * *cnV[63];
- m_A38 += gt[64];
- m_A38 += gt[65];
- m_A39 += go[64];
- double RHS18 = Idr[64];
- RHS18 += Idr[65];
- RHS18 -= go[65] * *cnV[65];
- m_A40 += gt[66];
- m_A40 += gt[67];
- m_A41 += go[66];
- double RHS19 = Idr[66];
- RHS19 += Idr[67];
- RHS19 -= go[67] * *cnV[67];
- m_A43 += gt[68];
- m_A43 += gt[69];
- m_A43 += gt[70];
- m_A43 += gt[71];
- m_A42 += go[68];
- double RHS20 = Idr[68];
- RHS20 += Idr[69];
- RHS20 += Idr[70];
- RHS20 += Idr[71];
- RHS20 -= go[69] * *cnV[69];
- RHS20 -= go[70] * *cnV[70];
- RHS20 -= go[71] * *cnV[71];
- m_A47 += gt[72];
- m_A47 += gt[73];
- m_A46 += go[72];
- m_A45 += go[73];
- double RHS21 = Idr[72];
- RHS21 += Idr[73];
- m_A51 += gt[74];
- m_A51 += gt[75];
- m_A49 += go[74];
- double RHS22 = Idr[74];
- RHS22 += Idr[75];
- RHS22 -= go[75] * *cnV[75];
- m_A54 += gt[76];
- m_A54 += gt[77];
- m_A54 += gt[78];
- m_A53 += go[76];
- m_A52 += go[77];
- double RHS23 = Idr[76];
- RHS23 += Idr[77];
- RHS23 += Idr[78];
- RHS23 -= go[78] * *cnV[78];
- m_A56 += gt[79];
- m_A56 += gt[80];
- m_A56 += gt[81];
- m_A56 += gt[82];
- m_A55 += go[79];
- m_A57 += go[80];
- double RHS24 = Idr[79];
- RHS24 += Idr[80];
- RHS24 += Idr[81];
- RHS24 += Idr[82];
- RHS24 -= go[81] * *cnV[81];
- RHS24 -= go[82] * *cnV[82];
- m_A59 += gt[83];
- m_A59 += gt[84];
- m_A59 += gt[85];
- m_A59 += gt[86];
- m_A58 += go[83];
- m_A60 += go[84];
- double RHS25 = Idr[83];
- RHS25 += Idr[84];
- RHS25 += Idr[85];
- RHS25 += Idr[86];
- RHS25 -= go[85] * *cnV[85];
- RHS25 -= go[86] * *cnV[86];
- m_A62 += gt[87];
- m_A62 += gt[88];
- m_A63 += go[87];
- m_A61 += go[88];
- double RHS26 = Idr[87];
- RHS26 += Idr[88];
- m_A67 += gt[89];
- m_A67 += gt[90];
- m_A67 += gt[91];
- m_A67 += gt[92];
- m_A67 += gt[93];
- m_A67 += gt[94];
- m_A64 += go[89];
- m_A65 += go[90];
- m_A69 += go[91];
- m_A68 += go[92];
- double RHS27 = Idr[89];
- RHS27 += Idr[90];
- RHS27 += Idr[91];
- RHS27 += Idr[92];
- RHS27 += Idr[93];
- RHS27 += Idr[94];
- RHS27 -= go[93] * *cnV[93];
- RHS27 -= go[94] * *cnV[94];
- m_A72 += gt[95];
- m_A72 += gt[96];
- m_A72 += gt[97];
- m_A72 += gt[98];
- m_A71 += go[95];
- m_A73 += go[96];
- double RHS28 = Idr[95];
- RHS28 += Idr[96];
- RHS28 += Idr[97];
- RHS28 += Idr[98];
- RHS28 -= go[97] * *cnV[97];
- RHS28 -= go[98] * *cnV[98];
- m_A76 += gt[99];
- m_A76 += gt[100];
- m_A76 += gt[101];
- m_A76 += gt[102];
- m_A77 += go[99];
- m_A78 += go[100];
- m_A74 += go[101];
- m_A75 += go[102];
- double RHS29 = Idr[99];
- RHS29 += Idr[100];
- RHS29 += Idr[101];
- RHS29 += Idr[102];
- m_A81 += gt[103];
- m_A81 += gt[104];
- m_A81 += gt[105];
- m_A80 += go[103];
- m_A79 += go[104];
- double RHS30 = Idr[103];
- RHS30 += Idr[104];
- RHS30 += Idr[105];
- RHS30 -= go[105] * *cnV[105];
- m_A84 += gt[106];
- m_A84 += gt[107];
- m_A82 += go[106];
- m_A83 += go[107];
- double RHS31 = Idr[106];
- RHS31 += Idr[107];
- m_A91 += gt[108];
- m_A91 += gt[109];
- m_A91 += gt[110];
- m_A91 += gt[111];
- m_A91 += gt[112];
- m_A86 += go[108];
- m_A90 += go[109];
- m_A88 += go[110];
- m_A85 += go[111];
- m_A87 += go[112];
- double RHS32 = Idr[108];
- RHS32 += Idr[109];
- RHS32 += Idr[110];
- RHS32 += Idr[111];
- RHS32 += Idr[112];
- m_A99 += gt[113];
- m_A99 += gt[114];
- m_A99 += gt[115];
- m_A99 += gt[116];
- m_A99 += gt[117];
- m_A96 += go[113];
- m_A100 += go[114];
- m_A97 += go[115];
- m_A94 += go[116];
- m_A95 += go[117];
- double RHS33 = Idr[113];
- RHS33 += Idr[114];
- RHS33 += Idr[115];
- RHS33 += Idr[116];
- RHS33 += Idr[117];
- m_A106 += gt[118];
- m_A106 += gt[119];
- m_A106 += gt[120];
- m_A106 += gt[121];
- m_A103 += go[118];
- m_A104 += go[119];
- m_A101 += go[120];
- m_A102 += go[121];
- double RHS34 = Idr[118];
- RHS34 += Idr[119];
- RHS34 += Idr[120];
- RHS34 += Idr[121];
- m_A111 += gt[122];
- m_A111 += gt[123];
- m_A111 += gt[124];
- m_A111 += gt[125];
- m_A108 += go[122];
- m_A109 += go[123];
- double RHS35 = Idr[122];
- RHS35 += Idr[123];
- RHS35 += Idr[124];
- RHS35 += Idr[125];
- RHS35 -= go[124] * *cnV[124];
- RHS35 -= go[125] * *cnV[125];
- m_A122 += gt[126];
- m_A122 += gt[127];
- m_A122 += gt[128];
- m_A122 += gt[129];
- m_A122 += gt[130];
- m_A122 += gt[131];
- m_A113 += go[126];
- m_A117 += go[127];
- m_A120 += go[128];
- m_A114 += go[129];
- double RHS36 = Idr[126];
- RHS36 += Idr[127];
- RHS36 += Idr[128];
- RHS36 += Idr[129];
- RHS36 += Idr[130];
- RHS36 += Idr[131];
- RHS36 -= go[130] * *cnV[130];
- RHS36 -= go[131] * *cnV[131];
- const double f0 = 1.0 / m_A0;
- const double f0_24 = -f0 * m_A55;
- m_A57 += m_A1 * f0_24;
- RHS24 += f0_24 * RHS0;
- const double f0_32 = -f0 * m_A85;
- m_A91 += m_A1 * f0_32;
- RHS32 += f0_32 * RHS0;
- const double f1 = 1.0 / m_A2;
- const double f1_32 = -f1 * m_A86;
- m_A91 += m_A3 * f1_32;
- RHS32 += f1_32 * RHS1;
- const double f2 = 1.0 / m_A4;
- const double f2_27 = -f2 * m_A64;
- m_A66 += m_A5 * f2_27;
- RHS27 += f2_27 * RHS2;
- const double f3 = 1.0 / m_A6;
- const double f3_25 = -f3 * m_A58;
- m_A60 += m_A7 * f3_25;
- RHS25 += f3_25 * RHS3;
- const double f3_34 = -f3 * m_A101;
- m_A106 += m_A7 * f3_34;
- RHS34 += f3_34 * RHS3;
- const double f4 = 1.0 / m_A8;
- const double f4_20 = -f4 * m_A42;
- m_A44 += m_A9 * f4_20;
- RHS20 += f4_20 * RHS4;
- const double f5 = 1.0 / m_A10;
- const double f5_21 = -f5 * m_A45;
- m_A47 += m_A11 * f5_21;
- RHS21 += f5_21 * RHS5;
- const double f5_32 = -f5 * m_A87;
- m_A88 += m_A11 * f5_32;
- RHS32 += f5_32 * RHS5;
- const double f6 = 1.0 / m_A12;
- const double f6_21 = -f6 * m_A46;
- m_A47 += m_A13 * f6_21;
- m_A48 += m_A14 * f6_21;
- RHS21 += f6_21 * RHS6;
- const double f6_22 = -f6 * m_A49;
- m_A50 += m_A13 * f6_22;
- m_A51 += m_A14 * f6_22;
- RHS22 += f6_22 * RHS6;
- const double f7 = 1.0 / m_A15;
- const double f7_23 = -f7 * m_A52;
- m_A54 += m_A16 * f7_23;
- RHS23 += f7_23 * RHS7;
- const double f7_34 = -f7 * m_A102;
- m_A103 += m_A16 * f7_34;
- RHS34 += f7_34 * RHS7;
- const double f8 = 1.0 / m_A17;
- const double f8_23 = -f8 * m_A53;
- m_A54 += m_A18 * f8_23;
- RHS23 += f8_23 * RHS8;
- const double f9 = 1.0 / m_A19;
- const double f9_36 = -f9 * m_A113;
- m_A116 += m_A20 * f9_36;
- RHS36 += f9_36 * RHS9;
- const double f10 = 1.0 / m_A21;
- const double f10_28 = -f10 * m_A71;
- m_A73 += m_A22 * f10_28;
- RHS28 += f10_28 * RHS10;
- const double f10_33 = -f10 * m_A94;
- m_A99 += m_A22 * f10_33;
- RHS33 += f10_33 * RHS10;
- const double f13 = 1.0 / m_A27;
- const double f13_26 = -f13 * m_A61;
- m_A62 += m_A28 * f13_26;
- RHS26 += f13_26 * RHS13;
- const double f13_33 = -f13 * m_A95;
- m_A97 += m_A28 * f13_33;
- RHS33 += f13_33 * RHS13;
- const double f14 = 1.0 / m_A29;
- const double f14_33 = -f14 * m_A96;
- m_A99 += m_A30 * f14_33;
- RHS33 += f14_33 * RHS14;
- const double f15 = 1.0 / m_A31;
- const double f15_31 = -f15 * m_A82;
- m_A84 += m_A32 * f15_31;
- RHS31 += f15_31 * RHS15;
- const double f16 = 1.0 / m_A33;
- const double f16_27 = -f16 * m_A65;
- m_A67 += m_A34 * f16_27;
- m_A70 += m_A35 * f16_27;
- RHS27 += f16_27 * RHS16;
- const double f16_36 = -f16 * m_A114;
- m_A115 += m_A34 * f16_36;
- m_A122 += m_A35 * f16_36;
- RHS36 += f16_36 * RHS16;
- const double f17 = 1.0 / m_A36;
- const double f17_29 = -f17 * m_A74;
- m_A76 += m_A37 * f17_29;
- RHS29 += f17_29 * RHS17;
- const double f17_35 = -f17 * m_A108;
- m_A109 += m_A37 * f17_35;
- RHS35 += f17_35 * RHS17;
- const double f18 = 1.0 / m_A38;
- const double f18_29 = -f18 * m_A75;
- m_A77 += m_A39 * f18_29;
- RHS29 += f18_29 * RHS18;
- const double f18_30 = -f18 * m_A79;
- m_A81 += m_A39 * f18_30;
- RHS30 += f18_30 * RHS18;
- const double f19 = 1.0 / m_A40;
- const double f19_30 = -f19 * m_A80;
- m_A81 += m_A41 * f19_30;
- RHS30 += f19_30 * RHS19;
- const double f21 = 1.0 / m_A47;
- const double f21_22 = -f21 * m_A50;
- m_A51 += m_A48 * f21_22;
- RHS22 += f21_22 * RHS21;
- const double f21_32 = -f21 * m_A88;
- m_A89 += m_A48 * f21_32;
- RHS32 += f21_32 * RHS21;
- const double f22 = 1.0 / m_A51;
- const double f22_32 = -f22 * m_A89;
- RHS32 += f22_32 * RHS22;
- const double f23 = 1.0 / m_A54;
- const double f23_34 = -f23 * m_A103;
- RHS34 += f23_34 * RHS23;
- const double f24 = 1.0 / m_A56;
- const double f24_27 = -f24 * m_A66;
- m_A68 += m_A57 * f24_27;
- RHS27 += f24_27 * RHS24;
- const double f26 = 1.0 / m_A62;
- const double f26_31 = -f26 * m_A83;
- m_A84 += m_A63 * f26_31;
- RHS31 += f26_31 * RHS26;
- const double f26_33 = -f26 * m_A97;
- m_A98 += m_A63 * f26_33;
- RHS33 += f26_33 * RHS26;
- const double f27 = 1.0 / m_A67;
- const double f27_32 = -f27 * m_A90;
- m_A91 += m_A68 * f27_32;
- m_A92 += m_A69 * f27_32;
- m_A93 += m_A70 * f27_32;
- RHS32 += f27_32 * RHS27;
- const double f27_34 = -f27 * m_A104;
- m_A105 += m_A68 * f27_34;
- m_A106 += m_A69 * f27_34;
- m_A107 += m_A70 * f27_34;
- RHS34 += f27_34 * RHS27;
- const double f27_36 = -f27 * m_A115;
- m_A119 += m_A68 * f27_36;
- m_A121 += m_A69 * f27_36;
- m_A122 += m_A70 * f27_36;
- RHS36 += f27_36 * RHS27;
- const double f28 = 1.0 / m_A72;
- const double f28_36 = -f28 * m_A116;
- m_A120 += m_A73 * f28_36;
- RHS36 += f28_36 * RHS28;
- const double f29 = 1.0 / m_A76;
- const double f29_35 = -f29 * m_A109;
- m_A110 += m_A77 * f29_35;
- m_A112 += m_A78 * f29_35;
- RHS35 += f29_35 * RHS29;
- const double f29_36 = -f29 * m_A117;
- m_A118 += m_A77 * f29_36;
- m_A122 += m_A78 * f29_36;
- RHS36 += f29_36 * RHS29;
- const double f30 = 1.0 / m_A81;
- const double f30_35 = -f30 * m_A110;
- RHS35 += f30_35 * RHS30;
- const double f30_36 = -f30 * m_A118;
- RHS36 += f30_36 * RHS30;
- const double f31 = 1.0 / m_A84;
- const double f31_33 = -f31 * m_A98;
- RHS33 += f31_33 * RHS31;
- const double f32 = 1.0 / m_A91;
- const double f32_34 = -f32 * m_A105;
- m_A106 += m_A92 * f32_34;
- m_A107 += m_A93 * f32_34;
- RHS34 += f32_34 * RHS32;
- const double f32_36 = -f32 * m_A119;
- m_A121 += m_A92 * f32_36;
- m_A122 += m_A93 * f32_36;
- RHS36 += f32_36 * RHS32;
- const double f33 = 1.0 / m_A99;
- const double f33_36 = -f33 * m_A120;
- m_A122 += m_A100 * f33_36;
- RHS36 += f33_36 * RHS33;
- const double f34 = 1.0 / m_A106;
- const double f34_36 = -f34 * m_A121;
- m_A122 += m_A107 * f34_36;
- RHS36 += f34_36 * RHS34;
- V[36] = RHS36 / m_A122;
- double tmp35 = 0.0;
- tmp35 += m_A112 * V[36];
- V[35] = (RHS35 - tmp35) / m_A111;
- double tmp34 = 0.0;
- tmp34 += m_A107 * V[36];
- V[34] = (RHS34 - tmp34) / m_A106;
- double tmp33 = 0.0;
- tmp33 += m_A100 * V[36];
- V[33] = (RHS33 - tmp33) / m_A99;
- double tmp32 = 0.0;
- tmp32 += m_A92 * V[34];
- tmp32 += m_A93 * V[36];
- V[32] = (RHS32 - tmp32) / m_A91;
- double tmp31 = 0.0;
- V[31] = (RHS31 - tmp31) / m_A84;
- double tmp30 = 0.0;
- V[30] = (RHS30 - tmp30) / m_A81;
- double tmp29 = 0.0;
- tmp29 += m_A77 * V[30];
- tmp29 += m_A78 * V[36];
- V[29] = (RHS29 - tmp29) / m_A76;
- double tmp28 = 0.0;
- tmp28 += m_A73 * V[33];
- V[28] = (RHS28 - tmp28) / m_A72;
- double tmp27 = 0.0;
- tmp27 += m_A68 * V[32];
- tmp27 += m_A69 * V[34];
- tmp27 += m_A70 * V[36];
- V[27] = (RHS27 - tmp27) / m_A67;
- double tmp26 = 0.0;
- tmp26 += m_A63 * V[31];
- V[26] = (RHS26 - tmp26) / m_A62;
- double tmp25 = 0.0;
- tmp25 += m_A60 * V[34];
- V[25] = (RHS25 - tmp25) / m_A59;
- double tmp24 = 0.0;
- tmp24 += m_A57 * V[32];
- V[24] = (RHS24 - tmp24) / m_A56;
- double tmp23 = 0.0;
- V[23] = (RHS23 - tmp23) / m_A54;
- double tmp22 = 0.0;
- V[22] = (RHS22 - tmp22) / m_A51;
- double tmp21 = 0.0;
- tmp21 += m_A48 * V[22];
- V[21] = (RHS21 - tmp21) / m_A47;
- double tmp20 = 0.0;
- tmp20 += m_A44 * V[25];
- V[20] = (RHS20 - tmp20) / m_A43;
- double tmp19 = 0.0;
- tmp19 += m_A41 * V[30];
- V[19] = (RHS19 - tmp19) / m_A40;
- double tmp18 = 0.0;
- tmp18 += m_A39 * V[30];
- V[18] = (RHS18 - tmp18) / m_A38;
- double tmp17 = 0.0;
- tmp17 += m_A37 * V[29];
- V[17] = (RHS17 - tmp17) / m_A36;
- double tmp16 = 0.0;
- tmp16 += m_A34 * V[27];
- tmp16 += m_A35 * V[36];
- V[16] = (RHS16 - tmp16) / m_A33;
- double tmp15 = 0.0;
- tmp15 += m_A32 * V[31];
- V[15] = (RHS15 - tmp15) / m_A31;
- double tmp14 = 0.0;
- tmp14 += m_A30 * V[33];
- V[14] = (RHS14 - tmp14) / m_A29;
- double tmp13 = 0.0;
- tmp13 += m_A28 * V[26];
- V[13] = (RHS13 - tmp13) / m_A27;
- double tmp12 = 0.0;
- tmp12 += m_A26 * V[35];
- V[12] = (RHS12 - tmp12) / m_A25;
- double tmp11 = 0.0;
- tmp11 += m_A24 * V[12];
- V[11] = (RHS11 - tmp11) / m_A23;
- double tmp10 = 0.0;
- tmp10 += m_A22 * V[33];
- V[10] = (RHS10 - tmp10) / m_A21;
- double tmp9 = 0.0;
- tmp9 += m_A20 * V[28];
- V[9] = (RHS9 - tmp9) / m_A19;
- double tmp8 = 0.0;
- tmp8 += m_A18 * V[23];
- V[8] = (RHS8 - tmp8) / m_A17;
- double tmp7 = 0.0;
- tmp7 += m_A16 * V[23];
- V[7] = (RHS7 - tmp7) / m_A15;
- double tmp6 = 0.0;
- tmp6 += m_A13 * V[21];
- tmp6 += m_A14 * V[22];
- V[6] = (RHS6 - tmp6) / m_A12;
- double tmp5 = 0.0;
- tmp5 += m_A11 * V[21];
- V[5] = (RHS5 - tmp5) / m_A10;
- double tmp4 = 0.0;
- tmp4 += m_A9 * V[25];
- V[4] = (RHS4 - tmp4) / m_A8;
- double tmp3 = 0.0;
- tmp3 += m_A7 * V[34];
- V[3] = (RHS3 - tmp3) / m_A6;
- double tmp2 = 0.0;
- tmp2 += m_A5 * V[24];
- V[2] = (RHS2 - tmp2) / m_A4;
- double tmp1 = 0.0;
- tmp1 += m_A3 * V[32];
- V[1] = (RHS1 - tmp1) / m_A2;
- double tmp0 = 0.0;
- tmp0 += m_A1 * V[32];
- V[0] = (RHS0 - tmp0) / m_A0;
-}
-
// 280zzzap
static void nl_gcr_149_double_double_fc9971724787b82b(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
@@ -3844,398 +1510,6 @@ static void nl_gcr_149_double_double_fc9971724787b82b(double * __restrict V, con
V[0] = (RHS0 - tmp0) / m_A0;
}
-// 280zzzap,sspeedr
-static void nl_gcr_57_double_double_bb501e6a23177009(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
-
-{
-
- plib::unused_var(cnV);
- double m_A0(0.0);
- double m_A1(0.0);
- double m_A2(0.0);
- double m_A3(0.0);
- double m_A4(0.0);
- double m_A5(0.0);
- double m_A6(0.0);
- double m_A7(0.0);
- double m_A8(0.0);
- double m_A9(0.0);
- double m_A10(0.0);
- double m_A11(0.0);
- double m_A12(0.0);
- double m_A13(0.0);
- double m_A14(0.0);
- double m_A15(0.0);
- double m_A16(0.0);
- double m_A17(0.0);
- double m_A18(0.0);
- double m_A19(0.0);
- double m_A20(0.0);
- double m_A21(0.0);
- double m_A22(0.0);
- double m_A23(0.0);
- double m_A24(0.0);
- double m_A25(0.0);
- double m_A26(0.0);
- double m_A27(0.0);
- double m_A28(0.0);
- double m_A29(0.0);
- double m_A30(0.0);
- double m_A31(0.0);
- double m_A32(0.0);
- double m_A33(0.0);
- double m_A34(0.0);
- double m_A35(0.0);
- double m_A36(0.0);
- double m_A37(0.0);
- double m_A38(0.0);
- double m_A39(0.0);
- double m_A40(0.0);
- double m_A41(0.0);
- double m_A42(0.0);
- double m_A43(0.0);
- double m_A44(0.0);
- double m_A45(0.0);
- double m_A46(0.0);
- double m_A47(0.0);
- double m_A48(0.0);
- double m_A49(0.0);
- double m_A50(0.0);
- double m_A51(0.0);
- double m_A52(0.0);
- double m_A53(0.0);
- double m_A54(0.0);
- double m_A55(0.0);
- double m_A56(0.0);
- m_A0 += gt[0];
- m_A0 += gt[1];
- m_A0 += gt[2];
- m_A1 += go[0];
- double RHS0 = Idr[0];
- RHS0 += Idr[1];
- RHS0 += Idr[2];
- RHS0 -= go[1] * *cnV[1];
- RHS0 -= go[2] * *cnV[2];
- m_A2 += gt[3];
- m_A2 += gt[4];
- m_A3 += go[3];
- double RHS1 = Idr[3];
- RHS1 += Idr[4];
- RHS1 -= go[4] * *cnV[4];
- m_A4 += gt[5];
- m_A4 += gt[6];
- m_A4 += gt[7];
- m_A4 += gt[8];
- m_A4 += gt[9];
- m_A4 += gt[10];
- m_A4 += gt[11];
- m_A5 += go[5];
- double RHS2 = Idr[5];
- RHS2 += Idr[6];
- RHS2 += Idr[7];
- RHS2 += Idr[8];
- RHS2 += Idr[9];
- RHS2 += Idr[10];
- RHS2 += Idr[11];
- RHS2 -= go[6] * *cnV[6];
- RHS2 -= go[7] * *cnV[7];
- RHS2 -= go[8] * *cnV[8];
- RHS2 -= go[9] * *cnV[9];
- RHS2 -= go[10] * *cnV[10];
- RHS2 -= go[11] * *cnV[11];
- m_A6 += gt[12];
- m_A6 += gt[13];
- m_A6 += gt[14];
- m_A7 += go[12];
- double RHS3 = Idr[12];
- RHS3 += Idr[13];
- RHS3 += Idr[14];
- RHS3 -= go[13] * *cnV[13];
- RHS3 -= go[14] * *cnV[14];
- m_A8 += gt[15];
- m_A8 += gt[16];
- m_A8 += gt[17];
- m_A8 += gt[18];
- m_A8 += gt[19];
- m_A8 += gt[20];
- m_A8 += gt[21];
- m_A9 += go[15];
- double RHS4 = Idr[15];
- RHS4 += Idr[16];
- RHS4 += Idr[17];
- RHS4 += Idr[18];
- RHS4 += Idr[19];
- RHS4 += Idr[20];
- RHS4 += Idr[21];
- RHS4 -= go[16] * *cnV[16];
- RHS4 -= go[17] * *cnV[17];
- RHS4 -= go[18] * *cnV[18];
- RHS4 -= go[19] * *cnV[19];
- RHS4 -= go[20] * *cnV[20];
- RHS4 -= go[21] * *cnV[21];
- m_A10 += gt[22];
- m_A10 += gt[23];
- m_A11 += go[22];
- double RHS5 = Idr[22];
- RHS5 += Idr[23];
- RHS5 -= go[23] * *cnV[23];
- m_A12 += gt[24];
- m_A12 += gt[25];
- m_A14 += go[24];
- m_A13 += go[25];
- double RHS6 = Idr[24];
- RHS6 += Idr[25];
- m_A15 += gt[26];
- m_A15 += gt[27];
- m_A16 += go[26];
- double RHS7 = Idr[26];
- RHS7 += Idr[27];
- RHS7 -= go[27] * *cnV[27];
- m_A17 += gt[28];
- m_A17 += gt[29];
- m_A18 += go[28];
- double RHS8 = Idr[28];
- RHS8 += Idr[29];
- RHS8 -= go[29] * *cnV[29];
- m_A20 += gt[30];
- m_A20 += gt[31];
- m_A20 += gt[32];
- m_A20 += gt[33];
- m_A19 += go[30];
- double RHS9 = Idr[30];
- RHS9 += Idr[31];
- RHS9 += Idr[32];
- RHS9 += Idr[33];
- RHS9 -= go[31] * *cnV[31];
- RHS9 -= go[32] * *cnV[32];
- RHS9 -= go[33] * *cnV[33];
- m_A24 += gt[34];
- m_A24 += gt[35];
- m_A23 += go[34];
- m_A22 += go[35];
- double RHS10 = Idr[34];
- RHS10 += Idr[35];
- m_A27 += gt[36];
- m_A27 += gt[37];
- m_A27 += gt[38];
- m_A27 += gt[39];
- m_A26 += go[36];
- m_A28 += go[37];
- double RHS11 = Idr[36];
- RHS11 += Idr[37];
- RHS11 += Idr[38];
- RHS11 += Idr[39];
- RHS11 -= go[38] * *cnV[38];
- RHS11 -= go[39] * *cnV[39];
- m_A31 += gt[40];
- m_A31 += gt[41];
- m_A31 += gt[42];
- m_A31 += gt[43];
- m_A31 += gt[44];
- m_A31 += gt[45];
- m_A29 += go[40];
- m_A33 += go[41];
- m_A32 += go[42];
- double RHS12 = Idr[40];
- RHS12 += Idr[41];
- RHS12 += Idr[42];
- RHS12 += Idr[43];
- RHS12 += Idr[44];
- RHS12 += Idr[45];
- RHS12 -= go[43] * *cnV[43];
- RHS12 -= go[44] * *cnV[44];
- RHS12 -= go[45] * *cnV[45];
- m_A36 += gt[46];
- m_A36 += gt[47];
- m_A34 += go[46];
- double RHS13 = Idr[46];
- RHS13 += Idr[47];
- RHS13 -= go[47] * *cnV[47];
- m_A39 += gt[48];
- m_A39 += gt[49];
- m_A39 += gt[50];
- m_A38 += go[48];
- m_A37 += go[49];
- double RHS14 = Idr[48];
- RHS14 += Idr[49];
- RHS14 += Idr[50];
- RHS14 -= go[50] * *cnV[50];
- m_A41 += gt[51];
- m_A41 += gt[52];
- m_A41 += gt[53];
- m_A41 += gt[54];
- m_A40 += go[51];
- m_A42 += go[52];
- double RHS15 = Idr[51];
- RHS15 += Idr[52];
- RHS15 += Idr[53];
- RHS15 += Idr[54];
- RHS15 -= go[53] * *cnV[53];
- RHS15 -= go[54] * *cnV[54];
- m_A49 += gt[55];
- m_A49 += gt[56];
- m_A49 += gt[57];
- m_A49 += gt[58];
- m_A49 += gt[59];
- m_A44 += go[55];
- m_A47 += go[56];
- m_A46 += go[57];
- m_A43 += go[58];
- m_A45 += go[59];
- double RHS16 = Idr[55];
- RHS16 += Idr[56];
- RHS16 += Idr[57];
- RHS16 += Idr[58];
- RHS16 += Idr[59];
- m_A56 += gt[60];
- m_A56 += gt[61];
- m_A56 += gt[62];
- m_A56 += gt[63];
- m_A54 += go[60];
- m_A53 += go[61];
- m_A51 += go[62];
- m_A52 += go[63];
- double RHS17 = Idr[60];
- RHS17 += Idr[61];
- RHS17 += Idr[62];
- RHS17 += Idr[63];
- const double f0 = 1.0 / m_A0;
- const double f0_11 = -f0 * m_A26;
- m_A28 += m_A1 * f0_11;
- RHS11 += f0_11 * RHS0;
- const double f0_16 = -f0 * m_A43;
- m_A49 += m_A1 * f0_16;
- RHS16 += f0_16 * RHS0;
- const double f1 = 1.0 / m_A2;
- const double f1_16 = -f1 * m_A44;
- m_A49 += m_A3 * f1_16;
- RHS16 += f1_16 * RHS1;
- const double f2 = 1.0 / m_A4;
- const double f2_12 = -f2 * m_A29;
- m_A30 += m_A5 * f2_12;
- RHS12 += f2_12 * RHS2;
- const double f3 = 1.0 / m_A6;
- const double f3_15 = -f3 * m_A40;
- m_A42 += m_A7 * f3_15;
- RHS15 += f3_15 * RHS3;
- const double f3_17 = -f3 * m_A51;
- m_A56 += m_A7 * f3_17;
- RHS17 += f3_17 * RHS3;
- const double f4 = 1.0 / m_A8;
- const double f4_9 = -f4 * m_A19;
- m_A21 += m_A9 * f4_9;
- RHS9 += f4_9 * RHS4;
- const double f5 = 1.0 / m_A10;
- const double f5_10 = -f5 * m_A22;
- m_A24 += m_A11 * f5_10;
- RHS10 += f5_10 * RHS5;
- const double f5_16 = -f5 * m_A45;
- m_A46 += m_A11 * f5_16;
- RHS16 += f5_16 * RHS5;
- const double f6 = 1.0 / m_A12;
- const double f6_10 = -f6 * m_A23;
- m_A24 += m_A13 * f6_10;
- m_A25 += m_A14 * f6_10;
- RHS10 += f6_10 * RHS6;
- const double f6_13 = -f6 * m_A34;
- m_A35 += m_A13 * f6_13;
- m_A36 += m_A14 * f6_13;
- RHS13 += f6_13 * RHS6;
- const double f7 = 1.0 / m_A15;
- const double f7_14 = -f7 * m_A37;
- m_A39 += m_A16 * f7_14;
- RHS14 += f7_14 * RHS7;
- const double f7_17 = -f7 * m_A52;
- m_A54 += m_A16 * f7_17;
- RHS17 += f7_17 * RHS7;
- const double f8 = 1.0 / m_A17;
- const double f8_14 = -f8 * m_A38;
- m_A39 += m_A18 * f8_14;
- RHS14 += f8_14 * RHS8;
- const double f10 = 1.0 / m_A24;
- const double f10_13 = -f10 * m_A35;
- m_A36 += m_A25 * f10_13;
- RHS13 += f10_13 * RHS10;
- const double f10_16 = -f10 * m_A46;
- m_A48 += m_A25 * f10_16;
- RHS16 += f10_16 * RHS10;
- const double f11 = 1.0 / m_A27;
- const double f11_12 = -f11 * m_A30;
- m_A32 += m_A28 * f11_12;
- RHS12 += f11_12 * RHS11;
- const double f12 = 1.0 / m_A31;
- const double f12_16 = -f12 * m_A47;
- m_A49 += m_A32 * f12_16;
- m_A50 += m_A33 * f12_16;
- RHS16 += f12_16 * RHS12;
- const double f12_17 = -f12 * m_A53;
- m_A55 += m_A32 * f12_17;
- m_A56 += m_A33 * f12_17;
- RHS17 += f12_17 * RHS12;
- const double f13 = 1.0 / m_A36;
- const double f13_16 = -f13 * m_A48;
- RHS16 += f13_16 * RHS13;
- const double f14 = 1.0 / m_A39;
- const double f14_17 = -f14 * m_A54;
- RHS17 += f14_17 * RHS14;
- const double f16 = 1.0 / m_A49;
- const double f16_17 = -f16 * m_A55;
- m_A56 += m_A50 * f16_17;
- RHS17 += f16_17 * RHS16;
- V[17] = RHS17 / m_A56;
- double tmp16 = 0.0;
- tmp16 += m_A50 * V[17];
- V[16] = (RHS16 - tmp16) / m_A49;
- double tmp15 = 0.0;
- tmp15 += m_A42 * V[17];
- V[15] = (RHS15 - tmp15) / m_A41;
- double tmp14 = 0.0;
- V[14] = (RHS14 - tmp14) / m_A39;
- double tmp13 = 0.0;
- V[13] = (RHS13 - tmp13) / m_A36;
- double tmp12 = 0.0;
- tmp12 += m_A32 * V[16];
- tmp12 += m_A33 * V[17];
- V[12] = (RHS12 - tmp12) / m_A31;
- double tmp11 = 0.0;
- tmp11 += m_A28 * V[16];
- V[11] = (RHS11 - tmp11) / m_A27;
- double tmp10 = 0.0;
- tmp10 += m_A25 * V[13];
- V[10] = (RHS10 - tmp10) / m_A24;
- double tmp9 = 0.0;
- tmp9 += m_A21 * V[15];
- V[9] = (RHS9 - tmp9) / m_A20;
- double tmp8 = 0.0;
- tmp8 += m_A18 * V[14];
- V[8] = (RHS8 - tmp8) / m_A17;
- double tmp7 = 0.0;
- tmp7 += m_A16 * V[14];
- V[7] = (RHS7 - tmp7) / m_A15;
- double tmp6 = 0.0;
- tmp6 += m_A13 * V[10];
- tmp6 += m_A14 * V[13];
- V[6] = (RHS6 - tmp6) / m_A12;
- double tmp5 = 0.0;
- tmp5 += m_A11 * V[10];
- V[5] = (RHS5 - tmp5) / m_A10;
- double tmp4 = 0.0;
- tmp4 += m_A9 * V[15];
- V[4] = (RHS4 - tmp4) / m_A8;
- double tmp3 = 0.0;
- tmp3 += m_A7 * V[17];
- V[3] = (RHS3 - tmp3) / m_A6;
- double tmp2 = 0.0;
- tmp2 += m_A5 * V[11];
- V[2] = (RHS2 - tmp2) / m_A4;
- double tmp1 = 0.0;
- tmp1 += m_A3 * V[16];
- V[1] = (RHS1 - tmp1) / m_A2;
- double tmp0 = 0.0;
- tmp0 += m_A1 * V[16];
- V[0] = (RHS0 - tmp0) / m_A0;
-}
-
// 280zzzap
static void nl_gcr_95_double_double_24643c159711f292(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
@@ -6698,107 +3972,6 @@ static void nl_gcr_67_double_double_ee2cacaa15d32491(double * __restrict V, cons
V[0] = (RHS0 - tmp0) / m_A0;
}
-// astrob,rebound
-static void nl_gcr_13_double_double_a41a44bd5c424f88(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
-
-{
-
- plib::unused_var(cnV);
- double m_A0(0.0);
- double m_A1(0.0);
- double m_A2(0.0);
- double m_A3(0.0);
- double m_A4(0.0);
- double m_A5(0.0);
- double m_A6(0.0);
- double m_A7(0.0);
- double m_A8(0.0);
- double m_A9(0.0);
- double m_A10(0.0);
- double m_A11(0.0);
- double m_A12(0.0);
- m_A0 += gt[0];
- m_A0 += gt[1];
- m_A0 += gt[2];
- m_A1 += go[0];
- double RHS0 = Idr[0];
- RHS0 += Idr[1];
- RHS0 += Idr[2];
- RHS0 -= go[1] * *cnV[1];
- RHS0 -= go[2] * *cnV[2];
- m_A2 += gt[3];
- m_A2 += gt[4];
- m_A2 += gt[5];
- m_A3 += go[3];
- double RHS1 = Idr[3];
- RHS1 += Idr[4];
- RHS1 += Idr[5];
- RHS1 -= go[4] * *cnV[4];
- RHS1 -= go[5] * *cnV[5];
- m_A4 += gt[6];
- m_A4 += gt[7];
- m_A4 += gt[8];
- m_A5 += go[6];
- double RHS2 = Idr[6];
- RHS2 += Idr[7];
- RHS2 += Idr[8];
- RHS2 -= go[7] * *cnV[7];
- RHS2 -= go[8] * *cnV[8];
- m_A6 += gt[9];
- m_A6 += gt[10];
- m_A6 += gt[11];
- m_A7 += go[9];
- double RHS3 = Idr[9];
- RHS3 += Idr[10];
- RHS3 += Idr[11];
- RHS3 -= go[10] * *cnV[10];
- RHS3 -= go[11] * *cnV[11];
- m_A12 += gt[12];
- m_A12 += gt[13];
- m_A12 += gt[14];
- m_A12 += gt[15];
- m_A12 += gt[16];
- m_A11 += go[12];
- m_A10 += go[13];
- m_A9 += go[14];
- m_A8 += go[15];
- double RHS4 = Idr[12];
- RHS4 += Idr[13];
- RHS4 += Idr[14];
- RHS4 += Idr[15];
- RHS4 += Idr[16];
- RHS4 -= go[16] * *cnV[16];
- const double f0 = 1.0 / m_A0;
- const double f0_4 = -f0 * m_A8;
- m_A12 += m_A1 * f0_4;
- RHS4 += f0_4 * RHS0;
- const double f1 = 1.0 / m_A2;
- const double f1_4 = -f1 * m_A9;
- m_A12 += m_A3 * f1_4;
- RHS4 += f1_4 * RHS1;
- const double f2 = 1.0 / m_A4;
- const double f2_4 = -f2 * m_A10;
- m_A12 += m_A5 * f2_4;
- RHS4 += f2_4 * RHS2;
- const double f3 = 1.0 / m_A6;
- const double f3_4 = -f3 * m_A11;
- m_A12 += m_A7 * f3_4;
- RHS4 += f3_4 * RHS3;
- V[4] = RHS4 / m_A12;
- double tmp3 = 0.0;
- tmp3 += m_A7 * V[4];
- V[3] = (RHS3 - tmp3) / m_A6;
- double tmp2 = 0.0;
- tmp2 += m_A5 * V[4];
- V[2] = (RHS2 - tmp2) / m_A4;
- double tmp1 = 0.0;
- tmp1 += m_A3 * V[4];
- V[1] = (RHS1 - tmp1) / m_A2;
- double tmp0 = 0.0;
- tmp0 += m_A1 * V[4];
- V[0] = (RHS0 - tmp0) / m_A0;
-}
-
// astrob
static void nl_gcr_154_double_double_13833bf8c127deaa(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
@@ -18473,60 +15646,6 @@ static void nl_gcr_77_double_double_437326911721091(double * __restrict V, const
V[0] = (RHS0 - tmp0) / m_A0;
}
-// brdrline,stuntcyc
-static void nl_gcr_7_double_double_59cb6bf7cb9d17dc(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
-
-{
-
- plib::unused_var(cnV);
- double m_A0(0.0);
- double m_A1(0.0);
- double m_A2(0.0);
- double m_A3(0.0);
- double m_A4(0.0);
- double m_A5(0.0);
- double m_A6(0.0);
- m_A0 += gt[0];
- m_A0 += gt[1];
- m_A1 += go[0];
- double RHS0 = Idr[0];
- RHS0 += Idr[1];
- RHS0 -= go[1] * *cnV[1];
- m_A2 += gt[2];
- m_A2 += gt[3];
- m_A3 += go[2];
- double RHS1 = Idr[2];
- RHS1 += Idr[3];
- RHS1 -= go[3] * *cnV[3];
- m_A6 += gt[4];
- m_A6 += gt[5];
- m_A6 += gt[6];
- m_A6 += gt[7];
- m_A5 += go[4];
- m_A4 += go[5];
- double RHS2 = Idr[4];
- RHS2 += Idr[5];
- RHS2 += Idr[6];
- RHS2 += Idr[7];
- RHS2 -= go[6] * *cnV[6];
- RHS2 -= go[7] * *cnV[7];
- const double f0 = 1.0 / m_A0;
- const double f0_2 = -f0 * m_A4;
- m_A6 += m_A1 * f0_2;
- RHS2 += f0_2 * RHS0;
- const double f1 = 1.0 / m_A2;
- const double f1_2 = -f1 * m_A5;
- m_A6 += m_A3 * f1_2;
- RHS2 += f1_2 * RHS1;
- V[2] = RHS2 / m_A6;
- double tmp1 = 0.0;
- tmp1 += m_A3 * V[2];
- V[1] = (RHS1 - tmp1) / m_A2;
- double tmp0 = 0.0;
- tmp0 += m_A1 * V[2];
- V[0] = (RHS0 - tmp0) / m_A0;
-}
-
// brdrline
static void nl_gcr_83_double_double_f99b1245e708ec85(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
@@ -26154,6 +23273,1582 @@ static void nl_gcr_399_double_double_4334c95878d1be92(double * __restrict V, con
V[0] = (RHS0 - tmp0) / m_A0;
}
+// dribling
+static void nl_gcr_21_double_double_c9b5f1625a51d98f(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ double m_A7(0.0);
+ double m_A8(0.0);
+ double m_A9(0.0);
+ double m_A10(0.0);
+ double m_A11(0.0);
+ double m_A12(0.0);
+ double m_A13(0.0);
+ double m_A14(0.0);
+ double m_A15(0.0);
+ double m_A16(0.0);
+ double m_A17(0.0);
+ double m_A18(0.0);
+ double m_A19(0.0);
+ double m_A20(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A0 += gt[2];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 += Idr[2];
+ RHS0 -= go[1] * *cnV[1];
+ RHS0 -= go[2] * *cnV[2];
+ m_A2 += gt[3];
+ m_A2 += gt[4];
+ m_A2 += gt[5];
+ m_A2 += gt[6];
+ m_A2 += gt[7];
+ m_A2 += gt[8];
+ m_A4 += go[3];
+ m_A3 += go[4];
+ m_A3 += go[5];
+ double RHS1 = Idr[3];
+ RHS1 += Idr[4];
+ RHS1 += Idr[5];
+ RHS1 += Idr[6];
+ RHS1 += Idr[7];
+ RHS1 += Idr[8];
+ RHS1 -= go[6] * *cnV[6];
+ RHS1 -= go[7] * *cnV[7];
+ RHS1 -= go[8] * *cnV[8];
+ m_A5 += gt[9];
+ m_A5 += gt[10];
+ m_A5 += gt[11];
+ m_A5 += gt[12];
+ m_A6 += go[9];
+ double RHS2 = Idr[9];
+ RHS2 += Idr[10];
+ RHS2 += Idr[11];
+ RHS2 += Idr[12];
+ RHS2 -= go[10] * *cnV[10];
+ RHS2 -= go[11] * *cnV[11];
+ RHS2 -= go[12] * *cnV[12];
+ m_A7 += gt[13];
+ m_A7 += gt[14];
+ m_A8 += go[13];
+ double RHS3 = Idr[13];
+ RHS3 += Idr[14];
+ RHS3 -= go[14] * *cnV[14];
+ m_A11 += gt[15];
+ m_A11 += gt[16];
+ m_A11 += gt[17];
+ m_A11 += gt[18];
+ m_A11 += gt[19];
+ m_A9 += go[15];
+ m_A10 += go[16];
+ m_A10 += go[17];
+ double RHS4 = Idr[15];
+ RHS4 += Idr[16];
+ RHS4 += Idr[17];
+ RHS4 += Idr[18];
+ RHS4 += Idr[19];
+ RHS4 -= go[18] * *cnV[18];
+ RHS4 -= go[19] * *cnV[19];
+ m_A15 += gt[20];
+ m_A15 += gt[21];
+ m_A16 += go[20];
+ m_A13 += go[21];
+ double RHS5 = Idr[20];
+ RHS5 += Idr[21];
+ m_A20 += gt[22];
+ m_A20 += gt[23];
+ m_A20 += gt[24];
+ m_A20 += gt[25];
+ m_A20 += gt[26];
+ m_A20 += gt[27];
+ m_A18 += go[22];
+ m_A19 += go[23];
+ m_A17 += go[24];
+ double RHS6 = Idr[22];
+ RHS6 += Idr[23];
+ RHS6 += Idr[24];
+ RHS6 += Idr[25];
+ RHS6 += Idr[26];
+ RHS6 += Idr[27];
+ RHS6 -= go[25] * *cnV[25];
+ RHS6 -= go[26] * *cnV[26];
+ RHS6 -= go[27] * *cnV[27];
+ const double f0 = 1.0 / m_A0;
+ const double f0_4 = -f0 * m_A9;
+ m_A11 += m_A1 * f0_4;
+ RHS4 += f0_4 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_4 = -f1 * m_A10;
+ m_A11 += m_A3 * f1_4;
+ m_A12 += m_A4 * f1_4;
+ RHS4 += f1_4 * RHS1;
+ const double f1_5 = -f1 * m_A13;
+ m_A14 += m_A3 * f1_5;
+ m_A15 += m_A4 * f1_5;
+ RHS5 += f1_5 * RHS1;
+ const double f2 = 1.0 / m_A5;
+ const double f2_6 = -f2 * m_A17;
+ m_A20 += m_A6 * f2_6;
+ RHS6 += f2_6 * RHS2;
+ const double f3 = 1.0 / m_A7;
+ const double f3_6 = -f3 * m_A18;
+ m_A20 += m_A8 * f3_6;
+ RHS6 += f3_6 * RHS3;
+ const double f4 = 1.0 / m_A11;
+ const double f4_5 = -f4 * m_A14;
+ m_A15 += m_A12 * f4_5;
+ RHS5 += f4_5 * RHS4;
+ const double f5 = 1.0 / m_A15;
+ const double f5_6 = -f5 * m_A19;
+ m_A20 += m_A16 * f5_6;
+ RHS6 += f5_6 * RHS5;
+ V[6] = RHS6 / m_A20;
+ double tmp5 = 0.0;
+ tmp5 += m_A16 * V[6];
+ V[5] = (RHS5 - tmp5) / m_A15;
+ double tmp4 = 0.0;
+ tmp4 += m_A12 * V[5];
+ V[4] = (RHS4 - tmp4) / m_A11;
+ double tmp3 = 0.0;
+ tmp3 += m_A8 * V[6];
+ V[3] = (RHS3 - tmp3) / m_A7;
+ double tmp2 = 0.0;
+ tmp2 += m_A6 * V[6];
+ V[2] = (RHS2 - tmp2) / m_A5;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[4];
+ tmp1 += m_A4 * V[5];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[4];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
+// dribling
+static void nl_gcr_28_double_double_99f81817ea8bea2d(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ double m_A7(0.0);
+ double m_A8(0.0);
+ double m_A9(0.0);
+ double m_A10(0.0);
+ double m_A11(0.0);
+ double m_A12(0.0);
+ double m_A13(0.0);
+ double m_A14(0.0);
+ double m_A15(0.0);
+ double m_A16(0.0);
+ double m_A17(0.0);
+ double m_A18(0.0);
+ double m_A19(0.0);
+ double m_A20(0.0);
+ double m_A21(0.0);
+ double m_A22(0.0);
+ double m_A23(0.0);
+ double m_A24(0.0);
+ double m_A25(0.0);
+ double m_A26(0.0);
+ double m_A27(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A0 += gt[2];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 += Idr[2];
+ RHS0 -= go[1] * *cnV[1];
+ RHS0 -= go[2] * *cnV[2];
+ m_A2 += gt[3];
+ m_A2 += gt[4];
+ m_A2 += gt[5];
+ m_A3 += go[3];
+ double RHS1 = Idr[3];
+ RHS1 += Idr[4];
+ RHS1 += Idr[5];
+ RHS1 -= go[4] * *cnV[4];
+ RHS1 -= go[5] * *cnV[5];
+ m_A4 += gt[6];
+ m_A4 += gt[7];
+ m_A4 += gt[8];
+ m_A5 += go[6];
+ double RHS2 = Idr[6];
+ RHS2 += Idr[7];
+ RHS2 += Idr[8];
+ RHS2 -= go[7] * *cnV[7];
+ RHS2 -= go[8] * *cnV[8];
+ m_A7 += gt[9];
+ m_A7 += gt[10];
+ m_A7 += gt[11];
+ m_A7 += gt[12];
+ m_A7 += gt[13];
+ m_A7 += gt[14];
+ m_A7 += gt[15];
+ m_A6 += go[9];
+ m_A8 += go[10];
+ double RHS3 = Idr[9];
+ RHS3 += Idr[10];
+ RHS3 += Idr[11];
+ RHS3 += Idr[12];
+ RHS3 += Idr[13];
+ RHS3 += Idr[14];
+ RHS3 += Idr[15];
+ RHS3 -= go[11] * *cnV[11];
+ RHS3 -= go[12] * *cnV[12];
+ RHS3 -= go[13] * *cnV[13];
+ RHS3 -= go[14] * *cnV[14];
+ RHS3 -= go[15] * *cnV[15];
+ m_A9 += gt[16];
+ m_A9 += gt[17];
+ m_A9 += gt[18];
+ m_A10 += go[16];
+ double RHS4 = Idr[16];
+ RHS4 += Idr[17];
+ RHS4 += Idr[18];
+ RHS4 -= go[17] * *cnV[17];
+ RHS4 -= go[18] * *cnV[18];
+ m_A11 += gt[19];
+ m_A11 += gt[20];
+ m_A12 += go[19];
+ double RHS5 = Idr[19];
+ RHS5 += Idr[20];
+ RHS5 -= go[20] * *cnV[20];
+ m_A14 += gt[21];
+ m_A14 += gt[22];
+ m_A14 += gt[23];
+ m_A13 += go[21];
+ m_A15 += go[22];
+ m_A16 += go[23];
+ double RHS6 = Idr[21];
+ RHS6 += Idr[22];
+ RHS6 += Idr[23];
+ m_A19 += gt[24];
+ m_A19 += gt[25];
+ m_A19 += gt[26];
+ m_A19 += gt[27];
+ m_A19 += gt[28];
+ m_A19 += gt[29];
+ m_A17 += go[24];
+ m_A18 += go[25];
+ m_A20 += go[26];
+ double RHS7 = Idr[24];
+ RHS7 += Idr[25];
+ RHS7 += Idr[26];
+ RHS7 += Idr[27];
+ RHS7 += Idr[28];
+ RHS7 += Idr[29];
+ RHS7 -= go[27] * *cnV[27];
+ RHS7 -= go[28] * *cnV[28];
+ RHS7 -= go[29] * *cnV[29];
+ m_A27 += gt[30];
+ m_A27 += gt[31];
+ m_A27 += gt[32];
+ m_A27 += gt[33];
+ m_A27 += gt[34];
+ m_A27 += gt[35];
+ m_A27 += gt[36];
+ m_A24 += go[30];
+ m_A25 += go[31];
+ m_A26 += go[32];
+ m_A23 += go[33];
+ m_A22 += go[34];
+ m_A21 += go[35];
+ double RHS8 = Idr[30];
+ RHS8 += Idr[31];
+ RHS8 += Idr[32];
+ RHS8 += Idr[33];
+ RHS8 += Idr[34];
+ RHS8 += Idr[35];
+ RHS8 += Idr[36];
+ RHS8 -= go[36] * *cnV[36];
+ const double f0 = 1.0 / m_A0;
+ const double f0_8 = -f0 * m_A21;
+ m_A27 += m_A1 * f0_8;
+ RHS8 += f0_8 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_8 = -f1 * m_A22;
+ m_A27 += m_A3 * f1_8;
+ RHS8 += f1_8 * RHS1;
+ const double f2 = 1.0 / m_A4;
+ const double f2_3 = -f2 * m_A6;
+ m_A8 += m_A5 * f2_3;
+ RHS3 += f2_3 * RHS2;
+ const double f2_6 = -f2 * m_A13;
+ m_A14 += m_A5 * f2_6;
+ RHS6 += f2_6 * RHS2;
+ const double f3 = 1.0 / m_A7;
+ const double f3_7 = -f3 * m_A17;
+ m_A18 += m_A8 * f3_7;
+ RHS7 += f3_7 * RHS3;
+ const double f4 = 1.0 / m_A9;
+ const double f4_8 = -f4 * m_A23;
+ m_A27 += m_A10 * f4_8;
+ RHS8 += f4_8 * RHS4;
+ const double f5 = 1.0 / m_A11;
+ const double f5_8 = -f5 * m_A24;
+ m_A27 += m_A12 * f5_8;
+ RHS8 += f5_8 * RHS5;
+ const double f6 = 1.0 / m_A14;
+ const double f6_7 = -f6 * m_A18;
+ m_A19 += m_A15 * f6_7;
+ m_A20 += m_A16 * f6_7;
+ RHS7 += f6_7 * RHS6;
+ const double f6_8 = -f6 * m_A25;
+ m_A26 += m_A15 * f6_8;
+ m_A27 += m_A16 * f6_8;
+ RHS8 += f6_8 * RHS6;
+ const double f7 = 1.0 / m_A19;
+ const double f7_8 = -f7 * m_A26;
+ m_A27 += m_A20 * f7_8;
+ RHS8 += f7_8 * RHS7;
+ V[8] = RHS8 / m_A27;
+ double tmp7 = 0.0;
+ tmp7 += m_A20 * V[8];
+ V[7] = (RHS7 - tmp7) / m_A19;
+ double tmp6 = 0.0;
+ tmp6 += m_A15 * V[7];
+ tmp6 += m_A16 * V[8];
+ V[6] = (RHS6 - tmp6) / m_A14;
+ double tmp5 = 0.0;
+ tmp5 += m_A12 * V[8];
+ V[5] = (RHS5 - tmp5) / m_A11;
+ double tmp4 = 0.0;
+ tmp4 += m_A10 * V[8];
+ V[4] = (RHS4 - tmp4) / m_A9;
+ double tmp3 = 0.0;
+ tmp3 += m_A8 * V[6];
+ V[3] = (RHS3 - tmp3) / m_A7;
+ double tmp2 = 0.0;
+ tmp2 += m_A5 * V[6];
+ V[2] = (RHS2 - tmp2) / m_A4;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[8];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[8];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
+// dribling
+static void nl_gcr_29_double_double_1e732268bc2d78b2(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ double m_A7(0.0);
+ double m_A8(0.0);
+ double m_A9(0.0);
+ double m_A10(0.0);
+ double m_A11(0.0);
+ double m_A12(0.0);
+ double m_A13(0.0);
+ double m_A14(0.0);
+ double m_A15(0.0);
+ double m_A16(0.0);
+ double m_A17(0.0);
+ double m_A18(0.0);
+ double m_A19(0.0);
+ double m_A20(0.0);
+ double m_A21(0.0);
+ double m_A22(0.0);
+ double m_A23(0.0);
+ double m_A24(0.0);
+ double m_A25(0.0);
+ double m_A26(0.0);
+ double m_A27(0.0);
+ double m_A28(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A0 += gt[2];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 += Idr[2];
+ RHS0 -= go[1] * *cnV[1];
+ RHS0 -= go[2] * *cnV[2];
+ m_A2 += gt[3];
+ m_A2 += gt[4];
+ m_A2 += gt[5];
+ m_A2 += gt[6];
+ m_A2 += gt[7];
+ m_A2 += gt[8];
+ m_A4 += go[3];
+ m_A3 += go[4];
+ m_A3 += go[5];
+ double RHS1 = Idr[3];
+ RHS1 += Idr[4];
+ RHS1 += Idr[5];
+ RHS1 += Idr[6];
+ RHS1 += Idr[7];
+ RHS1 += Idr[8];
+ RHS1 -= go[6] * *cnV[6];
+ RHS1 -= go[7] * *cnV[7];
+ RHS1 -= go[8] * *cnV[8];
+ m_A5 += gt[9];
+ m_A5 += gt[10];
+ m_A5 += gt[11];
+ m_A5 += gt[12];
+ m_A6 += go[9];
+ double RHS2 = Idr[9];
+ RHS2 += Idr[10];
+ RHS2 += Idr[11];
+ RHS2 += Idr[12];
+ RHS2 -= go[10] * *cnV[10];
+ RHS2 -= go[11] * *cnV[11];
+ RHS2 -= go[12] * *cnV[12];
+ m_A7 += gt[13];
+ m_A7 += gt[14];
+ m_A7 += gt[15];
+ m_A7 += gt[16];
+ m_A8 += go[13];
+ m_A9 += go[14];
+ m_A9 += go[15];
+ double RHS3 = Idr[13];
+ RHS3 += Idr[14];
+ RHS3 += Idr[15];
+ RHS3 += Idr[16];
+ RHS3 -= go[16] * *cnV[16];
+ m_A10 += gt[17];
+ m_A10 += gt[18];
+ m_A11 += go[17];
+ double RHS4 = Idr[17];
+ RHS4 += Idr[18];
+ RHS4 -= go[18] * *cnV[18];
+ m_A14 += gt[19];
+ m_A14 += gt[20];
+ m_A14 += gt[21];
+ m_A14 += gt[22];
+ m_A14 += gt[23];
+ m_A12 += go[19];
+ m_A13 += go[20];
+ m_A13 += go[21];
+ double RHS5 = Idr[19];
+ RHS5 += Idr[20];
+ RHS5 += Idr[21];
+ RHS5 += Idr[22];
+ RHS5 += Idr[23];
+ RHS5 -= go[22] * *cnV[22];
+ RHS5 -= go[23] * *cnV[23];
+ m_A18 += gt[24];
+ m_A18 += gt[25];
+ m_A19 += go[24];
+ m_A16 += go[25];
+ double RHS6 = Idr[24];
+ RHS6 += Idr[25];
+ m_A22 += gt[26];
+ m_A22 += gt[27];
+ m_A21 += go[26];
+ m_A20 += go[27];
+ double RHS7 = Idr[26];
+ RHS7 += Idr[27];
+ m_A28 += gt[28];
+ m_A28 += gt[29];
+ m_A28 += gt[30];
+ m_A28 += gt[31];
+ m_A28 += gt[32];
+ m_A28 += gt[33];
+ m_A28 += gt[34];
+ m_A28 += gt[35];
+ m_A28 += gt[36];
+ m_A28 += gt[37];
+ m_A25 += go[28];
+ m_A25 += go[29];
+ m_A28 += go[30];
+ m_A28 += go[31];
+ m_A28 += go[32];
+ m_A28 += go[33];
+ m_A26 += go[34];
+ m_A24 += go[35];
+ double RHS8 = Idr[28];
+ RHS8 += Idr[29];
+ RHS8 += Idr[30];
+ RHS8 += Idr[31];
+ RHS8 += Idr[32];
+ RHS8 += Idr[33];
+ RHS8 += Idr[34];
+ RHS8 += Idr[35];
+ RHS8 += Idr[36];
+ RHS8 += Idr[37];
+ RHS8 -= go[36] * *cnV[36];
+ RHS8 -= go[37] * *cnV[37];
+ const double f0 = 1.0 / m_A0;
+ const double f0_5 = -f0 * m_A12;
+ m_A14 += m_A1 * f0_5;
+ RHS5 += f0_5 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_5 = -f1 * m_A13;
+ m_A14 += m_A3 * f1_5;
+ m_A15 += m_A4 * f1_5;
+ RHS5 += f1_5 * RHS1;
+ const double f1_6 = -f1 * m_A16;
+ m_A17 += m_A3 * f1_6;
+ m_A18 += m_A4 * f1_6;
+ RHS6 += f1_6 * RHS1;
+ const double f2 = 1.0 / m_A5;
+ const double f2_8 = -f2 * m_A24;
+ m_A28 += m_A6 * f2_8;
+ RHS8 += f2_8 * RHS2;
+ const double f3 = 1.0 / m_A7;
+ const double f3_7 = -f3 * m_A20;
+ m_A22 += m_A8 * f3_7;
+ m_A23 += m_A9 * f3_7;
+ RHS7 += f3_7 * RHS3;
+ const double f3_8 = -f3 * m_A25;
+ m_A27 += m_A8 * f3_8;
+ m_A28 += m_A9 * f3_8;
+ RHS8 += f3_8 * RHS3;
+ const double f4 = 1.0 / m_A10;
+ const double f4_7 = -f4 * m_A21;
+ m_A22 += m_A11 * f4_7;
+ RHS7 += f4_7 * RHS4;
+ const double f5 = 1.0 / m_A14;
+ const double f5_6 = -f5 * m_A17;
+ m_A18 += m_A15 * f5_6;
+ RHS6 += f5_6 * RHS5;
+ const double f6 = 1.0 / m_A18;
+ const double f6_8 = -f6 * m_A26;
+ m_A28 += m_A19 * f6_8;
+ RHS8 += f6_8 * RHS6;
+ const double f7 = 1.0 / m_A22;
+ const double f7_8 = -f7 * m_A27;
+ m_A28 += m_A23 * f7_8;
+ RHS8 += f7_8 * RHS7;
+ V[8] = RHS8 / m_A28;
+ double tmp7 = 0.0;
+ tmp7 += m_A23 * V[8];
+ V[7] = (RHS7 - tmp7) / m_A22;
+ double tmp6 = 0.0;
+ tmp6 += m_A19 * V[8];
+ V[6] = (RHS6 - tmp6) / m_A18;
+ double tmp5 = 0.0;
+ tmp5 += m_A15 * V[6];
+ V[5] = (RHS5 - tmp5) / m_A14;
+ double tmp4 = 0.0;
+ tmp4 += m_A11 * V[7];
+ V[4] = (RHS4 - tmp4) / m_A10;
+ double tmp3 = 0.0;
+ tmp3 += m_A8 * V[7];
+ tmp3 += m_A9 * V[8];
+ V[3] = (RHS3 - tmp3) / m_A7;
+ double tmp2 = 0.0;
+ tmp2 += m_A6 * V[8];
+ V[2] = (RHS2 - tmp2) / m_A5;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[5];
+ tmp1 += m_A4 * V[6];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[5];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
+// dribling
+static void nl_gcr_54_double_double_a2823a76b83c45a0(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ double m_A7(0.0);
+ double m_A8(0.0);
+ double m_A9(0.0);
+ double m_A10(0.0);
+ double m_A11(0.0);
+ double m_A12(0.0);
+ double m_A13(0.0);
+ double m_A14(0.0);
+ double m_A15(0.0);
+ double m_A16(0.0);
+ double m_A17(0.0);
+ double m_A18(0.0);
+ double m_A19(0.0);
+ double m_A20(0.0);
+ double m_A21(0.0);
+ double m_A22(0.0);
+ double m_A23(0.0);
+ double m_A24(0.0);
+ double m_A25(0.0);
+ double m_A26(0.0);
+ double m_A27(0.0);
+ double m_A28(0.0);
+ double m_A29(0.0);
+ double m_A30(0.0);
+ double m_A31(0.0);
+ double m_A32(0.0);
+ double m_A33(0.0);
+ double m_A34(0.0);
+ double m_A35(0.0);
+ double m_A36(0.0);
+ double m_A37(0.0);
+ double m_A38(0.0);
+ double m_A39(0.0);
+ double m_A40(0.0);
+ double m_A41(0.0);
+ double m_A42(0.0);
+ double m_A43(0.0);
+ double m_A44(0.0);
+ double m_A45(0.0);
+ double m_A46(0.0);
+ double m_A47(0.0);
+ double m_A48(0.0);
+ double m_A49(0.0);
+ double m_A50(0.0);
+ double m_A51(0.0);
+ double m_A52(0.0);
+ double m_A53(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A0 += gt[2];
+ m_A0 += gt[3];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 += Idr[2];
+ RHS0 += Idr[3];
+ RHS0 -= go[1] * *cnV[1];
+ RHS0 -= go[2] * *cnV[2];
+ RHS0 -= go[3] * *cnV[3];
+ m_A2 += gt[4];
+ m_A2 += gt[5];
+ m_A2 += gt[6];
+ m_A4 += go[4];
+ m_A3 += go[5];
+ double RHS1 = Idr[4];
+ RHS1 += Idr[5];
+ RHS1 += Idr[6];
+ RHS1 -= go[6] * *cnV[6];
+ m_A5 += gt[7];
+ m_A5 += gt[8];
+ m_A5 += gt[9];
+ m_A5 += gt[10];
+ m_A6 += go[7];
+ m_A7 += go[8];
+ m_A7 += go[9];
+ double RHS2 = Idr[7];
+ RHS2 += Idr[8];
+ RHS2 += Idr[9];
+ RHS2 += Idr[10];
+ RHS2 -= go[10] * *cnV[10];
+ m_A8 += gt[11];
+ m_A8 += gt[12];
+ m_A10 += go[11];
+ m_A9 += go[12];
+ double RHS3 = Idr[11];
+ RHS3 += Idr[12];
+ m_A11 += gt[13];
+ m_A11 += gt[14];
+ m_A11 += gt[15];
+ m_A11 += gt[16];
+ m_A11 += gt[17];
+ m_A13 += go[13];
+ m_A12 += go[14];
+ m_A12 += go[15];
+ double RHS4 = Idr[13];
+ RHS4 += Idr[14];
+ RHS4 += Idr[15];
+ RHS4 += Idr[16];
+ RHS4 += Idr[17];
+ RHS4 -= go[16] * *cnV[16];
+ RHS4 -= go[17] * *cnV[17];
+ m_A14 += gt[18];
+ m_A14 += gt[19];
+ m_A15 += go[18];
+ double RHS5 = Idr[18];
+ RHS5 += Idr[19];
+ RHS5 -= go[19] * *cnV[19];
+ m_A17 += gt[20];
+ m_A17 += gt[21];
+ m_A17 += gt[22];
+ m_A19 += go[20];
+ m_A18 += go[21];
+ m_A16 += go[22];
+ double RHS6 = Idr[20];
+ RHS6 += Idr[21];
+ RHS6 += Idr[22];
+ m_A22 += gt[23];
+ m_A22 += gt[24];
+ m_A22 += gt[25];
+ m_A22 += gt[26];
+ m_A22 += gt[27];
+ m_A22 += gt[28];
+ m_A22 += gt[29];
+ m_A21 += go[23];
+ m_A20 += go[24];
+ m_A25 += go[25];
+ m_A25 += go[26];
+ m_A25 += go[27];
+ m_A24 += go[28];
+ double RHS7 = Idr[23];
+ RHS7 += Idr[24];
+ RHS7 += Idr[25];
+ RHS7 += Idr[26];
+ RHS7 += Idr[27];
+ RHS7 += Idr[28];
+ RHS7 += Idr[29];
+ RHS7 -= go[29] * *cnV[29];
+ m_A29 += gt[30];
+ m_A29 += gt[31];
+ m_A29 += gt[32];
+ m_A29 += gt[33];
+ m_A29 += gt[34];
+ m_A29 += gt[35];
+ m_A29 += gt[36];
+ m_A32 += go[30];
+ m_A32 += go[31];
+ m_A27 += go[32];
+ m_A27 += go[33];
+ m_A26 += go[34];
+ double RHS8 = Idr[30];
+ RHS8 += Idr[31];
+ RHS8 += Idr[32];
+ RHS8 += Idr[33];
+ RHS8 += Idr[34];
+ RHS8 += Idr[35];
+ RHS8 += Idr[36];
+ RHS8 -= go[35] * *cnV[35];
+ RHS8 -= go[36] * *cnV[36];
+ m_A37 += gt[37];
+ m_A37 += gt[38];
+ m_A37 += gt[39];
+ m_A35 += go[37];
+ m_A33 += go[38];
+ m_A34 += go[39];
+ double RHS9 = Idr[37];
+ RHS9 += Idr[38];
+ RHS9 += Idr[39];
+ m_A46 += gt[40];
+ m_A46 += gt[41];
+ m_A46 += gt[42];
+ m_A46 += gt[43];
+ m_A46 += gt[44];
+ m_A46 += gt[45];
+ m_A46 += gt[46];
+ m_A41 += go[40];
+ m_A41 += go[41];
+ m_A43 += go[42];
+ m_A43 += go[43];
+ m_A43 += go[44];
+ m_A40 += go[45];
+ m_A42 += go[46];
+ double RHS10 = Idr[40];
+ RHS10 += Idr[41];
+ RHS10 += Idr[42];
+ RHS10 += Idr[43];
+ RHS10 += Idr[44];
+ RHS10 += Idr[45];
+ RHS10 += Idr[46];
+ m_A53 += gt[47];
+ m_A53 += gt[48];
+ m_A53 += gt[49];
+ m_A53 += gt[50];
+ m_A53 += gt[51];
+ m_A49 += go[47];
+ m_A48 += go[48];
+ m_A50 += go[49];
+ m_A50 += go[50];
+ double RHS11 = Idr[47];
+ RHS11 += Idr[48];
+ RHS11 += Idr[49];
+ RHS11 += Idr[50];
+ RHS11 += Idr[51];
+ RHS11 -= go[51] * *cnV[51];
+ const double f0 = 1.0 / m_A0;
+ const double f0_6 = -f0 * m_A16;
+ m_A17 += m_A1 * f0_6;
+ RHS6 += f0_6 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_9 = -f1 * m_A33;
+ m_A37 += m_A3 * f1_9;
+ m_A38 += m_A4 * f1_9;
+ RHS9 += f1_9 * RHS1;
+ const double f1_10 = -f1 * m_A40;
+ m_A45 += m_A3 * f1_10;
+ m_A46 += m_A4 * f1_10;
+ RHS10 += f1_10 * RHS1;
+ const double f2 = 1.0 / m_A5;
+ const double f2_7 = -f2 * m_A20;
+ m_A22 += m_A6 * f2_7;
+ m_A25 += m_A7 * f2_7;
+ RHS7 += f2_7 * RHS2;
+ const double f2_10 = -f2 * m_A41;
+ m_A43 += m_A6 * f2_10;
+ m_A46 += m_A7 * f2_10;
+ RHS10 += f2_10 * RHS2;
+ const double f3 = 1.0 / m_A8;
+ const double f3_7 = -f3 * m_A21;
+ m_A22 += m_A9 * f3_7;
+ m_A23 += m_A10 * f3_7;
+ RHS7 += f3_7 * RHS3;
+ const double f3_8 = -f3 * m_A26;
+ m_A28 += m_A9 * f3_8;
+ m_A29 += m_A10 * f3_8;
+ RHS8 += f3_8 * RHS3;
+ const double f4 = 1.0 / m_A11;
+ const double f4_8 = -f4 * m_A27;
+ m_A29 += m_A12 * f4_8;
+ m_A32 += m_A13 * f4_8;
+ RHS8 += f4_8 * RHS4;
+ const double f4_11 = -f4 * m_A48;
+ m_A50 += m_A12 * f4_11;
+ m_A53 += m_A13 * f4_11;
+ RHS11 += f4_11 * RHS4;
+ const double f5 = 1.0 / m_A14;
+ const double f5_11 = -f5 * m_A49;
+ m_A53 += m_A15 * f5_11;
+ RHS11 += f5_11 * RHS5;
+ const double f6 = 1.0 / m_A17;
+ const double f6_9 = -f6 * m_A34;
+ m_A37 += m_A18 * f6_9;
+ m_A38 += m_A19 * f6_9;
+ RHS9 += f6_9 * RHS6;
+ const double f6_10 = -f6 * m_A42;
+ m_A45 += m_A18 * f6_10;
+ m_A46 += m_A19 * f6_10;
+ RHS10 += f6_10 * RHS6;
+ const double f7 = 1.0 / m_A22;
+ const double f7_8 = -f7 * m_A28;
+ m_A29 += m_A23 * f7_8;
+ m_A30 += m_A24 * f7_8;
+ m_A31 += m_A25 * f7_8;
+ RHS8 += f7_8 * RHS7;
+ const double f7_9 = -f7 * m_A35;
+ m_A36 += m_A23 * f7_9;
+ m_A37 += m_A24 * f7_9;
+ m_A38 += m_A25 * f7_9;
+ RHS9 += f7_9 * RHS7;
+ const double f7_10 = -f7 * m_A43;
+ m_A44 += m_A23 * f7_10;
+ m_A45 += m_A24 * f7_10;
+ m_A46 += m_A25 * f7_10;
+ RHS10 += f7_10 * RHS7;
+ const double f8 = 1.0 / m_A29;
+ const double f8_9 = -f8 * m_A36;
+ m_A37 += m_A30 * f8_9;
+ m_A38 += m_A31 * f8_9;
+ m_A39 += m_A32 * f8_9;
+ RHS9 += f8_9 * RHS8;
+ const double f8_10 = -f8 * m_A44;
+ m_A45 += m_A30 * f8_10;
+ m_A46 += m_A31 * f8_10;
+ m_A47 += m_A32 * f8_10;
+ RHS10 += f8_10 * RHS8;
+ const double f8_11 = -f8 * m_A50;
+ m_A51 += m_A30 * f8_11;
+ m_A52 += m_A31 * f8_11;
+ m_A53 += m_A32 * f8_11;
+ RHS11 += f8_11 * RHS8;
+ const double f9 = 1.0 / m_A37;
+ const double f9_10 = -f9 * m_A45;
+ m_A46 += m_A38 * f9_10;
+ m_A47 += m_A39 * f9_10;
+ RHS10 += f9_10 * RHS9;
+ const double f9_11 = -f9 * m_A51;
+ m_A52 += m_A38 * f9_11;
+ m_A53 += m_A39 * f9_11;
+ RHS11 += f9_11 * RHS9;
+ const double f10 = 1.0 / m_A46;
+ const double f10_11 = -f10 * m_A52;
+ m_A53 += m_A47 * f10_11;
+ RHS11 += f10_11 * RHS10;
+ V[11] = RHS11 / m_A53;
+ double tmp10 = 0.0;
+ tmp10 += m_A47 * V[11];
+ V[10] = (RHS10 - tmp10) / m_A46;
+ double tmp9 = 0.0;
+ tmp9 += m_A38 * V[10];
+ tmp9 += m_A39 * V[11];
+ V[9] = (RHS9 - tmp9) / m_A37;
+ double tmp8 = 0.0;
+ tmp8 += m_A30 * V[9];
+ tmp8 += m_A31 * V[10];
+ tmp8 += m_A32 * V[11];
+ V[8] = (RHS8 - tmp8) / m_A29;
+ double tmp7 = 0.0;
+ tmp7 += m_A23 * V[8];
+ tmp7 += m_A24 * V[9];
+ tmp7 += m_A25 * V[10];
+ V[7] = (RHS7 - tmp7) / m_A22;
+ double tmp6 = 0.0;
+ tmp6 += m_A18 * V[9];
+ tmp6 += m_A19 * V[10];
+ V[6] = (RHS6 - tmp6) / m_A17;
+ double tmp5 = 0.0;
+ tmp5 += m_A15 * V[11];
+ V[5] = (RHS5 - tmp5) / m_A14;
+ double tmp4 = 0.0;
+ tmp4 += m_A12 * V[8];
+ tmp4 += m_A13 * V[11];
+ V[4] = (RHS4 - tmp4) / m_A11;
+ double tmp3 = 0.0;
+ tmp3 += m_A9 * V[7];
+ tmp3 += m_A10 * V[8];
+ V[3] = (RHS3 - tmp3) / m_A8;
+ double tmp2 = 0.0;
+ tmp2 += m_A6 * V[7];
+ tmp2 += m_A7 * V[10];
+ V[2] = (RHS2 - tmp2) / m_A5;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[9];
+ tmp1 += m_A4 * V[10];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[6];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
+// dribling
+static void nl_gcr_7_double_double_a1ecff4d37b54b76(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A0 += gt[2];
+ m_A0 += gt[3];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 += Idr[2];
+ RHS0 += Idr[3];
+ RHS0 -= go[1] * *cnV[1];
+ RHS0 -= go[2] * *cnV[2];
+ RHS0 -= go[3] * *cnV[3];
+ m_A2 += gt[4];
+ m_A2 += gt[5];
+ m_A2 += gt[6];
+ m_A3 += go[4];
+ double RHS1 = Idr[4];
+ RHS1 += Idr[5];
+ RHS1 += Idr[6];
+ RHS1 -= go[5] * *cnV[5];
+ RHS1 -= go[6] * *cnV[6];
+ m_A6 += gt[7];
+ m_A6 += gt[8];
+ m_A6 += gt[9];
+ m_A5 += go[7];
+ m_A4 += go[8];
+ double RHS2 = Idr[7];
+ RHS2 += Idr[8];
+ RHS2 += Idr[9];
+ RHS2 -= go[9] * *cnV[9];
+ const double f0 = 1.0 / m_A0;
+ const double f0_2 = -f0 * m_A4;
+ m_A6 += m_A1 * f0_2;
+ RHS2 += f0_2 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_2 = -f1 * m_A5;
+ m_A6 += m_A3 * f1_2;
+ RHS2 += f1_2 * RHS1;
+ V[2] = RHS2 / m_A6;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[2];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[2];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
+// dribling
+static void nl_gcr_95_double_double_a0159c41cfc0b644(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ double m_A7(0.0);
+ double m_A8(0.0);
+ double m_A9(0.0);
+ double m_A10(0.0);
+ double m_A11(0.0);
+ double m_A12(0.0);
+ double m_A13(0.0);
+ double m_A14(0.0);
+ double m_A15(0.0);
+ double m_A16(0.0);
+ double m_A17(0.0);
+ double m_A18(0.0);
+ double m_A19(0.0);
+ double m_A20(0.0);
+ double m_A21(0.0);
+ double m_A22(0.0);
+ double m_A23(0.0);
+ double m_A24(0.0);
+ double m_A25(0.0);
+ double m_A26(0.0);
+ double m_A27(0.0);
+ double m_A28(0.0);
+ double m_A29(0.0);
+ double m_A30(0.0);
+ double m_A31(0.0);
+ double m_A32(0.0);
+ double m_A33(0.0);
+ double m_A34(0.0);
+ double m_A35(0.0);
+ double m_A36(0.0);
+ double m_A37(0.0);
+ double m_A38(0.0);
+ double m_A39(0.0);
+ double m_A40(0.0);
+ double m_A41(0.0);
+ double m_A42(0.0);
+ double m_A43(0.0);
+ double m_A44(0.0);
+ double m_A45(0.0);
+ double m_A46(0.0);
+ double m_A47(0.0);
+ double m_A48(0.0);
+ double m_A49(0.0);
+ double m_A50(0.0);
+ double m_A51(0.0);
+ double m_A52(0.0);
+ double m_A53(0.0);
+ double m_A54(0.0);
+ double m_A55(0.0);
+ double m_A56(0.0);
+ double m_A57(0.0);
+ double m_A58(0.0);
+ double m_A59(0.0);
+ double m_A60(0.0);
+ double m_A61(0.0);
+ double m_A62(0.0);
+ double m_A63(0.0);
+ double m_A64(0.0);
+ double m_A65(0.0);
+ double m_A66(0.0);
+ double m_A67(0.0);
+ double m_A68(0.0);
+ double m_A69(0.0);
+ double m_A70(0.0);
+ double m_A71(0.0);
+ double m_A72(0.0);
+ double m_A73(0.0);
+ double m_A74(0.0);
+ double m_A75(0.0);
+ double m_A76(0.0);
+ double m_A77(0.0);
+ double m_A78(0.0);
+ double m_A79(0.0);
+ double m_A80(0.0);
+ double m_A81(0.0);
+ double m_A82(0.0);
+ double m_A83(0.0);
+ double m_A84(0.0);
+ double m_A85(0.0);
+ double m_A86(0.0);
+ double m_A87(0.0);
+ double m_A88(0.0);
+ double m_A89(0.0);
+ double m_A90(0.0);
+ double m_A91(0.0);
+ double m_A92(0.0);
+ double m_A93(0.0);
+ double m_A94(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 -= go[1] * *cnV[1];
+ m_A2 += gt[2];
+ m_A2 += gt[3];
+ m_A3 += go[2];
+ double RHS1 = Idr[2];
+ RHS1 += Idr[3];
+ RHS1 -= go[3] * *cnV[3];
+ m_A4 += gt[4];
+ m_A4 += gt[5];
+ m_A5 += go[4];
+ double RHS2 = Idr[4];
+ RHS2 += Idr[5];
+ RHS2 -= go[5] * *cnV[5];
+ m_A6 += gt[6];
+ m_A6 += gt[7];
+ m_A7 += go[6];
+ double RHS3 = Idr[6];
+ RHS3 += Idr[7];
+ RHS3 -= go[7] * *cnV[7];
+ m_A8 += gt[8];
+ m_A8 += gt[9];
+ m_A9 += go[8];
+ double RHS4 = Idr[8];
+ RHS4 += Idr[9];
+ RHS4 -= go[9] * *cnV[9];
+ m_A10 += gt[10];
+ m_A10 += gt[11];
+ m_A11 += go[10];
+ double RHS5 = Idr[10];
+ RHS5 += Idr[11];
+ RHS5 -= go[11] * *cnV[11];
+ m_A12 += gt[12];
+ m_A12 += gt[13];
+ m_A12 += gt[14];
+ m_A13 += go[12];
+ double RHS6 = Idr[12];
+ RHS6 += Idr[13];
+ RHS6 += Idr[14];
+ RHS6 -= go[13] * *cnV[13];
+ RHS6 -= go[14] * *cnV[14];
+ m_A14 += gt[15];
+ m_A14 += gt[16];
+ m_A14 += gt[17];
+ m_A14 += gt[18];
+ m_A15 += go[15];
+ double RHS7 = Idr[15];
+ RHS7 += Idr[16];
+ RHS7 += Idr[17];
+ RHS7 += Idr[18];
+ RHS7 -= go[16] * *cnV[16];
+ RHS7 -= go[17] * *cnV[17];
+ RHS7 -= go[18] * *cnV[18];
+ m_A16 += gt[19];
+ m_A16 += gt[20];
+ m_A18 += go[19];
+ m_A17 += go[20];
+ double RHS8 = Idr[19];
+ RHS8 += Idr[20];
+ m_A19 += gt[21];
+ m_A19 += gt[22];
+ m_A21 += go[21];
+ m_A20 += go[22];
+ double RHS9 = Idr[21];
+ RHS9 += Idr[22];
+ m_A22 += gt[23];
+ m_A22 += gt[24];
+ m_A24 += go[23];
+ m_A23 += go[24];
+ double RHS10 = Idr[23];
+ RHS10 += Idr[24];
+ m_A25 += gt[25];
+ m_A25 += gt[26];
+ m_A27 += go[25];
+ m_A26 += go[26];
+ double RHS11 = Idr[25];
+ RHS11 += Idr[26];
+ m_A28 += gt[27];
+ m_A28 += gt[28];
+ m_A28 += gt[29];
+ m_A30 += go[27];
+ m_A29 += go[28];
+ m_A31 += go[29];
+ double RHS12 = Idr[27];
+ RHS12 += Idr[28];
+ RHS12 += Idr[29];
+ m_A32 += gt[30];
+ m_A32 += gt[31];
+ m_A34 += go[30];
+ m_A33 += go[31];
+ double RHS13 = Idr[30];
+ RHS13 += Idr[31];
+ m_A36 += gt[32];
+ m_A36 += gt[33];
+ m_A37 += go[32];
+ m_A35 += go[33];
+ double RHS14 = Idr[32];
+ RHS14 += Idr[33];
+ m_A39 += gt[34];
+ m_A39 += gt[35];
+ m_A40 += go[34];
+ m_A38 += go[35];
+ double RHS15 = Idr[34];
+ RHS15 += Idr[35];
+ m_A43 += gt[36];
+ m_A43 += gt[37];
+ m_A42 += go[36];
+ m_A41 += go[37];
+ double RHS16 = Idr[36];
+ RHS16 += Idr[37];
+ m_A47 += gt[38];
+ m_A47 += gt[39];
+ m_A46 += go[38];
+ m_A45 += go[39];
+ double RHS17 = Idr[38];
+ RHS17 += Idr[39];
+ m_A51 += gt[40];
+ m_A51 += gt[41];
+ m_A50 += go[40];
+ m_A49 += go[41];
+ double RHS18 = Idr[40];
+ RHS18 += Idr[41];
+ m_A55 += gt[42];
+ m_A55 += gt[43];
+ m_A54 += go[42];
+ m_A53 += go[43];
+ double RHS19 = Idr[42];
+ RHS19 += Idr[43];
+ m_A58 += gt[44];
+ m_A58 += gt[45];
+ m_A58 += gt[46];
+ m_A59 += go[44];
+ m_A57 += go[45];
+ double RHS20 = Idr[44];
+ RHS20 += Idr[45];
+ RHS20 += Idr[46];
+ RHS20 -= go[46] * *cnV[46];
+ m_A62 += gt[47];
+ m_A62 += gt[48];
+ m_A62 += gt[49];
+ m_A62 += gt[50];
+ m_A62 += gt[51];
+ m_A63 += go[47];
+ m_A63 += go[48];
+ m_A61 += go[49];
+ double RHS21 = Idr[47];
+ RHS21 += Idr[48];
+ RHS21 += Idr[49];
+ RHS21 += Idr[50];
+ RHS21 += Idr[51];
+ RHS21 -= go[50] * *cnV[50];
+ RHS21 -= go[51] * *cnV[51];
+ m_A66 += gt[52];
+ m_A66 += gt[53];
+ m_A65 += go[52];
+ m_A64 += go[53];
+ double RHS22 = Idr[52];
+ RHS22 += Idr[53];
+ m_A70 += gt[54];
+ m_A70 += gt[55];
+ m_A70 += gt[56];
+ m_A70 += gt[57];
+ m_A70 += gt[58];
+ m_A70 += go[54];
+ m_A69 += go[55];
+ m_A69 += go[56];
+ m_A68 += go[57];
+ double RHS23 = Idr[54];
+ RHS23 += Idr[55];
+ RHS23 += Idr[56];
+ RHS23 += Idr[57];
+ RHS23 += Idr[58];
+ RHS23 -= go[58] * *cnV[58];
+ m_A75 += gt[59];
+ m_A75 += gt[60];
+ m_A75 += gt[61];
+ m_A72 += go[59];
+ m_A76 += go[60];
+ double RHS24 = Idr[59];
+ RHS24 += Idr[60];
+ RHS24 += Idr[61];
+ RHS24 -= go[61] * *cnV[61];
+ m_A78 += gt[62];
+ m_A78 += gt[63];
+ m_A79 += go[62];
+ m_A77 += go[63];
+ double RHS25 = Idr[62];
+ RHS25 += Idr[63];
+ m_A94 += gt[64];
+ m_A94 += gt[65];
+ m_A94 += gt[66];
+ m_A94 += gt[67];
+ m_A94 += gt[68];
+ m_A94 += gt[69];
+ m_A94 += gt[70];
+ m_A94 += gt[71];
+ m_A94 += gt[72];
+ m_A94 += gt[73];
+ m_A94 += gt[74];
+ m_A92 += go[64];
+ m_A90 += go[65];
+ m_A90 += go[66];
+ m_A93 += go[67];
+ m_A84 += go[68];
+ m_A83 += go[69];
+ m_A82 += go[70];
+ m_A81 += go[71];
+ m_A80 += go[72];
+ m_A85 += go[73];
+ double RHS26 = Idr[64];
+ RHS26 += Idr[65];
+ RHS26 += Idr[66];
+ RHS26 += Idr[67];
+ RHS26 += Idr[68];
+ RHS26 += Idr[69];
+ RHS26 += Idr[70];
+ RHS26 += Idr[71];
+ RHS26 += Idr[72];
+ RHS26 += Idr[73];
+ RHS26 += Idr[74];
+ RHS26 -= go[74] * *cnV[74];
+ const double f0 = 1.0 / m_A0;
+ const double f0_16 = -f0 * m_A41;
+ m_A43 += m_A1 * f0_16;
+ RHS16 += f0_16 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_17 = -f1 * m_A45;
+ m_A47 += m_A3 * f1_17;
+ RHS17 += f1_17 * RHS1;
+ const double f2 = 1.0 / m_A4;
+ const double f2_18 = -f2 * m_A49;
+ m_A51 += m_A5 * f2_18;
+ RHS18 += f2_18 * RHS2;
+ const double f3 = 1.0 / m_A6;
+ const double f3_19 = -f3 * m_A53;
+ m_A55 += m_A7 * f3_19;
+ RHS19 += f3_19 * RHS3;
+ const double f4 = 1.0 / m_A8;
+ const double f4_22 = -f4 * m_A64;
+ m_A66 += m_A9 * f4_22;
+ RHS22 += f4_22 * RHS4;
+ const double f5 = 1.0 / m_A10;
+ const double f5_14 = -f5 * m_A35;
+ m_A36 += m_A11 * f5_14;
+ RHS14 += f5_14 * RHS5;
+ const double f6 = 1.0 / m_A12;
+ const double f6_15 = -f6 * m_A38;
+ m_A39 += m_A13 * f6_15;
+ RHS15 += f6_15 * RHS6;
+ const double f7 = 1.0 / m_A14;
+ const double f7_21 = -f7 * m_A61;
+ m_A62 += m_A15 * f7_21;
+ RHS21 += f7_21 * RHS7;
+ const double f8 = 1.0 / m_A16;
+ const double f8_16 = -f8 * m_A42;
+ m_A43 += m_A17 * f8_16;
+ m_A44 += m_A18 * f8_16;
+ RHS16 += f8_16 * RHS8;
+ const double f8_26 = -f8 * m_A80;
+ m_A86 += m_A17 * f8_26;
+ m_A94 += m_A18 * f8_26;
+ RHS26 += f8_26 * RHS8;
+ const double f9 = 1.0 / m_A19;
+ const double f9_17 = -f9 * m_A46;
+ m_A47 += m_A20 * f9_17;
+ m_A48 += m_A21 * f9_17;
+ RHS17 += f9_17 * RHS9;
+ const double f9_26 = -f9 * m_A81;
+ m_A87 += m_A20 * f9_26;
+ m_A94 += m_A21 * f9_26;
+ RHS26 += f9_26 * RHS9;
+ const double f10 = 1.0 / m_A22;
+ const double f10_18 = -f10 * m_A50;
+ m_A51 += m_A23 * f10_18;
+ m_A52 += m_A24 * f10_18;
+ RHS18 += f10_18 * RHS10;
+ const double f10_26 = -f10 * m_A82;
+ m_A88 += m_A23 * f10_26;
+ m_A94 += m_A24 * f10_26;
+ RHS26 += f10_26 * RHS10;
+ const double f11 = 1.0 / m_A25;
+ const double f11_19 = -f11 * m_A54;
+ m_A55 += m_A26 * f11_19;
+ m_A56 += m_A27 * f11_19;
+ RHS19 += f11_19 * RHS11;
+ const double f11_26 = -f11 * m_A83;
+ m_A89 += m_A26 * f11_26;
+ m_A94 += m_A27 * f11_26;
+ RHS26 += f11_26 * RHS11;
+ const double f12 = 1.0 / m_A28;
+ const double f12_20 = -f12 * m_A57;
+ m_A58 += m_A29 * f12_20;
+ m_A59 += m_A30 * f12_20;
+ m_A60 += m_A31 * f12_20;
+ RHS20 += f12_20 * RHS12;
+ const double f12_23 = -f12 * m_A68;
+ m_A69 += m_A29 * f12_23;
+ m_A70 += m_A30 * f12_23;
+ m_A71 += m_A31 * f12_23;
+ RHS23 += f12_23 * RHS12;
+ const double f12_24 = -f12 * m_A72;
+ m_A73 += m_A29 * f12_24;
+ m_A74 += m_A30 * f12_24;
+ m_A75 += m_A31 * f12_24;
+ RHS24 += f12_24 * RHS12;
+ const double f13 = 1.0 / m_A32;
+ const double f13_22 = -f13 * m_A65;
+ m_A66 += m_A33 * f13_22;
+ m_A67 += m_A34 * f13_22;
+ RHS22 += f13_22 * RHS13;
+ const double f13_26 = -f13 * m_A84;
+ m_A91 += m_A33 * f13_26;
+ m_A94 += m_A34 * f13_26;
+ RHS26 += f13_26 * RHS13;
+ const double f14 = 1.0 / m_A36;
+ const double f14_25 = -f14 * m_A77;
+ m_A78 += m_A37 * f14_25;
+ RHS25 += f14_25 * RHS14;
+ const double f15 = 1.0 / m_A39;
+ const double f15_26 = -f15 * m_A85;
+ m_A94 += m_A40 * f15_26;
+ RHS26 += f15_26 * RHS15;
+ const double f16 = 1.0 / m_A43;
+ const double f16_26 = -f16 * m_A86;
+ m_A94 += m_A44 * f16_26;
+ RHS26 += f16_26 * RHS16;
+ const double f17 = 1.0 / m_A47;
+ const double f17_26 = -f17 * m_A87;
+ m_A94 += m_A48 * f17_26;
+ RHS26 += f17_26 * RHS17;
+ const double f18 = 1.0 / m_A51;
+ const double f18_26 = -f18 * m_A88;
+ m_A94 += m_A52 * f18_26;
+ RHS26 += f18_26 * RHS18;
+ const double f19 = 1.0 / m_A55;
+ const double f19_26 = -f19 * m_A89;
+ m_A94 += m_A56 * f19_26;
+ RHS26 += f19_26 * RHS19;
+ const double f20 = 1.0 / m_A58;
+ const double f20_23 = -f20 * m_A69;
+ m_A70 += m_A59 * f20_23;
+ m_A71 += m_A60 * f20_23;
+ RHS23 += f20_23 * RHS20;
+ const double f20_24 = -f20 * m_A73;
+ m_A74 += m_A59 * f20_24;
+ m_A75 += m_A60 * f20_24;
+ RHS24 += f20_24 * RHS20;
+ const double f21 = 1.0 / m_A62;
+ const double f21_26 = -f21 * m_A90;
+ m_A94 += m_A63 * f21_26;
+ RHS26 += f21_26 * RHS21;
+ const double f22 = 1.0 / m_A66;
+ const double f22_26 = -f22 * m_A91;
+ m_A94 += m_A67 * f22_26;
+ RHS26 += f22_26 * RHS22;
+ const double f23 = 1.0 / m_A70;
+ const double f23_24 = -f23 * m_A74;
+ m_A75 += m_A71 * f23_24;
+ RHS24 += f23_24 * RHS23;
+ const double f24 = 1.0 / m_A75;
+ const double f24_26 = -f24 * m_A92;
+ m_A94 += m_A76 * f24_26;
+ RHS26 += f24_26 * RHS24;
+ const double f25 = 1.0 / m_A78;
+ const double f25_26 = -f25 * m_A93;
+ m_A94 += m_A79 * f25_26;
+ RHS26 += f25_26 * RHS25;
+ V[26] = RHS26 / m_A94;
+ double tmp25 = 0.0;
+ tmp25 += m_A79 * V[26];
+ V[25] = (RHS25 - tmp25) / m_A78;
+ double tmp24 = 0.0;
+ tmp24 += m_A76 * V[26];
+ V[24] = (RHS24 - tmp24) / m_A75;
+ double tmp23 = 0.0;
+ tmp23 += m_A71 * V[24];
+ V[23] = (RHS23 - tmp23) / m_A70;
+ double tmp22 = 0.0;
+ tmp22 += m_A67 * V[26];
+ V[22] = (RHS22 - tmp22) / m_A66;
+ double tmp21 = 0.0;
+ tmp21 += m_A63 * V[26];
+ V[21] = (RHS21 - tmp21) / m_A62;
+ double tmp20 = 0.0;
+ tmp20 += m_A59 * V[23];
+ tmp20 += m_A60 * V[24];
+ V[20] = (RHS20 - tmp20) / m_A58;
+ double tmp19 = 0.0;
+ tmp19 += m_A56 * V[26];
+ V[19] = (RHS19 - tmp19) / m_A55;
+ double tmp18 = 0.0;
+ tmp18 += m_A52 * V[26];
+ V[18] = (RHS18 - tmp18) / m_A51;
+ double tmp17 = 0.0;
+ tmp17 += m_A48 * V[26];
+ V[17] = (RHS17 - tmp17) / m_A47;
+ double tmp16 = 0.0;
+ tmp16 += m_A44 * V[26];
+ V[16] = (RHS16 - tmp16) / m_A43;
+ double tmp15 = 0.0;
+ tmp15 += m_A40 * V[26];
+ V[15] = (RHS15 - tmp15) / m_A39;
+ double tmp14 = 0.0;
+ tmp14 += m_A37 * V[25];
+ V[14] = (RHS14 - tmp14) / m_A36;
+ double tmp13 = 0.0;
+ tmp13 += m_A33 * V[22];
+ tmp13 += m_A34 * V[26];
+ V[13] = (RHS13 - tmp13) / m_A32;
+ double tmp12 = 0.0;
+ tmp12 += m_A29 * V[20];
+ tmp12 += m_A30 * V[23];
+ tmp12 += m_A31 * V[24];
+ V[12] = (RHS12 - tmp12) / m_A28;
+ double tmp11 = 0.0;
+ tmp11 += m_A26 * V[19];
+ tmp11 += m_A27 * V[26];
+ V[11] = (RHS11 - tmp11) / m_A25;
+ double tmp10 = 0.0;
+ tmp10 += m_A23 * V[18];
+ tmp10 += m_A24 * V[26];
+ V[10] = (RHS10 - tmp10) / m_A22;
+ double tmp9 = 0.0;
+ tmp9 += m_A20 * V[17];
+ tmp9 += m_A21 * V[26];
+ V[9] = (RHS9 - tmp9) / m_A19;
+ double tmp8 = 0.0;
+ tmp8 += m_A17 * V[16];
+ tmp8 += m_A18 * V[26];
+ V[8] = (RHS8 - tmp8) / m_A16;
+ double tmp7 = 0.0;
+ tmp7 += m_A15 * V[21];
+ V[7] = (RHS7 - tmp7) / m_A14;
+ double tmp6 = 0.0;
+ tmp6 += m_A13 * V[15];
+ V[6] = (RHS6 - tmp6) / m_A12;
+ double tmp5 = 0.0;
+ tmp5 += m_A11 * V[14];
+ V[5] = (RHS5 - tmp5) / m_A10;
+ double tmp4 = 0.0;
+ tmp4 += m_A9 * V[22];
+ V[4] = (RHS4 - tmp4) / m_A8;
+ double tmp3 = 0.0;
+ tmp3 += m_A7 * V[19];
+ V[3] = (RHS3 - tmp3) / m_A6;
+ double tmp2 = 0.0;
+ tmp2 += m_A5 * V[18];
+ V[2] = (RHS2 - tmp2) / m_A4;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[17];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[16];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
// elim,zektor
static void nl_gcr_10_double_double_11c2ae166b240b6e(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
@@ -28709,57 +27404,6 @@ static void nl_gcr_45_double_double_28b736fe552777a9(double * __restrict V, cons
V[0] = (RHS0 - tmp0) / m_A0;
}
-// elim,zektor
-static void nl_gcr_7_double_double_d190a0e3b8e1f4a7(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
-
-{
-
- plib::unused_var(cnV);
- double m_A0(0.0);
- double m_A1(0.0);
- double m_A2(0.0);
- double m_A3(0.0);
- double m_A4(0.0);
- double m_A5(0.0);
- double m_A6(0.0);
- m_A0 += gt[0];
- m_A0 += gt[1];
- m_A1 += go[0];
- double RHS0 = Idr[0];
- RHS0 += Idr[1];
- RHS0 -= go[1] * *cnV[1];
- m_A2 += gt[2];
- m_A2 += gt[3];
- m_A3 += go[2];
- double RHS1 = Idr[2];
- RHS1 += Idr[3];
- RHS1 -= go[3] * *cnV[3];
- m_A6 += gt[4];
- m_A6 += gt[5];
- m_A6 += gt[6];
- m_A5 += go[4];
- m_A4 += go[5];
- double RHS2 = Idr[4];
- RHS2 += Idr[5];
- RHS2 += Idr[6];
- RHS2 -= go[6] * *cnV[6];
- const double f0 = 1.0 / m_A0;
- const double f0_2 = -f0 * m_A4;
- m_A6 += m_A1 * f0_2;
- RHS2 += f0_2 * RHS0;
- const double f1 = 1.0 / m_A2;
- const double f1_2 = -f1 * m_A5;
- m_A6 += m_A3 * f1_2;
- RHS2 += f1_2 * RHS1;
- V[2] = RHS2 / m_A6;
- double tmp1 = 0.0;
- tmp1 += m_A3 * V[2];
- V[1] = (RHS1 - tmp1) / m_A2;
- double tmp0 = 0.0;
- tmp0 += m_A1 * V[2];
- V[0] = (RHS0 - tmp0) / m_A0;
-}
-
// fireone
static void nl_gcr_128_double_double_7aee4423e3fdbfda(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
@@ -33183,63 +31827,6 @@ static void nl_gcr_79_double_double_c1d22fe6e895255d(double * __restrict V, cons
V[0] = (RHS0 - tmp0) / m_A0;
}
-// fireone,astrob,rebound,speedfrk,cheekyms
-static void nl_gcr_7_double_double_7c86a9bc1c6aef4c(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
-
-{
-
- plib::unused_var(cnV);
- double m_A0(0.0);
- double m_A1(0.0);
- double m_A2(0.0);
- double m_A3(0.0);
- double m_A4(0.0);
- double m_A5(0.0);
- double m_A6(0.0);
- m_A0 += gt[0];
- m_A0 += gt[1];
- m_A0 += gt[2];
- m_A1 += go[0];
- double RHS0 = Idr[0];
- RHS0 += Idr[1];
- RHS0 += Idr[2];
- RHS0 -= go[1] * *cnV[1];
- RHS0 -= go[2] * *cnV[2];
- m_A2 += gt[3];
- m_A2 += gt[4];
- m_A3 += go[3];
- double RHS1 = Idr[3];
- RHS1 += Idr[4];
- RHS1 -= go[4] * *cnV[4];
- m_A6 += gt[5];
- m_A6 += gt[6];
- m_A6 += gt[7];
- m_A6 += gt[8];
- m_A5 += go[5];
- m_A4 += go[6];
- double RHS2 = Idr[5];
- RHS2 += Idr[6];
- RHS2 += Idr[7];
- RHS2 += Idr[8];
- RHS2 -= go[7] * *cnV[7];
- RHS2 -= go[8] * *cnV[8];
- const double f0 = 1.0 / m_A0;
- const double f0_2 = -f0 * m_A4;
- m_A6 += m_A1 * f0_2;
- RHS2 += f0_2 * RHS0;
- const double f1 = 1.0 / m_A2;
- const double f1_2 = -f1 * m_A5;
- m_A6 += m_A3 * f1_2;
- RHS2 += f1_2 * RHS1;
- V[2] = RHS2 / m_A6;
- double tmp1 = 0.0;
- tmp1 += m_A3 * V[2];
- V[1] = (RHS1 - tmp1) / m_A2;
- double tmp0 = 0.0;
- tmp0 += m_A1 * V[2];
- V[0] = (RHS0 - tmp0) / m_A0;
-}
-
// fireone
static void nl_gcr_7_double_double_e7fb484f621b3ab9(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
@@ -38153,8 +36740,163 @@ static void nl_gcr_7_double_double_782d79b5cbe953b1(double * __restrict V, const
V[0] = (RHS0 - tmp0) / m_A0;
}
+// gi6809
+static void nl_gcr_13_double_double_9eda6de0d275a3e5(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ double m_A7(0.0);
+ double m_A8(0.0);
+ double m_A9(0.0);
+ double m_A10(0.0);
+ double m_A11(0.0);
+ double m_A12(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A0 += gt[2];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 += Idr[2];
+ RHS0 -= go[1] * *cnV[1];
+ RHS0 -= go[2] * *cnV[2];
+ m_A2 += gt[3];
+ m_A2 += gt[4];
+ m_A2 += gt[5];
+ m_A2 += gt[6];
+ m_A3 += go[3];
+ double RHS1 = Idr[3];
+ RHS1 += Idr[4];
+ RHS1 += Idr[5];
+ RHS1 += Idr[6];
+ RHS1 -= go[4] * *cnV[4];
+ RHS1 -= go[5] * *cnV[5];
+ RHS1 -= go[6] * *cnV[6];
+ m_A4 += gt[7];
+ m_A4 += gt[8];
+ m_A4 += gt[9];
+ m_A4 += gt[10];
+ m_A5 += go[7];
+ double RHS2 = Idr[7];
+ RHS2 += Idr[8];
+ RHS2 += Idr[9];
+ RHS2 += Idr[10];
+ RHS2 -= go[8] * *cnV[8];
+ RHS2 -= go[9] * *cnV[9];
+ RHS2 -= go[10] * *cnV[10];
+ m_A6 += gt[11];
+ m_A6 += gt[12];
+ m_A7 += go[11];
+ double RHS3 = Idr[11];
+ RHS3 += Idr[12];
+ RHS3 -= go[12] * *cnV[12];
+ m_A12 += gt[13];
+ m_A12 += gt[14];
+ m_A12 += gt[15];
+ m_A12 += gt[16];
+ m_A12 += gt[17];
+ m_A12 += gt[18];
+ m_A11 += go[13];
+ m_A10 += go[14];
+ m_A9 += go[15];
+ m_A8 += go[16];
+ double RHS4 = Idr[13];
+ RHS4 += Idr[14];
+ RHS4 += Idr[15];
+ RHS4 += Idr[16];
+ RHS4 += Idr[17];
+ RHS4 += Idr[18];
+ RHS4 -= go[17] * *cnV[17];
+ RHS4 -= go[18] * *cnV[18];
+ const double f0 = 1.0 / m_A0;
+ const double f0_4 = -f0 * m_A8;
+ m_A12 += m_A1 * f0_4;
+ RHS4 += f0_4 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_4 = -f1 * m_A9;
+ m_A12 += m_A3 * f1_4;
+ RHS4 += f1_4 * RHS1;
+ const double f2 = 1.0 / m_A4;
+ const double f2_4 = -f2 * m_A10;
+ m_A12 += m_A5 * f2_4;
+ RHS4 += f2_4 * RHS2;
+ const double f3 = 1.0 / m_A6;
+ const double f3_4 = -f3 * m_A11;
+ m_A12 += m_A7 * f3_4;
+ RHS4 += f3_4 * RHS3;
+ V[4] = RHS4 / m_A12;
+ double tmp3 = 0.0;
+ tmp3 += m_A7 * V[4];
+ V[3] = (RHS3 - tmp3) / m_A6;
+ double tmp2 = 0.0;
+ tmp2 += m_A5 * V[4];
+ V[2] = (RHS2 - tmp2) / m_A4;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[4];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[4];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
+// gi6809
+static void nl_gcr_7_double_double_8a409a18e77784cb(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 -= go[1] * *cnV[1];
+ m_A2 += gt[2];
+ m_A2 += gt[3];
+ m_A3 += go[2];
+ double RHS1 = Idr[2];
+ RHS1 += Idr[3];
+ RHS1 -= go[3] * *cnV[3];
+ m_A6 += gt[4];
+ m_A6 += gt[5];
+ m_A5 += go[4];
+ m_A4 += go[5];
+ double RHS2 = Idr[4];
+ RHS2 += Idr[5];
+ const double f0 = 1.0 / m_A0;
+ const double f0_2 = -f0 * m_A4;
+ m_A6 += m_A1 * f0_2;
+ RHS2 += f0_2 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_2 = -f1 * m_A5;
+ m_A6 += m_A3 * f1_2;
+ RHS2 += f1_2 * RHS1;
+ V[2] = RHS2 / m_A6;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[2];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[2];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
// gtrak10
-static void nl_gcr_43_double_double_4c46fdf7c0037727(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+static void nl_gcr_22_double_double_1f38df4919cdddae(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
{
@@ -38181,27 +36923,6 @@ static void nl_gcr_43_double_double_4c46fdf7c0037727(double * __restrict V, cons
double m_A19(0.0);
double m_A20(0.0);
double m_A21(0.0);
- double m_A22(0.0);
- double m_A23(0.0);
- double m_A24(0.0);
- double m_A25(0.0);
- double m_A26(0.0);
- double m_A27(0.0);
- double m_A28(0.0);
- double m_A29(0.0);
- double m_A30(0.0);
- double m_A31(0.0);
- double m_A32(0.0);
- double m_A33(0.0);
- double m_A34(0.0);
- double m_A35(0.0);
- double m_A36(0.0);
- double m_A37(0.0);
- double m_A38(0.0);
- double m_A39(0.0);
- double m_A40(0.0);
- double m_A41(0.0);
- double m_A42(0.0);
m_A0 += gt[0];
m_A0 += gt[1];
m_A0 += gt[2];
@@ -38221,262 +36942,159 @@ static void nl_gcr_43_double_double_4c46fdf7c0037727(double * __restrict V, cons
RHS1 -= go[4] * *cnV[4];
RHS1 -= go[5] * *cnV[5];
m_A4 += gt[6];
- m_A4 += gt[7];
- m_A4 += gt[8];
m_A5 += go[6];
double RHS2 = Idr[6];
- RHS2 += Idr[7];
- RHS2 += Idr[8];
- RHS2 -= go[7] * *cnV[7];
- RHS2 -= go[8] * *cnV[8];
- m_A6 += gt[9];
- m_A6 += gt[10];
- m_A6 += gt[11];
- m_A7 += go[9];
- double RHS3 = Idr[9];
- RHS3 += Idr[10];
- RHS3 += Idr[11];
- RHS3 -= go[10] * *cnV[10];
- RHS3 -= go[11] * *cnV[11];
- m_A8 += gt[12];
- m_A8 += gt[13];
- m_A8 += gt[14];
- m_A9 += go[12];
- double RHS4 = Idr[12];
- RHS4 += Idr[13];
- RHS4 += Idr[14];
- RHS4 -= go[13] * *cnV[13];
- RHS4 -= go[14] * *cnV[14];
- m_A10 += gt[15];
- m_A10 += gt[16];
- m_A10 += gt[17];
- m_A11 += go[15];
- double RHS5 = Idr[15];
- RHS5 += Idr[16];
- RHS5 += Idr[17];
- RHS5 -= go[16] * *cnV[16];
- RHS5 -= go[17] * *cnV[17];
- m_A12 += gt[18];
- m_A12 += gt[19];
- m_A12 += gt[20];
- m_A13 += go[18];
- double RHS6 = Idr[18];
- RHS6 += Idr[19];
- RHS6 += Idr[20];
- RHS6 -= go[19] * *cnV[19];
- RHS6 -= go[20] * *cnV[20];
- m_A14 += gt[21];
- m_A14 += gt[22];
- m_A14 += gt[23];
- m_A15 += go[21];
- double RHS7 = Idr[21];
+ m_A6 += gt[7];
+ m_A7 += go[7];
+ double RHS3 = Idr[7];
+ m_A8 += gt[8];
+ m_A8 += gt[9];
+ m_A8 += gt[10];
+ m_A9 += go[8];
+ double RHS4 = Idr[8];
+ RHS4 += Idr[9];
+ RHS4 += Idr[10];
+ RHS4 -= go[9] * *cnV[9];
+ RHS4 -= go[10] * *cnV[10];
+ m_A10 += gt[11];
+ m_A10 += gt[12];
+ m_A10 += gt[13];
+ m_A11 += go[11];
+ double RHS5 = Idr[11];
+ RHS5 += Idr[12];
+ RHS5 += Idr[13];
+ RHS5 -= go[12] * *cnV[12];
+ RHS5 -= go[13] * *cnV[13];
+ m_A14 += gt[14];
+ m_A14 += gt[15];
+ m_A14 += gt[16];
+ m_A13 += go[14];
+ m_A12 += go[15];
+ m_A15 += go[16];
+ double RHS6 = Idr[14];
+ RHS6 += Idr[15];
+ RHS6 += Idr[16];
+ m_A21 += gt[17];
+ m_A21 += gt[18];
+ m_A21 += gt[19];
+ m_A21 += gt[20];
+ m_A21 += gt[21];
+ m_A21 += gt[22];
+ m_A21 += gt[23];
+ m_A20 += go[17];
+ m_A19 += go[18];
+ m_A18 += go[19];
+ m_A17 += go[20];
+ m_A16 += go[21];
+ double RHS7 = Idr[17];
+ RHS7 += Idr[18];
+ RHS7 += Idr[19];
+ RHS7 += Idr[20];
+ RHS7 += Idr[21];
RHS7 += Idr[22];
RHS7 += Idr[23];
RHS7 -= go[22] * *cnV[22];
RHS7 -= go[23] * *cnV[23];
- m_A16 += gt[24];
- m_A16 += gt[25];
- m_A16 += gt[26];
- m_A17 += go[24];
- double RHS8 = Idr[24];
- RHS8 += Idr[25];
- RHS8 += Idr[26];
- RHS8 -= go[25] * *cnV[25];
- RHS8 -= go[26] * *cnV[26];
- m_A18 += gt[27];
- m_A18 += gt[28];
- m_A18 += gt[29];
- m_A19 += go[27];
- double RHS9 = Idr[27];
- RHS9 += Idr[28];
- RHS9 += Idr[29];
- RHS9 -= go[28] * *cnV[28];
- RHS9 -= go[29] * *cnV[29];
- m_A20 += gt[30];
- m_A20 += gt[31];
- m_A20 += gt[32];
- m_A21 += go[30];
- double RHS10 = Idr[30];
- RHS10 += Idr[31];
- RHS10 += Idr[32];
- RHS10 -= go[31] * *cnV[31];
- RHS10 -= go[32] * *cnV[32];
- m_A22 += gt[33];
- m_A22 += gt[34];
- m_A22 += gt[35];
- m_A23 += go[33];
- double RHS11 = Idr[33];
- RHS11 += Idr[34];
- RHS11 += Idr[35];
- RHS11 -= go[34] * *cnV[34];
- RHS11 -= go[35] * *cnV[35];
- m_A25 += gt[36];
- m_A25 += gt[37];
- m_A25 += gt[38];
- m_A26 += go[36];
- m_A24 += go[37];
- double RHS12 = Idr[36];
- RHS12 += Idr[37];
- RHS12 += Idr[38];
- RHS12 -= go[38] * *cnV[38];
- m_A30 += gt[39];
- m_A30 += gt[40];
- m_A30 += gt[41];
- m_A30 += gt[42];
- m_A30 += gt[43];
- m_A30 += gt[44];
- m_A30 += gt[45];
- m_A29 += go[39];
- m_A28 += go[40];
- m_A27 += go[41];
- m_A31 += go[42];
- m_A31 += go[43];
- double RHS13 = Idr[39];
- RHS13 += Idr[40];
- RHS13 += Idr[41];
- RHS13 += Idr[42];
- RHS13 += Idr[43];
- RHS13 += Idr[44];
- RHS13 += Idr[45];
- RHS13 -= go[44] * *cnV[44];
- RHS13 -= go[45] * *cnV[45];
- m_A42 += gt[46];
- m_A42 += gt[47];
- m_A42 += gt[48];
- m_A42 += gt[49];
- m_A42 += gt[50];
- m_A42 += gt[51];
- m_A42 += gt[52];
- m_A42 += gt[53];
- m_A42 += gt[54];
- m_A42 += gt[55];
- m_A42 += gt[56];
- m_A42 += gt[57];
- m_A42 += gt[58];
- m_A41 += go[46];
- m_A41 += go[47];
- m_A39 += go[48];
- m_A38 += go[49];
- m_A37 += go[50];
- m_A36 += go[51];
- m_A35 += go[52];
- m_A34 += go[53];
- m_A33 += go[54];
- m_A32 += go[55];
- m_A40 += go[56];
- double RHS14 = Idr[46];
- RHS14 += Idr[47];
- RHS14 += Idr[48];
- RHS14 += Idr[49];
- RHS14 += Idr[50];
- RHS14 += Idr[51];
- RHS14 += Idr[52];
- RHS14 += Idr[53];
- RHS14 += Idr[54];
- RHS14 += Idr[55];
- RHS14 += Idr[56];
- RHS14 += Idr[57];
- RHS14 += Idr[58];
- RHS14 -= go[57] * *cnV[57];
- RHS14 -= go[58] * *cnV[58];
const double f0 = 1.0 / m_A0;
- const double f0_12 = -f0 * m_A24;
- m_A25 += m_A1 * f0_12;
- RHS12 += f0_12 * RHS0;
+ const double f0_7 = -f0 * m_A16;
+ m_A21 += m_A1 * f0_7;
+ RHS7 += f0_7 * RHS0;
const double f1 = 1.0 / m_A2;
- const double f1_14 = -f1 * m_A32;
- m_A42 += m_A3 * f1_14;
- RHS14 += f1_14 * RHS1;
+ const double f1_7 = -f1 * m_A17;
+ m_A21 += m_A3 * f1_7;
+ RHS7 += f1_7 * RHS1;
const double f2 = 1.0 / m_A4;
- const double f2_14 = -f2 * m_A33;
- m_A42 += m_A5 * f2_14;
- RHS14 += f2_14 * RHS2;
+ const double f2_6 = -f2 * m_A12;
+ m_A14 += m_A5 * f2_6;
+ RHS6 += f2_6 * RHS2;
const double f3 = 1.0 / m_A6;
- const double f3_14 = -f3 * m_A34;
- m_A42 += m_A7 * f3_14;
- RHS14 += f3_14 * RHS3;
+ const double f3_6 = -f3 * m_A13;
+ m_A14 += m_A7 * f3_6;
+ RHS6 += f3_6 * RHS3;
const double f4 = 1.0 / m_A8;
- const double f4_14 = -f4 * m_A35;
- m_A42 += m_A9 * f4_14;
- RHS14 += f4_14 * RHS4;
+ const double f4_7 = -f4 * m_A18;
+ m_A21 += m_A9 * f4_7;
+ RHS7 += f4_7 * RHS4;
const double f5 = 1.0 / m_A10;
- const double f5_14 = -f5 * m_A36;
- m_A42 += m_A11 * f5_14;
- RHS14 += f5_14 * RHS5;
- const double f6 = 1.0 / m_A12;
- const double f6_14 = -f6 * m_A37;
- m_A42 += m_A13 * f6_14;
- RHS14 += f6_14 * RHS6;
- const double f7 = 1.0 / m_A14;
- const double f7_14 = -f7 * m_A38;
- m_A42 += m_A15 * f7_14;
- RHS14 += f7_14 * RHS7;
- const double f8 = 1.0 / m_A16;
- const double f8_14 = -f8 * m_A39;
- m_A42 += m_A17 * f8_14;
- RHS14 += f8_14 * RHS8;
- const double f9 = 1.0 / m_A18;
- const double f9_13 = -f9 * m_A27;
- m_A30 += m_A19 * f9_13;
- RHS13 += f9_13 * RHS9;
- const double f10 = 1.0 / m_A20;
- const double f10_13 = -f10 * m_A28;
- m_A30 += m_A21 * f10_13;
- RHS13 += f10_13 * RHS10;
- const double f11 = 1.0 / m_A22;
- const double f11_13 = -f11 * m_A29;
- m_A30 += m_A23 * f11_13;
- RHS13 += f11_13 * RHS11;
- const double f12 = 1.0 / m_A25;
- const double f12_14 = -f12 * m_A40;
- m_A42 += m_A26 * f12_14;
- RHS14 += f12_14 * RHS12;
- const double f13 = 1.0 / m_A30;
- const double f13_14 = -f13 * m_A41;
- m_A42 += m_A31 * f13_14;
- RHS14 += f13_14 * RHS13;
- V[14] = RHS14 / m_A42;
- double tmp13 = 0.0;
- tmp13 += m_A31 * V[14];
- V[13] = (RHS13 - tmp13) / m_A30;
- double tmp12 = 0.0;
- tmp12 += m_A26 * V[14];
- V[12] = (RHS12 - tmp12) / m_A25;
- double tmp11 = 0.0;
- tmp11 += m_A23 * V[13];
- V[11] = (RHS11 - tmp11) / m_A22;
- double tmp10 = 0.0;
- tmp10 += m_A21 * V[13];
- V[10] = (RHS10 - tmp10) / m_A20;
- double tmp9 = 0.0;
- tmp9 += m_A19 * V[13];
- V[9] = (RHS9 - tmp9) / m_A18;
- double tmp8 = 0.0;
- tmp8 += m_A17 * V[14];
- V[8] = (RHS8 - tmp8) / m_A16;
- double tmp7 = 0.0;
- tmp7 += m_A15 * V[14];
- V[7] = (RHS7 - tmp7) / m_A14;
+ const double f5_7 = -f5 * m_A19;
+ m_A21 += m_A11 * f5_7;
+ RHS7 += f5_7 * RHS5;
+ const double f6 = 1.0 / m_A14;
+ const double f6_7 = -f6 * m_A20;
+ m_A21 += m_A15 * f6_7;
+ RHS7 += f6_7 * RHS6;
+ V[7] = RHS7 / m_A21;
double tmp6 = 0.0;
- tmp6 += m_A13 * V[14];
- V[6] = (RHS6 - tmp6) / m_A12;
+ tmp6 += m_A15 * V[7];
+ V[6] = (RHS6 - tmp6) / m_A14;
double tmp5 = 0.0;
- tmp5 += m_A11 * V[14];
+ tmp5 += m_A11 * V[7];
V[5] = (RHS5 - tmp5) / m_A10;
double tmp4 = 0.0;
- tmp4 += m_A9 * V[14];
+ tmp4 += m_A9 * V[7];
V[4] = (RHS4 - tmp4) / m_A8;
double tmp3 = 0.0;
- tmp3 += m_A7 * V[14];
+ tmp3 += m_A7 * V[6];
V[3] = (RHS3 - tmp3) / m_A6;
double tmp2 = 0.0;
- tmp2 += m_A5 * V[14];
+ tmp2 += m_A5 * V[6];
V[2] = (RHS2 - tmp2) / m_A4;
double tmp1 = 0.0;
- tmp1 += m_A3 * V[14];
+ tmp1 += m_A3 * V[7];
V[1] = (RHS1 - tmp1) / m_A2;
double tmp0 = 0.0;
- tmp0 += m_A1 * V[12];
+ tmp0 += m_A1 * V[7];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
+// gtrak10,elim,zektor
+static void nl_gcr_7_double_double_d190a0e3b8e1f4a7(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 -= go[1] * *cnV[1];
+ m_A2 += gt[2];
+ m_A2 += gt[3];
+ m_A3 += go[2];
+ double RHS1 = Idr[2];
+ RHS1 += Idr[3];
+ RHS1 -= go[3] * *cnV[3];
+ m_A6 += gt[4];
+ m_A6 += gt[5];
+ m_A6 += gt[6];
+ m_A5 += go[4];
+ m_A4 += go[5];
+ double RHS2 = Idr[4];
+ RHS2 += Idr[5];
+ RHS2 += Idr[6];
+ RHS2 -= go[6] * *cnV[6];
+ const double f0 = 1.0 / m_A0;
+ const double f0_2 = -f0 * m_A4;
+ m_A6 += m_A1 * f0_2;
+ RHS2 += f0_2 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_2 = -f1 * m_A5;
+ m_A6 += m_A3 * f1_2;
+ RHS2 += f1_2 * RHS1;
+ V[2] = RHS2 / m_A6;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[2];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[2];
V[0] = (RHS0 - tmp0) / m_A0;
}
@@ -44601,6 +43219,107 @@ static void nl_gcr_50_double_double_c6f25bb06e161d1c(double * __restrict V, cons
V[0] = (RHS0 - tmp0) / m_A0;
}
+// rebound,astrob
+static void nl_gcr_13_double_double_a41a44bd5c424f88(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ double m_A7(0.0);
+ double m_A8(0.0);
+ double m_A9(0.0);
+ double m_A10(0.0);
+ double m_A11(0.0);
+ double m_A12(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A0 += gt[2];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 += Idr[2];
+ RHS0 -= go[1] * *cnV[1];
+ RHS0 -= go[2] * *cnV[2];
+ m_A2 += gt[3];
+ m_A2 += gt[4];
+ m_A2 += gt[5];
+ m_A3 += go[3];
+ double RHS1 = Idr[3];
+ RHS1 += Idr[4];
+ RHS1 += Idr[5];
+ RHS1 -= go[4] * *cnV[4];
+ RHS1 -= go[5] * *cnV[5];
+ m_A4 += gt[6];
+ m_A4 += gt[7];
+ m_A4 += gt[8];
+ m_A5 += go[6];
+ double RHS2 = Idr[6];
+ RHS2 += Idr[7];
+ RHS2 += Idr[8];
+ RHS2 -= go[7] * *cnV[7];
+ RHS2 -= go[8] * *cnV[8];
+ m_A6 += gt[9];
+ m_A6 += gt[10];
+ m_A6 += gt[11];
+ m_A7 += go[9];
+ double RHS3 = Idr[9];
+ RHS3 += Idr[10];
+ RHS3 += Idr[11];
+ RHS3 -= go[10] * *cnV[10];
+ RHS3 -= go[11] * *cnV[11];
+ m_A12 += gt[12];
+ m_A12 += gt[13];
+ m_A12 += gt[14];
+ m_A12 += gt[15];
+ m_A12 += gt[16];
+ m_A11 += go[12];
+ m_A10 += go[13];
+ m_A9 += go[14];
+ m_A8 += go[15];
+ double RHS4 = Idr[12];
+ RHS4 += Idr[13];
+ RHS4 += Idr[14];
+ RHS4 += Idr[15];
+ RHS4 += Idr[16];
+ RHS4 -= go[16] * *cnV[16];
+ const double f0 = 1.0 / m_A0;
+ const double f0_4 = -f0 * m_A8;
+ m_A12 += m_A1 * f0_4;
+ RHS4 += f0_4 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_4 = -f1 * m_A9;
+ m_A12 += m_A3 * f1_4;
+ RHS4 += f1_4 * RHS1;
+ const double f2 = 1.0 / m_A4;
+ const double f2_4 = -f2 * m_A10;
+ m_A12 += m_A5 * f2_4;
+ RHS4 += f2_4 * RHS2;
+ const double f3 = 1.0 / m_A6;
+ const double f3_4 = -f3 * m_A11;
+ m_A12 += m_A7 * f3_4;
+ RHS4 += f3_4 * RHS3;
+ V[4] = RHS4 / m_A12;
+ double tmp3 = 0.0;
+ tmp3 += m_A7 * V[4];
+ V[3] = (RHS3 - tmp3) / m_A6;
+ double tmp2 = 0.0;
+ tmp2 += m_A5 * V[4];
+ V[2] = (RHS2 - tmp2) / m_A4;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[4];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[4];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
// rebound
static void nl_gcr_28_double_double_8bec817b324dcc3(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
@@ -45050,102 +43769,6 @@ static void nl_gcr_11_double_double_aa07266ef5d420d1(double * __restrict V, cons
V[0] = (RHS0 - tmp0) / m_A0;
}
-// ripoff,sundance,warrior
-static void nl_gcr_12_double_double_295cf2e2f3d489bf(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
-
-{
-
- plib::unused_var(cnV);
- double m_A0(0.0);
- double m_A1(0.0);
- double m_A2(0.0);
- double m_A3(0.0);
- double m_A4(0.0);
- double m_A5(0.0);
- double m_A6(0.0);
- double m_A7(0.0);
- double m_A8(0.0);
- double m_A9(0.0);
- double m_A10(0.0);
- double m_A11(0.0);
- m_A0 += gt[0];
- m_A0 += gt[1];
- m_A1 += go[0];
- double RHS0 = Idr[0];
- RHS0 += Idr[1];
- RHS0 -= go[1] * *cnV[1];
- m_A2 += gt[2];
- m_A2 += gt[3];
- m_A2 += gt[4];
- m_A2 += gt[5];
- m_A4 += go[2];
- m_A3 += go[3];
- m_A3 += go[4];
- double RHS1 = Idr[2];
- RHS1 += Idr[3];
- RHS1 += Idr[4];
- RHS1 += Idr[5];
- RHS1 -= go[5] * *cnV[5];
- m_A6 += gt[6];
- m_A6 += gt[7];
- m_A6 += gt[8];
- m_A6 += gt[9];
- m_A6 += gt[10];
- m_A7 += go[6];
- m_A7 += go[7];
- m_A5 += go[8];
- m_A5 += go[9];
- double RHS2 = Idr[6];
- RHS2 += Idr[7];
- RHS2 += Idr[8];
- RHS2 += Idr[9];
- RHS2 += Idr[10];
- RHS2 -= go[10] * *cnV[10];
- m_A11 += gt[11];
- m_A11 += gt[12];
- m_A11 += gt[13];
- m_A11 += gt[14];
- m_A11 += gt[15];
- m_A10 += go[11];
- m_A10 += go[12];
- m_A9 += go[13];
- m_A8 += go[14];
- double RHS3 = Idr[11];
- RHS3 += Idr[12];
- RHS3 += Idr[13];
- RHS3 += Idr[14];
- RHS3 += Idr[15];
- RHS3 -= go[15] * *cnV[15];
- const double f0 = 1.0 / m_A0;
- const double f0_3 = -f0 * m_A8;
- m_A11 += m_A1 * f0_3;
- RHS3 += f0_3 * RHS0;
- const double f1 = 1.0 / m_A2;
- const double f1_2 = -f1 * m_A5;
- m_A6 += m_A3 * f1_2;
- m_A7 += m_A4 * f1_2;
- RHS2 += f1_2 * RHS1;
- const double f1_3 = -f1 * m_A9;
- m_A10 += m_A3 * f1_3;
- m_A11 += m_A4 * f1_3;
- RHS3 += f1_3 * RHS1;
- const double f2 = 1.0 / m_A6;
- const double f2_3 = -f2 * m_A10;
- m_A11 += m_A7 * f2_3;
- RHS3 += f2_3 * RHS2;
- V[3] = RHS3 / m_A11;
- double tmp2 = 0.0;
- tmp2 += m_A7 * V[3];
- V[2] = (RHS2 - tmp2) / m_A6;
- double tmp1 = 0.0;
- tmp1 += m_A3 * V[2];
- tmp1 += m_A4 * V[3];
- V[1] = (RHS1 - tmp1) / m_A2;
- double tmp0 = 0.0;
- tmp0 += m_A1 * V[3];
- V[0] = (RHS0 - tmp0) / m_A0;
-}
-
// ripoff
static void nl_gcr_16_double_double_698d5dd47fb16d5(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
@@ -59446,6 +58069,63 @@ static void nl_gcr_37_double_double_e4f2ffbf201a3d0c(double * __restrict V, cons
V[0] = (RHS0 - tmp0) / m_A0;
}
+// speedfrk,cheekyms,rebound,astrob,fireone
+static void nl_gcr_7_double_double_7c86a9bc1c6aef4c(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A0 += gt[2];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 += Idr[2];
+ RHS0 -= go[1] * *cnV[1];
+ RHS0 -= go[2] * *cnV[2];
+ m_A2 += gt[3];
+ m_A2 += gt[4];
+ m_A3 += go[3];
+ double RHS1 = Idr[3];
+ RHS1 += Idr[4];
+ RHS1 -= go[4] * *cnV[4];
+ m_A6 += gt[5];
+ m_A6 += gt[6];
+ m_A6 += gt[7];
+ m_A6 += gt[8];
+ m_A5 += go[5];
+ m_A4 += go[6];
+ double RHS2 = Idr[5];
+ RHS2 += Idr[6];
+ RHS2 += Idr[7];
+ RHS2 += Idr[8];
+ RHS2 -= go[7] * *cnV[7];
+ RHS2 -= go[8] * *cnV[8];
+ const double f0 = 1.0 / m_A0;
+ const double f0_2 = -f0 * m_A4;
+ m_A6 += m_A1 * f0_2;
+ RHS2 += f0_2 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_2 = -f1 * m_A5;
+ m_A6 += m_A3 * f1_2;
+ RHS2 += f1_2 * RHS1;
+ V[2] = RHS2 / m_A6;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[2];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[2];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
// speedfrk
static void nl_gcr_7_double_double_e07b5b086812756c(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
@@ -59582,6 +58262,2340 @@ static void nl_gcr_10_double_double_ac1e401ddf971e15(double * __restrict V, cons
V[0] = (RHS0 - tmp0) / m_A0;
}
+// sspeedr,280zzzap
+static void nl_gcr_113_double_double_ab9144d965a37e4(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ double m_A7(0.0);
+ double m_A8(0.0);
+ double m_A9(0.0);
+ double m_A10(0.0);
+ double m_A11(0.0);
+ double m_A12(0.0);
+ double m_A13(0.0);
+ double m_A14(0.0);
+ double m_A15(0.0);
+ double m_A16(0.0);
+ double m_A17(0.0);
+ double m_A18(0.0);
+ double m_A19(0.0);
+ double m_A20(0.0);
+ double m_A21(0.0);
+ double m_A22(0.0);
+ double m_A23(0.0);
+ double m_A24(0.0);
+ double m_A25(0.0);
+ double m_A26(0.0);
+ double m_A27(0.0);
+ double m_A28(0.0);
+ double m_A29(0.0);
+ double m_A30(0.0);
+ double m_A31(0.0);
+ double m_A32(0.0);
+ double m_A33(0.0);
+ double m_A34(0.0);
+ double m_A35(0.0);
+ double m_A36(0.0);
+ double m_A37(0.0);
+ double m_A38(0.0);
+ double m_A39(0.0);
+ double m_A40(0.0);
+ double m_A41(0.0);
+ double m_A42(0.0);
+ double m_A43(0.0);
+ double m_A44(0.0);
+ double m_A45(0.0);
+ double m_A46(0.0);
+ double m_A47(0.0);
+ double m_A48(0.0);
+ double m_A49(0.0);
+ double m_A50(0.0);
+ double m_A51(0.0);
+ double m_A52(0.0);
+ double m_A53(0.0);
+ double m_A54(0.0);
+ double m_A55(0.0);
+ double m_A56(0.0);
+ double m_A57(0.0);
+ double m_A58(0.0);
+ double m_A59(0.0);
+ double m_A60(0.0);
+ double m_A61(0.0);
+ double m_A62(0.0);
+ double m_A63(0.0);
+ double m_A64(0.0);
+ double m_A65(0.0);
+ double m_A66(0.0);
+ double m_A67(0.0);
+ double m_A68(0.0);
+ double m_A69(0.0);
+ double m_A70(0.0);
+ double m_A71(0.0);
+ double m_A72(0.0);
+ double m_A73(0.0);
+ double m_A74(0.0);
+ double m_A75(0.0);
+ double m_A76(0.0);
+ double m_A77(0.0);
+ double m_A78(0.0);
+ double m_A79(0.0);
+ double m_A80(0.0);
+ double m_A81(0.0);
+ double m_A82(0.0);
+ double m_A83(0.0);
+ double m_A84(0.0);
+ double m_A85(0.0);
+ double m_A86(0.0);
+ double m_A87(0.0);
+ double m_A88(0.0);
+ double m_A89(0.0);
+ double m_A90(0.0);
+ double m_A91(0.0);
+ double m_A92(0.0);
+ double m_A93(0.0);
+ double m_A94(0.0);
+ double m_A95(0.0);
+ double m_A96(0.0);
+ double m_A97(0.0);
+ double m_A98(0.0);
+ double m_A99(0.0);
+ double m_A100(0.0);
+ double m_A101(0.0);
+ double m_A102(0.0);
+ double m_A103(0.0);
+ double m_A104(0.0);
+ double m_A105(0.0);
+ double m_A106(0.0);
+ double m_A107(0.0);
+ double m_A108(0.0);
+ double m_A109(0.0);
+ double m_A110(0.0);
+ double m_A111(0.0);
+ double m_A112(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 -= go[1] * *cnV[1];
+ m_A2 += gt[2];
+ m_A2 += gt[3];
+ m_A2 += gt[4];
+ m_A2 += gt[5];
+ m_A5 += go[2];
+ m_A4 += go[3];
+ m_A3 += go[4];
+ double RHS1 = Idr[2];
+ RHS1 += Idr[3];
+ RHS1 += Idr[4];
+ RHS1 += Idr[5];
+ RHS1 -= go[5] * *cnV[5];
+ m_A6 += gt[6];
+ m_A6 += gt[7];
+ m_A7 += go[6];
+ double RHS2 = Idr[6];
+ RHS2 += Idr[7];
+ RHS2 -= go[7] * *cnV[7];
+ m_A8 += gt[8];
+ m_A8 += gt[9];
+ m_A9 += go[8];
+ double RHS3 = Idr[8];
+ RHS3 += Idr[9];
+ RHS3 -= go[9] * *cnV[9];
+ m_A10 += gt[10];
+ m_A10 += gt[11];
+ m_A10 += gt[12];
+ m_A11 += go[10];
+ m_A12 += go[11];
+ double RHS4 = Idr[10];
+ RHS4 += Idr[11];
+ RHS4 += Idr[12];
+ RHS4 -= go[12] * *cnV[12];
+ m_A13 += gt[13];
+ m_A13 += gt[14];
+ m_A14 += go[13];
+ double RHS5 = Idr[13];
+ RHS5 += Idr[14];
+ RHS5 -= go[14] * *cnV[14];
+ m_A15 += gt[15];
+ m_A15 += gt[16];
+ m_A15 += gt[17];
+ m_A15 += gt[18];
+ m_A15 += gt[19];
+ m_A15 += gt[20];
+ m_A15 += gt[21];
+ m_A18 += go[15];
+ m_A19 += go[16];
+ m_A17 += go[17];
+ m_A16 += go[18];
+ double RHS6 = Idr[15];
+ RHS6 += Idr[16];
+ RHS6 += Idr[17];
+ RHS6 += Idr[18];
+ RHS6 += Idr[19];
+ RHS6 += Idr[20];
+ RHS6 += Idr[21];
+ RHS6 -= go[19] * *cnV[19];
+ RHS6 -= go[20] * *cnV[20];
+ RHS6 -= go[21] * *cnV[21];
+ m_A20 += gt[22];
+ m_A20 += gt[23];
+ m_A20 += gt[24];
+ m_A20 += gt[25];
+ m_A20 += gt[26];
+ m_A20 += gt[27];
+ m_A20 += gt[28];
+ m_A23 += go[22];
+ m_A24 += go[23];
+ m_A22 += go[24];
+ m_A21 += go[25];
+ double RHS7 = Idr[22];
+ RHS7 += Idr[23];
+ RHS7 += Idr[24];
+ RHS7 += Idr[25];
+ RHS7 += Idr[26];
+ RHS7 += Idr[27];
+ RHS7 += Idr[28];
+ RHS7 -= go[26] * *cnV[26];
+ RHS7 -= go[27] * *cnV[27];
+ RHS7 -= go[28] * *cnV[28];
+ m_A25 += gt[29];
+ m_A25 += gt[30];
+ m_A25 += gt[31];
+ m_A26 += go[29];
+ m_A27 += go[30];
+ double RHS8 = Idr[29];
+ RHS8 += Idr[30];
+ RHS8 += Idr[31];
+ RHS8 -= go[31] * *cnV[31];
+ m_A28 += gt[32];
+ m_A28 += gt[33];
+ m_A29 += go[32];
+ double RHS9 = Idr[32];
+ RHS9 += Idr[33];
+ RHS9 -= go[33] * *cnV[33];
+ m_A30 += gt[34];
+ m_A30 += gt[35];
+ m_A30 += gt[36];
+ m_A30 += gt[37];
+ m_A31 += go[34];
+ double RHS10 = Idr[34];
+ RHS10 += Idr[35];
+ RHS10 += Idr[36];
+ RHS10 += Idr[37];
+ RHS10 -= go[35] * *cnV[35];
+ RHS10 -= go[36] * *cnV[36];
+ RHS10 -= go[37] * *cnV[37];
+ m_A32 += gt[38];
+ m_A32 += gt[39];
+ m_A33 += go[38];
+ double RHS11 = Idr[38];
+ RHS11 += Idr[39];
+ RHS11 -= go[39] * *cnV[39];
+ m_A36 += gt[40];
+ m_A36 += gt[41];
+ m_A36 += gt[42];
+ m_A36 += gt[43];
+ m_A35 += go[40];
+ m_A34 += go[41];
+ double RHS12 = Idr[40];
+ RHS12 += Idr[41];
+ RHS12 += Idr[42];
+ RHS12 += Idr[43];
+ RHS12 -= go[42] * *cnV[42];
+ RHS12 -= go[43] * *cnV[43];
+ m_A42 += gt[44];
+ m_A42 += gt[45];
+ m_A42 += gt[46];
+ m_A42 += gt[47];
+ m_A40 += go[44];
+ m_A39 += go[45];
+ double RHS13 = Idr[44];
+ RHS13 += Idr[45];
+ RHS13 += Idr[46];
+ RHS13 += Idr[47];
+ RHS13 -= go[46] * *cnV[46];
+ RHS13 -= go[47] * *cnV[47];
+ m_A51 += gt[48];
+ m_A51 += gt[49];
+ m_A51 += gt[50];
+ m_A51 += gt[51];
+ m_A53 += go[48];
+ m_A48 += go[49];
+ m_A47 += go[50];
+ double RHS14 = Idr[48];
+ RHS14 += Idr[49];
+ RHS14 += Idr[50];
+ RHS14 += Idr[51];
+ RHS14 -= go[51] * *cnV[51];
+ m_A57 += gt[52];
+ m_A57 += gt[53];
+ m_A57 += gt[54];
+ m_A56 += go[52];
+ m_A58 += go[53];
+ double RHS15 = Idr[52];
+ RHS15 += Idr[53];
+ RHS15 += Idr[54];
+ RHS15 -= go[54] * *cnV[54];
+ m_A60 += gt[55];
+ m_A60 += gt[56];
+ m_A60 += gt[57];
+ m_A60 += gt[58];
+ m_A59 += go[55];
+ m_A61 += go[56];
+ double RHS16 = Idr[55];
+ RHS16 += Idr[56];
+ RHS16 += Idr[57];
+ RHS16 += Idr[58];
+ RHS16 -= go[57] * *cnV[57];
+ RHS16 -= go[58] * *cnV[58];
+ m_A67 += gt[59];
+ m_A67 += gt[60];
+ m_A67 += gt[61];
+ m_A67 += gt[62];
+ m_A67 += gt[63];
+ m_A67 += gt[64];
+ m_A70 += go[59];
+ m_A64 += go[60];
+ m_A63 += go[61];
+ m_A62 += go[62];
+ m_A69 += go[63];
+ double RHS17 = Idr[59];
+ RHS17 += Idr[60];
+ RHS17 += Idr[61];
+ RHS17 += Idr[62];
+ RHS17 += Idr[63];
+ RHS17 += Idr[64];
+ RHS17 -= go[64] * *cnV[64];
+ m_A74 += gt[65];
+ m_A74 += gt[66];
+ m_A74 += gt[67];
+ m_A74 += gt[68];
+ m_A73 += go[65];
+ m_A72 += go[66];
+ m_A75 += go[67];
+ double RHS18 = Idr[65];
+ RHS18 += Idr[66];
+ RHS18 += Idr[67];
+ RHS18 += Idr[68];
+ RHS18 -= go[68] * *cnV[68];
+ m_A80 += gt[69];
+ m_A80 += gt[70];
+ m_A80 += gt[71];
+ m_A80 += gt[72];
+ m_A80 += gt[73];
+ m_A77 += go[69];
+ m_A78 += go[70];
+ m_A76 += go[71];
+ double RHS19 = Idr[69];
+ RHS19 += Idr[70];
+ RHS19 += Idr[71];
+ RHS19 += Idr[72];
+ RHS19 += Idr[73];
+ RHS19 -= go[72] * *cnV[72];
+ RHS19 -= go[73] * *cnV[73];
+ m_A89 += gt[74];
+ m_A89 += gt[75];
+ m_A89 += gt[76];
+ m_A89 += gt[77];
+ m_A84 += go[74];
+ m_A85 += go[75];
+ m_A87 += go[76];
+ m_A86 += go[77];
+ double RHS20 = Idr[74];
+ RHS20 += Idr[75];
+ RHS20 += Idr[76];
+ RHS20 += Idr[77];
+ m_A100 += gt[78];
+ m_A100 += gt[79];
+ m_A100 += gt[80];
+ m_A100 += gt[81];
+ m_A100 += gt[82];
+ m_A100 += gt[83];
+ m_A100 += gt[84];
+ m_A96 += go[78];
+ m_A93 += go[79];
+ m_A101 += go[80];
+ m_A92 += go[81];
+ m_A97 += go[82];
+ double RHS21 = Idr[78];
+ RHS21 += Idr[79];
+ RHS21 += Idr[80];
+ RHS21 += Idr[81];
+ RHS21 += Idr[82];
+ RHS21 += Idr[83];
+ RHS21 += Idr[84];
+ RHS21 -= go[83] * *cnV[83];
+ RHS21 -= go[84] * *cnV[84];
+ m_A112 += gt[85];
+ m_A112 += gt[86];
+ m_A112 += gt[87];
+ m_A112 += gt[88];
+ m_A112 += gt[89];
+ m_A112 += gt[90];
+ m_A108 += go[85];
+ m_A111 += go[86];
+ m_A103 += go[87];
+ m_A104 += go[88];
+ m_A102 += go[89];
+ double RHS22 = Idr[85];
+ RHS22 += Idr[86];
+ RHS22 += Idr[87];
+ RHS22 += Idr[88];
+ RHS22 += Idr[89];
+ RHS22 += Idr[90];
+ RHS22 -= go[90] * *cnV[90];
+ const double f0 = 1.0 / m_A0;
+ const double f0_12 = -f0 * m_A34;
+ m_A36 += m_A1 * f0_12;
+ RHS12 += f0_12 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_12 = -f1 * m_A35;
+ m_A36 += m_A3 * f1_12;
+ m_A37 += m_A4 * f1_12;
+ m_A38 += m_A5 * f1_12;
+ RHS12 += f1_12 * RHS1;
+ const double f1_13 = -f1 * m_A39;
+ m_A41 += m_A3 * f1_13;
+ m_A42 += m_A4 * f1_13;
+ m_A43 += m_A5 * f1_13;
+ RHS13 += f1_13 * RHS1;
+ const double f1_14 = -f1 * m_A47;
+ m_A49 += m_A3 * f1_14;
+ m_A50 += m_A4 * f1_14;
+ m_A51 += m_A5 * f1_14;
+ RHS14 += f1_14 * RHS1;
+ const double f2 = 1.0 / m_A6;
+ const double f2_15 = -f2 * m_A56;
+ m_A57 += m_A7 * f2_15;
+ RHS15 += f2_15 * RHS2;
+ const double f3 = 1.0 / m_A8;
+ const double f3_20 = -f3 * m_A84;
+ m_A89 += m_A9 * f3_20;
+ RHS20 += f3_20 * RHS3;
+ const double f4 = 1.0 / m_A10;
+ const double f4_17 = -f4 * m_A62;
+ m_A67 += m_A11 * f4_17;
+ m_A69 += m_A12 * f4_17;
+ RHS17 += f4_17 * RHS4;
+ const double f4_20 = -f4 * m_A85;
+ m_A87 += m_A11 * f4_20;
+ m_A89 += m_A12 * f4_20;
+ RHS20 += f4_20 * RHS4;
+ const double f5 = 1.0 / m_A13;
+ const double f5_16 = -f5 * m_A59;
+ m_A60 += m_A14 * f5_16;
+ RHS16 += f5_16 * RHS5;
+ const double f6 = 1.0 / m_A15;
+ const double f6_13 = -f6 * m_A40;
+ m_A42 += m_A16 * f6_13;
+ m_A44 += m_A17 * f6_13;
+ m_A45 += m_A18 * f6_13;
+ m_A46 += m_A19 * f6_13;
+ RHS13 += f6_13 * RHS6;
+ const double f6_17 = -f6 * m_A63;
+ m_A65 += m_A16 * f6_17;
+ m_A67 += m_A17 * f6_17;
+ m_A70 += m_A18 * f6_17;
+ m_A71 += m_A19 * f6_17;
+ RHS17 += f6_17 * RHS6;
+ const double f6_21 = -f6 * m_A92;
+ m_A94 += m_A16 * f6_21;
+ m_A97 += m_A17 * f6_21;
+ m_A100 += m_A18 * f6_21;
+ m_A101 += m_A19 * f6_21;
+ RHS21 += f6_21 * RHS6;
+ const double f6_22 = -f6 * m_A102;
+ m_A105 += m_A16 * f6_22;
+ m_A107 += m_A17 * f6_22;
+ m_A111 += m_A18 * f6_22;
+ m_A112 += m_A19 * f6_22;
+ RHS22 += f6_22 * RHS6;
+ const double f7 = 1.0 / m_A20;
+ const double f7_14 = -f7 * m_A48;
+ m_A51 += m_A21 * f7_14;
+ m_A52 += m_A22 * f7_14;
+ m_A54 += m_A23 * f7_14;
+ m_A55 += m_A24 * f7_14;
+ RHS14 += f7_14 * RHS7;
+ const double f7_17 = -f7 * m_A64;
+ m_A66 += m_A21 * f7_17;
+ m_A67 += m_A22 * f7_17;
+ m_A70 += m_A23 * f7_17;
+ m_A71 += m_A24 * f7_17;
+ RHS17 += f7_17 * RHS7;
+ const double f7_21 = -f7 * m_A93;
+ m_A95 += m_A21 * f7_21;
+ m_A97 += m_A22 * f7_21;
+ m_A100 += m_A23 * f7_21;
+ m_A101 += m_A24 * f7_21;
+ RHS21 += f7_21 * RHS7;
+ const double f7_22 = -f7 * m_A103;
+ m_A106 += m_A21 * f7_22;
+ m_A107 += m_A22 * f7_22;
+ m_A111 += m_A23 * f7_22;
+ m_A112 += m_A24 * f7_22;
+ RHS22 += f7_22 * RHS7;
+ const double f8 = 1.0 / m_A25;
+ const double f8_18 = -f8 * m_A72;
+ m_A74 += m_A26 * f8_18;
+ m_A75 += m_A27 * f8_18;
+ RHS18 += f8_18 * RHS8;
+ const double f8_22 = -f8 * m_A104;
+ m_A108 += m_A26 * f8_22;
+ m_A112 += m_A27 * f8_22;
+ RHS22 += f8_22 * RHS8;
+ const double f9 = 1.0 / m_A28;
+ const double f9_18 = -f9 * m_A73;
+ m_A74 += m_A29 * f9_18;
+ RHS18 += f9_18 * RHS9;
+ const double f10 = 1.0 / m_A30;
+ const double f10_19 = -f10 * m_A76;
+ m_A80 += m_A31 * f10_19;
+ RHS19 += f10_19 * RHS10;
+ const double f11 = 1.0 / m_A32;
+ const double f11_19 = -f11 * m_A77;
+ m_A80 += m_A33 * f11_19;
+ RHS19 += f11_19 * RHS11;
+ const double f12 = 1.0 / m_A36;
+ const double f12_13 = -f12 * m_A41;
+ m_A42 += m_A37 * f12_13;
+ m_A43 += m_A38 * f12_13;
+ RHS13 += f12_13 * RHS12;
+ const double f12_14 = -f12 * m_A49;
+ m_A50 += m_A37 * f12_14;
+ m_A51 += m_A38 * f12_14;
+ RHS14 += f12_14 * RHS12;
+ const double f13 = 1.0 / m_A42;
+ const double f13_14 = -f13 * m_A50;
+ m_A51 += m_A43 * f13_14;
+ m_A52 += m_A44 * f13_14;
+ m_A54 += m_A45 * f13_14;
+ m_A55 += m_A46 * f13_14;
+ RHS14 += f13_14 * RHS13;
+ const double f13_17 = -f13 * m_A65;
+ m_A66 += m_A43 * f13_17;
+ m_A67 += m_A44 * f13_17;
+ m_A70 += m_A45 * f13_17;
+ m_A71 += m_A46 * f13_17;
+ RHS17 += f13_17 * RHS13;
+ const double f13_21 = -f13 * m_A94;
+ m_A95 += m_A43 * f13_21;
+ m_A97 += m_A44 * f13_21;
+ m_A100 += m_A45 * f13_21;
+ m_A101 += m_A46 * f13_21;
+ RHS21 += f13_21 * RHS13;
+ const double f13_22 = -f13 * m_A105;
+ m_A106 += m_A43 * f13_22;
+ m_A107 += m_A44 * f13_22;
+ m_A111 += m_A45 * f13_22;
+ m_A112 += m_A46 * f13_22;
+ RHS22 += f13_22 * RHS13;
+ const double f14 = 1.0 / m_A51;
+ const double f14_17 = -f14 * m_A66;
+ m_A67 += m_A52 * f14_17;
+ m_A68 += m_A53 * f14_17;
+ m_A70 += m_A54 * f14_17;
+ m_A71 += m_A55 * f14_17;
+ RHS17 += f14_17 * RHS14;
+ const double f14_19 = -f14 * m_A78;
+ m_A79 += m_A52 * f14_19;
+ m_A80 += m_A53 * f14_19;
+ m_A82 += m_A54 * f14_19;
+ m_A83 += m_A55 * f14_19;
+ RHS19 += f14_19 * RHS14;
+ const double f14_21 = -f14 * m_A95;
+ m_A97 += m_A52 * f14_21;
+ m_A98 += m_A53 * f14_21;
+ m_A100 += m_A54 * f14_21;
+ m_A101 += m_A55 * f14_21;
+ RHS21 += f14_21 * RHS14;
+ const double f14_22 = -f14 * m_A106;
+ m_A107 += m_A52 * f14_22;
+ m_A109 += m_A53 * f14_22;
+ m_A111 += m_A54 * f14_22;
+ m_A112 += m_A55 * f14_22;
+ RHS22 += f14_22 * RHS14;
+ const double f15 = 1.0 / m_A57;
+ const double f15_20 = -f15 * m_A86;
+ m_A89 += m_A58 * f15_20;
+ RHS20 += f15_20 * RHS15;
+ const double f16 = 1.0 / m_A60;
+ const double f16_21 = -f16 * m_A96;
+ m_A100 += m_A61 * f16_21;
+ RHS21 += f16_21 * RHS16;
+ const double f17 = 1.0 / m_A67;
+ const double f17_19 = -f17 * m_A79;
+ m_A80 += m_A68 * f17_19;
+ m_A81 += m_A69 * f17_19;
+ m_A82 += m_A70 * f17_19;
+ m_A83 += m_A71 * f17_19;
+ RHS19 += f17_19 * RHS17;
+ const double f17_20 = -f17 * m_A87;
+ m_A88 += m_A68 * f17_20;
+ m_A89 += m_A69 * f17_20;
+ m_A90 += m_A70 * f17_20;
+ m_A91 += m_A71 * f17_20;
+ RHS20 += f17_20 * RHS17;
+ const double f17_21 = -f17 * m_A97;
+ m_A98 += m_A68 * f17_21;
+ m_A99 += m_A69 * f17_21;
+ m_A100 += m_A70 * f17_21;
+ m_A101 += m_A71 * f17_21;
+ RHS21 += f17_21 * RHS17;
+ const double f17_22 = -f17 * m_A107;
+ m_A109 += m_A68 * f17_22;
+ m_A110 += m_A69 * f17_22;
+ m_A111 += m_A70 * f17_22;
+ m_A112 += m_A71 * f17_22;
+ RHS22 += f17_22 * RHS17;
+ const double f18 = 1.0 / m_A74;
+ const double f18_22 = -f18 * m_A108;
+ m_A112 += m_A75 * f18_22;
+ RHS22 += f18_22 * RHS18;
+ const double f19 = 1.0 / m_A80;
+ const double f19_20 = -f19 * m_A88;
+ m_A89 += m_A81 * f19_20;
+ m_A90 += m_A82 * f19_20;
+ m_A91 += m_A83 * f19_20;
+ RHS20 += f19_20 * RHS19;
+ const double f19_21 = -f19 * m_A98;
+ m_A99 += m_A81 * f19_21;
+ m_A100 += m_A82 * f19_21;
+ m_A101 += m_A83 * f19_21;
+ RHS21 += f19_21 * RHS19;
+ const double f19_22 = -f19 * m_A109;
+ m_A110 += m_A81 * f19_22;
+ m_A111 += m_A82 * f19_22;
+ m_A112 += m_A83 * f19_22;
+ RHS22 += f19_22 * RHS19;
+ const double f20 = 1.0 / m_A89;
+ const double f20_21 = -f20 * m_A99;
+ m_A100 += m_A90 * f20_21;
+ m_A101 += m_A91 * f20_21;
+ RHS21 += f20_21 * RHS20;
+ const double f20_22 = -f20 * m_A110;
+ m_A111 += m_A90 * f20_22;
+ m_A112 += m_A91 * f20_22;
+ RHS22 += f20_22 * RHS20;
+ const double f21 = 1.0 / m_A100;
+ const double f21_22 = -f21 * m_A111;
+ m_A112 += m_A101 * f21_22;
+ RHS22 += f21_22 * RHS21;
+ V[22] = RHS22 / m_A112;
+ double tmp21 = 0.0;
+ tmp21 += m_A101 * V[22];
+ V[21] = (RHS21 - tmp21) / m_A100;
+ double tmp20 = 0.0;
+ tmp20 += m_A90 * V[21];
+ tmp20 += m_A91 * V[22];
+ V[20] = (RHS20 - tmp20) / m_A89;
+ double tmp19 = 0.0;
+ tmp19 += m_A81 * V[20];
+ tmp19 += m_A82 * V[21];
+ tmp19 += m_A83 * V[22];
+ V[19] = (RHS19 - tmp19) / m_A80;
+ double tmp18 = 0.0;
+ tmp18 += m_A75 * V[22];
+ V[18] = (RHS18 - tmp18) / m_A74;
+ double tmp17 = 0.0;
+ tmp17 += m_A68 * V[19];
+ tmp17 += m_A69 * V[20];
+ tmp17 += m_A70 * V[21];
+ tmp17 += m_A71 * V[22];
+ V[17] = (RHS17 - tmp17) / m_A67;
+ double tmp16 = 0.0;
+ tmp16 += m_A61 * V[21];
+ V[16] = (RHS16 - tmp16) / m_A60;
+ double tmp15 = 0.0;
+ tmp15 += m_A58 * V[20];
+ V[15] = (RHS15 - tmp15) / m_A57;
+ double tmp14 = 0.0;
+ tmp14 += m_A52 * V[17];
+ tmp14 += m_A53 * V[19];
+ tmp14 += m_A54 * V[21];
+ tmp14 += m_A55 * V[22];
+ V[14] = (RHS14 - tmp14) / m_A51;
+ double tmp13 = 0.0;
+ tmp13 += m_A43 * V[14];
+ tmp13 += m_A44 * V[17];
+ tmp13 += m_A45 * V[21];
+ tmp13 += m_A46 * V[22];
+ V[13] = (RHS13 - tmp13) / m_A42;
+ double tmp12 = 0.0;
+ tmp12 += m_A37 * V[13];
+ tmp12 += m_A38 * V[14];
+ V[12] = (RHS12 - tmp12) / m_A36;
+ double tmp11 = 0.0;
+ tmp11 += m_A33 * V[19];
+ V[11] = (RHS11 - tmp11) / m_A32;
+ double tmp10 = 0.0;
+ tmp10 += m_A31 * V[19];
+ V[10] = (RHS10 - tmp10) / m_A30;
+ double tmp9 = 0.0;
+ tmp9 += m_A29 * V[18];
+ V[9] = (RHS9 - tmp9) / m_A28;
+ double tmp8 = 0.0;
+ tmp8 += m_A26 * V[18];
+ tmp8 += m_A27 * V[22];
+ V[8] = (RHS8 - tmp8) / m_A25;
+ double tmp7 = 0.0;
+ tmp7 += m_A21 * V[14];
+ tmp7 += m_A22 * V[17];
+ tmp7 += m_A23 * V[21];
+ tmp7 += m_A24 * V[22];
+ V[7] = (RHS7 - tmp7) / m_A20;
+ double tmp6 = 0.0;
+ tmp6 += m_A16 * V[13];
+ tmp6 += m_A17 * V[17];
+ tmp6 += m_A18 * V[21];
+ tmp6 += m_A19 * V[22];
+ V[6] = (RHS6 - tmp6) / m_A15;
+ double tmp5 = 0.0;
+ tmp5 += m_A14 * V[16];
+ V[5] = (RHS5 - tmp5) / m_A13;
+ double tmp4 = 0.0;
+ tmp4 += m_A11 * V[17];
+ tmp4 += m_A12 * V[20];
+ V[4] = (RHS4 - tmp4) / m_A10;
+ double tmp3 = 0.0;
+ tmp3 += m_A9 * V[20];
+ V[3] = (RHS3 - tmp3) / m_A8;
+ double tmp2 = 0.0;
+ tmp2 += m_A7 * V[15];
+ V[2] = (RHS2 - tmp2) / m_A6;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[12];
+ tmp1 += m_A4 * V[13];
+ tmp1 += m_A5 * V[14];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[12];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
+// sspeedr,280zzzap
+static void nl_gcr_122_double_double_42c57d523cac30d0(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ double m_A7(0.0);
+ double m_A8(0.0);
+ double m_A9(0.0);
+ double m_A10(0.0);
+ double m_A11(0.0);
+ double m_A12(0.0);
+ double m_A13(0.0);
+ double m_A14(0.0);
+ double m_A15(0.0);
+ double m_A16(0.0);
+ double m_A17(0.0);
+ double m_A18(0.0);
+ double m_A19(0.0);
+ double m_A20(0.0);
+ double m_A21(0.0);
+ double m_A22(0.0);
+ double m_A23(0.0);
+ double m_A24(0.0);
+ double m_A25(0.0);
+ double m_A26(0.0);
+ double m_A27(0.0);
+ double m_A28(0.0);
+ double m_A29(0.0);
+ double m_A30(0.0);
+ double m_A31(0.0);
+ double m_A32(0.0);
+ double m_A33(0.0);
+ double m_A34(0.0);
+ double m_A35(0.0);
+ double m_A36(0.0);
+ double m_A37(0.0);
+ double m_A38(0.0);
+ double m_A39(0.0);
+ double m_A40(0.0);
+ double m_A41(0.0);
+ double m_A42(0.0);
+ double m_A43(0.0);
+ double m_A44(0.0);
+ double m_A45(0.0);
+ double m_A46(0.0);
+ double m_A47(0.0);
+ double m_A48(0.0);
+ double m_A49(0.0);
+ double m_A50(0.0);
+ double m_A51(0.0);
+ double m_A52(0.0);
+ double m_A53(0.0);
+ double m_A54(0.0);
+ double m_A55(0.0);
+ double m_A56(0.0);
+ double m_A57(0.0);
+ double m_A58(0.0);
+ double m_A59(0.0);
+ double m_A60(0.0);
+ double m_A61(0.0);
+ double m_A62(0.0);
+ double m_A63(0.0);
+ double m_A64(0.0);
+ double m_A65(0.0);
+ double m_A66(0.0);
+ double m_A67(0.0);
+ double m_A68(0.0);
+ double m_A69(0.0);
+ double m_A70(0.0);
+ double m_A71(0.0);
+ double m_A72(0.0);
+ double m_A73(0.0);
+ double m_A74(0.0);
+ double m_A75(0.0);
+ double m_A76(0.0);
+ double m_A77(0.0);
+ double m_A78(0.0);
+ double m_A79(0.0);
+ double m_A80(0.0);
+ double m_A81(0.0);
+ double m_A82(0.0);
+ double m_A83(0.0);
+ double m_A84(0.0);
+ double m_A85(0.0);
+ double m_A86(0.0);
+ double m_A87(0.0);
+ double m_A88(0.0);
+ double m_A89(0.0);
+ double m_A90(0.0);
+ double m_A91(0.0);
+ double m_A92(0.0);
+ double m_A93(0.0);
+ double m_A94(0.0);
+ double m_A95(0.0);
+ double m_A96(0.0);
+ double m_A97(0.0);
+ double m_A98(0.0);
+ double m_A99(0.0);
+ double m_A100(0.0);
+ double m_A101(0.0);
+ double m_A102(0.0);
+ double m_A103(0.0);
+ double m_A104(0.0);
+ double m_A105(0.0);
+ double m_A106(0.0);
+ double m_A107(0.0);
+ double m_A108(0.0);
+ double m_A109(0.0);
+ double m_A110(0.0);
+ double m_A111(0.0);
+ double m_A112(0.0);
+ double m_A113(0.0);
+ double m_A114(0.0);
+ double m_A115(0.0);
+ double m_A116(0.0);
+ double m_A117(0.0);
+ double m_A118(0.0);
+ double m_A119(0.0);
+ double m_A120(0.0);
+ double m_A121(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 -= go[1] * *cnV[1];
+ m_A2 += gt[2];
+ m_A2 += gt[3];
+ m_A3 += go[2];
+ double RHS1 = Idr[2];
+ RHS1 += Idr[3];
+ RHS1 -= go[3] * *cnV[3];
+ m_A4 += gt[4];
+ m_A4 += gt[5];
+ m_A4 += gt[6];
+ m_A5 += go[4];
+ double RHS2 = Idr[4];
+ RHS2 += Idr[5];
+ RHS2 += Idr[6];
+ RHS2 -= go[5] * *cnV[5];
+ RHS2 -= go[6] * *cnV[6];
+ m_A6 += gt[7];
+ m_A6 += gt[8];
+ m_A6 += gt[9];
+ m_A6 += gt[10];
+ m_A6 += gt[11];
+ m_A6 += gt[12];
+ m_A6 += gt[13];
+ m_A7 += go[7];
+ double RHS3 = Idr[7];
+ RHS3 += Idr[8];
+ RHS3 += Idr[9];
+ RHS3 += Idr[10];
+ RHS3 += Idr[11];
+ RHS3 += Idr[12];
+ RHS3 += Idr[13];
+ RHS3 -= go[8] * *cnV[8];
+ RHS3 -= go[9] * *cnV[9];
+ RHS3 -= go[10] * *cnV[10];
+ RHS3 -= go[11] * *cnV[11];
+ RHS3 -= go[12] * *cnV[12];
+ RHS3 -= go[13] * *cnV[13];
+ m_A8 += gt[14];
+ m_A8 += gt[15];
+ m_A9 += go[14];
+ double RHS4 = Idr[14];
+ RHS4 += Idr[15];
+ RHS4 -= go[15] * *cnV[15];
+ m_A10 += gt[16];
+ m_A10 += gt[17];
+ m_A10 += gt[18];
+ m_A10 += gt[19];
+ m_A12 += go[16];
+ m_A13 += go[17];
+ m_A11 += go[18];
+ double RHS5 = Idr[16];
+ RHS5 += Idr[17];
+ RHS5 += Idr[18];
+ RHS5 += Idr[19];
+ RHS5 -= go[19] * *cnV[19];
+ m_A14 += gt[20];
+ m_A14 += gt[21];
+ m_A14 += gt[22];
+ m_A14 += gt[23];
+ m_A14 += gt[24];
+ m_A14 += gt[25];
+ m_A14 += gt[26];
+ m_A15 += go[20];
+ double RHS6 = Idr[20];
+ RHS6 += Idr[21];
+ RHS6 += Idr[22];
+ RHS6 += Idr[23];
+ RHS6 += Idr[24];
+ RHS6 += Idr[25];
+ RHS6 += Idr[26];
+ RHS6 -= go[21] * *cnV[21];
+ RHS6 -= go[22] * *cnV[22];
+ RHS6 -= go[23] * *cnV[23];
+ RHS6 -= go[24] * *cnV[24];
+ RHS6 -= go[25] * *cnV[25];
+ RHS6 -= go[26] * *cnV[26];
+ m_A16 += gt[27];
+ m_A16 += gt[28];
+ m_A18 += go[27];
+ m_A17 += go[28];
+ double RHS7 = Idr[27];
+ RHS7 += Idr[28];
+ m_A19 += gt[29];
+ m_A19 += gt[30];
+ m_A19 += gt[31];
+ m_A20 += go[29];
+ double RHS8 = Idr[29];
+ RHS8 += Idr[30];
+ RHS8 += Idr[31];
+ RHS8 -= go[30] * *cnV[30];
+ RHS8 -= go[31] * *cnV[31];
+ m_A21 += gt[32];
+ m_A21 += gt[33];
+ m_A22 += go[32];
+ double RHS9 = Idr[32];
+ RHS9 += Idr[33];
+ RHS9 -= go[33] * *cnV[33];
+ m_A23 += gt[34];
+ m_A23 += gt[35];
+ m_A23 += gt[36];
+ m_A24 += go[34];
+ m_A25 += go[35];
+ m_A25 += go[36];
+ double RHS10 = Idr[34];
+ RHS10 += Idr[35];
+ RHS10 += Idr[36];
+ m_A26 += gt[37];
+ m_A26 += gt[38];
+ m_A26 += gt[39];
+ m_A26 += gt[40];
+ m_A26 += gt[41];
+ m_A26 += gt[42];
+ m_A26 += gt[43];
+ m_A27 += go[37];
+ double RHS11 = Idr[37];
+ RHS11 += Idr[38];
+ RHS11 += Idr[39];
+ RHS11 += Idr[40];
+ RHS11 += Idr[41];
+ RHS11 += Idr[42];
+ RHS11 += Idr[43];
+ RHS11 -= go[38] * *cnV[38];
+ RHS11 -= go[39] * *cnV[39];
+ RHS11 -= go[40] * *cnV[40];
+ RHS11 -= go[41] * *cnV[41];
+ RHS11 -= go[42] * *cnV[42];
+ RHS11 -= go[43] * *cnV[43];
+ m_A28 += gt[44];
+ m_A28 += gt[45];
+ m_A28 += gt[46];
+ m_A29 += go[44];
+ double RHS12 = Idr[44];
+ RHS12 += Idr[45];
+ RHS12 += Idr[46];
+ RHS12 -= go[45] * *cnV[45];
+ RHS12 -= go[46] * *cnV[46];
+ m_A30 += gt[47];
+ m_A30 += gt[48];
+ m_A30 += gt[49];
+ m_A30 += gt[50];
+ m_A32 += go[47];
+ m_A31 += go[48];
+ m_A33 += go[49];
+ double RHS13 = Idr[47];
+ RHS13 += Idr[48];
+ RHS13 += Idr[49];
+ RHS13 += Idr[50];
+ RHS13 -= go[50] * *cnV[50];
+ m_A35 += gt[51];
+ m_A35 += gt[52];
+ m_A34 += go[51];
+ double RHS14 = Idr[51];
+ RHS14 += Idr[52];
+ RHS14 -= go[52] * *cnV[52];
+ m_A37 += gt[53];
+ m_A37 += gt[54];
+ m_A37 += gt[55];
+ m_A37 += gt[56];
+ m_A36 += go[53];
+ m_A38 += go[54];
+ double RHS15 = Idr[53];
+ RHS15 += Idr[54];
+ RHS15 += Idr[55];
+ RHS15 += Idr[56];
+ RHS15 -= go[55] * *cnV[55];
+ RHS15 -= go[56] * *cnV[56];
+ m_A40 += gt[57];
+ m_A40 += gt[58];
+ m_A39 += go[57];
+ double RHS16 = Idr[57];
+ RHS16 += Idr[58];
+ RHS16 -= go[58] * *cnV[58];
+ m_A43 += gt[59];
+ m_A43 += gt[60];
+ m_A41 += go[59];
+ m_A42 += go[60];
+ double RHS17 = Idr[59];
+ RHS17 += Idr[60];
+ m_A47 += gt[61];
+ m_A47 += gt[62];
+ m_A47 += gt[63];
+ m_A47 += gt[64];
+ m_A47 += gt[65];
+ m_A46 += go[61];
+ m_A49 += go[62];
+ m_A50 += go[63];
+ double RHS18 = Idr[61];
+ RHS18 += Idr[62];
+ RHS18 += Idr[63];
+ RHS18 += Idr[64];
+ RHS18 += Idr[65];
+ RHS18 -= go[64] * *cnV[64];
+ RHS18 -= go[65] * *cnV[65];
+ m_A52 += gt[66];
+ m_A52 += gt[67];
+ m_A51 += go[66];
+ double RHS19 = Idr[66];
+ RHS19 += Idr[67];
+ RHS19 -= go[67] * *cnV[67];
+ m_A55 += gt[68];
+ m_A55 += gt[69];
+ m_A54 += go[68];
+ m_A53 += go[69];
+ double RHS20 = Idr[68];
+ RHS20 += Idr[69];
+ m_A60 += gt[70];
+ m_A60 += gt[71];
+ m_A60 += gt[72];
+ m_A60 += gt[73];
+ m_A59 += go[70];
+ m_A61 += go[71];
+ double RHS21 = Idr[70];
+ RHS21 += Idr[71];
+ RHS21 += Idr[72];
+ RHS21 += Idr[73];
+ RHS21 -= go[72] * *cnV[72];
+ RHS21 -= go[73] * *cnV[73];
+ m_A69 += gt[74];
+ m_A69 += gt[75];
+ m_A69 += gt[76];
+ m_A69 += gt[77];
+ m_A69 += gt[78];
+ m_A69 += gt[79];
+ m_A69 += gt[80];
+ m_A69 += gt[81];
+ m_A69 += gt[82];
+ m_A62 += go[74];
+ m_A65 += go[75];
+ m_A65 += go[76];
+ m_A64 += go[77];
+ m_A63 += go[78];
+ m_A71 += go[79];
+ double RHS22 = Idr[74];
+ RHS22 += Idr[75];
+ RHS22 += Idr[76];
+ RHS22 += Idr[77];
+ RHS22 += Idr[78];
+ RHS22 += Idr[79];
+ RHS22 += Idr[80];
+ RHS22 += Idr[81];
+ RHS22 += Idr[82];
+ RHS22 -= go[80] * *cnV[80];
+ RHS22 -= go[81] * *cnV[81];
+ RHS22 -= go[82] * *cnV[82];
+ m_A75 += gt[83];
+ m_A75 += gt[84];
+ m_A75 += gt[85];
+ m_A75 += gt[86];
+ m_A74 += go[83];
+ m_A76 += go[84];
+ double RHS23 = Idr[83];
+ RHS23 += Idr[84];
+ RHS23 += Idr[85];
+ RHS23 += Idr[86];
+ RHS23 -= go[85] * *cnV[85];
+ RHS23 -= go[86] * *cnV[86];
+ m_A82 += gt[87];
+ m_A82 += gt[88];
+ m_A82 += gt[89];
+ m_A82 += gt[90];
+ m_A82 += gt[91];
+ m_A82 += gt[92];
+ m_A77 += go[87];
+ m_A78 += go[88];
+ m_A84 += go[89];
+ double RHS24 = Idr[87];
+ RHS24 += Idr[88];
+ RHS24 += Idr[89];
+ RHS24 += Idr[90];
+ RHS24 += Idr[91];
+ RHS24 += Idr[92];
+ RHS24 -= go[90] * *cnV[90];
+ RHS24 -= go[91] * *cnV[91];
+ RHS24 -= go[92] * *cnV[92];
+ m_A93 += gt[93];
+ m_A93 += gt[94];
+ m_A93 += gt[95];
+ m_A93 += gt[96];
+ m_A93 += gt[97];
+ m_A91 += go[93];
+ m_A89 += go[94];
+ m_A88 += go[95];
+ m_A87 += go[96];
+ m_A86 += go[97];
+ double RHS25 = Idr[93];
+ RHS25 += Idr[94];
+ RHS25 += Idr[95];
+ RHS25 += Idr[96];
+ RHS25 += Idr[97];
+ m_A104 += gt[98];
+ m_A104 += gt[99];
+ m_A104 += gt[100];
+ m_A104 += gt[101];
+ m_A104 += gt[102];
+ m_A102 += go[98];
+ m_A99 += go[99];
+ m_A98 += go[100];
+ m_A97 += go[101];
+ m_A96 += go[102];
+ double RHS26 = Idr[98];
+ RHS26 += Idr[99];
+ RHS26 += Idr[100];
+ RHS26 += Idr[101];
+ RHS26 += Idr[102];
+ m_A113 += gt[103];
+ m_A113 += gt[104];
+ m_A113 += gt[105];
+ m_A113 += gt[106];
+ m_A107 += go[103];
+ m_A106 += go[104];
+ m_A114 += go[105];
+ double RHS27 = Idr[103];
+ RHS27 += Idr[104];
+ RHS27 += Idr[105];
+ RHS27 += Idr[106];
+ RHS27 -= go[106] * *cnV[106];
+ m_A121 += gt[107];
+ m_A121 += gt[108];
+ m_A121 += gt[109];
+ m_A121 += gt[110];
+ m_A121 += gt[111];
+ m_A118 += go[107];
+ m_A117 += go[108];
+ m_A120 += go[109];
+ m_A116 += go[110];
+ m_A115 += go[111];
+ double RHS28 = Idr[107];
+ RHS28 += Idr[108];
+ RHS28 += Idr[109];
+ RHS28 += Idr[110];
+ RHS28 += Idr[111];
+ const double f0 = 1.0 / m_A0;
+ const double f0_17 = -f0 * m_A41;
+ m_A43 += m_A1 * f0_17;
+ RHS17 += f0_17 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_14 = -f1 * m_A34;
+ m_A35 += m_A3 * f1_14;
+ RHS14 += f1_14 * RHS1;
+ const double f1_25 = -f1 * m_A86;
+ m_A89 += m_A3 * f1_25;
+ RHS25 += f1_25 * RHS1;
+ const double f2 = 1.0 / m_A4;
+ const double f2_15 = -f2 * m_A36;
+ m_A38 += m_A5 * f2_15;
+ RHS15 += f2_15 * RHS2;
+ const double f2_25 = -f2 * m_A87;
+ m_A93 += m_A5 * f2_25;
+ RHS25 += f2_25 * RHS2;
+ const double f3 = 1.0 / m_A6;
+ const double f3_22 = -f3 * m_A62;
+ m_A66 += m_A7 * f3_22;
+ RHS22 += f3_22 * RHS3;
+ const double f4 = 1.0 / m_A8;
+ const double f4_16 = -f4 * m_A39;
+ m_A40 += m_A9 * f4_16;
+ RHS16 += f4_16 * RHS4;
+ const double f4_28 = -f4 * m_A115;
+ m_A117 += m_A9 * f4_28;
+ RHS28 += f4_28 * RHS4;
+ const double f5 = 1.0 / m_A10;
+ const double f5_17 = -f5 * m_A42;
+ m_A43 += m_A11 * f5_17;
+ m_A44 += m_A12 * f5_17;
+ m_A45 += m_A13 * f5_17;
+ RHS17 += f5_17 * RHS5;
+ const double f5_22 = -f5 * m_A63;
+ m_A67 += m_A11 * f5_22;
+ m_A69 += m_A12 * f5_22;
+ m_A71 += m_A13 * f5_22;
+ RHS22 += f5_22 * RHS5;
+ const double f5_25 = -f5 * m_A88;
+ m_A90 += m_A11 * f5_25;
+ m_A91 += m_A12 * f5_25;
+ m_A93 += m_A13 * f5_25;
+ RHS25 += f5_25 * RHS5;
+ const double f6 = 1.0 / m_A14;
+ const double f6_18 = -f6 * m_A46;
+ m_A48 += m_A15 * f6_18;
+ RHS18 += f6_18 * RHS6;
+ const double f7 = 1.0 / m_A16;
+ const double f7_22 = -f7 * m_A64;
+ m_A69 += m_A17 * f7_22;
+ m_A73 += m_A18 * f7_22;
+ RHS22 += f7_22 * RHS7;
+ const double f7_27 = -f7 * m_A106;
+ m_A109 += m_A17 * f7_27;
+ m_A113 += m_A18 * f7_27;
+ RHS27 += f7_27 * RHS7;
+ const double f8 = 1.0 / m_A19;
+ const double f8_21 = -f8 * m_A59;
+ m_A61 += m_A20 * f8_21;
+ RHS21 += f8_21 * RHS8;
+ const double f8_28 = -f8 * m_A116;
+ m_A121 += m_A20 * f8_28;
+ RHS28 += f8_28 * RHS8;
+ const double f9 = 1.0 / m_A21;
+ const double f9_19 = -f9 * m_A51;
+ m_A52 += m_A22 * f9_19;
+ RHS19 += f9_19 * RHS9;
+ const double f9_26 = -f9 * m_A96;
+ m_A99 += m_A22 * f9_26;
+ RHS26 += f9_26 * RHS9;
+ const double f10 = 1.0 / m_A23;
+ const double f10_20 = -f10 * m_A53;
+ m_A55 += m_A24 * f10_20;
+ m_A56 += m_A25 * f10_20;
+ RHS20 += f10_20 * RHS10;
+ const double f10_22 = -f10 * m_A65;
+ m_A68 += m_A24 * f10_22;
+ m_A69 += m_A25 * f10_22;
+ RHS22 += f10_22 * RHS10;
+ const double f11 = 1.0 / m_A26;
+ const double f11_24 = -f11 * m_A77;
+ m_A81 += m_A27 * f11_24;
+ RHS24 += f11_24 * RHS11;
+ const double f12 = 1.0 / m_A28;
+ const double f12_23 = -f12 * m_A74;
+ m_A76 += m_A29 * f12_23;
+ RHS23 += f12_23 * RHS12;
+ const double f12_26 = -f12 * m_A97;
+ m_A104 += m_A29 * f12_26;
+ RHS26 += f12_26 * RHS12;
+ const double f13 = 1.0 / m_A30;
+ const double f13_20 = -f13 * m_A54;
+ m_A55 += m_A31 * f13_20;
+ m_A57 += m_A32 * f13_20;
+ m_A58 += m_A33 * f13_20;
+ RHS20 += f13_20 * RHS13;
+ const double f13_24 = -f13 * m_A78;
+ m_A79 += m_A31 * f13_24;
+ m_A82 += m_A32 * f13_24;
+ m_A84 += m_A33 * f13_24;
+ RHS24 += f13_24 * RHS13;
+ const double f13_26 = -f13 * m_A98;
+ m_A100 += m_A31 * f13_26;
+ m_A102 += m_A32 * f13_26;
+ m_A104 += m_A33 * f13_26;
+ RHS26 += f13_26 * RHS13;
+ const double f14 = 1.0 / m_A35;
+ const double f14_25 = -f14 * m_A89;
+ RHS25 += f14_25 * RHS14;
+ const double f15 = 1.0 / m_A37;
+ const double f15_22 = -f15 * m_A66;
+ m_A71 += m_A38 * f15_22;
+ RHS22 += f15_22 * RHS15;
+ const double f16 = 1.0 / m_A40;
+ const double f16_28 = -f16 * m_A117;
+ RHS28 += f16_28 * RHS16;
+ const double f17 = 1.0 / m_A43;
+ const double f17_22 = -f17 * m_A67;
+ m_A69 += m_A44 * f17_22;
+ m_A71 += m_A45 * f17_22;
+ RHS22 += f17_22 * RHS17;
+ const double f17_25 = -f17 * m_A90;
+ m_A91 += m_A44 * f17_25;
+ m_A93 += m_A45 * f17_25;
+ RHS25 += f17_25 * RHS17;
+ const double f18 = 1.0 / m_A47;
+ const double f18_27 = -f18 * m_A107;
+ m_A108 += m_A48 * f18_27;
+ m_A113 += m_A49 * f18_27;
+ m_A114 += m_A50 * f18_27;
+ RHS27 += f18_27 * RHS18;
+ const double f18_28 = -f18 * m_A118;
+ m_A119 += m_A48 * f18_28;
+ m_A120 += m_A49 * f18_28;
+ m_A121 += m_A50 * f18_28;
+ RHS28 += f18_28 * RHS18;
+ const double f19 = 1.0 / m_A52;
+ const double f19_26 = -f19 * m_A99;
+ RHS26 += f19_26 * RHS19;
+ const double f20 = 1.0 / m_A55;
+ const double f20_22 = -f20 * m_A68;
+ m_A69 += m_A56 * f20_22;
+ m_A70 += m_A57 * f20_22;
+ m_A72 += m_A58 * f20_22;
+ RHS22 += f20_22 * RHS20;
+ const double f20_24 = -f20 * m_A79;
+ m_A80 += m_A56 * f20_24;
+ m_A82 += m_A57 * f20_24;
+ m_A84 += m_A58 * f20_24;
+ RHS24 += f20_24 * RHS20;
+ const double f20_26 = -f20 * m_A100;
+ m_A101 += m_A56 * f20_26;
+ m_A102 += m_A57 * f20_26;
+ m_A104 += m_A58 * f20_26;
+ RHS26 += f20_26 * RHS20;
+ const double f21 = 1.0 / m_A60;
+ const double f21_27 = -f21 * m_A108;
+ m_A114 += m_A61 * f21_27;
+ RHS27 += f21_27 * RHS21;
+ const double f21_28 = -f21 * m_A119;
+ m_A121 += m_A61 * f21_28;
+ RHS28 += f21_28 * RHS21;
+ const double f22 = 1.0 / m_A69;
+ const double f22_24 = -f22 * m_A80;
+ m_A82 += m_A70 * f22_24;
+ m_A83 += m_A71 * f22_24;
+ m_A84 += m_A72 * f22_24;
+ m_A85 += m_A73 * f22_24;
+ RHS24 += f22_24 * RHS22;
+ const double f22_25 = -f22 * m_A91;
+ m_A92 += m_A70 * f22_25;
+ m_A93 += m_A71 * f22_25;
+ m_A94 += m_A72 * f22_25;
+ m_A95 += m_A73 * f22_25;
+ RHS25 += f22_25 * RHS22;
+ const double f22_26 = -f22 * m_A101;
+ m_A102 += m_A70 * f22_26;
+ m_A103 += m_A71 * f22_26;
+ m_A104 += m_A72 * f22_26;
+ m_A105 += m_A73 * f22_26;
+ RHS26 += f22_26 * RHS22;
+ const double f22_27 = -f22 * m_A109;
+ m_A110 += m_A70 * f22_27;
+ m_A111 += m_A71 * f22_27;
+ m_A112 += m_A72 * f22_27;
+ m_A113 += m_A73 * f22_27;
+ RHS27 += f22_27 * RHS22;
+ const double f23 = 1.0 / m_A75;
+ const double f23_24 = -f23 * m_A81;
+ m_A84 += m_A76 * f23_24;
+ RHS24 += f23_24 * RHS23;
+ const double f24 = 1.0 / m_A82;
+ const double f24_25 = -f24 * m_A92;
+ m_A93 += m_A83 * f24_25;
+ m_A94 += m_A84 * f24_25;
+ m_A95 += m_A85 * f24_25;
+ RHS25 += f24_25 * RHS24;
+ const double f24_26 = -f24 * m_A102;
+ m_A103 += m_A83 * f24_26;
+ m_A104 += m_A84 * f24_26;
+ m_A105 += m_A85 * f24_26;
+ RHS26 += f24_26 * RHS24;
+ const double f24_27 = -f24 * m_A110;
+ m_A111 += m_A83 * f24_27;
+ m_A112 += m_A84 * f24_27;
+ m_A113 += m_A85 * f24_27;
+ RHS27 += f24_27 * RHS24;
+ const double f25 = 1.0 / m_A93;
+ const double f25_26 = -f25 * m_A103;
+ m_A104 += m_A94 * f25_26;
+ m_A105 += m_A95 * f25_26;
+ RHS26 += f25_26 * RHS25;
+ const double f25_27 = -f25 * m_A111;
+ m_A112 += m_A94 * f25_27;
+ m_A113 += m_A95 * f25_27;
+ RHS27 += f25_27 * RHS25;
+ const double f26 = 1.0 / m_A104;
+ const double f26_27 = -f26 * m_A112;
+ m_A113 += m_A105 * f26_27;
+ RHS27 += f26_27 * RHS26;
+ const double f27 = 1.0 / m_A113;
+ const double f27_28 = -f27 * m_A120;
+ m_A121 += m_A114 * f27_28;
+ RHS28 += f27_28 * RHS27;
+ V[28] = RHS28 / m_A121;
+ double tmp27 = 0.0;
+ tmp27 += m_A114 * V[28];
+ V[27] = (RHS27 - tmp27) / m_A113;
+ double tmp26 = 0.0;
+ tmp26 += m_A105 * V[27];
+ V[26] = (RHS26 - tmp26) / m_A104;
+ double tmp25 = 0.0;
+ tmp25 += m_A94 * V[26];
+ tmp25 += m_A95 * V[27];
+ V[25] = (RHS25 - tmp25) / m_A93;
+ double tmp24 = 0.0;
+ tmp24 += m_A83 * V[25];
+ tmp24 += m_A84 * V[26];
+ tmp24 += m_A85 * V[27];
+ V[24] = (RHS24 - tmp24) / m_A82;
+ double tmp23 = 0.0;
+ tmp23 += m_A76 * V[26];
+ V[23] = (RHS23 - tmp23) / m_A75;
+ double tmp22 = 0.0;
+ tmp22 += m_A70 * V[24];
+ tmp22 += m_A71 * V[25];
+ tmp22 += m_A72 * V[26];
+ tmp22 += m_A73 * V[27];
+ V[22] = (RHS22 - tmp22) / m_A69;
+ double tmp21 = 0.0;
+ tmp21 += m_A61 * V[28];
+ V[21] = (RHS21 - tmp21) / m_A60;
+ double tmp20 = 0.0;
+ tmp20 += m_A56 * V[22];
+ tmp20 += m_A57 * V[24];
+ tmp20 += m_A58 * V[26];
+ V[20] = (RHS20 - tmp20) / m_A55;
+ double tmp19 = 0.0;
+ V[19] = (RHS19 - tmp19) / m_A52;
+ double tmp18 = 0.0;
+ tmp18 += m_A48 * V[21];
+ tmp18 += m_A49 * V[27];
+ tmp18 += m_A50 * V[28];
+ V[18] = (RHS18 - tmp18) / m_A47;
+ double tmp17 = 0.0;
+ tmp17 += m_A44 * V[22];
+ tmp17 += m_A45 * V[25];
+ V[17] = (RHS17 - tmp17) / m_A43;
+ double tmp16 = 0.0;
+ V[16] = (RHS16 - tmp16) / m_A40;
+ double tmp15 = 0.0;
+ tmp15 += m_A38 * V[25];
+ V[15] = (RHS15 - tmp15) / m_A37;
+ double tmp14 = 0.0;
+ V[14] = (RHS14 - tmp14) / m_A35;
+ double tmp13 = 0.0;
+ tmp13 += m_A31 * V[20];
+ tmp13 += m_A32 * V[24];
+ tmp13 += m_A33 * V[26];
+ V[13] = (RHS13 - tmp13) / m_A30;
+ double tmp12 = 0.0;
+ tmp12 += m_A29 * V[26];
+ V[12] = (RHS12 - tmp12) / m_A28;
+ double tmp11 = 0.0;
+ tmp11 += m_A27 * V[23];
+ V[11] = (RHS11 - tmp11) / m_A26;
+ double tmp10 = 0.0;
+ tmp10 += m_A24 * V[20];
+ tmp10 += m_A25 * V[22];
+ V[10] = (RHS10 - tmp10) / m_A23;
+ double tmp9 = 0.0;
+ tmp9 += m_A22 * V[19];
+ V[9] = (RHS9 - tmp9) / m_A21;
+ double tmp8 = 0.0;
+ tmp8 += m_A20 * V[28];
+ V[8] = (RHS8 - tmp8) / m_A19;
+ double tmp7 = 0.0;
+ tmp7 += m_A17 * V[22];
+ tmp7 += m_A18 * V[27];
+ V[7] = (RHS7 - tmp7) / m_A16;
+ double tmp6 = 0.0;
+ tmp6 += m_A15 * V[21];
+ V[6] = (RHS6 - tmp6) / m_A14;
+ double tmp5 = 0.0;
+ tmp5 += m_A11 * V[17];
+ tmp5 += m_A12 * V[22];
+ tmp5 += m_A13 * V[25];
+ V[5] = (RHS5 - tmp5) / m_A10;
+ double tmp4 = 0.0;
+ tmp4 += m_A9 * V[16];
+ V[4] = (RHS4 - tmp4) / m_A8;
+ double tmp3 = 0.0;
+ tmp3 += m_A7 * V[15];
+ V[3] = (RHS3 - tmp3) / m_A6;
+ double tmp2 = 0.0;
+ tmp2 += m_A5 * V[25];
+ V[2] = (RHS2 - tmp2) / m_A4;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[14];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[17];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
+// sspeedr,280zzzap
+static void nl_gcr_123_double_double_864a61c57bac9c38(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ double m_A7(0.0);
+ double m_A8(0.0);
+ double m_A9(0.0);
+ double m_A10(0.0);
+ double m_A11(0.0);
+ double m_A12(0.0);
+ double m_A13(0.0);
+ double m_A14(0.0);
+ double m_A15(0.0);
+ double m_A16(0.0);
+ double m_A17(0.0);
+ double m_A18(0.0);
+ double m_A19(0.0);
+ double m_A20(0.0);
+ double m_A21(0.0);
+ double m_A22(0.0);
+ double m_A23(0.0);
+ double m_A24(0.0);
+ double m_A25(0.0);
+ double m_A26(0.0);
+ double m_A27(0.0);
+ double m_A28(0.0);
+ double m_A29(0.0);
+ double m_A30(0.0);
+ double m_A31(0.0);
+ double m_A32(0.0);
+ double m_A33(0.0);
+ double m_A34(0.0);
+ double m_A35(0.0);
+ double m_A36(0.0);
+ double m_A37(0.0);
+ double m_A38(0.0);
+ double m_A39(0.0);
+ double m_A40(0.0);
+ double m_A41(0.0);
+ double m_A42(0.0);
+ double m_A43(0.0);
+ double m_A44(0.0);
+ double m_A45(0.0);
+ double m_A46(0.0);
+ double m_A47(0.0);
+ double m_A48(0.0);
+ double m_A49(0.0);
+ double m_A50(0.0);
+ double m_A51(0.0);
+ double m_A52(0.0);
+ double m_A53(0.0);
+ double m_A54(0.0);
+ double m_A55(0.0);
+ double m_A56(0.0);
+ double m_A57(0.0);
+ double m_A58(0.0);
+ double m_A59(0.0);
+ double m_A60(0.0);
+ double m_A61(0.0);
+ double m_A62(0.0);
+ double m_A63(0.0);
+ double m_A64(0.0);
+ double m_A65(0.0);
+ double m_A66(0.0);
+ double m_A67(0.0);
+ double m_A68(0.0);
+ double m_A69(0.0);
+ double m_A70(0.0);
+ double m_A71(0.0);
+ double m_A72(0.0);
+ double m_A73(0.0);
+ double m_A74(0.0);
+ double m_A75(0.0);
+ double m_A76(0.0);
+ double m_A77(0.0);
+ double m_A78(0.0);
+ double m_A79(0.0);
+ double m_A80(0.0);
+ double m_A81(0.0);
+ double m_A82(0.0);
+ double m_A83(0.0);
+ double m_A84(0.0);
+ double m_A85(0.0);
+ double m_A86(0.0);
+ double m_A87(0.0);
+ double m_A88(0.0);
+ double m_A89(0.0);
+ double m_A90(0.0);
+ double m_A91(0.0);
+ double m_A92(0.0);
+ double m_A93(0.0);
+ double m_A94(0.0);
+ double m_A95(0.0);
+ double m_A96(0.0);
+ double m_A97(0.0);
+ double m_A98(0.0);
+ double m_A99(0.0);
+ double m_A100(0.0);
+ double m_A101(0.0);
+ double m_A102(0.0);
+ double m_A103(0.0);
+ double m_A104(0.0);
+ double m_A105(0.0);
+ double m_A106(0.0);
+ double m_A107(0.0);
+ double m_A108(0.0);
+ double m_A109(0.0);
+ double m_A110(0.0);
+ double m_A111(0.0);
+ double m_A112(0.0);
+ double m_A113(0.0);
+ double m_A114(0.0);
+ double m_A115(0.0);
+ double m_A116(0.0);
+ double m_A117(0.0);
+ double m_A118(0.0);
+ double m_A119(0.0);
+ double m_A120(0.0);
+ double m_A121(0.0);
+ double m_A122(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A0 += gt[2];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 += Idr[2];
+ RHS0 -= go[1] * *cnV[1];
+ RHS0 -= go[2] * *cnV[2];
+ m_A2 += gt[3];
+ m_A2 += gt[4];
+ m_A3 += go[3];
+ double RHS1 = Idr[3];
+ RHS1 += Idr[4];
+ RHS1 -= go[4] * *cnV[4];
+ m_A4 += gt[5];
+ m_A4 += gt[6];
+ m_A4 += gt[7];
+ m_A4 += gt[8];
+ m_A4 += gt[9];
+ m_A4 += gt[10];
+ m_A4 += gt[11];
+ m_A5 += go[5];
+ double RHS2 = Idr[5];
+ RHS2 += Idr[6];
+ RHS2 += Idr[7];
+ RHS2 += Idr[8];
+ RHS2 += Idr[9];
+ RHS2 += Idr[10];
+ RHS2 += Idr[11];
+ RHS2 -= go[6] * *cnV[6];
+ RHS2 -= go[7] * *cnV[7];
+ RHS2 -= go[8] * *cnV[8];
+ RHS2 -= go[9] * *cnV[9];
+ RHS2 -= go[10] * *cnV[10];
+ RHS2 -= go[11] * *cnV[11];
+ m_A6 += gt[12];
+ m_A6 += gt[13];
+ m_A6 += gt[14];
+ m_A7 += go[12];
+ double RHS3 = Idr[12];
+ RHS3 += Idr[13];
+ RHS3 += Idr[14];
+ RHS3 -= go[13] * *cnV[13];
+ RHS3 -= go[14] * *cnV[14];
+ m_A8 += gt[15];
+ m_A8 += gt[16];
+ m_A8 += gt[17];
+ m_A8 += gt[18];
+ m_A8 += gt[19];
+ m_A8 += gt[20];
+ m_A8 += gt[21];
+ m_A9 += go[15];
+ double RHS4 = Idr[15];
+ RHS4 += Idr[16];
+ RHS4 += Idr[17];
+ RHS4 += Idr[18];
+ RHS4 += Idr[19];
+ RHS4 += Idr[20];
+ RHS4 += Idr[21];
+ RHS4 -= go[16] * *cnV[16];
+ RHS4 -= go[17] * *cnV[17];
+ RHS4 -= go[18] * *cnV[18];
+ RHS4 -= go[19] * *cnV[19];
+ RHS4 -= go[20] * *cnV[20];
+ RHS4 -= go[21] * *cnV[21];
+ m_A10 += gt[22];
+ m_A10 += gt[23];
+ m_A11 += go[22];
+ double RHS5 = Idr[22];
+ RHS5 += Idr[23];
+ RHS5 -= go[23] * *cnV[23];
+ m_A12 += gt[24];
+ m_A12 += gt[25];
+ m_A14 += go[24];
+ m_A13 += go[25];
+ double RHS6 = Idr[24];
+ RHS6 += Idr[25];
+ m_A15 += gt[26];
+ m_A15 += gt[27];
+ m_A16 += go[26];
+ double RHS7 = Idr[26];
+ RHS7 += Idr[27];
+ RHS7 -= go[27] * *cnV[27];
+ m_A17 += gt[28];
+ m_A17 += gt[29];
+ m_A18 += go[28];
+ double RHS8 = Idr[28];
+ RHS8 += Idr[29];
+ RHS8 -= go[29] * *cnV[29];
+ m_A19 += gt[30];
+ m_A19 += gt[31];
+ m_A19 += gt[32];
+ m_A19 += gt[33];
+ m_A19 += gt[34];
+ m_A19 += gt[35];
+ m_A19 += gt[36];
+ m_A20 += go[30];
+ double RHS9 = Idr[30];
+ RHS9 += Idr[31];
+ RHS9 += Idr[32];
+ RHS9 += Idr[33];
+ RHS9 += Idr[34];
+ RHS9 += Idr[35];
+ RHS9 += Idr[36];
+ RHS9 -= go[31] * *cnV[31];
+ RHS9 -= go[32] * *cnV[32];
+ RHS9 -= go[33] * *cnV[33];
+ RHS9 -= go[34] * *cnV[34];
+ RHS9 -= go[35] * *cnV[35];
+ RHS9 -= go[36] * *cnV[36];
+ m_A21 += gt[37];
+ m_A21 += gt[38];
+ m_A21 += gt[39];
+ m_A22 += go[37];
+ double RHS10 = Idr[37];
+ RHS10 += Idr[38];
+ RHS10 += Idr[39];
+ RHS10 -= go[38] * *cnV[38];
+ RHS10 -= go[39] * *cnV[39];
+ m_A23 += gt[40];
+ m_A23 += gt[41];
+ m_A23 += gt[42];
+ m_A23 += gt[43];
+ m_A24 += go[40];
+ double RHS11 = Idr[40];
+ RHS11 += Idr[41];
+ RHS11 += Idr[42];
+ RHS11 += Idr[43];
+ RHS11 -= go[41] * *cnV[41];
+ RHS11 -= go[42] * *cnV[42];
+ RHS11 -= go[43] * *cnV[43];
+ m_A25 += gt[44];
+ m_A25 += gt[45];
+ m_A25 += gt[46];
+ m_A25 += gt[47];
+ m_A25 += gt[48];
+ m_A25 += gt[49];
+ m_A25 += gt[50];
+ m_A26 += go[44];
+ double RHS12 = Idr[44];
+ RHS12 += Idr[45];
+ RHS12 += Idr[46];
+ RHS12 += Idr[47];
+ RHS12 += Idr[48];
+ RHS12 += Idr[49];
+ RHS12 += Idr[50];
+ RHS12 -= go[45] * *cnV[45];
+ RHS12 -= go[46] * *cnV[46];
+ RHS12 -= go[47] * *cnV[47];
+ RHS12 -= go[48] * *cnV[48];
+ RHS12 -= go[49] * *cnV[49];
+ RHS12 -= go[50] * *cnV[50];
+ m_A27 += gt[51];
+ m_A27 += gt[52];
+ m_A28 += go[51];
+ double RHS13 = Idr[51];
+ RHS13 += Idr[52];
+ RHS13 -= go[52] * *cnV[52];
+ m_A29 += gt[53];
+ m_A29 += gt[54];
+ m_A30 += go[53];
+ double RHS14 = Idr[53];
+ RHS14 += Idr[54];
+ RHS14 -= go[54] * *cnV[54];
+ m_A31 += gt[55];
+ m_A31 += gt[56];
+ m_A32 += go[55];
+ double RHS15 = Idr[55];
+ RHS15 += Idr[56];
+ RHS15 -= go[56] * *cnV[56];
+ m_A33 += gt[57];
+ m_A33 += gt[58];
+ m_A33 += gt[59];
+ m_A33 += gt[60];
+ m_A35 += go[57];
+ m_A34 += go[58];
+ double RHS16 = Idr[57];
+ RHS16 += Idr[58];
+ RHS16 += Idr[59];
+ RHS16 += Idr[60];
+ RHS16 -= go[59] * *cnV[59];
+ RHS16 -= go[60] * *cnV[60];
+ m_A36 += gt[61];
+ m_A36 += gt[62];
+ m_A36 += gt[63];
+ m_A37 += go[61];
+ double RHS17 = Idr[61];
+ RHS17 += Idr[62];
+ RHS17 += Idr[63];
+ RHS17 -= go[62] * *cnV[62];
+ RHS17 -= go[63] * *cnV[63];
+ m_A38 += gt[64];
+ m_A38 += gt[65];
+ m_A39 += go[64];
+ double RHS18 = Idr[64];
+ RHS18 += Idr[65];
+ RHS18 -= go[65] * *cnV[65];
+ m_A40 += gt[66];
+ m_A40 += gt[67];
+ m_A41 += go[66];
+ double RHS19 = Idr[66];
+ RHS19 += Idr[67];
+ RHS19 -= go[67] * *cnV[67];
+ m_A43 += gt[68];
+ m_A43 += gt[69];
+ m_A43 += gt[70];
+ m_A43 += gt[71];
+ m_A42 += go[68];
+ double RHS20 = Idr[68];
+ RHS20 += Idr[69];
+ RHS20 += Idr[70];
+ RHS20 += Idr[71];
+ RHS20 -= go[69] * *cnV[69];
+ RHS20 -= go[70] * *cnV[70];
+ RHS20 -= go[71] * *cnV[71];
+ m_A47 += gt[72];
+ m_A47 += gt[73];
+ m_A46 += go[72];
+ m_A45 += go[73];
+ double RHS21 = Idr[72];
+ RHS21 += Idr[73];
+ m_A51 += gt[74];
+ m_A51 += gt[75];
+ m_A49 += go[74];
+ double RHS22 = Idr[74];
+ RHS22 += Idr[75];
+ RHS22 -= go[75] * *cnV[75];
+ m_A54 += gt[76];
+ m_A54 += gt[77];
+ m_A54 += gt[78];
+ m_A53 += go[76];
+ m_A52 += go[77];
+ double RHS23 = Idr[76];
+ RHS23 += Idr[77];
+ RHS23 += Idr[78];
+ RHS23 -= go[78] * *cnV[78];
+ m_A56 += gt[79];
+ m_A56 += gt[80];
+ m_A56 += gt[81];
+ m_A56 += gt[82];
+ m_A55 += go[79];
+ m_A57 += go[80];
+ double RHS24 = Idr[79];
+ RHS24 += Idr[80];
+ RHS24 += Idr[81];
+ RHS24 += Idr[82];
+ RHS24 -= go[81] * *cnV[81];
+ RHS24 -= go[82] * *cnV[82];
+ m_A59 += gt[83];
+ m_A59 += gt[84];
+ m_A59 += gt[85];
+ m_A59 += gt[86];
+ m_A58 += go[83];
+ m_A60 += go[84];
+ double RHS25 = Idr[83];
+ RHS25 += Idr[84];
+ RHS25 += Idr[85];
+ RHS25 += Idr[86];
+ RHS25 -= go[85] * *cnV[85];
+ RHS25 -= go[86] * *cnV[86];
+ m_A62 += gt[87];
+ m_A62 += gt[88];
+ m_A63 += go[87];
+ m_A61 += go[88];
+ double RHS26 = Idr[87];
+ RHS26 += Idr[88];
+ m_A67 += gt[89];
+ m_A67 += gt[90];
+ m_A67 += gt[91];
+ m_A67 += gt[92];
+ m_A67 += gt[93];
+ m_A67 += gt[94];
+ m_A64 += go[89];
+ m_A65 += go[90];
+ m_A69 += go[91];
+ m_A68 += go[92];
+ double RHS27 = Idr[89];
+ RHS27 += Idr[90];
+ RHS27 += Idr[91];
+ RHS27 += Idr[92];
+ RHS27 += Idr[93];
+ RHS27 += Idr[94];
+ RHS27 -= go[93] * *cnV[93];
+ RHS27 -= go[94] * *cnV[94];
+ m_A72 += gt[95];
+ m_A72 += gt[96];
+ m_A72 += gt[97];
+ m_A72 += gt[98];
+ m_A71 += go[95];
+ m_A73 += go[96];
+ double RHS28 = Idr[95];
+ RHS28 += Idr[96];
+ RHS28 += Idr[97];
+ RHS28 += Idr[98];
+ RHS28 -= go[97] * *cnV[97];
+ RHS28 -= go[98] * *cnV[98];
+ m_A76 += gt[99];
+ m_A76 += gt[100];
+ m_A76 += gt[101];
+ m_A76 += gt[102];
+ m_A77 += go[99];
+ m_A78 += go[100];
+ m_A74 += go[101];
+ m_A75 += go[102];
+ double RHS29 = Idr[99];
+ RHS29 += Idr[100];
+ RHS29 += Idr[101];
+ RHS29 += Idr[102];
+ m_A81 += gt[103];
+ m_A81 += gt[104];
+ m_A81 += gt[105];
+ m_A80 += go[103];
+ m_A79 += go[104];
+ double RHS30 = Idr[103];
+ RHS30 += Idr[104];
+ RHS30 += Idr[105];
+ RHS30 -= go[105] * *cnV[105];
+ m_A84 += gt[106];
+ m_A84 += gt[107];
+ m_A82 += go[106];
+ m_A83 += go[107];
+ double RHS31 = Idr[106];
+ RHS31 += Idr[107];
+ m_A91 += gt[108];
+ m_A91 += gt[109];
+ m_A91 += gt[110];
+ m_A91 += gt[111];
+ m_A91 += gt[112];
+ m_A86 += go[108];
+ m_A90 += go[109];
+ m_A88 += go[110];
+ m_A85 += go[111];
+ m_A87 += go[112];
+ double RHS32 = Idr[108];
+ RHS32 += Idr[109];
+ RHS32 += Idr[110];
+ RHS32 += Idr[111];
+ RHS32 += Idr[112];
+ m_A99 += gt[113];
+ m_A99 += gt[114];
+ m_A99 += gt[115];
+ m_A99 += gt[116];
+ m_A99 += gt[117];
+ m_A96 += go[113];
+ m_A100 += go[114];
+ m_A97 += go[115];
+ m_A94 += go[116];
+ m_A95 += go[117];
+ double RHS33 = Idr[113];
+ RHS33 += Idr[114];
+ RHS33 += Idr[115];
+ RHS33 += Idr[116];
+ RHS33 += Idr[117];
+ m_A106 += gt[118];
+ m_A106 += gt[119];
+ m_A106 += gt[120];
+ m_A106 += gt[121];
+ m_A103 += go[118];
+ m_A104 += go[119];
+ m_A101 += go[120];
+ m_A102 += go[121];
+ double RHS34 = Idr[118];
+ RHS34 += Idr[119];
+ RHS34 += Idr[120];
+ RHS34 += Idr[121];
+ m_A111 += gt[122];
+ m_A111 += gt[123];
+ m_A111 += gt[124];
+ m_A111 += gt[125];
+ m_A108 += go[122];
+ m_A109 += go[123];
+ double RHS35 = Idr[122];
+ RHS35 += Idr[123];
+ RHS35 += Idr[124];
+ RHS35 += Idr[125];
+ RHS35 -= go[124] * *cnV[124];
+ RHS35 -= go[125] * *cnV[125];
+ m_A122 += gt[126];
+ m_A122 += gt[127];
+ m_A122 += gt[128];
+ m_A122 += gt[129];
+ m_A122 += gt[130];
+ m_A122 += gt[131];
+ m_A113 += go[126];
+ m_A117 += go[127];
+ m_A120 += go[128];
+ m_A114 += go[129];
+ double RHS36 = Idr[126];
+ RHS36 += Idr[127];
+ RHS36 += Idr[128];
+ RHS36 += Idr[129];
+ RHS36 += Idr[130];
+ RHS36 += Idr[131];
+ RHS36 -= go[130] * *cnV[130];
+ RHS36 -= go[131] * *cnV[131];
+ const double f0 = 1.0 / m_A0;
+ const double f0_24 = -f0 * m_A55;
+ m_A57 += m_A1 * f0_24;
+ RHS24 += f0_24 * RHS0;
+ const double f0_32 = -f0 * m_A85;
+ m_A91 += m_A1 * f0_32;
+ RHS32 += f0_32 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_32 = -f1 * m_A86;
+ m_A91 += m_A3 * f1_32;
+ RHS32 += f1_32 * RHS1;
+ const double f2 = 1.0 / m_A4;
+ const double f2_27 = -f2 * m_A64;
+ m_A66 += m_A5 * f2_27;
+ RHS27 += f2_27 * RHS2;
+ const double f3 = 1.0 / m_A6;
+ const double f3_25 = -f3 * m_A58;
+ m_A60 += m_A7 * f3_25;
+ RHS25 += f3_25 * RHS3;
+ const double f3_34 = -f3 * m_A101;
+ m_A106 += m_A7 * f3_34;
+ RHS34 += f3_34 * RHS3;
+ const double f4 = 1.0 / m_A8;
+ const double f4_20 = -f4 * m_A42;
+ m_A44 += m_A9 * f4_20;
+ RHS20 += f4_20 * RHS4;
+ const double f5 = 1.0 / m_A10;
+ const double f5_21 = -f5 * m_A45;
+ m_A47 += m_A11 * f5_21;
+ RHS21 += f5_21 * RHS5;
+ const double f5_32 = -f5 * m_A87;
+ m_A88 += m_A11 * f5_32;
+ RHS32 += f5_32 * RHS5;
+ const double f6 = 1.0 / m_A12;
+ const double f6_21 = -f6 * m_A46;
+ m_A47 += m_A13 * f6_21;
+ m_A48 += m_A14 * f6_21;
+ RHS21 += f6_21 * RHS6;
+ const double f6_22 = -f6 * m_A49;
+ m_A50 += m_A13 * f6_22;
+ m_A51 += m_A14 * f6_22;
+ RHS22 += f6_22 * RHS6;
+ const double f7 = 1.0 / m_A15;
+ const double f7_23 = -f7 * m_A52;
+ m_A54 += m_A16 * f7_23;
+ RHS23 += f7_23 * RHS7;
+ const double f7_34 = -f7 * m_A102;
+ m_A103 += m_A16 * f7_34;
+ RHS34 += f7_34 * RHS7;
+ const double f8 = 1.0 / m_A17;
+ const double f8_23 = -f8 * m_A53;
+ m_A54 += m_A18 * f8_23;
+ RHS23 += f8_23 * RHS8;
+ const double f9 = 1.0 / m_A19;
+ const double f9_36 = -f9 * m_A113;
+ m_A116 += m_A20 * f9_36;
+ RHS36 += f9_36 * RHS9;
+ const double f10 = 1.0 / m_A21;
+ const double f10_28 = -f10 * m_A71;
+ m_A73 += m_A22 * f10_28;
+ RHS28 += f10_28 * RHS10;
+ const double f10_33 = -f10 * m_A94;
+ m_A99 += m_A22 * f10_33;
+ RHS33 += f10_33 * RHS10;
+ const double f13 = 1.0 / m_A27;
+ const double f13_26 = -f13 * m_A61;
+ m_A62 += m_A28 * f13_26;
+ RHS26 += f13_26 * RHS13;
+ const double f13_33 = -f13 * m_A95;
+ m_A97 += m_A28 * f13_33;
+ RHS33 += f13_33 * RHS13;
+ const double f14 = 1.0 / m_A29;
+ const double f14_33 = -f14 * m_A96;
+ m_A99 += m_A30 * f14_33;
+ RHS33 += f14_33 * RHS14;
+ const double f15 = 1.0 / m_A31;
+ const double f15_31 = -f15 * m_A82;
+ m_A84 += m_A32 * f15_31;
+ RHS31 += f15_31 * RHS15;
+ const double f16 = 1.0 / m_A33;
+ const double f16_27 = -f16 * m_A65;
+ m_A67 += m_A34 * f16_27;
+ m_A70 += m_A35 * f16_27;
+ RHS27 += f16_27 * RHS16;
+ const double f16_36 = -f16 * m_A114;
+ m_A115 += m_A34 * f16_36;
+ m_A122 += m_A35 * f16_36;
+ RHS36 += f16_36 * RHS16;
+ const double f17 = 1.0 / m_A36;
+ const double f17_29 = -f17 * m_A74;
+ m_A76 += m_A37 * f17_29;
+ RHS29 += f17_29 * RHS17;
+ const double f17_35 = -f17 * m_A108;
+ m_A109 += m_A37 * f17_35;
+ RHS35 += f17_35 * RHS17;
+ const double f18 = 1.0 / m_A38;
+ const double f18_29 = -f18 * m_A75;
+ m_A77 += m_A39 * f18_29;
+ RHS29 += f18_29 * RHS18;
+ const double f18_30 = -f18 * m_A79;
+ m_A81 += m_A39 * f18_30;
+ RHS30 += f18_30 * RHS18;
+ const double f19 = 1.0 / m_A40;
+ const double f19_30 = -f19 * m_A80;
+ m_A81 += m_A41 * f19_30;
+ RHS30 += f19_30 * RHS19;
+ const double f21 = 1.0 / m_A47;
+ const double f21_22 = -f21 * m_A50;
+ m_A51 += m_A48 * f21_22;
+ RHS22 += f21_22 * RHS21;
+ const double f21_32 = -f21 * m_A88;
+ m_A89 += m_A48 * f21_32;
+ RHS32 += f21_32 * RHS21;
+ const double f22 = 1.0 / m_A51;
+ const double f22_32 = -f22 * m_A89;
+ RHS32 += f22_32 * RHS22;
+ const double f23 = 1.0 / m_A54;
+ const double f23_34 = -f23 * m_A103;
+ RHS34 += f23_34 * RHS23;
+ const double f24 = 1.0 / m_A56;
+ const double f24_27 = -f24 * m_A66;
+ m_A68 += m_A57 * f24_27;
+ RHS27 += f24_27 * RHS24;
+ const double f26 = 1.0 / m_A62;
+ const double f26_31 = -f26 * m_A83;
+ m_A84 += m_A63 * f26_31;
+ RHS31 += f26_31 * RHS26;
+ const double f26_33 = -f26 * m_A97;
+ m_A98 += m_A63 * f26_33;
+ RHS33 += f26_33 * RHS26;
+ const double f27 = 1.0 / m_A67;
+ const double f27_32 = -f27 * m_A90;
+ m_A91 += m_A68 * f27_32;
+ m_A92 += m_A69 * f27_32;
+ m_A93 += m_A70 * f27_32;
+ RHS32 += f27_32 * RHS27;
+ const double f27_34 = -f27 * m_A104;
+ m_A105 += m_A68 * f27_34;
+ m_A106 += m_A69 * f27_34;
+ m_A107 += m_A70 * f27_34;
+ RHS34 += f27_34 * RHS27;
+ const double f27_36 = -f27 * m_A115;
+ m_A119 += m_A68 * f27_36;
+ m_A121 += m_A69 * f27_36;
+ m_A122 += m_A70 * f27_36;
+ RHS36 += f27_36 * RHS27;
+ const double f28 = 1.0 / m_A72;
+ const double f28_36 = -f28 * m_A116;
+ m_A120 += m_A73 * f28_36;
+ RHS36 += f28_36 * RHS28;
+ const double f29 = 1.0 / m_A76;
+ const double f29_35 = -f29 * m_A109;
+ m_A110 += m_A77 * f29_35;
+ m_A112 += m_A78 * f29_35;
+ RHS35 += f29_35 * RHS29;
+ const double f29_36 = -f29 * m_A117;
+ m_A118 += m_A77 * f29_36;
+ m_A122 += m_A78 * f29_36;
+ RHS36 += f29_36 * RHS29;
+ const double f30 = 1.0 / m_A81;
+ const double f30_35 = -f30 * m_A110;
+ RHS35 += f30_35 * RHS30;
+ const double f30_36 = -f30 * m_A118;
+ RHS36 += f30_36 * RHS30;
+ const double f31 = 1.0 / m_A84;
+ const double f31_33 = -f31 * m_A98;
+ RHS33 += f31_33 * RHS31;
+ const double f32 = 1.0 / m_A91;
+ const double f32_34 = -f32 * m_A105;
+ m_A106 += m_A92 * f32_34;
+ m_A107 += m_A93 * f32_34;
+ RHS34 += f32_34 * RHS32;
+ const double f32_36 = -f32 * m_A119;
+ m_A121 += m_A92 * f32_36;
+ m_A122 += m_A93 * f32_36;
+ RHS36 += f32_36 * RHS32;
+ const double f33 = 1.0 / m_A99;
+ const double f33_36 = -f33 * m_A120;
+ m_A122 += m_A100 * f33_36;
+ RHS36 += f33_36 * RHS33;
+ const double f34 = 1.0 / m_A106;
+ const double f34_36 = -f34 * m_A121;
+ m_A122 += m_A107 * f34_36;
+ RHS36 += f34_36 * RHS34;
+ V[36] = RHS36 / m_A122;
+ double tmp35 = 0.0;
+ tmp35 += m_A112 * V[36];
+ V[35] = (RHS35 - tmp35) / m_A111;
+ double tmp34 = 0.0;
+ tmp34 += m_A107 * V[36];
+ V[34] = (RHS34 - tmp34) / m_A106;
+ double tmp33 = 0.0;
+ tmp33 += m_A100 * V[36];
+ V[33] = (RHS33 - tmp33) / m_A99;
+ double tmp32 = 0.0;
+ tmp32 += m_A92 * V[34];
+ tmp32 += m_A93 * V[36];
+ V[32] = (RHS32 - tmp32) / m_A91;
+ double tmp31 = 0.0;
+ V[31] = (RHS31 - tmp31) / m_A84;
+ double tmp30 = 0.0;
+ V[30] = (RHS30 - tmp30) / m_A81;
+ double tmp29 = 0.0;
+ tmp29 += m_A77 * V[30];
+ tmp29 += m_A78 * V[36];
+ V[29] = (RHS29 - tmp29) / m_A76;
+ double tmp28 = 0.0;
+ tmp28 += m_A73 * V[33];
+ V[28] = (RHS28 - tmp28) / m_A72;
+ double tmp27 = 0.0;
+ tmp27 += m_A68 * V[32];
+ tmp27 += m_A69 * V[34];
+ tmp27 += m_A70 * V[36];
+ V[27] = (RHS27 - tmp27) / m_A67;
+ double tmp26 = 0.0;
+ tmp26 += m_A63 * V[31];
+ V[26] = (RHS26 - tmp26) / m_A62;
+ double tmp25 = 0.0;
+ tmp25 += m_A60 * V[34];
+ V[25] = (RHS25 - tmp25) / m_A59;
+ double tmp24 = 0.0;
+ tmp24 += m_A57 * V[32];
+ V[24] = (RHS24 - tmp24) / m_A56;
+ double tmp23 = 0.0;
+ V[23] = (RHS23 - tmp23) / m_A54;
+ double tmp22 = 0.0;
+ V[22] = (RHS22 - tmp22) / m_A51;
+ double tmp21 = 0.0;
+ tmp21 += m_A48 * V[22];
+ V[21] = (RHS21 - tmp21) / m_A47;
+ double tmp20 = 0.0;
+ tmp20 += m_A44 * V[25];
+ V[20] = (RHS20 - tmp20) / m_A43;
+ double tmp19 = 0.0;
+ tmp19 += m_A41 * V[30];
+ V[19] = (RHS19 - tmp19) / m_A40;
+ double tmp18 = 0.0;
+ tmp18 += m_A39 * V[30];
+ V[18] = (RHS18 - tmp18) / m_A38;
+ double tmp17 = 0.0;
+ tmp17 += m_A37 * V[29];
+ V[17] = (RHS17 - tmp17) / m_A36;
+ double tmp16 = 0.0;
+ tmp16 += m_A34 * V[27];
+ tmp16 += m_A35 * V[36];
+ V[16] = (RHS16 - tmp16) / m_A33;
+ double tmp15 = 0.0;
+ tmp15 += m_A32 * V[31];
+ V[15] = (RHS15 - tmp15) / m_A31;
+ double tmp14 = 0.0;
+ tmp14 += m_A30 * V[33];
+ V[14] = (RHS14 - tmp14) / m_A29;
+ double tmp13 = 0.0;
+ tmp13 += m_A28 * V[26];
+ V[13] = (RHS13 - tmp13) / m_A27;
+ double tmp12 = 0.0;
+ tmp12 += m_A26 * V[35];
+ V[12] = (RHS12 - tmp12) / m_A25;
+ double tmp11 = 0.0;
+ tmp11 += m_A24 * V[12];
+ V[11] = (RHS11 - tmp11) / m_A23;
+ double tmp10 = 0.0;
+ tmp10 += m_A22 * V[33];
+ V[10] = (RHS10 - tmp10) / m_A21;
+ double tmp9 = 0.0;
+ tmp9 += m_A20 * V[28];
+ V[9] = (RHS9 - tmp9) / m_A19;
+ double tmp8 = 0.0;
+ tmp8 += m_A18 * V[23];
+ V[8] = (RHS8 - tmp8) / m_A17;
+ double tmp7 = 0.0;
+ tmp7 += m_A16 * V[23];
+ V[7] = (RHS7 - tmp7) / m_A15;
+ double tmp6 = 0.0;
+ tmp6 += m_A13 * V[21];
+ tmp6 += m_A14 * V[22];
+ V[6] = (RHS6 - tmp6) / m_A12;
+ double tmp5 = 0.0;
+ tmp5 += m_A11 * V[21];
+ V[5] = (RHS5 - tmp5) / m_A10;
+ double tmp4 = 0.0;
+ tmp4 += m_A9 * V[25];
+ V[4] = (RHS4 - tmp4) / m_A8;
+ double tmp3 = 0.0;
+ tmp3 += m_A7 * V[34];
+ V[3] = (RHS3 - tmp3) / m_A6;
+ double tmp2 = 0.0;
+ tmp2 += m_A5 * V[24];
+ V[2] = (RHS2 - tmp2) / m_A4;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[32];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[32];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
// sspeedr
static void nl_gcr_13_double_double_3e833834e5ce5aee(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
@@ -60774,6 +61788,398 @@ static void nl_gcr_176_double_double_2294220d3c91e762(double * __restrict V, con
V[0] = (RHS0 - tmp0) / m_A0;
}
+// sspeedr,280zzzap
+static void nl_gcr_57_double_double_bb501e6a23177009(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ double m_A7(0.0);
+ double m_A8(0.0);
+ double m_A9(0.0);
+ double m_A10(0.0);
+ double m_A11(0.0);
+ double m_A12(0.0);
+ double m_A13(0.0);
+ double m_A14(0.0);
+ double m_A15(0.0);
+ double m_A16(0.0);
+ double m_A17(0.0);
+ double m_A18(0.0);
+ double m_A19(0.0);
+ double m_A20(0.0);
+ double m_A21(0.0);
+ double m_A22(0.0);
+ double m_A23(0.0);
+ double m_A24(0.0);
+ double m_A25(0.0);
+ double m_A26(0.0);
+ double m_A27(0.0);
+ double m_A28(0.0);
+ double m_A29(0.0);
+ double m_A30(0.0);
+ double m_A31(0.0);
+ double m_A32(0.0);
+ double m_A33(0.0);
+ double m_A34(0.0);
+ double m_A35(0.0);
+ double m_A36(0.0);
+ double m_A37(0.0);
+ double m_A38(0.0);
+ double m_A39(0.0);
+ double m_A40(0.0);
+ double m_A41(0.0);
+ double m_A42(0.0);
+ double m_A43(0.0);
+ double m_A44(0.0);
+ double m_A45(0.0);
+ double m_A46(0.0);
+ double m_A47(0.0);
+ double m_A48(0.0);
+ double m_A49(0.0);
+ double m_A50(0.0);
+ double m_A51(0.0);
+ double m_A52(0.0);
+ double m_A53(0.0);
+ double m_A54(0.0);
+ double m_A55(0.0);
+ double m_A56(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A0 += gt[2];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 += Idr[2];
+ RHS0 -= go[1] * *cnV[1];
+ RHS0 -= go[2] * *cnV[2];
+ m_A2 += gt[3];
+ m_A2 += gt[4];
+ m_A3 += go[3];
+ double RHS1 = Idr[3];
+ RHS1 += Idr[4];
+ RHS1 -= go[4] * *cnV[4];
+ m_A4 += gt[5];
+ m_A4 += gt[6];
+ m_A4 += gt[7];
+ m_A4 += gt[8];
+ m_A4 += gt[9];
+ m_A4 += gt[10];
+ m_A4 += gt[11];
+ m_A5 += go[5];
+ double RHS2 = Idr[5];
+ RHS2 += Idr[6];
+ RHS2 += Idr[7];
+ RHS2 += Idr[8];
+ RHS2 += Idr[9];
+ RHS2 += Idr[10];
+ RHS2 += Idr[11];
+ RHS2 -= go[6] * *cnV[6];
+ RHS2 -= go[7] * *cnV[7];
+ RHS2 -= go[8] * *cnV[8];
+ RHS2 -= go[9] * *cnV[9];
+ RHS2 -= go[10] * *cnV[10];
+ RHS2 -= go[11] * *cnV[11];
+ m_A6 += gt[12];
+ m_A6 += gt[13];
+ m_A6 += gt[14];
+ m_A7 += go[12];
+ double RHS3 = Idr[12];
+ RHS3 += Idr[13];
+ RHS3 += Idr[14];
+ RHS3 -= go[13] * *cnV[13];
+ RHS3 -= go[14] * *cnV[14];
+ m_A8 += gt[15];
+ m_A8 += gt[16];
+ m_A8 += gt[17];
+ m_A8 += gt[18];
+ m_A8 += gt[19];
+ m_A8 += gt[20];
+ m_A8 += gt[21];
+ m_A9 += go[15];
+ double RHS4 = Idr[15];
+ RHS4 += Idr[16];
+ RHS4 += Idr[17];
+ RHS4 += Idr[18];
+ RHS4 += Idr[19];
+ RHS4 += Idr[20];
+ RHS4 += Idr[21];
+ RHS4 -= go[16] * *cnV[16];
+ RHS4 -= go[17] * *cnV[17];
+ RHS4 -= go[18] * *cnV[18];
+ RHS4 -= go[19] * *cnV[19];
+ RHS4 -= go[20] * *cnV[20];
+ RHS4 -= go[21] * *cnV[21];
+ m_A10 += gt[22];
+ m_A10 += gt[23];
+ m_A11 += go[22];
+ double RHS5 = Idr[22];
+ RHS5 += Idr[23];
+ RHS5 -= go[23] * *cnV[23];
+ m_A12 += gt[24];
+ m_A12 += gt[25];
+ m_A14 += go[24];
+ m_A13 += go[25];
+ double RHS6 = Idr[24];
+ RHS6 += Idr[25];
+ m_A15 += gt[26];
+ m_A15 += gt[27];
+ m_A16 += go[26];
+ double RHS7 = Idr[26];
+ RHS7 += Idr[27];
+ RHS7 -= go[27] * *cnV[27];
+ m_A17 += gt[28];
+ m_A17 += gt[29];
+ m_A18 += go[28];
+ double RHS8 = Idr[28];
+ RHS8 += Idr[29];
+ RHS8 -= go[29] * *cnV[29];
+ m_A20 += gt[30];
+ m_A20 += gt[31];
+ m_A20 += gt[32];
+ m_A20 += gt[33];
+ m_A19 += go[30];
+ double RHS9 = Idr[30];
+ RHS9 += Idr[31];
+ RHS9 += Idr[32];
+ RHS9 += Idr[33];
+ RHS9 -= go[31] * *cnV[31];
+ RHS9 -= go[32] * *cnV[32];
+ RHS9 -= go[33] * *cnV[33];
+ m_A24 += gt[34];
+ m_A24 += gt[35];
+ m_A23 += go[34];
+ m_A22 += go[35];
+ double RHS10 = Idr[34];
+ RHS10 += Idr[35];
+ m_A27 += gt[36];
+ m_A27 += gt[37];
+ m_A27 += gt[38];
+ m_A27 += gt[39];
+ m_A26 += go[36];
+ m_A28 += go[37];
+ double RHS11 = Idr[36];
+ RHS11 += Idr[37];
+ RHS11 += Idr[38];
+ RHS11 += Idr[39];
+ RHS11 -= go[38] * *cnV[38];
+ RHS11 -= go[39] * *cnV[39];
+ m_A31 += gt[40];
+ m_A31 += gt[41];
+ m_A31 += gt[42];
+ m_A31 += gt[43];
+ m_A31 += gt[44];
+ m_A31 += gt[45];
+ m_A29 += go[40];
+ m_A33 += go[41];
+ m_A32 += go[42];
+ double RHS12 = Idr[40];
+ RHS12 += Idr[41];
+ RHS12 += Idr[42];
+ RHS12 += Idr[43];
+ RHS12 += Idr[44];
+ RHS12 += Idr[45];
+ RHS12 -= go[43] * *cnV[43];
+ RHS12 -= go[44] * *cnV[44];
+ RHS12 -= go[45] * *cnV[45];
+ m_A36 += gt[46];
+ m_A36 += gt[47];
+ m_A34 += go[46];
+ double RHS13 = Idr[46];
+ RHS13 += Idr[47];
+ RHS13 -= go[47] * *cnV[47];
+ m_A39 += gt[48];
+ m_A39 += gt[49];
+ m_A39 += gt[50];
+ m_A38 += go[48];
+ m_A37 += go[49];
+ double RHS14 = Idr[48];
+ RHS14 += Idr[49];
+ RHS14 += Idr[50];
+ RHS14 -= go[50] * *cnV[50];
+ m_A41 += gt[51];
+ m_A41 += gt[52];
+ m_A41 += gt[53];
+ m_A41 += gt[54];
+ m_A40 += go[51];
+ m_A42 += go[52];
+ double RHS15 = Idr[51];
+ RHS15 += Idr[52];
+ RHS15 += Idr[53];
+ RHS15 += Idr[54];
+ RHS15 -= go[53] * *cnV[53];
+ RHS15 -= go[54] * *cnV[54];
+ m_A49 += gt[55];
+ m_A49 += gt[56];
+ m_A49 += gt[57];
+ m_A49 += gt[58];
+ m_A49 += gt[59];
+ m_A44 += go[55];
+ m_A47 += go[56];
+ m_A46 += go[57];
+ m_A43 += go[58];
+ m_A45 += go[59];
+ double RHS16 = Idr[55];
+ RHS16 += Idr[56];
+ RHS16 += Idr[57];
+ RHS16 += Idr[58];
+ RHS16 += Idr[59];
+ m_A56 += gt[60];
+ m_A56 += gt[61];
+ m_A56 += gt[62];
+ m_A56 += gt[63];
+ m_A54 += go[60];
+ m_A53 += go[61];
+ m_A51 += go[62];
+ m_A52 += go[63];
+ double RHS17 = Idr[60];
+ RHS17 += Idr[61];
+ RHS17 += Idr[62];
+ RHS17 += Idr[63];
+ const double f0 = 1.0 / m_A0;
+ const double f0_11 = -f0 * m_A26;
+ m_A28 += m_A1 * f0_11;
+ RHS11 += f0_11 * RHS0;
+ const double f0_16 = -f0 * m_A43;
+ m_A49 += m_A1 * f0_16;
+ RHS16 += f0_16 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_16 = -f1 * m_A44;
+ m_A49 += m_A3 * f1_16;
+ RHS16 += f1_16 * RHS1;
+ const double f2 = 1.0 / m_A4;
+ const double f2_12 = -f2 * m_A29;
+ m_A30 += m_A5 * f2_12;
+ RHS12 += f2_12 * RHS2;
+ const double f3 = 1.0 / m_A6;
+ const double f3_15 = -f3 * m_A40;
+ m_A42 += m_A7 * f3_15;
+ RHS15 += f3_15 * RHS3;
+ const double f3_17 = -f3 * m_A51;
+ m_A56 += m_A7 * f3_17;
+ RHS17 += f3_17 * RHS3;
+ const double f4 = 1.0 / m_A8;
+ const double f4_9 = -f4 * m_A19;
+ m_A21 += m_A9 * f4_9;
+ RHS9 += f4_9 * RHS4;
+ const double f5 = 1.0 / m_A10;
+ const double f5_10 = -f5 * m_A22;
+ m_A24 += m_A11 * f5_10;
+ RHS10 += f5_10 * RHS5;
+ const double f5_16 = -f5 * m_A45;
+ m_A46 += m_A11 * f5_16;
+ RHS16 += f5_16 * RHS5;
+ const double f6 = 1.0 / m_A12;
+ const double f6_10 = -f6 * m_A23;
+ m_A24 += m_A13 * f6_10;
+ m_A25 += m_A14 * f6_10;
+ RHS10 += f6_10 * RHS6;
+ const double f6_13 = -f6 * m_A34;
+ m_A35 += m_A13 * f6_13;
+ m_A36 += m_A14 * f6_13;
+ RHS13 += f6_13 * RHS6;
+ const double f7 = 1.0 / m_A15;
+ const double f7_14 = -f7 * m_A37;
+ m_A39 += m_A16 * f7_14;
+ RHS14 += f7_14 * RHS7;
+ const double f7_17 = -f7 * m_A52;
+ m_A54 += m_A16 * f7_17;
+ RHS17 += f7_17 * RHS7;
+ const double f8 = 1.0 / m_A17;
+ const double f8_14 = -f8 * m_A38;
+ m_A39 += m_A18 * f8_14;
+ RHS14 += f8_14 * RHS8;
+ const double f10 = 1.0 / m_A24;
+ const double f10_13 = -f10 * m_A35;
+ m_A36 += m_A25 * f10_13;
+ RHS13 += f10_13 * RHS10;
+ const double f10_16 = -f10 * m_A46;
+ m_A48 += m_A25 * f10_16;
+ RHS16 += f10_16 * RHS10;
+ const double f11 = 1.0 / m_A27;
+ const double f11_12 = -f11 * m_A30;
+ m_A32 += m_A28 * f11_12;
+ RHS12 += f11_12 * RHS11;
+ const double f12 = 1.0 / m_A31;
+ const double f12_16 = -f12 * m_A47;
+ m_A49 += m_A32 * f12_16;
+ m_A50 += m_A33 * f12_16;
+ RHS16 += f12_16 * RHS12;
+ const double f12_17 = -f12 * m_A53;
+ m_A55 += m_A32 * f12_17;
+ m_A56 += m_A33 * f12_17;
+ RHS17 += f12_17 * RHS12;
+ const double f13 = 1.0 / m_A36;
+ const double f13_16 = -f13 * m_A48;
+ RHS16 += f13_16 * RHS13;
+ const double f14 = 1.0 / m_A39;
+ const double f14_17 = -f14 * m_A54;
+ RHS17 += f14_17 * RHS14;
+ const double f16 = 1.0 / m_A49;
+ const double f16_17 = -f16 * m_A55;
+ m_A56 += m_A50 * f16_17;
+ RHS17 += f16_17 * RHS16;
+ V[17] = RHS17 / m_A56;
+ double tmp16 = 0.0;
+ tmp16 += m_A50 * V[17];
+ V[16] = (RHS16 - tmp16) / m_A49;
+ double tmp15 = 0.0;
+ tmp15 += m_A42 * V[17];
+ V[15] = (RHS15 - tmp15) / m_A41;
+ double tmp14 = 0.0;
+ V[14] = (RHS14 - tmp14) / m_A39;
+ double tmp13 = 0.0;
+ V[13] = (RHS13 - tmp13) / m_A36;
+ double tmp12 = 0.0;
+ tmp12 += m_A32 * V[16];
+ tmp12 += m_A33 * V[17];
+ V[12] = (RHS12 - tmp12) / m_A31;
+ double tmp11 = 0.0;
+ tmp11 += m_A28 * V[16];
+ V[11] = (RHS11 - tmp11) / m_A27;
+ double tmp10 = 0.0;
+ tmp10 += m_A25 * V[13];
+ V[10] = (RHS10 - tmp10) / m_A24;
+ double tmp9 = 0.0;
+ tmp9 += m_A21 * V[15];
+ V[9] = (RHS9 - tmp9) / m_A20;
+ double tmp8 = 0.0;
+ tmp8 += m_A18 * V[14];
+ V[8] = (RHS8 - tmp8) / m_A17;
+ double tmp7 = 0.0;
+ tmp7 += m_A16 * V[14];
+ V[7] = (RHS7 - tmp7) / m_A15;
+ double tmp6 = 0.0;
+ tmp6 += m_A13 * V[10];
+ tmp6 += m_A14 * V[13];
+ V[6] = (RHS6 - tmp6) / m_A12;
+ double tmp5 = 0.0;
+ tmp5 += m_A11 * V[10];
+ V[5] = (RHS5 - tmp5) / m_A10;
+ double tmp4 = 0.0;
+ tmp4 += m_A9 * V[15];
+ V[4] = (RHS4 - tmp4) / m_A8;
+ double tmp3 = 0.0;
+ tmp3 += m_A7 * V[17];
+ V[3] = (RHS3 - tmp3) / m_A6;
+ double tmp2 = 0.0;
+ tmp2 += m_A5 * V[11];
+ V[2] = (RHS2 - tmp2) / m_A4;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[16];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[16];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
// sspeedr
static void nl_gcr_95_double_double_4a8e2b707bbac8a6(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
@@ -62238,7 +63644,7 @@ static void nl_gcr_12_double_double_88a8ef5f6bd43d48(double * __restrict V, cons
V[0] = (RHS0 - tmp0) / m_A0;
}
-// starcas,wotw,solarq,armora
+// starcas,wotw,armora,solarq
static void nl_gcr_22_double_double_1250f340dea396ae(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
{
@@ -70535,8 +71941,8 @@ static void nl_gcr_20_double_double_c924fe5960b1479e(double * __restrict V, cons
V[0] = (RHS0 - tmp0) / m_A0;
}
-// stuntcyc
-static void nl_gcr_22_double_double_ca68d70bd8f2f62e(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+// stuntcyc,brdrline
+static void nl_gcr_7_double_double_59cb6bf7cb9d17dc(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
{
@@ -70548,140 +71954,44 @@ static void nl_gcr_22_double_double_ca68d70bd8f2f62e(double * __restrict V, cons
double m_A4(0.0);
double m_A5(0.0);
double m_A6(0.0);
- double m_A7(0.0);
- double m_A8(0.0);
- double m_A9(0.0);
- double m_A10(0.0);
- double m_A11(0.0);
- double m_A12(0.0);
- double m_A13(0.0);
- double m_A14(0.0);
- double m_A15(0.0);
- double m_A16(0.0);
- double m_A17(0.0);
- double m_A18(0.0);
- double m_A19(0.0);
- double m_A20(0.0);
- double m_A21(0.0);
m_A0 += gt[0];
m_A0 += gt[1];
- m_A0 += gt[2];
- m_A0 += gt[3];
- m_A2 += go[0];
- m_A2 += go[1];
- m_A1 += go[2];
+ m_A1 += go[0];
double RHS0 = Idr[0];
RHS0 += Idr[1];
- RHS0 += Idr[2];
- RHS0 += Idr[3];
- RHS0 -= go[3] * *cnV[3];
- m_A3 += gt[4];
- m_A3 += gt[5];
- m_A3 += gt[6];
- m_A3 += gt[7];
+ RHS0 -= go[1] * *cnV[1];
+ m_A2 += gt[2];
+ m_A2 += gt[3];
+ m_A3 += go[2];
+ double RHS1 = Idr[2];
+ RHS1 += Idr[3];
+ RHS1 -= go[3] * *cnV[3];
+ m_A6 += gt[4];
+ m_A6 += gt[5];
+ m_A6 += gt[6];
+ m_A6 += gt[7];
m_A5 += go[4];
- m_A5 += go[5];
- m_A4 += go[6];
- double RHS1 = Idr[4];
- RHS1 += Idr[5];
- RHS1 += Idr[6];
- RHS1 += Idr[7];
- RHS1 -= go[7] * *cnV[7];
- m_A6 += gt[8];
- m_A6 += gt[9];
- m_A6 += gt[10];
- m_A7 += go[8];
- double RHS2 = Idr[8];
- RHS2 += Idr[9];
- RHS2 += Idr[10];
- RHS2 -= go[9] * *cnV[9];
- RHS2 -= go[10] * *cnV[10];
- m_A10 += gt[11];
- m_A10 += gt[12];
- m_A10 += gt[13];
- m_A12 += go[11];
- m_A9 += go[12];
- m_A8 += go[13];
- double RHS3 = Idr[11];
- RHS3 += Idr[12];
- RHS3 += Idr[13];
- m_A16 += gt[14];
- m_A16 += gt[15];
- m_A16 += gt[16];
- m_A16 += gt[17];
- m_A16 += gt[18];
- m_A17 += go[14];
- m_A14 += go[15];
- m_A14 += go[16];
- m_A13 += go[17];
- m_A13 += go[18];
- double RHS4 = Idr[14];
- RHS4 += Idr[15];
- RHS4 += Idr[16];
- RHS4 += Idr[17];
- RHS4 += Idr[18];
- m_A21 += gt[19];
- m_A21 += gt[20];
- m_A21 += gt[21];
- m_A18 += go[19];
- m_A20 += go[20];
- m_A19 += go[21];
- double RHS5 = Idr[19];
- RHS5 += Idr[20];
- RHS5 += Idr[21];
+ m_A4 += go[5];
+ double RHS2 = Idr[4];
+ RHS2 += Idr[5];
+ RHS2 += Idr[6];
+ RHS2 += Idr[7];
+ RHS2 -= go[6] * *cnV[6];
+ RHS2 -= go[7] * *cnV[7];
const double f0 = 1.0 / m_A0;
- const double f0_3 = -f0 * m_A8;
- m_A10 += m_A1 * f0_3;
- m_A11 += m_A2 * f0_3;
- RHS3 += f0_3 * RHS0;
- const double f0_4 = -f0 * m_A13;
- m_A15 += m_A1 * f0_4;
- m_A16 += m_A2 * f0_4;
- RHS4 += f0_4 * RHS0;
- const double f1 = 1.0 / m_A3;
- const double f1_3 = -f1 * m_A9;
- m_A10 += m_A4 * f1_3;
- m_A11 += m_A5 * f1_3;
- RHS3 += f1_3 * RHS1;
- const double f1_4 = -f1 * m_A14;
- m_A15 += m_A4 * f1_4;
- m_A16 += m_A5 * f1_4;
- RHS4 += f1_4 * RHS1;
- const double f2 = 1.0 / m_A6;
- const double f2_5 = -f2 * m_A18;
- m_A21 += m_A7 * f2_5;
- RHS5 += f2_5 * RHS2;
- const double f3 = 1.0 / m_A10;
- const double f3_4 = -f3 * m_A15;
- m_A16 += m_A11 * f3_4;
- m_A17 += m_A12 * f3_4;
- RHS4 += f3_4 * RHS3;
- const double f3_5 = -f3 * m_A19;
- m_A20 += m_A11 * f3_5;
- m_A21 += m_A12 * f3_5;
- RHS5 += f3_5 * RHS3;
- const double f4 = 1.0 / m_A16;
- const double f4_5 = -f4 * m_A20;
- m_A21 += m_A17 * f4_5;
- RHS5 += f4_5 * RHS4;
- V[5] = RHS5 / m_A21;
- double tmp4 = 0.0;
- tmp4 += m_A17 * V[5];
- V[4] = (RHS4 - tmp4) / m_A16;
- double tmp3 = 0.0;
- tmp3 += m_A11 * V[4];
- tmp3 += m_A12 * V[5];
- V[3] = (RHS3 - tmp3) / m_A10;
- double tmp2 = 0.0;
- tmp2 += m_A7 * V[5];
- V[2] = (RHS2 - tmp2) / m_A6;
+ const double f0_2 = -f0 * m_A4;
+ m_A6 += m_A1 * f0_2;
+ RHS2 += f0_2 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_2 = -f1 * m_A5;
+ m_A6 += m_A3 * f1_2;
+ RHS2 += f1_2 * RHS1;
+ V[2] = RHS2 / m_A6;
double tmp1 = 0.0;
- tmp1 += m_A4 * V[3];
- tmp1 += m_A5 * V[4];
- V[1] = (RHS1 - tmp1) / m_A3;
+ tmp1 += m_A3 * V[2];
+ V[1] = (RHS1 - tmp1) / m_A2;
double tmp0 = 0.0;
- tmp0 += m_A1 * V[3];
- tmp0 += m_A2 * V[4];
+ tmp0 += m_A1 * V[2];
V[0] = (RHS0 - tmp0) / m_A0;
}
@@ -71400,105 +72710,6 @@ static void nl_gcr_100_double_double_e02a162cb515a958(double * __restrict V, con
V[0] = (RHS0 - tmp0) / m_A0;
}
-// sundance,warrior
-static void nl_gcr_12_double_double_ad6dba01ff2425c3(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
-
-{
-
- plib::unused_var(cnV);
- double m_A0(0.0);
- double m_A1(0.0);
- double m_A2(0.0);
- double m_A3(0.0);
- double m_A4(0.0);
- double m_A5(0.0);
- double m_A6(0.0);
- double m_A7(0.0);
- double m_A8(0.0);
- double m_A9(0.0);
- double m_A10(0.0);
- double m_A11(0.0);
- m_A0 += gt[0];
- m_A0 += gt[1];
- m_A1 += go[0];
- double RHS0 = Idr[0];
- RHS0 += Idr[1];
- RHS0 -= go[1] * *cnV[1];
- m_A2 += gt[2];
- m_A2 += gt[3];
- m_A2 += gt[4];
- m_A2 += gt[5];
- m_A2 += gt[6];
- m_A4 += go[2];
- m_A3 += go[3];
- m_A3 += go[4];
- double RHS1 = Idr[2];
- RHS1 += Idr[3];
- RHS1 += Idr[4];
- RHS1 += Idr[5];
- RHS1 += Idr[6];
- RHS1 -= go[5] * *cnV[5];
- RHS1 -= go[6] * *cnV[6];
- m_A6 += gt[7];
- m_A6 += gt[8];
- m_A6 += gt[9];
- m_A6 += gt[10];
- m_A6 += gt[11];
- m_A7 += go[7];
- m_A7 += go[8];
- m_A5 += go[9];
- m_A5 += go[10];
- double RHS2 = Idr[7];
- RHS2 += Idr[8];
- RHS2 += Idr[9];
- RHS2 += Idr[10];
- RHS2 += Idr[11];
- RHS2 -= go[11] * *cnV[11];
- m_A11 += gt[12];
- m_A11 += gt[13];
- m_A11 += gt[14];
- m_A11 += gt[15];
- m_A11 += gt[16];
- m_A10 += go[12];
- m_A10 += go[13];
- m_A9 += go[14];
- m_A8 += go[15];
- double RHS3 = Idr[12];
- RHS3 += Idr[13];
- RHS3 += Idr[14];
- RHS3 += Idr[15];
- RHS3 += Idr[16];
- RHS3 -= go[16] * *cnV[16];
- const double f0 = 1.0 / m_A0;
- const double f0_3 = -f0 * m_A8;
- m_A11 += m_A1 * f0_3;
- RHS3 += f0_3 * RHS0;
- const double f1 = 1.0 / m_A2;
- const double f1_2 = -f1 * m_A5;
- m_A6 += m_A3 * f1_2;
- m_A7 += m_A4 * f1_2;
- RHS2 += f1_2 * RHS1;
- const double f1_3 = -f1 * m_A9;
- m_A10 += m_A3 * f1_3;
- m_A11 += m_A4 * f1_3;
- RHS3 += f1_3 * RHS1;
- const double f2 = 1.0 / m_A6;
- const double f2_3 = -f2 * m_A10;
- m_A11 += m_A7 * f2_3;
- RHS3 += f2_3 * RHS2;
- V[3] = RHS3 / m_A11;
- double tmp2 = 0.0;
- tmp2 += m_A7 * V[3];
- V[2] = (RHS2 - tmp2) / m_A6;
- double tmp1 = 0.0;
- tmp1 += m_A3 * V[2];
- tmp1 += m_A4 * V[3];
- V[1] = (RHS1 - tmp1) / m_A2;
- double tmp0 = 0.0;
- tmp0 += m_A1 * V[3];
- V[0] = (RHS0 - tmp0) / m_A0;
-}
-
// sundance
static void nl_gcr_70_double_double_8446e63d7842f6a6(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
@@ -77174,6 +78385,102 @@ static void nl_gcr_10_double_double_8003d4625273fa4d(double * __restrict V, cons
V[0] = (RHS0 - tmp0) / m_A0;
}
+// warrior,ripoff,sundance
+static void nl_gcr_12_double_double_295cf2e2f3d489bf(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ double m_A7(0.0);
+ double m_A8(0.0);
+ double m_A9(0.0);
+ double m_A10(0.0);
+ double m_A11(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 -= go[1] * *cnV[1];
+ m_A2 += gt[2];
+ m_A2 += gt[3];
+ m_A2 += gt[4];
+ m_A2 += gt[5];
+ m_A4 += go[2];
+ m_A3 += go[3];
+ m_A3 += go[4];
+ double RHS1 = Idr[2];
+ RHS1 += Idr[3];
+ RHS1 += Idr[4];
+ RHS1 += Idr[5];
+ RHS1 -= go[5] * *cnV[5];
+ m_A6 += gt[6];
+ m_A6 += gt[7];
+ m_A6 += gt[8];
+ m_A6 += gt[9];
+ m_A6 += gt[10];
+ m_A7 += go[6];
+ m_A7 += go[7];
+ m_A5 += go[8];
+ m_A5 += go[9];
+ double RHS2 = Idr[6];
+ RHS2 += Idr[7];
+ RHS2 += Idr[8];
+ RHS2 += Idr[9];
+ RHS2 += Idr[10];
+ RHS2 -= go[10] * *cnV[10];
+ m_A11 += gt[11];
+ m_A11 += gt[12];
+ m_A11 += gt[13];
+ m_A11 += gt[14];
+ m_A11 += gt[15];
+ m_A10 += go[11];
+ m_A10 += go[12];
+ m_A9 += go[13];
+ m_A8 += go[14];
+ double RHS3 = Idr[11];
+ RHS3 += Idr[12];
+ RHS3 += Idr[13];
+ RHS3 += Idr[14];
+ RHS3 += Idr[15];
+ RHS3 -= go[15] * *cnV[15];
+ const double f0 = 1.0 / m_A0;
+ const double f0_3 = -f0 * m_A8;
+ m_A11 += m_A1 * f0_3;
+ RHS3 += f0_3 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_2 = -f1 * m_A5;
+ m_A6 += m_A3 * f1_2;
+ m_A7 += m_A4 * f1_2;
+ RHS2 += f1_2 * RHS1;
+ const double f1_3 = -f1 * m_A9;
+ m_A10 += m_A3 * f1_3;
+ m_A11 += m_A4 * f1_3;
+ RHS3 += f1_3 * RHS1;
+ const double f2 = 1.0 / m_A6;
+ const double f2_3 = -f2 * m_A10;
+ m_A11 += m_A7 * f2_3;
+ RHS3 += f2_3 * RHS2;
+ V[3] = RHS3 / m_A11;
+ double tmp2 = 0.0;
+ tmp2 += m_A7 * V[3];
+ V[2] = (RHS2 - tmp2) / m_A6;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[2];
+ tmp1 += m_A4 * V[3];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[3];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
// warrior
static void nl_gcr_12_double_double_42a31ce5c187b308(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
@@ -77249,6 +78556,105 @@ static void nl_gcr_12_double_double_42a31ce5c187b308(double * __restrict V, cons
V[0] = (RHS0 - tmp0) / m_A0;
}
+// warrior,sundance
+static void nl_gcr_12_double_double_ad6dba01ff2425c3(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
+
+{
+
+ plib::unused_var(cnV);
+ double m_A0(0.0);
+ double m_A1(0.0);
+ double m_A2(0.0);
+ double m_A3(0.0);
+ double m_A4(0.0);
+ double m_A5(0.0);
+ double m_A6(0.0);
+ double m_A7(0.0);
+ double m_A8(0.0);
+ double m_A9(0.0);
+ double m_A10(0.0);
+ double m_A11(0.0);
+ m_A0 += gt[0];
+ m_A0 += gt[1];
+ m_A1 += go[0];
+ double RHS0 = Idr[0];
+ RHS0 += Idr[1];
+ RHS0 -= go[1] * *cnV[1];
+ m_A2 += gt[2];
+ m_A2 += gt[3];
+ m_A2 += gt[4];
+ m_A2 += gt[5];
+ m_A2 += gt[6];
+ m_A4 += go[2];
+ m_A3 += go[3];
+ m_A3 += go[4];
+ double RHS1 = Idr[2];
+ RHS1 += Idr[3];
+ RHS1 += Idr[4];
+ RHS1 += Idr[5];
+ RHS1 += Idr[6];
+ RHS1 -= go[5] * *cnV[5];
+ RHS1 -= go[6] * *cnV[6];
+ m_A6 += gt[7];
+ m_A6 += gt[8];
+ m_A6 += gt[9];
+ m_A6 += gt[10];
+ m_A6 += gt[11];
+ m_A7 += go[7];
+ m_A7 += go[8];
+ m_A5 += go[9];
+ m_A5 += go[10];
+ double RHS2 = Idr[7];
+ RHS2 += Idr[8];
+ RHS2 += Idr[9];
+ RHS2 += Idr[10];
+ RHS2 += Idr[11];
+ RHS2 -= go[11] * *cnV[11];
+ m_A11 += gt[12];
+ m_A11 += gt[13];
+ m_A11 += gt[14];
+ m_A11 += gt[15];
+ m_A11 += gt[16];
+ m_A10 += go[12];
+ m_A10 += go[13];
+ m_A9 += go[14];
+ m_A8 += go[15];
+ double RHS3 = Idr[12];
+ RHS3 += Idr[13];
+ RHS3 += Idr[14];
+ RHS3 += Idr[15];
+ RHS3 += Idr[16];
+ RHS3 -= go[16] * *cnV[16];
+ const double f0 = 1.0 / m_A0;
+ const double f0_3 = -f0 * m_A8;
+ m_A11 += m_A1 * f0_3;
+ RHS3 += f0_3 * RHS0;
+ const double f1 = 1.0 / m_A2;
+ const double f1_2 = -f1 * m_A5;
+ m_A6 += m_A3 * f1_2;
+ m_A7 += m_A4 * f1_2;
+ RHS2 += f1_2 * RHS1;
+ const double f1_3 = -f1 * m_A9;
+ m_A10 += m_A3 * f1_3;
+ m_A11 += m_A4 * f1_3;
+ RHS3 += f1_3 * RHS1;
+ const double f2 = 1.0 / m_A6;
+ const double f2_3 = -f2 * m_A10;
+ m_A11 += m_A7 * f2_3;
+ RHS3 += f2_3 * RHS2;
+ V[3] = RHS3 / m_A11;
+ double tmp2 = 0.0;
+ tmp2 += m_A7 * V[3];
+ V[2] = (RHS2 - tmp2) / m_A6;
+ double tmp1 = 0.0;
+ tmp1 += m_A3 * V[2];
+ tmp1 += m_A4 * V[3];
+ V[1] = (RHS1 - tmp1) / m_A2;
+ double tmp0 = 0.0;
+ tmp0 += m_A1 * V[3];
+ V[0] = (RHS0 - tmp0) / m_A0;
+}
+
// warrior
static void nl_gcr_27_double_double_da598f43329e823(double * __restrict V, const double * __restrict go, const double * __restrict gt, const double * __restrict Idr, const double * const * __restrict cnV)
@@ -81833,16 +83239,8 @@ const plib::static_library::symbol nl_static_solver_syms[] = {
// 1942
{"nl_gcr_90_double_double_ce766957cb26ff3e", reinterpret_cast<void *>(&nl_gcr_90_double_double_ce766957cb26ff3e)}, // NOLINT
-// 280zzzap,sspeedr
- {"nl_gcr_113_double_double_ab9144d965a37e4", reinterpret_cast<void *>(&nl_gcr_113_double_double_ab9144d965a37e4)}, // NOLINT
-// 280zzzap,sspeedr
- {"nl_gcr_122_double_double_42c57d523cac30d0", reinterpret_cast<void *>(&nl_gcr_122_double_double_42c57d523cac30d0)}, // NOLINT
-// 280zzzap,sspeedr
- {"nl_gcr_123_double_double_864a61c57bac9c38", reinterpret_cast<void *>(&nl_gcr_123_double_double_864a61c57bac9c38)}, // NOLINT
// 280zzzap
{"nl_gcr_149_double_double_fc9971724787b82b", reinterpret_cast<void *>(&nl_gcr_149_double_double_fc9971724787b82b)}, // NOLINT
-// 280zzzap,sspeedr
- {"nl_gcr_57_double_double_bb501e6a23177009", reinterpret_cast<void *>(&nl_gcr_57_double_double_bb501e6a23177009)}, // NOLINT
// 280zzzap
{"nl_gcr_95_double_double_24643c159711f292", reinterpret_cast<void *>(&nl_gcr_95_double_double_24643c159711f292)}, // NOLINT
// armora
@@ -81855,8 +83253,6 @@ const plib::static_library::symbol nl_static_solver_syms[] = {
{"nl_gcr_58_double_double_64e460d8f716cd89", reinterpret_cast<void *>(&nl_gcr_58_double_double_64e460d8f716cd89)}, // NOLINT
// armora
{"nl_gcr_67_double_double_ee2cacaa15d32491", reinterpret_cast<void *>(&nl_gcr_67_double_double_ee2cacaa15d32491)}, // NOLINT
-// astrob,rebound
- {"nl_gcr_13_double_double_a41a44bd5c424f88", reinterpret_cast<void *>(&nl_gcr_13_double_double_a41a44bd5c424f88)}, // NOLINT
// astrob
{"nl_gcr_154_double_double_13833bf8c127deaa", reinterpret_cast<void *>(&nl_gcr_154_double_double_13833bf8c127deaa)}, // NOLINT
// astrob
@@ -81925,8 +83321,6 @@ const plib::static_library::symbol nl_static_solver_syms[] = {
{"nl_gcr_75_double_double_75400df5d559a266", reinterpret_cast<void *>(&nl_gcr_75_double_double_75400df5d559a266)}, // NOLINT
// brdrline
{"nl_gcr_77_double_double_437326911721091", reinterpret_cast<void *>(&nl_gcr_77_double_double_437326911721091)}, // NOLINT
-// brdrline,stuntcyc
- {"nl_gcr_7_double_double_59cb6bf7cb9d17dc", reinterpret_cast<void *>(&nl_gcr_7_double_double_59cb6bf7cb9d17dc)}, // NOLINT
// brdrline
{"nl_gcr_83_double_double_f99b1245e708ec85", reinterpret_cast<void *>(&nl_gcr_83_double_double_f99b1245e708ec85)}, // NOLINT
// brdrline
@@ -81965,6 +83359,18 @@ const plib::static_library::symbol nl_static_solver_syms[] = {
{"nl_gcr_16_double_double_8c0f7f2284333de5", reinterpret_cast<void *>(&nl_gcr_16_double_double_8c0f7f2284333de5)}, // NOLINT
// destroyr
{"nl_gcr_399_double_double_4334c95878d1be92", reinterpret_cast<void *>(&nl_gcr_399_double_double_4334c95878d1be92)}, // NOLINT
+// dribling
+ {"nl_gcr_21_double_double_c9b5f1625a51d98f", reinterpret_cast<void *>(&nl_gcr_21_double_double_c9b5f1625a51d98f)}, // NOLINT
+// dribling
+ {"nl_gcr_28_double_double_99f81817ea8bea2d", reinterpret_cast<void *>(&nl_gcr_28_double_double_99f81817ea8bea2d)}, // NOLINT
+// dribling
+ {"nl_gcr_29_double_double_1e732268bc2d78b2", reinterpret_cast<void *>(&nl_gcr_29_double_double_1e732268bc2d78b2)}, // NOLINT
+// dribling
+ {"nl_gcr_54_double_double_a2823a76b83c45a0", reinterpret_cast<void *>(&nl_gcr_54_double_double_a2823a76b83c45a0)}, // NOLINT
+// dribling
+ {"nl_gcr_7_double_double_a1ecff4d37b54b76", reinterpret_cast<void *>(&nl_gcr_7_double_double_a1ecff4d37b54b76)}, // NOLINT
+// dribling
+ {"nl_gcr_95_double_double_a0159c41cfc0b644", reinterpret_cast<void *>(&nl_gcr_95_double_double_a0159c41cfc0b644)}, // NOLINT
// elim,zektor
{"nl_gcr_10_double_double_11c2ae166b240b6e", reinterpret_cast<void *>(&nl_gcr_10_double_double_11c2ae166b240b6e)}, // NOLINT
// elim,zektor
@@ -81989,8 +83395,6 @@ const plib::static_library::symbol nl_static_solver_syms[] = {
{"nl_gcr_36_double_double_e76692c10e79997e", reinterpret_cast<void *>(&nl_gcr_36_double_double_e76692c10e79997e)}, // NOLINT
// elim,zektor
{"nl_gcr_45_double_double_28b736fe552777a9", reinterpret_cast<void *>(&nl_gcr_45_double_double_28b736fe552777a9)}, // NOLINT
-// elim,zektor
- {"nl_gcr_7_double_double_d190a0e3b8e1f4a7", reinterpret_cast<void *>(&nl_gcr_7_double_double_d190a0e3b8e1f4a7)}, // NOLINT
// fireone
{"nl_gcr_128_double_double_7aee4423e3fdbfda", reinterpret_cast<void *>(&nl_gcr_128_double_double_7aee4423e3fdbfda)}, // NOLINT
// fireone
@@ -82009,8 +83413,6 @@ const plib::static_library::symbol nl_static_solver_syms[] = {
{"nl_gcr_73_double_double_643133e86b2b1628", reinterpret_cast<void *>(&nl_gcr_73_double_double_643133e86b2b1628)}, // NOLINT
// fireone
{"nl_gcr_79_double_double_c1d22fe6e895255d", reinterpret_cast<void *>(&nl_gcr_79_double_double_c1d22fe6e895255d)}, // NOLINT
-// fireone,astrob,rebound,speedfrk,cheekyms
- {"nl_gcr_7_double_double_7c86a9bc1c6aef4c", reinterpret_cast<void *>(&nl_gcr_7_double_double_7c86a9bc1c6aef4c)}, // NOLINT
// fireone
{"nl_gcr_7_double_double_e7fb484f621b3ab9", reinterpret_cast<void *>(&nl_gcr_7_double_double_e7fb484f621b3ab9)}, // NOLINT
// fireone
@@ -82043,8 +83445,14 @@ const plib::static_library::symbol nl_static_solver_syms[] = {
{"nl_gcr_10_double_double_934712b55bb3b2b2", reinterpret_cast<void *>(&nl_gcr_10_double_double_934712b55bb3b2b2)}, // NOLINT
// gamemachine
{"nl_gcr_7_double_double_782d79b5cbe953b1", reinterpret_cast<void *>(&nl_gcr_7_double_double_782d79b5cbe953b1)}, // NOLINT
+// gi6809
+ {"nl_gcr_13_double_double_9eda6de0d275a3e5", reinterpret_cast<void *>(&nl_gcr_13_double_double_9eda6de0d275a3e5)}, // NOLINT
+// gi6809
+ {"nl_gcr_7_double_double_8a409a18e77784cb", reinterpret_cast<void *>(&nl_gcr_7_double_double_8a409a18e77784cb)}, // NOLINT
// gtrak10
- {"nl_gcr_43_double_double_4c46fdf7c0037727", reinterpret_cast<void *>(&nl_gcr_43_double_double_4c46fdf7c0037727)}, // NOLINT
+ {"nl_gcr_22_double_double_1f38df4919cdddae", reinterpret_cast<void *>(&nl_gcr_22_double_double_1f38df4919cdddae)}, // NOLINT
+// gtrak10,elim,zektor
+ {"nl_gcr_7_double_double_d190a0e3b8e1f4a7", reinterpret_cast<void *>(&nl_gcr_7_double_double_d190a0e3b8e1f4a7)}, // NOLINT
// gunfight
{"nl_gcr_112_double_double_743595e64cee0a5e", reinterpret_cast<void *>(&nl_gcr_112_double_double_743595e64cee0a5e)}, // NOLINT
// gunfight
@@ -82081,6 +83489,8 @@ const plib::static_library::symbol nl_static_solver_syms[] = {
{"nl_gcr_7_double_double_e51b463cd890ef6d", reinterpret_cast<void *>(&nl_gcr_7_double_double_e51b463cd890ef6d)}, // NOLINT
// popeye
{"nl_gcr_50_double_double_c6f25bb06e161d1c", reinterpret_cast<void *>(&nl_gcr_50_double_double_c6f25bb06e161d1c)}, // NOLINT
+// rebound,astrob
+ {"nl_gcr_13_double_double_a41a44bd5c424f88", reinterpret_cast<void *>(&nl_gcr_13_double_double_a41a44bd5c424f88)}, // NOLINT
// rebound
{"nl_gcr_28_double_double_8bec817b324dcc3", reinterpret_cast<void *>(&nl_gcr_28_double_double_8bec817b324dcc3)}, // NOLINT
// rebound
@@ -82089,8 +83499,6 @@ const plib::static_library::symbol nl_static_solver_syms[] = {
{"nl_gcr_10_double_double_43188bf576854ae0", reinterpret_cast<void *>(&nl_gcr_10_double_double_43188bf576854ae0)}, // NOLINT
// ripoff
{"nl_gcr_11_double_double_aa07266ef5d420d1", reinterpret_cast<void *>(&nl_gcr_11_double_double_aa07266ef5d420d1)}, // NOLINT
-// ripoff,sundance,warrior
- {"nl_gcr_12_double_double_295cf2e2f3d489bf", reinterpret_cast<void *>(&nl_gcr_12_double_double_295cf2e2f3d489bf)}, // NOLINT
// ripoff
{"nl_gcr_16_double_double_698d5dd47fb16d5", reinterpret_cast<void *>(&nl_gcr_16_double_double_698d5dd47fb16d5)}, // NOLINT
// ripoff
@@ -82157,21 +83565,31 @@ const plib::static_library::symbol nl_static_solver_syms[] = {
{"nl_gcr_91_double_double_b7b209d222c0a9a6", reinterpret_cast<void *>(&nl_gcr_91_double_double_b7b209d222c0a9a6)}, // NOLINT
// speedfrk
{"nl_gcr_37_double_double_e4f2ffbf201a3d0c", reinterpret_cast<void *>(&nl_gcr_37_double_double_e4f2ffbf201a3d0c)}, // NOLINT
+// speedfrk,cheekyms,rebound,astrob,fireone
+ {"nl_gcr_7_double_double_7c86a9bc1c6aef4c", reinterpret_cast<void *>(&nl_gcr_7_double_double_7c86a9bc1c6aef4c)}, // NOLINT
// speedfrk
{"nl_gcr_7_double_double_e07b5b086812756c", reinterpret_cast<void *>(&nl_gcr_7_double_double_e07b5b086812756c)}, // NOLINT
// sspeedr
{"nl_gcr_10_double_double_ac1e401ddf971e15", reinterpret_cast<void *>(&nl_gcr_10_double_double_ac1e401ddf971e15)}, // NOLINT
+// sspeedr,280zzzap
+ {"nl_gcr_113_double_double_ab9144d965a37e4", reinterpret_cast<void *>(&nl_gcr_113_double_double_ab9144d965a37e4)}, // NOLINT
+// sspeedr,280zzzap
+ {"nl_gcr_122_double_double_42c57d523cac30d0", reinterpret_cast<void *>(&nl_gcr_122_double_double_42c57d523cac30d0)}, // NOLINT
+// sspeedr,280zzzap
+ {"nl_gcr_123_double_double_864a61c57bac9c38", reinterpret_cast<void *>(&nl_gcr_123_double_double_864a61c57bac9c38)}, // NOLINT
// sspeedr
{"nl_gcr_13_double_double_3e833834e5ce5aee", reinterpret_cast<void *>(&nl_gcr_13_double_double_3e833834e5ce5aee)}, // NOLINT
// sspeedr
{"nl_gcr_176_double_double_2294220d3c91e762", reinterpret_cast<void *>(&nl_gcr_176_double_double_2294220d3c91e762)}, // NOLINT
+// sspeedr,280zzzap
+ {"nl_gcr_57_double_double_bb501e6a23177009", reinterpret_cast<void *>(&nl_gcr_57_double_double_bb501e6a23177009)}, // NOLINT
// sspeedr
{"nl_gcr_95_double_double_4a8e2b707bbac8a6", reinterpret_cast<void *>(&nl_gcr_95_double_double_4a8e2b707bbac8a6)}, // NOLINT
// starcas,wotw
{"nl_gcr_109_double_double_5d550fc7441617a2", reinterpret_cast<void *>(&nl_gcr_109_double_double_5d550fc7441617a2)}, // NOLINT
// starcas,wotw
{"nl_gcr_12_double_double_88a8ef5f6bd43d48", reinterpret_cast<void *>(&nl_gcr_12_double_double_88a8ef5f6bd43d48)}, // NOLINT
-// starcas,wotw,solarq,armora
+// starcas,wotw,armora,solarq
{"nl_gcr_22_double_double_1250f340dea396ae", reinterpret_cast<void *>(&nl_gcr_22_double_double_1250f340dea396ae)}, // NOLINT
// starcas,wotw,boxingb
{"nl_gcr_23_double_double_ea2b6e3a05e6ef0b", reinterpret_cast<void *>(&nl_gcr_23_double_double_ea2b6e3a05e6ef0b)}, // NOLINT
@@ -82215,12 +83633,10 @@ const plib::static_library::symbol nl_static_solver_syms[] = {
{"nl_gcr_10_double_double_85652d3e3ada285a", reinterpret_cast<void *>(&nl_gcr_10_double_double_85652d3e3ada285a)}, // NOLINT
// stuntcyc
{"nl_gcr_20_double_double_c924fe5960b1479e", reinterpret_cast<void *>(&nl_gcr_20_double_double_c924fe5960b1479e)}, // NOLINT
-// stuntcyc
- {"nl_gcr_22_double_double_ca68d70bd8f2f62e", reinterpret_cast<void *>(&nl_gcr_22_double_double_ca68d70bd8f2f62e)}, // NOLINT
+// stuntcyc,brdrline
+ {"nl_gcr_7_double_double_59cb6bf7cb9d17dc", reinterpret_cast<void *>(&nl_gcr_7_double_double_59cb6bf7cb9d17dc)}, // NOLINT
// sundance
{"nl_gcr_100_double_double_e02a162cb515a958", reinterpret_cast<void *>(&nl_gcr_100_double_double_e02a162cb515a958)}, // NOLINT
-// sundance,warrior
- {"nl_gcr_12_double_double_ad6dba01ff2425c3", reinterpret_cast<void *>(&nl_gcr_12_double_double_ad6dba01ff2425c3)}, // NOLINT
// sundance
{"nl_gcr_70_double_double_8446e63d7842f6a6", reinterpret_cast<void *>(&nl_gcr_70_double_double_8446e63d7842f6a6)}, // NOLINT
// sundance
@@ -82253,8 +83669,12 @@ const plib::static_library::symbol nl_static_solver_syms[] = {
{"nl_gcr_7_double_double_74349e9889a2630b", reinterpret_cast<void *>(&nl_gcr_7_double_double_74349e9889a2630b)}, // NOLINT
// warrior
{"nl_gcr_10_double_double_8003d4625273fa4d", reinterpret_cast<void *>(&nl_gcr_10_double_double_8003d4625273fa4d)}, // NOLINT
+// warrior,ripoff,sundance
+ {"nl_gcr_12_double_double_295cf2e2f3d489bf", reinterpret_cast<void *>(&nl_gcr_12_double_double_295cf2e2f3d489bf)}, // NOLINT
// warrior
{"nl_gcr_12_double_double_42a31ce5c187b308", reinterpret_cast<void *>(&nl_gcr_12_double_double_42a31ce5c187b308)}, // NOLINT
+// warrior,sundance
+ {"nl_gcr_12_double_double_ad6dba01ff2425c3", reinterpret_cast<void *>(&nl_gcr_12_double_double_ad6dba01ff2425c3)}, // NOLINT
// warrior
{"nl_gcr_27_double_double_da598f43329e823", reinterpret_cast<void *>(&nl_gcr_27_double_double_da598f43329e823)}, // NOLINT
// warrior
diff --git a/src/lib/netlist/macro/nlm_ttl74xx_lib.cpp b/src/lib/netlist/macro/nlm_ttl74xx_lib.cpp
index 4e668766c04..2a1d844d512 100644
--- a/src/lib/netlist/macro/nlm_ttl74xx_lib.cpp
+++ b/src/lib/netlist/macro/nlm_ttl74xx_lib.cpp
@@ -1046,7 +1046,7 @@ static NETLIST_START(TTL_7474_DIP)
//- Package: DIP
//- NamingConvention: Naming conventions follow National Semiconductor datasheet
//- FunctionTable:
-//- https://ia800608.us.archive.org/5/items/bitsavers_nationaldaTTLDatabook_40452765/1976_National_TTL_Databook.pdf
+//- https://archive.org/download/bitsavers_nationaldaTTLDatabook_40452765/1976_National_TTL_Databook.pdf
//-
//- +---+---++---+----+
//- | D | G || Q | QQ |
@@ -1088,7 +1088,7 @@ static NETLIST_START(TTL_7475_DIP)
//- Package: DIP
//- NamingConvention: Naming conventions follow National Semiconductor datasheet
//- FunctionTable:
-//- https://ia800608.us.archive.org/5/items/bitsavers_nationaldaTTLDatabook_40452765/1976_National_TTL_Databook.pdf
+//- https://archive.org/download/bitsavers_nationaldaTTLDatabook_40452765/1976_National_TTL_Databook.pdf
//-
//- +---+---++---+----+
//- | D | G || Q | QQ |
@@ -2831,7 +2831,7 @@ static NETLIST_START(SN74LS629_DIP)
//- Package: DIP
//- NamingConvention: Naming conventions follow National Semiconductor datasheet
//- FunctionTable:
-//- https://ia800608.us.archive.org/5/items/bitsavers_nationaldaTTLDatabook_40452765/1976_National_TTL_Databook.pdf
+//- https://archive.org/download/bitsavers_nationaldaTTLDatabook_40452765/1976_National_TTL_Databook.pdf
//-
static NETLIST_START(TTL_9310_DIP)
{
diff --git a/src/lib/netlist/nl_create_mame_solvers.sh b/src/lib/netlist/nl_create_mame_solvers.sh
index 25826efaed3..4786e11eaed 100644..100755
--- a/src/lib/netlist/nl_create_mame_solvers.sh
+++ b/src/lib/netlist/nl_create_mame_solvers.sh
@@ -16,7 +16,7 @@ mkdir ${OUTDIR}
#--dir src/lib/netlist/generated/static --static-include
-if ${NLTOOL} --cmd static --output=${GENERATED}.tmp --include=src/mame/audio ${FILES} ; then
+if ${NLTOOL} --cmd static --output=${GENERATED}.tmp --include=src/mame/shared ${FILES} ; then
mv -f ${GENERATED}.tmp ${GENERATED}
echo Created ${GENERATED} file
else
diff --git a/src/lib/netlist/nl_dice_compat.h b/src/lib/netlist/nl_dice_compat.h
index 3088829b5f9..aff1ac4da6f 100644
--- a/src/lib/netlist/nl_dice_compat.h
+++ b/src/lib/netlist/nl_dice_compat.h
@@ -16,7 +16,7 @@ sed -e 's/#define \(.*\)"\(.*\)"[ \t]*,[ \t]*\(.*\)/NET_ALIAS(\1,\2.\3)/' src/ma
| sed -e 's/) RES(/)\n RES(/g' \
| sed -e 's/) CAP(/)\n CAP(/g' \
| sed -e 's/) NET_C(/)\n NET_C(/g' \
-| sed -e 's/NL_EMPTY//' \
+| sed -e 's/NL_EMPTY//'
*
*/
diff --git a/src/lib/netlist/plib/pexception.cpp b/src/lib/netlist/plib/pexception.cpp
index 168cb172473..b358f3ad6ba 100644
--- a/src/lib/netlist/plib/pexception.cpp
+++ b/src/lib/netlist/plib/pexception.cpp
@@ -8,7 +8,7 @@
#include <cfloat>
#include <iostream>
-#if (defined(__x86_64__) || defined(__i386__)) && defined(__linux__)
+#if (defined(__x86_64__) || defined(__i386__)) && defined(__GLIBC__)
#define HAS_FEENABLE_EXCEPT (1)
#else
#define HAS_FEENABLE_EXCEPT (0)
diff --git a/src/lib/netlist/plib/ppreprocessor.cpp b/src/lib/netlist/plib/ppreprocessor.cpp
index fd545bc7879..0c3858862f6 100644
--- a/src/lib/netlist/plib/ppreprocessor.cpp
+++ b/src/lib/netlist/plib/ppreprocessor.cpp
@@ -146,7 +146,7 @@ namespace plib {
sexpr.next(); \
const auto v2 = prepro_expr(sexpr, (p_prio)); \
val = (val p_op v2); \
- } \
+ }
// Operator precedence see https://en.cppreference.com/w/cpp/language/operator_precedence
diff --git a/src/lib/netlist/plib/ptests.h b/src/lib/netlist/plib/ptests.h
index cc05b120b96..4e65de7f978 100644
--- a/src/lib/netlist/plib/ptests.h
+++ b/src/lib/netlist/plib/ptests.h
@@ -47,7 +47,7 @@
#define PINT_REGISTER(name, desc) \
extern const plib::testing::reg_entry<PINT_TESTNAME(name, desc)> PINT_TESTNAME(name, desc ## _reg); \
- const plib::testing::reg_entry<PINT_TESTNAME(name, desc)> PINT_TESTNAME(name, desc ## _reg)(#name, #desc, PINT_LOCATION()); \
+ const plib::testing::reg_entry<PINT_TESTNAME(name, desc)> PINT_TESTNAME(name, desc ## _reg)(#name, #desc, PINT_LOCATION());
#define PINT_TEST_F(name, desc, base) \
class PINT_TESTNAME(name, desc) : public base \
@@ -296,7 +296,7 @@ namespace plib::testing
static const char * opstr() { return #op ; } \
template <typename T1, typename T2> \
bool operator()(const T1 &v1, const T2 &v2) { return v1 op v2; } \
- }; \
+ };
DEF_COMP(eq, ==)
DEF_COMP(ne, !=)
diff --git a/src/lib/netlist/tests/test_penum.cpp b/src/lib/netlist/tests/test_penum.cpp
index 8e90c8537e1..6347a41d027 100644
--- a/src/lib/netlist/tests/test_penum.cpp
+++ b/src/lib/netlist/tests/test_penum.cpp
@@ -91,7 +91,7 @@ namespace plib
return;
}
}
- constexpr operator const char * () const noexcept { return staticf::m_str[static_cast<std::size_t>(m_v)]; } \
+ constexpr operator const char * () const noexcept { return staticf::m_str[static_cast<std::size_t>(m_v)]; }
constexpr operator E () const noexcept { return m_v; }
protected:
E m_v;
diff --git a/src/lib/netlist/tools/nl_convert.cpp b/src/lib/netlist/tools/nl_convert.cpp
index 8fe3b19eca8..2859034c166 100644
--- a/src/lib/netlist/tools/nl_convert.cpp
+++ b/src/lib/netlist/tools/nl_convert.cpp
@@ -340,7 +340,7 @@ void nl_convert_spice_t::convert_block(const str_list &contents)
{
process_line(line);
}
- catch (const plib::pexception &e)
+ catch ([[maybe_unused]] const plib::pexception &e)
{
fprintf(stderr, "Error on line: <%d>\n", linenumber);
throw;