67 #ifndef PYNE_IS_AMALGAMATED 68 extern "C" double endftod_(
char *str,
int len);
71 #ifndef PYNE_IS_AMALGAMATED 82 #if defined __WIN_MSVC__ 85 errno_t errPYNE_DATA = _dupenv_s(&tmpPYNE_DATA, &lenPYNE_DATA,
"PYNE_DATA");
87 tmpPYNE_DATA = (
char *)
"<NOT_FOUND>";
90 char * tmpNUC_DATA_PATH;
91 size_t lenNUC_DATA_PATH;
92 errno_t errNUC_DATA_PATH = _dupenv_s(&tmpNUC_DATA_PATH, &lenNUC_DATA_PATH,
"NUC_DATA_PATH");
94 tmpNUC_DATA_PATH = (
char *)
"<NOT_FOUND>";
98 tmppath = getenv(
"PYNE_DATA");
100 tmppath = (
char *)
"<NOT_FOUND>";
103 tmppath = getenv(
"NUC_DATA_PATH");
105 tmppath = (
char *)
"<NOT_FOUND>";
115 std::stringstream ss;
121 std::stringstream ss;
127 std::stringstream ss;
133 std::stringstream ss;
140 return atoi( s.c_str() );
144 return strtod( s.c_str(), NULL );
155 if (s[9] ==
'+' or s[9] ==
'-') {
157 mant = s[8] + 10 * s[7] + 100 * s[6] + 1000 * s[5] + 10000 * s[4] + \
158 100000 * s[3] + 1000000 * s[1] - 1111111 *
'0';
161 dbl_exp = exp & 01? 10.: 1;
162 dbl_exp *= (exp >>= 1) & 01? 100.: 1;
163 dbl_exp *= (exp >>= 1) & 01? 1.0e4: 1;
164 dbl_exp *= (exp >>= 1) & 01? 1.0e8: 1;
166 dbl_exp = (s[9] ==
'-'? 1/dbl_exp: dbl_exp) * 1.0e-6;
168 v = mant * (s[0] ==
'-'? -1: 1) * dbl_exp;
171 mant = s[7] + 10 * s[6] + 100 * s[5] + 1000 * s[4] + 10000 * s[3] + \
172 100000 * s[1] - 111111 *
'0';
173 exp = s[10] + 10 * s[9] - 11 *
'0';
174 dbl_exp = exp & 01? 10.: 1;
175 dbl_exp *= (exp >>= 1) & 01? 100.: 1;
176 dbl_exp *= (exp >>= 1) & 01? 1.0e4: 1;
177 dbl_exp *= (exp >>= 1) & 01? 1.0e8: 1;
178 dbl_exp *= (exp >>= 1) & 01? 1.0e16: 1;
179 dbl_exp *= (exp >>= 1) & 01? 1.0e32: 1;
180 dbl_exp *= (exp >>= 1) & 01? 1.0e64: 1;
181 dbl_exp = (s[8] ==
'-'? 1/dbl_exp: dbl_exp) * 1.0e-5;
182 v = mant * (s[0] ==
'-'? -1: 1) * dbl_exp;
192 while (s[pos] !=
'-' and s[pos] !=
'+' and s[pos] !=
' ' and pos > 0) {
193 v += mant * (s[pos] -
'0');
197 v *= (s[pos] ==
'-'? -1: 1);
203 #ifdef PYNE_IS_AMALGAMATED 206 return endftod_(s, 12);
218 for(
unsigned int i = 0; i < s.length(); i++)
219 s[i] = toupper(s[i]);
225 for(
unsigned int i = 0; i < s.length(); i++)
226 s[i] = tolower(s[i]);
232 unsigned int slen = s.length();
236 s[0] = toupper(s[0]);
238 for(
unsigned int i = 1; i < slen; i++)
239 s[i] = tolower(s[i]);
246 for (
int i = 0; i < max_l; i++)
248 if (line[i] ==
'\t' || line[i] ==
'\n' || line[i] ==
' ' || line[i] ==
'\0')
254 tempflag[i] = line[i];
263 int n_found = s.find(substr);
264 while ( 0 <= n_found ) {
265 s.erase( n_found , substr.length() );
266 n_found = s.find(substr);
274 for (
int i = 0; i < chars.length(); i++ ) {
283 int n_found = s.find(substr);
284 while ( 0 <= n_found ) {
285 s.replace( n_found , substr.length(), repstr );
286 n_found = s.find(substr);
295 return s.substr(s.length()-1, 1);
301 return s.substr(s.length()+n, l);
307 return (a <= b && b <= c);
313 int n = s.find(substr);
314 return ( 0 <= n && n < s.length() );
330 while ( n < nat_name.length() ) {
331 if (
pyne::words.find(nat_name[n]) == std::string::npos )
332 nat_name.erase(n, 1);
338 if (nat_name.length() == 0)
342 if (
pyne::digits.find(nat_name[0]) != std::string::npos)
343 nat_name.insert(0,
"_");
355 return (y2 - y1) / (x2 - x1);
360 return (
slope(x2,y2,x1,y1) * (x - x2)) + y2;
379 struct stat stFileInfo;
384 intStat = stat(strfilename.c_str(), &stFileInfo);
416 std::cout <<
"\033[1;33m WARNING: \033[0m" << s <<
"\n";
433 #ifndef PYNE_4HFU6PUEQJB3ZJ4UIFLVU4SPCM 434 #define PYNE_4HFU6PUEQJB3ZJ4UIFLVU4SPCM 437 #define TOTAL_STATE_MAPS 922 2299 #ifndef PYNE_IS_AMALGAMATED 2300 #include "nucname.h" 2301 #include "state_map.cpp" 2435 zld[i->second] = i->first;
2447 fzd[
"BERYLLIU"] = 40000000;
2448 fzd[
"BARIUM"] = 560000000;
2449 fzd[
"BOHRIUM"] = 1070000000;
2450 fzd[
"BISMUTH"] = 830000000;
2451 fzd[
"BERKELIU"] = 970000000;
2452 fzd[
"BROMINE"] = 350000000;
2453 fzd[
"RUTHENIU"] = 440000000;
2454 fzd[
"RHENIUM"] = 750000000;
2455 fzd[
"RUTHERFO"] = 1040000000;
2456 fzd[
"ROENTGEN"] = 1110000000;
2457 fzd[
"RADIUM"] = 880000000;
2458 fzd[
"RUBIDIUM"] = 370000000;
2459 fzd[
"RADON"] = 860000000;
2460 fzd[
"RHODIUM"] = 450000000;
2461 fzd[
"THULIUM"] = 690000000;
2462 fzd[
"HYDROGEN"] = 10000000;
2463 fzd[
"PHOSPHO"] = 150000000;
2464 fzd[
"GERMANIU"] = 320000000;
2465 fzd[
"GADOLINI"] = 640000000;
2466 fzd[
"GALLIUM"] = 310000000;
2467 fzd[
"OSMIUM"] = 760000000;
2468 fzd[
"HASSIUM"] = 1080000000;
2469 fzd[
"ZINC"] = 300000000;
2470 fzd[
"HOLMIUM"] = 670000000;
2471 fzd[
"HAFNIUM"] = 720000000;
2472 fzd[
"MERCURY"] = 800000000;
2473 fzd[
"HELIUM"] = 20000000;
2474 fzd[
"PRASEODY"] = 590000000;
2475 fzd[
"PLATINUM"] = 780000000;
2476 fzd[
"239-PU"] = 940000000;
2477 fzd[
"LEAD"] = 820000000;
2478 fzd[
"PROTACTI"] = 910000000;
2479 fzd[
"PALLADIU"] = 460000000;
2480 fzd[
"POLONIUM"] = 840000000;
2481 fzd[
"PROMETHI"] = 610000000;
2482 fzd[
"CARBON"] = 60000000;
2483 fzd[
"POTASSIU"] = 190000000;
2484 fzd[
"OXYGEN"] = 80000000;
2485 fzd[
"SULFUR"] = 160000000;
2486 fzd[
"TUNGSTEN"] = 740000000;
2487 fzd[
"EUROPIUM"] = 630000000;
2488 fzd[
"EINSTEIN"] = 990000000;
2489 fzd[
"ERBIUM"] = 680000000;
2490 fzd[
"MENDELEV"] = 1010000000;
2491 fzd[
"MAGNESIU"] = 120000000;
2492 fzd[
"MOLYBDEN"] = 420000000;
2493 fzd[
"MANGANES"] = 250000000;
2494 fzd[
"MEITNERI"] = 1090000000;
2495 fzd[
"URANIUM"] = 920000000;
2496 fzd[
"FRANCIUM"] = 870000000;
2497 fzd[
"IRON"] = 260000000;
2498 fzd[
"FERMIUM"] = 1000000000;
2499 fzd[
"NICKEL"] = 280000000;
2500 fzd[
"NITROGEN"] = 70000000;
2501 fzd[
"NOBELIUM"] = 1020000000;
2502 fzd[
"SODIUM"] = 110000000;
2503 fzd[
"NIOBIUM"] = 410000000;
2504 fzd[
"NEODYMIU"] = 600000000;
2505 fzd[
"NEON"] = 100000000;
2506 fzd[
"ZIRCONIU"] = 400000000;
2507 fzd[
"NEPTUNIU"] = 930000000;
2508 fzd[
"BORON"] = 50000000;
2509 fzd[
"COBALT"] = 270000000;
2510 fzd[
"CURIUM"] = 960000000;
2511 fzd[
"FLUORINE"] = 90000000;
2512 fzd[
"CALCIUM"] = 200000000;
2513 fzd[
"CALIFORN"] = 980000000;
2514 fzd[
"CERIUM"] = 580000000;
2515 fzd[
"CADMIUM"] = 480000000;
2516 fzd[
"VANADIUM"] = 230000000;
2517 fzd[
"CESIUM"] = 550000000;
2518 fzd[
"CHROMIUM"] = 240000000;
2519 fzd[
"COPPER"] = 290000000;
2520 fzd[
"STRONTIU"] = 380000000;
2521 fzd[
"KRYPTON"] = 360000000;
2522 fzd[
"SILICON"] = 140000000;
2523 fzd[
"TIN"] = 500000000;
2524 fzd[
"SAMARIUM"] = 620000000;
2525 fzd[
"SCANDIUM"] = 210000000;
2526 fzd[
"ANTIMONY"] = 510000000;
2527 fzd[
"SEABORGI"] = 1060000000;
2528 fzd[
"SELENIUM"] = 340000000;
2529 fzd[
"YTTERBIU"] = 700000000;
2530 fzd[
"DUBNIUM"] = 1050000000;
2531 fzd[
"DYSPROSI"] = 660000000;
2532 fzd[
"DARMSTAD"] = 1100000000;
2533 fzd[
"LANTHANU"] = 570000000;
2534 fzd[
"CHLORINE"] = 170000000;
2535 fzd[
"LITHIUM"] = 030000000;
2536 fzd[
"THALLIUM"] = 810000000;
2537 fzd[
"LUTETIUM"] = 710000000;
2538 fzd[
"LAWRENCI"] = 1030000000;
2539 fzd[
"THORIUM"] = 900000000;
2540 fzd[
"TITANIUM"] = 220000000;
2541 fzd[
"TELLURIU"] = 520000000;
2542 fzd[
"TERBIUM"] = 650000000;
2543 fzd[
"99-TC"] = 430000000;
2544 fzd[
"TANTALUM"] = 730000000;
2545 fzd[
"ACTINIUM"] = 890000000;
2546 fzd[
"SILVER"] = 470000000;
2547 fzd[
"IODINE"] = 530000000;
2548 fzd[
"IRIDIUM"] = 770000000;
2549 fzd[
"241-AM"] = 950000000;
2550 fzd[
"ALUMINUM"] = 130000000;
2551 fzd[
"ARSENIC"] = 330000000;
2552 fzd[
"ARGON"] = 180000000;
2553 fzd[
"GOLD"] = 790000000;
2554 fzd[
"ASTATINE"] = 850000000;
2555 fzd[
"INDIUM"] = 490000000;
2556 fzd[
"YTTRIUM"] = 390000000;
2557 fzd[
"XENON"] = 540000000;
2558 fzd[
"COPERNIC"] = 1120000000;
2559 fzd[
"UNUNQUAD"] = 1140000000;
2560 fzd[
"UNUNHEXI"] = 1160000000;
2561 fzd[
"HYDROG-1"] = 10010000;
2562 fzd[
"DEUTERIU"] = 10020000;
2563 fzd[
"TRITIUM"] = 10040000;
2564 fzd[
"HELIUM-3"] = 20030000;
2565 fzd[
"HELIUM-4"] = 20040000;
2566 fzd[
"LITHIU-6"] = 30060000;
2567 fzd[
"LITHIU-7"] = 30070000;
2568 fzd[
"BORON-10"] = 50100000;
2569 fzd[
"BORON-11"] = 50110000;
2570 fzd[
"90-SR"] = 380900000;
2571 fzd[
"129-I"] = 531290000;
2572 fzd[
"124-XE"] = 541240000;
2573 fzd[
"126-XE"] = 541260000;
2574 fzd[
"128-XE"] = 541280000;
2575 fzd[
"130-XE"] = 541300000;
2576 fzd[
"131-XE"] = 541310000;
2577 fzd[
"132-XE"] = 541320000;
2578 fzd[
"134-XE"] = 541340000;
2579 fzd[
"135-XE"] = 541350000;
2580 fzd[
"136-XE"] = 541360000;
2581 fzd[
"135-CS"] = 551350000;
2582 fzd[
"137-CS"] = 551370000;
2583 fzd[
"230-TH"] = 902300000;
2584 fzd[
"232-TH"] = 902320000;
2585 fzd[
"233-U"] = 922330000;
2586 fzd[
"234-U"] = 922340000;
2587 fzd[
"235-U"] = 922350000;
2588 fzd[
"238-U"] = 922380000;
2601 zfd[i->second] = i->first;
2623 "Pm",
"Sm",
"Eu",
"Gd",
"Tb",
"Dy",
"Ho",
"Er",
"Tm",
"Yb",
"Lu"};
2631 "Np",
"Pu",
"Am",
"Cm",
"Bk",
"Cf",
"Es",
"Fm",
"Md",
"No",
"Lr"};
2637 "Bk",
"Cf",
"Es",
"Fm",
"Md",
"No",
"Lr",
"Rf",
"Db",
"Sg",
"Bh",
"Hs",
"Mt",
2638 "Ds",
"Rg",
"Cn",
"Fl",
"Lv"};
2646 "Cf",
"Es",
"Fm",
"Md",
"No",
"Lr"};
2654 "At",
"Au",
"B",
"Ba",
"Be",
"Bi",
"Br",
"C",
"Ca",
"Cd",
"Ce",
"Cl",
"Co",
2655 "Cr",
"Cs",
"Cu",
"Dy",
"Er",
"Eu",
"F",
"Fe",
"Fr",
"Ga",
"Gd",
"Ge",
"H",
2656 "He",
"Hf",
"Hg",
"Ho",
"I",
"In",
"Ir",
"K",
"Kr",
"La",
"Li",
"Lu",
"Mg",
2657 "Mn",
"Mo",
"N",
"Na",
"Nb",
"Nd",
"Ne",
"Ni",
"O",
"Os",
"P",
"Pb",
"Pd",
2658 "Pm",
"Po",
"Pr",
"Pt",
"Ra",
"Rb",
"Re",
"Rh",
"Rn",
"Ru",
"S",
"Sb",
"Sc",
2659 "Se",
"Si",
"Sm",
"Sn",
"Sr",
"Ta",
"Tb",
"Tc",
"Te",
"Ti",
"Tl",
"Tm",
"V",
2660 "W",
"Xe",
"Y",
"Yb",
"Zn",
"Zr"};
2702 int zzz = n / 10000000;
2703 int aaa = (n % 10000000) / 10000;
2721 int zzz = nuc / 10000000;
2722 int aaassss = nuc % 10000000;
2723 int aaa = aaassss / 10000;
2724 int ssss = aaassss % 10000;
2726 if (0 < zzz && zzz <= aaa && aaa <= zzz * 7) {
2730 warning(
"You have indicated a metastable state of " +
pyne::to_str(ssss) +
". Metastable state above 5, possibly unphysical. ");
2733 }
else if (aaassss == 0 && 0 <
zz_name.count(zzz)) {
2736 }
else if (nuc < 1000 && 0 <
zz_name.count(nuc))
2738 return nuc * 10000000;
2742 aaassss = nuc % 10000;
2745 if (zzz <= aaa && aaa <= zzz * 7) {
2749 warning(
"You have indicated a metastable state of " +
pyne::to_str(ssss) +
". Metastable state above 5, possibly unphysical. ");
2751 return (zzz*10000000) + (aaa*10000) + (nuc%10);
2752 }
else if (aaa <= zzz && zzz <= aaa * 7 && 0 <
zz_name.count(aaa)) {
2756 warning(
"You have indicated a metastable state of " +
pyne::to_str(ssss) +
". Metastable state above 5, possibly unphysical. ");
2758 return (aaa*10000000) + (zzz*10000) + (nuc%10);
2761 else if (aaassss == 0 && 0 <
zz_name.count(zzz)) {
2763 return zzz * 10000000;
2766 if (nuc >= 1000000){
2777 if (aaa - 400 < 0) {
2779 return nuc * 10000 + 1;
2785 return (95642 - 400)*10000;
2786 nuc = ((nuc - 400) * 10000) + 1;
2787 while (3.0 < (
float ((nuc/10000)%1000) / float (nuc/10000000)))
2791 }
else if (aaa == 0 && 0 <
zz_name.count(zzz)) {
2793 return zzz * 10000000;
2800 return nuc * 10000000;
2810 size_t npos = std::string::npos;
2815 int dash1 = nuc.find(
"-");
2820 dash2 = nuc.find(
"-", dash1+1);
2823 if (nuc.length() >= 5 && dash1 != npos && dash2 != npos) {
2829 if(
znum(ll) != zz_int)
2830 throw NotANuclide(nuc,
"mismatched znum and chemical symbol");
2837 int nuclen = nucstr.length();
2844 newnuc =
id(newnuc);
2854 if (0 <
name_zz.count(elem_name))
2855 newnuc = (10000000 *
name_zz[elem_name]) + newnuc;
2864 if (anum_str.empty()) {
2866 if (0 <
name_zz.count(elem_name))
2867 return 10000000 *
name_zz[elem_name];
2878 if (end_char ==
"M")
2879 newnuc = (10000 *
anum) + 1;
2881 newnuc = (10000 * anum);
2888 if (0 <
name_zz.count(elem_name))
2889 newnuc = (10000000 *
name_zz[elem_name]) + newnuc;
2932 if (zzz > 0 && aaa == 0)
2941 int nucid =
id(nuc);
2944 int zzz = nucid / 10000000;
2945 int ssss = nucid % 10000;
2946 int aaassss = nucid % 10000000;
2947 int aaa = aaassss / 10000;
2971 return name(newnuc);
2976 return name(
id(nuc));
2984 return id(nuc) / 10000000;
2988 return id(nuc) / 10000000;
2992 return id(nuc) / 10000000;
2999 return (
id(nuc) / 10000) % 1000;
3003 return (
id(nuc) / 10000) % 1000;
3007 return (
id(nuc) / 10000) % 1000;
3014 return id(nuc) % 10000;
3018 return id(nuc) % 10000;
3022 return id(nuc) % 10000;
3029 int nucid =
id(nuc);
3030 int zzzaaa = nucid / 10000;
3031 int ssss = nucid % 10000;
3034 return zzzaaa*10 + ssss;
3050 return (nuc/10)*10000 + (nuc%10);
3067 int nucid =
id(nuc);
3068 int zzzaaa = nucid/10000;
3103 int nucid =
id(nuc);
3106 int ssss = nucid % 10000;
3107 int aaassss = nucid % 10000000;
3108 int zzz = nucid / 10000000;
3109 int aaa = aaassss / 10000;
3162 int nuclen = nucstr.length();
3170 if (0 <
name_zz.count(elem_name))
3171 return 10000000 *
name_zz[elem_name];
3177 if (end_char ==
"M")
3178 nucid = (10000 *
anum) + 1;
3180 nucid = (10000 * anum);
3187 if (0 <
name_zz.count(elem_name))
3188 nucid = (10000000 *
name_zz[elem_name]) + nucid;
3199 int ssss = nuc % 10000;
3200 int newnuc = nuc / 10000;
3203 if (newnuc == 95242 && ssss < 2)
3204 ssss = (ssss + 1) % 2;
3207 if (0 != ssss && ssss < 10)
3208 newnuc += 300 + (ssss * 100);
3217 return mcnp(newnuc);
3223 return mcnp(
id(nuc));
3230 int zzz = nuc / 1000;
3231 int aaa = nuc % 1000;
3234 else if (zzz <= aaa) {
3235 if (aaa - 400 < 0) {
3237 return nuc * 10000 + 1;
3243 return (95642 - 400)*10000;
3244 nuc = ((nuc - 400) * 10000) + 1;
3245 while (3.0 < (
float ((nuc/10000)%1000) / float (nuc/10000000)))
3249 }
else if (aaa == 0)
3251 return zzz * 10000000;
3272 throw NotANuclide(nuc,
"fluka name could not be found");
3283 throw NotANuclide(-1,
"No nuclide: fluka name could not be found");
3297 int nucid =
id(nuc);
3300 int ssss = nucid % 10000;
3301 int aaassss = nucid % 10000000;
3302 int zzz = nucid / 10000000;
3303 int aaa = aaassss / 10000;
3312 newnuc += llupper[0];
3313 for (
int l = 1; l < lllower.size(); l++)
3314 newnuc += lllower[l];
3322 else if (0 == aaassss)
3366 int nuclen = nucstr.length();
3374 if (0 <
name_zz.count(elem_name))
3375 return 10000000 *
name_zz[elem_name];
3381 if (end_char ==
"M")
3382 nucid = (10000 *
anum) + 1;
3384 nucid = (10000 * anum);
3391 if (0 <
name_zz.count(elem_name))
3392 nucid = (10000000 *
name_zz[elem_name]) + nucid;
3403 int nucid =
id(nuc);
3406 int zzz = nucid / 10000000;
3407 int ssss = nucid % 10000;
3408 int aaassss = nucid % 10000000;
3409 int aaa = aaassss / 10000;
3422 newnuc += name_upper[0];
3423 for (
int l = 1; l < name_lower.size(); l++)
3424 newnuc += name_lower[l];
3438 return nist(newnuc);
3443 return nist(
id(nuc));
3465 int nuclen = nuc.length();
3471 if (anum_str.empty()) {
3473 if (0 <
name_zz.count(elem_name))
3474 return 10000000 *
name_zz[elem_name];
3481 if (0 <
name_zz.count(elem_name))
3482 nucid = (10000000 *
name_zz[elem_name]) + nucid;
3494 int nucid =
id(nuc);
3495 int zzz = nucid / 10000000;
3496 int ssss = nucid % 10000;
3497 int aaassss = nucid % 10000000;
3498 int aaa = aaassss / 10000;
3501 return (aaa*10000) + (zzz*10) + ssss;
3521 int ssss = nuc % 10;
3522 int aaazzz = nuc / 10;
3523 int zzz = aaazzz % 1000;
3524 int aaa = aaazzz / 1000;
3525 return (zzz * 10000000) + (aaa * 10000) + ssss;
3545 int nucid =
id(nuc);
3549 int zzz = nucid / 10000000;
3550 int ssss = nucid % 10000;
3551 int aaassss = nucid % 10000000;
3552 int aaa = aaassss / 10000;
3561 for(
int i = 0; ll[i] !=
'\0'; i++)
3562 ll[i] = tolower(ll[i]);
3578 return alara(newnuc);
3583 return alara(
id(nuc));
3607 int nuclen = nuc.length();
3613 if (anum_str.empty()) {
3615 if (0 <
name_zz.count(elem_name))
3616 return 10000000 *
name_zz[elem_name];
3623 if (0 <
name_zz.count(elem_name))
3624 nucid = (10000000 *
name_zz[elem_name]) + nucid;
3637 int nucid =
id(nuc);
3638 int zzzaaa = nucid / 10000;
3639 int sss = nucid % 10000;
3640 return sss * 1000000 +
zzzaaa;
3651 return sza(
id(nuc));
3656 int sss = nuc / 1000000;
3657 int zzzaaa = nuc % 1000000;
3660 warning(
"You have indicated a metastable state of " +
pyne::to_str(sss) +
". Metastable state above 5, possibly unphysical. ");
3662 return zzzaaa * 10000 + sss;
3684 int zzzaaa = (state / 10000) * 10000;
3685 int state_number = state % 10000;
3686 if (state_number == 0)
return state;
3687 std::map<int, int>::iterator nuc_iter, nuc_end;
3691 if (nuc_iter != nuc_end){
3692 int m = (*nuc_iter).second;
3705 int zzzaaa = (nuc_id / 10000) * 10000;
3706 int state = nuc_id % 10000;
3707 if (state == 0)
return nuc_id;
3708 std::map<int, int>::iterator nuc_iter, nuc_end, it;
3712 for (it = nuc_iter; it!= nuc_end; ++it){
3713 if (state == it->second) {
3717 int m = (*nuc_iter).second;
3739 if (nuc.size() < 4) {
3741 }
else if (std::isdigit(nuc[3])) {
3742 int aaa =
to_int(nuc.substr(0, 3));
3745 zzz =
to_int(xx_str) + 100;
3746 int nid = 10000 * aaa + 10000000 * zzz;
3762 #ifndef PYNE_IS_AMALGAMATED 3888 "resonance_parameters",
3920 "erel_fission_first",
3921 "erel_fission_second",
3922 "erel_fission_third",
3937 "erel_fission_fourth",
3984 "erel_disappearance",
4003 "fission_product_yield_independent",
4007 "energy_per_fission",
4008 "fission_product_yield_cumulative",
4013 "photon_incoherent",
4014 "scattering_factor_imag",
4015 "scattering_factor_real",
4019 "absorption_photoelectric",
4021 "scattering_electroatomic",
4023 "excitation_electroatomic",
4024 "atomic_relaxation",
4059 "p10_photoelectric",
4060 "p11_photoelectric",
4355 using std::make_pair;
4960 "(z,abs) Absorption",
5032 "(z,disap) Neutron disappearance",
5054 "Resonance Parameters",
5062 "(z,Xpi+) Total pi+ meson production",
5063 "(z,Xpi0) Total pi0 meson production",
5064 "(z,Xpi-) Total pi- meson production",
5065 "(z,Xmu+) Total anti-muon production",
5066 "(z,Xmu-) Total muon production",
5067 "(z,Xk+) Total positive kaon production",
5068 "(z,Xk0long) Total long-lived neutral kaon production",
5069 "(z,Xk0short) Total short-lived neutral kaon production",
5070 "(z,Xk-) Total negative kaon production",
5071 "(z,Xp-) Total anti-proton production",
5072 "(z,Xn-) Total anti-neutron production",
5073 "Average cosine of scattering angle",
5074 "Average logarithmic energy decrement",
5075 "Average xi^2/(2*xi)",
5076 "Energy Release from (z,total)",
5077 "Energy Release from (z,elastic)",
5078 "Energy Release from (z,nonelastic)",
5079 "Energy Release from (z,inelastic)",
5080 "Energy Release from (misc)",
5081 "Energy Release from (z,continuum)",
5082 "Energy Release from (z,2nd)",
5083 "Energy Release from (z,2n)",
5084 "Energy Release from (z,3n)",
5085 "Energy Release from (z,fission)",
5086 "Energy Release from (z,f)",
5087 "Energy Release from (z,nf)",
5088 "Energy Release from (z,2nf)",
5089 "Energy Release from (z,n+a)",
5090 "Energy Release from (z,n+3a)",
5091 "Energy Release from (z,2n+a)",
5092 "Energy Release from (z,3n+a)",
5093 "Energy Release from (z,abs) Absorption",
5094 "Energy Release from (z,n+p)",
5095 "Energy Release from (z,n+2a)",
5096 "Energy Release from (z,2n+2a)",
5097 "Energy Release from (z,nd)",
5098 "Energy Release from (z,nt)",
5099 "Energy Release from (z,n+He3)",
5100 "Energy Release from (z,n+d+3a)",
5101 "Energy Release from (z,n+t+2a)",
5102 "Energy Release from (z,4n)",
5103 "Energy Release from (z,3nf)",
5104 "Energy Release from (z,2n+p)",
5105 "Energy Release from (z,3n+p)",
5106 "Energy Release from (z,n+2p)",
5107 "Energy Release from (z,npa)",
5108 "Energy Release from (z,n0)",
5109 "Energy Release from (z,n1)",
5110 "Energy Release from (z,n2)",
5111 "Energy Release from (z,n3)",
5112 "Energy Release from (z,n4)",
5113 "Energy Release from (z,n5)",
5114 "Energy Release from (z,n6)",
5115 "Energy Release from (z,n7)",
5116 "Energy Release from (z,n8)",
5117 "Energy Release from (z,n9)",
5118 "Energy Release from (z,n10)",
5119 "Energy Release from (z,n11)",
5120 "Energy Release from (z,n12)",
5121 "Energy Release from (z,n13)",
5122 "Energy Release from (z,n14)",
5123 "Energy Release from (z,n15)",
5124 "Energy Release from (z,n16)",
5125 "Energy Release from (z,n17)",
5126 "Energy Release from (z,n18)",
5127 "Energy Release from (z,n19)",
5128 "Energy Release from (z,n20)",
5129 "Energy Release from (z,n21)",
5130 "Energy Release from (z,n22)",
5131 "Energy Release from (z,n23)",
5132 "Energy Release from (z,n24)",
5133 "Energy Release from (z,n25)",
5134 "Energy Release from (z,n26)",
5135 "Energy Release from (z,n27)",
5136 "Energy Release from (z,n28)",
5137 "Energy Release from (z,n29)",
5138 "Energy Release from (z,n30)",
5139 "Energy Release from (z,n31)",
5140 "Energy Release from (z,n32)",
5141 "Energy Release from (z,n33)",
5142 "Energy Release from (z,n34)",
5143 "Energy Release from (z,n35)",
5144 "Energy Release from (z,n36)",
5145 "Energy Release from (z,n37)",
5146 "Energy Release from (z,n38)",
5147 "Energy Release from (z,n39)",
5148 "Energy Release from (z,n40)",
5149 "Energy Release from (z,nc)",
5150 "Energy Release from (z,disap) Neutron disappearance",
5151 "Energy Release from (z,gamma)",
5152 "Energy Release from (z,p)",
5153 "Energy Release from (z,d)",
5154 "Energy Release from (z,t)",
5155 "Energy Release from (z,3He)",
5156 "Energy Release from (z,a)",
5157 "Energy Release from (z,2a)",
5158 "Energy Release from (z,3a)",
5159 "Energy Release from (z,2p)",
5160 "Energy Release from (z,pa)",
5161 "Energy Release from (z,t2a)",
5162 "Energy Release from (z,d2a)",
5163 "Energy Release from (z,pd)",
5164 "Energy Release from (z,pt)",
5165 "Energy Release from (z,da)",
5168 "Total Neutrons per Fission",
5169 "Independent fission product yield",
5170 "Delayed Neutron Data",
5171 "Prompt Neutrons per Fission",
5172 "Radioactive Decay Data",
5173 "Energy Release Due to Fission",
5174 "Cumulative Fission Product Yield",
5175 "Delayed Photon Data",
5176 "Total charged-particle stopping power",
5177 "Total photon interaction",
5178 "Photon coherent scattering",
5179 "Photon incoherent scattering",
5180 "Imaginary scattering factor",
5181 "Real scattering factor",
5182 "Pair production, electron field",
5183 "Total pair production",
5184 "Pair production, nuclear field",
5185 "Photoelectric absorption",
5186 "Photo-excitation cross section",
5187 "Electro-atomic scattering",
5188 "Electro-atomic bremsstrahlung",
5189 "Electro-atomic excitation cross section",
5190 "Atomic relaxation data",
5191 "K (1s1/2) subshell",
5192 "L1 (2s1/2) subshell",
5193 "L2 (2p1/2) subshell",
5194 "L3 (2p3/2) subshell",
5195 "M1 (3s1/2) subshell",
5196 "M2 (3p1/2) subshell",
5197 "M3 (3p3/2) subshell",
5198 "M4 (3d1/2) subshell",
5199 "M5 (3d1/2) subshell",
5200 "N1 (4s1/2) subshell",
5201 "N2 (4p1/2) subshell",
5202 "N3 (4p3/2) subshell",
5203 "N4 (4d3/2) subshell",
5204 "N5 (4d5/2) subshell",
5205 "N6 (4f5/2) subshell",
5206 "N7 (4f7/2) subshell",
5207 "O1 (5s1/2) subshell",
5208 "O2 (5p1/2) subshell",
5209 "O3 (5p3/2) subshell",
5210 "O4 (5d3/2) subshell",
5211 "O5 (5d5/2) subshell",
5212 "O6 (5f5/2) subshell",
5213 "O7 (5f7/2) subshell",
5214 "O8 (5g7/2) subshell",
5215 "O9 (5g9/2) subshell",
5216 "P1 (6s1/2) subshell",
5217 "P2 (6p1/2) subshell",
5218 "P3 (6p3/2) subshell",
5219 "P4 (6d3/2) subshell",
5220 "P5 (6d5/2) subshell",
5221 "P6 (6f5/2) subshell",
5222 "P7 (6f7/2) subshell",
5223 "P8 (6g7/2) subshell",
5224 "P9 (6g9/2) subshell",
5225 "P10 (6h9/2) subshell",
5226 "P11 (6h11/2) subshell",
5227 "Q1 (7s1/2) subshell",
5228 "Q2 (7p1/2) subshell",
5229 "Q3 (7p3/2) subshell",
5480 "Lumped Covariances",
5481 "Any Excited State",
5507 "(n,total) Neutron total",
5509 "(z,z0) Elastic scattering",
5510 "(z,nonelas) Nonelastic neutron",
5511 "(z,n) One neutron in exit channel",
5512 "(z,anything) Miscellaneous",
5513 "(z,contin) Total continuum reaction",
5514 "(z,2nd) Production of 2n and d",
5515 "(z,2n) Production of 2n",
5516 "(z,2n0) Production of 2n, ground state",
5517 "(z,2n1) Production of 2n, 1st excited state",
5518 "(z,2n2) Production of 2n, 2nd excited state",
5519 "(z,3n) Production of 3n",
5520 "(z,3n0) Production of 3n, ground state",
5521 "(z,3n1) Production of 3n, 1st excited state",
5522 "(z,3n2) Production of 3n, 2nd excited state",
5523 "(z,fiss) Particle-induced fission",
5524 "(z,f) First-chance fission",
5525 "(z,nf) Second chance fission",
5526 "(z,2nf) Third-chance fission",
5527 "(z,na) Production of n and alpha",
5528 "(z,na0) Production of n and alpha, ground state",
5529 "(z,na1) Production of n and alpha, 1st excited state",
5530 "(z,na2) Production of n and alpha, 2nd excited state",
5531 "(z,n3a) Production of n and 3 alphas",
5532 "(z,2na) Production of 2n and alpha",
5533 "(z,3na) Production of 3n and alpha",
5534 "(n,abs) Absorption",
5535 "(z,np) Production of n and p",
5536 "(z,np0) Production of n and p, ground state",
5537 "(z,np1) Production of n and p, 1st excited state",
5538 "(z,np2) Production of n and p, 2nd excited state",
5539 "(z,npd) Production of n, p, and d",
5540 "(z,n2a) Production of n and 2 alphas",
5541 "(z,2n2a) Production of 2n and 2 alphas",
5542 "(z,nd) Production of n and d",
5543 "(z,nd0) Production of n and d, ground state",
5544 "(z,nd1) Production of n and d, 1st excited state",
5545 "(z,nd2) Production of n and d, 2nd excited state",
5546 "(z,nt) Production of n and t",
5547 "(z,nt0) Production of n and t, ground state",
5548 "(z,nt1) Production of n and t, 1st excited state",
5549 "(z,nt2) Production of n and t, 2nd excited state",
5550 "(z,n3He) Production of n and He-3",
5551 "(z,n3He-0) Production of n and He-3, ground state",
5552 "(z,n3He-1) Production of n and He-3, 1st excited state",
5553 "(z,n3He-2) Production of n and He-3, 2nd excited state",
5554 "(z,nd2a) Production of n, d, and alpha",
5555 "(z,nt2a) Production of n, t, and 2 alphas",
5556 "(z,4n) Production of 4n",
5557 "(z,4n0) Production of 4n, ground state",
5558 "(z,4n1) Production of 4n, 1st excited state",
5559 "(z,3nf) Fourth-chance fission",
5560 "(z,2np) Production of 2n and p",
5561 "(z,3np) Production of 3n and p",
5562 "(z,n2p) Production of n and 2p",
5563 "(z,npa) Production of n, p, and alpha",
5564 "(z,n0) Production of n, ground state",
5565 "(z,n1) Production of n, 1st excited state",
5566 "(z,n2) Production of n, 2nd excited state",
5567 "(z,n3) Production of n, 3rd excited state",
5568 "(z,n4) Production of n, 4th excited state",
5569 "(z,n5) Production of n, 5th excited state",
5570 "(z,n6) Production of n, 6th excited state",
5571 "(z,n7) Production of n, 7th excited state",
5572 "(z,n8) Production of n, 8th excited state",
5573 "(z,n9) Production of n, 9th excited state",
5574 "(z,n10) Production of n, 10th excited state",
5575 "(z,n11) Production of n, 11th excited state",
5576 "(z,n12) Production of n, 12th excited state",
5577 "(z,n13) Production of n, 13th excited state",
5578 "(z,n14) Production of n, 14th excited state",
5579 "(z,n15) Production of n, 15th excited state",
5580 "(z,n16) Production of n, 16th excited state",
5581 "(z,n17) Production of n, 17th excited state",
5582 "(z,n18) Production of n, 18th excited state",
5583 "(z,n19) Production of n, 19th excited state",
5584 "(z,n20) Production of n, 20th excited state",
5585 "(z,n21) Production of n, 21st excited state",
5586 "(z,n22) Production of n, 22nd excited state",
5587 "(z,n23) Production of n, 23rd excited state",
5588 "(z,n24) Production of n, 24th excited state",
5589 "(z,n25) Production of n, 25th excited state",
5590 "(z,n26) Production of n, 26th excited state",
5591 "(z,n27) Production of n, 27th excited state",
5592 "(z,n28) Production of n, 28th excited state",
5593 "(z,n29) Production of n, 29th excited state",
5594 "(z,n30) Production of n, 30th excited state",
5595 "(z,n31) Production of n, 31st excited state",
5596 "(z,n32) Production of n, 32nd excited state",
5597 "(z,n33) Production of n, 33rd excited state",
5598 "(z,n34) Production of n, 34th excited state",
5599 "(z,n35) Production of n, 35th excited state",
5600 "(z,n36) Production of n, 36th excited state",
5601 "(z,n37) Production of n, 37th excited state",
5602 "(z,n38) Production of n, 38th excited state",
5603 "(z,n39) Production of n, 39th excited state",
5604 "(z,n40) Production of n, 40th excited state",
5605 "(z,nc) Production of n in continuum",
5606 "(n,disap) Neutron disappearance",
5607 "(z,gamma) Radiative capture",
5608 "(z,gamma0) Radiative capture, ground state",
5609 "(z,gamma1) Radiative capture, 1st excited state",
5610 "(z,gamma2) Radiative capture, 2st excited state",
5611 "(z,p) Production of p",
5612 "(z,d) Production of d",
5613 "(z,t) Production of t",
5614 "(z,3He) Production of He-3",
5615 "(z,a) Production of alpha",
5616 "(z,2a) Production of 2 alphas",
5617 "(z,3a) Production of 3 alphas",
5618 "(z,2p) Production of 2p",
5619 "(z,2p0) Production of 2p, ground state",
5620 "(z,2p1) Production of 2p, 1st excited state",
5621 "(z,2p2) Production of 2p, 2nd excited state",
5622 "(z,pa) Production of p and alpha",
5623 "(z,t2a) Production of t and 2 alphas",
5624 "(z,d2a) Production of d and 2 alphas",
5625 "(z,pd) Production of p and d",
5626 "(z,pt) Production of p and t",
5627 "(z,da) Production of d and a",
5628 "Resonance Parameters",
5629 "(z,Xn) Total neutron production",
5630 "(z,Xgamma) Total gamma production",
5631 "(z,Xp) Total proton production",
5632 "(z,Xd) Total deuteron production",
5633 "(z,Xt) Total triton production",
5634 "(z,X3He) Total He-3 production",
5635 "(z,Xa) Total alpha production",
5636 "(z,Xpi+) Total pi+ meson production",
5637 "(z,Xpi0) Total pi0 meson production",
5638 "(z,Xpi-) Total pi- meson production",
5639 "(z,Xmu+) Total anti-muon production",
5640 "(z,Xmu-) Total muon production",
5641 "(z,Xk+) Total positive kaon production",
5642 "(z,Xk0long) Total long-lived neutral kaon production",
5643 "(z,Xk0short) Total short-lived neutral kaon production",
5644 "(z,Xk-) Total negative kaon production",
5645 "(z,Xp-) Total anti-proton production",
5646 "(z,Xn-) Total anti-neutron production",
5647 "Average cosine of scattering angle",
5648 "Average logarithmic energy decrement",
5649 "Average xi^2/(2*xi)",
5650 "Energy Release from (n,total) Neutron total",
5651 "Energy Release from (z,z0) Elastic scattering",
5652 "Energy Release from (z,nonelas) Nonelastic neutron",
5653 "Energy Release from (z,n) One neutron in exit channel",
5654 "Energy Release from (z,anything) Miscellaneous",
5655 "Energy Release from (z,contin) Total continuum reaction",
5656 "Energy Release from (z,2nd) Production of 2n and d",
5657 "Energy Release from (z,2n) Production of 2n",
5658 "Energy Release from (z,3n) Production of 3n",
5659 "Energy Release from (z,fiss) Particle-induced fission",
5660 "Energy Release from (z,f) First-chance fission",
5661 "Energy Release from (z,nf) Second chance fission",
5662 "Energy Release from (z,2nf) Third-chance fission",
5663 "Energy Release from (z,na) Production of n and alpha",
5664 "Energy Release from (z,n3a) Production of n and 3 alphas",
5665 "Energy Release from (z,2na) Production of 2n and alpha",
5666 "Energy Release from (z,3na) Production of 3n and alpha",
5667 "Energy Release from (n,abs) Absorption",
5668 "Energy Release from (z,np) Production of n and p",
5669 "Energy Release from (z,n2a) Production of n and 2 alphas",
5670 "Energy Release from (z,2n2a) Production of 2n and 2 alphas",
5671 "Energy Release from (z,nd) Production of n and d",
5672 "Energy Release from (z,nt) Production of n and t",
5673 "Energy Release from (z,n3He) Production of n and He-3",
5674 "Energy Release from (z,nd2a) Production of n, d, and alpha",
5675 "Energy Release from (z,nt2a) Production of n, t, and 2 alphas",
5676 "Energy Release from (z,4n) Production of 4n",
5677 "Energy Release from (z,3nf) Fourth-chance fission",
5678 "Energy Release from (z,2np) Production of 2n and p",
5679 "Energy Release from (z,3np) Production of 3n and p",
5680 "Energy Release from (z,n2p) Production of n and 2p",
5681 "Energy Release from (z,npa) Production of n, p, and alpha",
5682 "Energy Release from (z,n0) Production of n, ground state",
5683 "Energy Release from (z,n1) Production of n, 1st excited state",
5684 "Energy Release from (z,n2) Production of n, 2nd excited state",
5685 "Energy Release from (z,n3) Production of n, 3rd excited state",
5686 "Energy Release from (z,n4) Production of n, 4th excited state",
5687 "Energy Release from (z,n5) Production of n, 5th excited state",
5688 "Energy Release from (z,n6) Production of n, 6th excited state",
5689 "Energy Release from (z,n7) Production of n, 7th excited state",
5690 "Energy Release from (z,n8) Production of n, 8th excited state",
5691 "Energy Release from (z,n9) Production of n, 9th excited state",
5692 "Energy Release from (z,n10) Production of n, 10th excited state",
5693 "Energy Release from (z,n11) Production of n, 11th excited state",
5694 "Energy Release from (z,n12) Production of n, 12th excited state",
5695 "Energy Release from (z,n13) Production of n, 13th excited state",
5696 "Energy Release from (z,n14) Production of n, 14th excited state",
5697 "Energy Release from (z,n15) Production of n, 15th excited state",
5698 "Energy Release from (z,n16) Production of n, 16th excited state",
5699 "Energy Release from (z,n17) Production of n, 17th excited state",
5700 "Energy Release from (z,n18) Production of n, 18th excited state",
5701 "Energy Release from (z,n19) Production of n, 19th excited state",
5702 "Energy Release from (z,n20) Production of n, 20th excited state",
5703 "Energy Release from (z,n21) Production of n, 21st excited state",
5704 "Energy Release from (z,n22) Production of n, 22nd excited state",
5705 "Energy Release from (z,n23) Production of n, 23rd excited state",
5706 "Energy Release from (z,n24) Production of n, 24th excited state",
5707 "Energy Release from (z,n25) Production of n, 25th excited state",
5708 "Energy Release from (z,n26) Production of n, 26th excited state",
5709 "Energy Release from (z,n27) Production of n, 27th excited state",
5710 "Energy Release from (z,n28) Production of n, 28th excited state",
5711 "Energy Release from (z,n29) Production of n, 29th excited state",
5712 "Energy Release from (z,n30) Production of n, 30th excited state",
5713 "Energy Release from (z,n31) Production of n, 31st excited state",
5714 "Energy Release from (z,n32) Production of n, 32nd excited state",
5715 "Energy Release from (z,n33) Production of n, 33rd excited state",
5716 "Energy Release from (z,n34) Production of n, 34th excited state",
5717 "Energy Release from (z,n35) Production of n, 35th excited state",
5718 "Energy Release from (z,n36) Production of n, 36th excited state",
5719 "Energy Release from (z,n37) Production of n, 37th excited state",
5720 "Energy Release from (z,n38) Production of n, 38th excited state",
5721 "Energy Release from (z,n39) Production of n, 39th excited state",
5722 "Energy Release from (z,n40) Production of n, 40th excited state",
5723 "Energy Release from (z,nc) Production of n in continuum",
5724 "Energy Release from (n,disap) Neutron disappearance",
5725 "Energy Release from (z,gamma) Radiative capture",
5726 "Energy Release from (z,p) Production of p",
5727 "Energy Release from (z,d) Production of d",
5728 "Energy Release from (z,t) Production of t",
5729 "Energy Release from (z,3He) Production of He-3",
5730 "Energy Release from (z,a) Production of alpha",
5731 "Energy Release from (z,2a) Production of 2 alphas",
5732 "Energy Release from (z,3a) Production of 3 alphas",
5733 "Energy Release from (z,2p) Production of 2p",
5734 "Energy Release from (z,pa) Production of p and alpha",
5735 "Energy Release from (z,t2a) Production of t and 2 alphas",
5736 "Energy Release from (z,d2a) Production of d and 2 alphas",
5737 "Energy Release from (z,pd) Production of p and d",
5738 "Energy Release from (z,pt) Production of p and t",
5739 "Energy Release from (z,da) Production of d and a",
5742 "Total Neutrons per Fission",
5743 "Independent fission product yield",
5744 "Delayed Neutron Data",
5745 "Prompt Neutrons per Fission",
5746 "Radioactive Decay Data",
5747 "Energy Release Due to Fission",
5748 "Cumulative Fission Product Yield",
5749 "Delayed Photon Data",
5750 "Total charged-particle stopping power",
5751 "Total photon interaction",
5752 "Photon coherent scattering",
5753 "Photon incoherent scattering",
5754 "Imaginary scattering factor",
5755 "Real scattering factor",
5756 "Pair production, electron field",
5757 "Total pair production",
5758 "Pair production, nuclear field",
5759 "Photoelectric absorption",
5760 "Photo-excitation cross section",
5761 "Electro-atomic scattering",
5762 "Electro-atomic bremsstrahlung",
5763 "Electro-atomic excitation cross section",
5764 "Atomic relaxation data",
5765 "K (1s1/2) subshell",
5766 "L1 (2s1/2) subshell",
5767 "L2 (2p1/2) subshell",
5768 "L3 (2p3/2) subshell",
5769 "M1 (3s1/2) subshell",
5770 "M2 (3p1/2) subshell",
5771 "M3 (3p3/2) subshell",
5772 "M4 (3d1/2) subshell",
5773 "M5 (3d1/2) subshell",
5774 "N1 (4s1/2) subshell",
5775 "N2 (4p1/2) subshell",
5776 "N3 (4p3/2) subshell",
5777 "N4 (4d3/2) subshell",
5778 "N5 (4d5/2) subshell",
5779 "N6 (4f5/2) subshell",
5780 "N7 (4f7/2) subshell",
5781 "O1 (5s1/2) subshell",
5782 "O2 (5p1/2) subshell",
5783 "O3 (5p3/2) subshell",
5784 "O4 (5d3/2) subshell",
5785 "O5 (5d5/2) subshell",
5786 "O6 (5f5/2) subshell",
5787 "O7 (5f7/2) subshell",
5788 "O8 (5g7/2) subshell",
5789 "O9 (5g9/2) subshell",
5790 "P1 (6s1/2) subshell",
5791 "P2 (6p1/2) subshell",
5792 "P3 (6p3/2) subshell",
5793 "P4 (6d3/2) subshell",
5794 "P5 (6d5/2) subshell",
5795 "P6 (6f5/2) subshell",
5796 "P7 (6f7/2) subshell",
5797 "P8 (6g7/2) subshell",
5798 "P9 (6g9/2) subshell",
5799 "P10 (6h9/2) subshell",
5800 "P11 (6h11/2) subshell",
5801 "Q1 (7s1/2) subshell",
5802 "Q2 (7p1/2) subshell",
5803 "Q3 (7p3/2) subshell",
6054 "Lumped-Reaction Covariances",
6055 "production of any excited state nucleus",
6088 id_mt[rxid] = _mts[i];
6089 mt_id[_mts[i]] = rxid;
6091 labels[rxid] = _labels[i];
6092 docs[rxid] = _docs[i];
6293 std::map<std::pair<std::string, int>,
unsigned int>::iterator ioffid;
6295 id_offset[make_pair(ioffid->first.first, ioffid->second)] = ioffid->first.second;
6331 unsigned int h = 32;
6333 h = ((h << 5) + h) ^ c;
6348 if (0 <
names.count(s))
6356 while(0 <= found && i < I) {
6374 if (0 <
mt_id.count(n))
6382 std::pair<std::string, int> key = std::make_pair(z, to_nuc - from_nuc);
6416 if (0 <
mt_id.count(x))
6426 if (0 <
names.count(x))
6435 std::pair<std::string, int> key = std::make_pair(z, to_nuc - from_nuc);
6463 if (0 ==
id_mt.count(rxid))
6470 if (0 ==
id_mt.count(rxid))
6477 if (0 ==
id_mt.count(rxid))
6484 if (0 ==
id_mt.count(rxid))
6491 if (0 ==
id_mt.count(rxid))
6498 if (0 ==
id_mt.count(rxid))
6505 if (0 ==
id_mt.count(rxid))
6512 if (0 ==
id_mt.count(rxid))
6596 std::pair<std::string, unsigned int> key = std::make_pair(z, rx);
6606 return child(nuc,
id(rx), z);
6623 std::pair<std::string, unsigned int> key = std::make_pair(z, rx);
6633 return parent(nuc,
id(rx), z);
6653 #ifndef PYNE_IS_AMALGAMATED 6654 #include "atomic_data.h" 6655 #include "nucname.h" 6674 std::map<int,double> :: iterator it;
6676 for (
int z=1; z<= 92; z++) {
6678 double element_atomic_weight = 0.0;
6685 element_atomic_weight += (it->second*
atomic_mass_map[it->first]/100.0);
10347 #ifndef PYNE_IS_AMALGAMATED 10349 #include "atomic_data.h" 10372 std::map<std::string, std::string> temp_map;
10374 temp_map[
"/atomic_mass"]=
"10edfdc662e35bdfab91beb89285efff";
10375 temp_map[
"/material_library"]=
"8b10864378fbd88538434679acf908cc";
10376 temp_map[
"/neutron/eaf_xs"]=
"29622c636c4a3a46802207b934f9516c";
10377 temp_map[
"/neutron/scattering_lengths"]=
"a24d391cc9dc0fc146392740bb97ead4";
10378 temp_map[
"/neutron/simple_xs"]=
"3d6e086977783dcdf07e5c6b0c2416be";
10379 temp_map[
"/decay"]=
"4f41f3e46f4306cc44449f08a20922e0";
10380 temp_map[
"/dose_factors"]=
"dafa32c24b2303850a0bebdf3e6b122e";
10408 H5Tinsert(desc,
"mass", HOFFSET(
atomic_mass_data, mass), H5T_NATIVE_DOUBLE);
10409 H5Tinsert(desc,
"error", HOFFSET(
atomic_mass_data, error), H5T_NATIVE_DOUBLE);
10410 H5Tinsert(desc,
"abund", HOFFSET(
atomic_mass_data, abund), H5T_NATIVE_DOUBLE);
10416 hid_t atomic_mass_set = H5Dopen2(nuc_data_h5,
"/atomic_mass", H5P_DEFAULT);
10417 hid_t atomic_mass_space = H5Dget_space(atomic_mass_set);
10418 int atomic_mass_length = H5Sget_simple_extent_npoints(atomic_mass_space);
10422 H5Dread(atomic_mass_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, atomic_mass_array);
10425 H5Dclose(atomic_mass_set);
10426 H5Fclose(nuc_data_h5);
10429 for(
int n = 0; n < atomic_mass_length; n++) {
10430 atomic_mass_map.insert(std::pair<int, double>(atomic_mass_array[n].nuc, \
10431 atomic_mass_array[n].mass));
10433 atomic_mass_array[n].abund));
10436 delete[] atomic_mass_array;
10442 std::map<int, double>::iterator nuc_iter, nuc_end;
10448 if (nuc_iter != nuc_end) {
10449 return (*nuc_iter).second;
10465 if (0 < nucid%10000) {
10476 aw = (double) ((nucid/10000)%1000);
10504 std::map<int, double>::iterator nuc_iter, nuc_end;
10510 if (nuc_iter != nuc_end)
10511 return (*nuc_iter).second;
10526 if (0 < nucid%10000) {
10570 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
q_val_data));
10571 H5Tinsert(desc,
"nuc", HOFFSET(
q_val_data, nuc), H5T_NATIVE_INT);
10572 H5Tinsert(desc,
"q_val", HOFFSET(
q_val_data,
q_val), H5T_NATIVE_DOUBLE);
10579 hid_t q_val_set = H5Dopen2(nuc_data_h5,
"/decay/q_values", H5P_DEFAULT);
10580 hid_t q_val_space = H5Dget_space(q_val_set);
10581 int q_val_length = H5Sget_simple_extent_npoints(q_val_space);
10585 H5Dread(q_val_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, q_val_array);
10588 H5Dclose(q_val_set);
10589 H5Fclose(nuc_data_h5);
10592 for(
int n = 0; n < q_val_length; n++) {
10597 delete[] q_val_array;
10604 std::map<int, double>::iterator nuc_iter, nuc_end;
10610 if (nuc_iter != nuc_end)
10611 return (*nuc_iter).second;
10622 return q_val(nucid);
10633 return q_val(nuc_zz);
10639 return q_val(nuc_zz);
10651 std::map<int, double>::iterator nuc_iter, nuc_end;
10657 if (nuc_iter != nuc_end)
10658 return (*nuc_iter).second;
10716 hid_t string_type_;
10717 string_type_ = H5Tcopy(H5T_C_S1);
10718 H5Tset_size(string_type_, 1);
10719 H5Tset_strpad(string_type_, H5T_STR_NULLPAD);
10722 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
dose));
10723 status = H5Tinsert(desc,
"nuc", HOFFSET(
dose, nuc), H5T_NATIVE_INT);
10724 status = H5Tinsert(desc,
"ext_air_dose", HOFFSET(
dose,
ext_air_dose), H5T_NATIVE_DOUBLE);
10725 status = H5Tinsert(desc,
"ratio", HOFFSET(
dose, ratio), H5T_NATIVE_DOUBLE);
10726 status = H5Tinsert(desc,
"ext_soil_dose", HOFFSET(
dose,
ext_soil_dose), H5T_NATIVE_DOUBLE);
10727 status = H5Tinsert(desc,
"ingest_dose", HOFFSET(
dose,
ingest_dose), H5T_NATIVE_DOUBLE);
10728 status = H5Tinsert(desc,
"fluid_frac", HOFFSET(
dose, fluid_frac), H5T_NATIVE_DOUBLE);
10729 status = H5Tinsert(desc,
"inhale_dose", HOFFSET(
dose,
inhale_dose), H5T_NATIVE_DOUBLE);
10730 status = H5Tinsert(desc,
"lung_mod", HOFFSET(
dose, lung_mod), string_type_);
10736 const char * c = source_path.c_str();
10739 hid_t dose_set = H5Dopen2(nuc_data_h5, c, H5P_DEFAULT);
10740 hid_t dose_space = H5Dget_space(dose_set);
10741 int dose_length = H5Sget_simple_extent_npoints(dose_space);
10744 dose * dose_array =
new dose[dose_length];
10745 H5Dread(dose_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, dose_array);
10748 for (
int n = 0; n < dose_length; n++) {
10749 dm[dose_array[n].
nuc] = dose_array[n];
10753 H5Dclose(dose_set);
10754 H5Tclose(string_type_);
10755 H5Fclose(nuc_data_h5);
10757 delete[] dose_array;
10768 source_location =
"/dose_factors/DOE";
10769 }
else if (source == 2) {
10770 source_location =
"/dose_factors/GENII";
10772 source_location =
"/dose_factors/EPA";
10774 return source_location;
10778 std::map<int, pyne::dose>* dm;
10781 }
else if (source == 2) {
10807 if (dm.count(nucid)==1) {
10808 return dm[nucid].ext_air_dose;
10830 if (dm.count(nucid)==1) {
10831 return dm[nucid].ratio;
10856 if (dm.count(nucid)==1) {
10857 return dm[nucid].ext_soil_dose;
10884 if (dm.count(nucid)==1) {
10885 return dm[nucid].ingest_dose;
10906 if (dm.count(nucid)==1) {
10907 return dm[nucid].fluid_frac;
10933 if (dm.count(nucid)==1) {
10934 return dm[nucid].inhale_dose;
10955 if (dm.count(nucid)==1) {
11002 H5T_NATIVE_DOUBLE);
11003 status = H5Tinsert(desc,
"xs_incoherent", HOFFSET(
scattering_lengths, xs_incoherent),
11004 H5T_NATIVE_DOUBLE);
11011 hid_t scat_len_set = H5Dopen2(nuc_data_h5,
"/neutron/scattering_lengths", H5P_DEFAULT);
11012 hid_t scat_len_space = H5Dget_space(scat_len_set);
11013 int scat_len_length = H5Sget_simple_extent_npoints(scat_len_space);
11017 status = H5Dread(scat_len_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, scat_len_array);
11020 status = H5Dclose(scat_len_set);
11021 status = H5Fclose(nuc_data_h5);
11024 for(
int n = 0; n < scat_len_length; n++) {
11029 delete[] scat_len_array;
11041 std::map<int, xd_complex_t>::iterator nuc_iter, nuc_end;
11047 if (nuc_iter != nuc_end)
11048 return (*nuc_iter).second;
11064 while (nuc_iter != nuc_end) {
11066 bc = (*nuc_iter).second;
11075 while (nuc_iter != nuc_end) {
11077 bc = (*nuc_iter).second;
11113 std::map<int, xd_complex_t>::iterator nuc_iter, nuc_end;
11119 if (nuc_iter != nuc_end)
11120 return (*nuc_iter).second;
11136 while (nuc_iter != nuc_end) {
11138 bi = (*nuc_iter).second;
11147 while (nuc_iter != nuc_end) {
11149 bi = (*nuc_iter).second;
11182 std::map<int, double>::iterator nuc_iter, nuc_end;
11184 nuc_iter =
b_map.find(nuc);
11185 nuc_end =
b_map.end();
11188 if (nuc_iter != nuc_end)
11189 return (*nuc_iter).second;
11195 double b_val = sqrt(bc.re*bc.re + bc.im*bc.im + bi.
re*bi.
re + bi.
im*bi.
im);
11218 std::map<std::pair<int, int>,
double>();
11232 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
wimsdfpy));
11233 status = H5Tinsert(desc,
"from_nuc", HOFFSET(
wimsdfpy, from_nuc),
11235 status = H5Tinsert(desc,
"to_nuc", HOFFSET(
wimsdfpy, to_nuc),
11237 status = H5Tinsert(desc,
"yields", HOFFSET(
wimsdfpy, yields),
11238 H5T_NATIVE_DOUBLE);
11245 hid_t wimsdfpy_set = H5Dopen2(nuc_data_h5,
"/neutron/wimsd_fission_products",
11247 hid_t wimsdfpy_space = H5Dget_space(wimsdfpy_set);
11248 int wimsdfpy_length = H5Sget_simple_extent_npoints(wimsdfpy_space);
11252 status = H5Dread(wimsdfpy_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, wimsdfpy_array);
11255 status = H5Dclose(wimsdfpy_set);
11256 status = H5Fclose(nuc_data_h5);
11259 for(
int n=0; n < wimsdfpy_length; n++) {
11261 wimsdfpy_array[n].to_nuc)] = wimsdfpy_array[n].
yields;
11264 delete[] wimsdfpy_array;
11283 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
ndsfpy));
11284 status = H5Tinsert(desc,
"from_nuc", HOFFSET(
ndsfpy, from_nuc),
11286 status = H5Tinsert(desc,
"to_nuc", HOFFSET(
ndsfpy, to_nuc),
11288 status = H5Tinsert(desc,
"yield_thermal", HOFFSET(
ndsfpy, yield_thermal),
11289 H5T_NATIVE_DOUBLE);
11290 status = H5Tinsert(desc,
"yield_thermal_err", HOFFSET(
ndsfpy, yield_thermal_err),
11291 H5T_NATIVE_DOUBLE);
11292 status = H5Tinsert(desc,
"yield_fast", HOFFSET(
ndsfpy, yield_fast),
11293 H5T_NATIVE_DOUBLE);
11294 status = H5Tinsert(desc,
"yield_fast_err", HOFFSET(
ndsfpy, yield_fast_err),
11295 H5T_NATIVE_DOUBLE);
11296 status = H5Tinsert(desc,
"yield_14MeV", HOFFSET(
ndsfpy, yield_14MeV),
11297 H5T_NATIVE_DOUBLE);
11298 status = H5Tinsert(desc,
"yield_14MeV_err", HOFFSET(
ndsfpy, yield_14MeV_err),
11299 H5T_NATIVE_DOUBLE);
11306 hid_t ndsfpy_set = H5Dopen2(nuc_data_h5,
"/neutron/nds_fission_products",
11308 hid_t ndsfpy_space = H5Dget_space(ndsfpy_set);
11309 int ndsfpy_length = H5Sget_simple_extent_npoints(ndsfpy_space);
11313 status = H5Dread(ndsfpy_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, ndsfpy_array);
11316 status = H5Dclose(ndsfpy_set);
11317 status = H5Fclose(nuc_data_h5);
11322 for(
int n=0; n < ndsfpy_length; n++) {
11329 ndsfpy_data[std::make_pair(ndsfpy_array[n].from_nuc,
11330 ndsfpy_array[n].to_nuc)] = ndsfpysub_temp;
11335 delete[] ndsfpy_array;
11344 std::map<std::pair<int, int>,
double>::iterator fpy_iter, fpy_end;
11347 if (fpy_iter != fpy_end)
11349 return (*fpy_iter).second;
11351 std::map<std::pair<int, int>,
ndsfpysub>::iterator fpy_iter, fpy_end;
11354 if (fpy_iter != fpy_end) {
11358 return (*fpy_iter).second.yield_thermal_err;
11359 return (*fpy_iter).second.yield_thermal;
11363 return (*fpy_iter).second.yield_fast_err;
11364 return (*fpy_iter).second.yield_fast;
11368 return (*fpy_iter).second.yield_14MeV_err;
11369 return (*fpy_iter).second.yield_14MeV;
11380 return fpyield(from_to, 0, get_error);
11383 return fpyield(from_to, source, get_error);
11419 const std::pair<int, double>& rhs)
const {
11420 return lhs.second<rhs.second || (!(rhs.second<lhs.second) &&
11421 lhs.first<rhs.first);
11425 double energy_min,
double energy_max,
size_t valoffset, std::map<std::pair<
int,
11426 double>, U> &data) {
11427 typename std::map<std::pair<int, double>, U,
swapmapcompare>::iterator
11428 nuc_iter, nuc_end, it;
11429 std::map<std::pair<int, double>, U,
swapmapcompare> dc(data.begin(),
11431 std::vector<T> result;
11432 if (energy_max < energy_min){
11433 double temp = energy_max;
11434 energy_max = energy_min;
11437 nuc_iter = dc.lower_bound(std::make_pair(0, energy_min));
11438 nuc_end = dc.upper_bound(std::make_pair(9999999999, energy_max));
11441 for (it = nuc_iter; it!= nuc_end; ++it){
11442 ret = (T *)((
char *)&(it->second) + valoffset);
11443 result.push_back(*ret);
11450 return data_access<T, U>(energy_min, energy_max, valoffset, data);
11456 double min,
double max,
size_t valoffset,
11457 std::map<std::pair<int, double>, U> &data) {
11458 typename std::map<std::pair<int, double>, U>::iterator nuc_iter, nuc_end, it;
11459 std::vector<T> result;
11460 nuc_iter = data.lower_bound(std::make_pair(parent,min));
11461 nuc_end = data.upper_bound(std::make_pair(parent,max));
11464 for (it = nuc_iter; it!= nuc_end; ++it){
11465 ret = (T *)((
char *)&(it->second) + valoffset);
11466 result.push_back(*ret);
11473 return data_access<T, U>(
parent, min, max, valoffset, data);
11479 from_to,
size_t valoffset, std::map<std::pair<int, int>, U> &data) {
11480 typename std::map<std::pair<int, int>, U>::iterator nuc_iter, nuc_end;
11482 nuc_iter = data.find(from_to);
11483 nuc_end = data.end();
11486 if (nuc_iter != nuc_end){
11487 ret = (T *)((
char *)&(nuc_iter->second) + valoffset);
11495 return data_access<T, U>(from_to, valoffset, data);
11502 size_t valoffset, std::map<std::pair<int, int>, U> &data){
11503 typename std::map<std::pair<int, int>, U>::iterator nuc_iter, nuc_end, it;
11504 std::vector<T> result;
11505 nuc_iter = data.lower_bound(std::make_pair(parent,0));
11506 nuc_end = data.upper_bound(std::make_pair(parent,9999999999));
11509 for (it = nuc_iter; it!= nuc_end; ++it){
11510 ret = (T *)((
char *)&(it->second) + valoffset);
11511 result.push_back(*ret);
11518 return data_access<T, U>(
parent, valoffset, data);
11524 size_t valoffset, std::map<std::pair<int, unsigned int>, U> &data){
11525 typename std::map<std::pair<int, unsigned int>, U>::iterator nuc_iter,
11527 std::vector<T> result;
11528 nuc_iter = data.lower_bound(std::make_pair(parent,0));
11529 nuc_end = data.upper_bound(std::make_pair(parent,UINT_MAX));
11532 for (it = nuc_iter; it!= nuc_end; ++it){
11533 ret = (T *)((
char *)&(it->second) + valoffset);
11534 result.push_back(*ret);
11541 return data_access<T, U>(
parent, valoffset, data);
11547 size_t valoffset, std::map<int, U> &data){
11548 typename std::map<int, U>::iterator nuc_iter,
11550 nuc_iter = data.find(nuc);
11551 nuc_end = data.end();
11553 if (nuc_iter != nuc_end){
11554 return *(
double *)((
char *)&(nuc_iter->second) + valoffset);
11561 return data_access<U>(nuc, valoffset, data);
11573 template<>
void pyne::_load_data<pyne::atomic>() {
11586 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
atomic));
11587 status = H5Tinsert(desc,
"z", HOFFSET(
atomic, z),
11589 status = H5Tinsert(desc,
"k_shell_fluor", HOFFSET(
atomic, k_shell_fluor),
11590 H5T_NATIVE_DOUBLE);
11591 status = H5Tinsert(desc,
"k_shell_fluor_error", HOFFSET(
atomic, k_shell_fluor_error),
11592 H5T_NATIVE_DOUBLE);
11593 status = H5Tinsert(desc,
"l_shell_fluor", HOFFSET(
atomic, l_shell_fluor),
11594 H5T_NATIVE_DOUBLE);
11595 status = H5Tinsert(desc,
"l_shell_fluor_error", HOFFSET(
atomic, l_shell_fluor_error),
11596 H5T_NATIVE_DOUBLE);
11597 status = H5Tinsert(desc,
"prob", HOFFSET(
atomic, prob),
11598 H5T_NATIVE_DOUBLE);
11599 status = H5Tinsert(desc,
"k_shell_be", HOFFSET(
atomic, k_shell_be),
11600 H5T_NATIVE_DOUBLE);
11601 status = H5Tinsert(desc,
"k_shell_be_err", HOFFSET(
atomic, k_shell_be_err),
11602 H5T_NATIVE_DOUBLE);
11603 status = H5Tinsert(desc,
"li_shell_be", HOFFSET(
atomic, li_shell_be),
11604 H5T_NATIVE_DOUBLE);
11605 status = H5Tinsert(desc,
"li_shell_be_err", HOFFSET(
atomic, li_shell_be_err),
11606 H5T_NATIVE_DOUBLE);
11607 status = H5Tinsert(desc,
"mi_shell_be", HOFFSET(
atomic, mi_shell_be),
11608 H5T_NATIVE_DOUBLE);
11609 status = H5Tinsert(desc,
"mi_shell_be_err", HOFFSET(
atomic, mi_shell_be_err),
11610 H5T_NATIVE_DOUBLE);
11611 status = H5Tinsert(desc,
"ni_shell_be", HOFFSET(
atomic, ni_shell_be),
11612 H5T_NATIVE_DOUBLE);
11613 status = H5Tinsert(desc,
"ni_shell_be_err", HOFFSET(
atomic, ni_shell_be_err),
11614 H5T_NATIVE_DOUBLE);
11615 status = H5Tinsert(desc,
"kb_to_ka", HOFFSET(
atomic, kb_to_ka),
11616 H5T_NATIVE_DOUBLE);
11617 status = H5Tinsert(desc,
"kb_to_ka_err", HOFFSET(
atomic, kb_to_ka_err),
11618 H5T_NATIVE_DOUBLE);
11619 status = H5Tinsert(desc,
"ka2_to_ka1", HOFFSET(
atomic, ka2_to_ka1),
11620 H5T_NATIVE_DOUBLE);
11621 status = H5Tinsert(desc,
"ka2_to_ka1_err", HOFFSET(
atomic, ka2_to_ka1_err),
11622 H5T_NATIVE_DOUBLE);
11623 status = H5Tinsert(desc,
"l_auger", HOFFSET(
atomic, l_auger),
11624 H5T_NATIVE_DOUBLE);
11625 status = H5Tinsert(desc,
"k_auger", HOFFSET(
atomic, k_auger),
11626 H5T_NATIVE_DOUBLE);
11627 status = H5Tinsert(desc,
"ka1_x_ray_en", HOFFSET(
atomic, ka1_x_ray_en),
11628 H5T_NATIVE_DOUBLE);
11629 status = H5Tinsert(desc,
"ka1_x_ray_en_err", HOFFSET(
atomic, ka1_x_ray_en_err),
11630 H5T_NATIVE_DOUBLE);
11631 status = H5Tinsert(desc,
"ka2_x_ray_en", HOFFSET(
atomic, ka2_x_ray_en),
11632 H5T_NATIVE_DOUBLE);
11633 status = H5Tinsert(desc,
"ka2_x_ray_en_err", HOFFSET(
atomic, ka2_x_ray_en_err),
11634 H5T_NATIVE_DOUBLE);
11635 status = H5Tinsert(desc,
"kb_x_ray_en", HOFFSET(
atomic, kb_x_ray_en),
11636 H5T_NATIVE_DOUBLE);
11637 status = H5Tinsert(desc,
"l_x_ray_en", HOFFSET(
atomic, l_x_ray_en),
11638 H5T_NATIVE_DOUBLE);
11644 hid_t atomic_set = H5Dopen2(nuc_data_h5,
"/decay/atomic", H5P_DEFAULT);
11645 hid_t atomic_space = H5Dget_space(atomic_set);
11646 int atomic_length = H5Sget_simple_extent_npoints(atomic_space);
11650 status = H5Dread(atomic_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT,
11654 status = H5Dclose(atomic_set);
11655 status = H5Fclose(nuc_data_h5);
11657 for (
int i = 0; i < atomic_length; ++i) {
11661 delete[] atomic_array;
11665 std::vector<std::pair<double, double> >
11673 if (!
isnan(k_conv)) {
11674 xk = data_access<atomic> (z, offsetof(
atomic, k_shell_fluor),
11676 xka = xk / (1.0 + data_access<atomic> (z, offsetof(
atomic,
11678 xka1 = xka / (1.0 + data_access<atomic> (z, offsetof(
atomic,
11682 if (!
isnan(l_conv)) {
11683 xl = (l_conv + k_conv*data_access<atomic> (z, offsetof(
atomic,
11687 }
else if (!
isnan(l_conv)) {
11688 xl = l_conv*data_access<atomic> (z, offsetof(
atomic,
11691 std::vector<std::pair<double, double> > result;
11692 result.push_back(std::make_pair(data_access<atomic> (z, offsetof(
atomic,
11694 result.push_back(std::make_pair(data_access<atomic> (z, offsetof(
atomic,
11696 result.push_back(std::make_pair(data_access<atomic> (z, offsetof(
atomic,
11698 result.push_back(std::make_pair(data_access<atomic> (z, offsetof(
atomic,
11710 std::map<std::pair<int,unsigned int>,
11714 template<>
void pyne::_load_data<pyne::level_data>()
11729 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
level_data));
11730 status = H5Tinsert(desc,
"nuc_id", HOFFSET(
level_data, nuc_id),
11732 status = H5Tinsert(desc,
"rx_id", HOFFSET(
level_data, rx_id),
11735 H5T_NATIVE_DOUBLE);
11736 status = H5Tinsert(desc,
"level", HOFFSET(
level_data, level),
11737 H5T_NATIVE_DOUBLE);
11739 H5T_NATIVE_DOUBLE);
11740 status = H5Tinsert(desc,
"metastable", HOFFSET(
level_data, metastable),
11742 status = H5Tinsert(desc,
"special", HOFFSET(
level_data, special),
11748 hid_t level_set = H5Dopen2(nuc_data_h5,
"/decay/level_list", H5P_DEFAULT);
11749 hid_t level_space = H5Dget_space(level_set);
11750 int level_length = H5Sget_simple_extent_npoints(level_space);
11754 status = H5Dread(level_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT,
11758 status = H5Dclose(level_set);
11759 status = H5Fclose(nuc_data_h5);
11761 for (
int i = 0; i < level_length; ++i) {
11762 if (level_array[i].rx_id == 0)
11764 level_array[i].level)] = level_array[i];
11767 level_array[i].rx_id)] = level_array[i];
11770 delete[] level_array;
11777 int nostate = (nuc / 10000) * 10000;
11782 std::map<std::pair<int, double>,
level_data>::iterator nuc_lower, nuc_upper;
11787 double minv = DBL_MAX;
11790 for (std::map<std::pair<int, double>,
level_data>::iterator it=nuc_lower;
11791 it!=nuc_upper; ++it) {
11792 if ((std::abs(level - it->second.level) < minv) &&
11793 ((
char)it->second.special == special.c_str()[0]) &&
11794 !
isnan(it->second.level)) {
11795 minv = std::abs(level - it->second.level);
11796 ret_id = it->second.nuc_id;
11814 int nostate = (nuc / 10000) * 10000;
11815 if (m==0)
return nostate;
11820 std::map<std::pair<int, double>,
level_data>::iterator nuc_lower, nuc_upper;
11825 for (std::map<std::pair<int, double>,
level_data>::iterator it=nuc_lower;
11826 it!=nuc_upper; ++it) {
11827 if (it->second.metastable == m)
11828 return it->second.nuc_id;
11848 std::vector<unsigned int> part = data_access<unsigned int, level_data>(nuc,
11850 std::vector<unsigned int>::iterator it = part.begin();
11851 std::set<int> result;
11852 for (; it != part.end(); ++it) {
11856 result.insert((nuc /10000) * 10000);
11861 std::map<std::pair<int, int>,
double>::iterator sf =
wimsdfpy_data.begin();
11863 if (sf->first.first == nuc)
11864 result.insert(sf->first.second);
11868 result.insert((
rxname::child(nuc, *it,
"decay") /10000) * 10000);
11891 std::vector<double> result = data_access<double, level_data>(nuc, 0.0,
11893 if (result.size() == 1)
11894 return result[0]/1000.0;
11916 std::vector<double> result = data_access<double, level_data>(nuc, 0.0,
11918 if (result.size() == 1) {
11919 return log(2.0)/result[0];
11941 std::vector<double> result = data_access<double, level_data>(nuc, 0.0,
11943 if (result.size() == 1) {
11971 vector<unsigned int> part1 = \
11972 data_access<unsigned int, level_data>(from_to.first, offsetof(
level_data, rx_id),
11974 vector<double> part2 = \
11977 double result = 0.0;
11978 if ((from_to.first == from_to.second) && (
decay_const(from_to.first) == 0.0))
11980 for (vector<unsigned int>::size_type i = 0; i < part1.size(); ++i) {
11981 if ((part1[i] == 36125) &&
11983 (from_to.second % 10000 == 0)) {
11987 }
else if (part1[i] == 36565) {
11991 part1[i],
"decay")) == from_to.second)) {
11992 result += part2[i] * 0.01;
12016 template<>
void pyne::_load_data<pyne::decay>() {
12030 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
decay));
12031 status = H5Tinsert(desc,
"parent", HOFFSET(
decay,
parent),
12033 status = H5Tinsert(desc,
"child", HOFFSET(
decay,
child),
12035 status = H5Tinsert(desc,
"decay", HOFFSET(
decay,
decay),
12037 status = H5Tinsert(desc,
"half_life", HOFFSET(
decay,
half_life),
12038 H5T_NATIVE_DOUBLE);
12039 status = H5Tinsert(desc,
"half_life_error", HOFFSET(
decay,
12040 half_life_error), H5T_NATIVE_DOUBLE);
12042 H5T_NATIVE_DOUBLE);
12043 status = H5Tinsert(desc,
"branch_ratio_error", HOFFSET(
decay, branch_ratio_error),
12044 H5T_NATIVE_DOUBLE);
12045 status = H5Tinsert(desc,
"photon_branch_ratio", HOFFSET(
decay,
12046 photon_branch_ratio), H5T_NATIVE_DOUBLE);
12047 status = H5Tinsert(desc,
"photon_branch_ratio_err", HOFFSET(
decay,
12048 photon_branch_ratio_error), H5T_NATIVE_DOUBLE);
12049 status = H5Tinsert(desc,
"beta_branch_ratio", HOFFSET(
decay,
12050 beta_branch_ratio), H5T_NATIVE_DOUBLE);
12051 status = H5Tinsert(desc,
"beta_branch_ratio_err", HOFFSET(
decay,
12052 beta_branch_ratio_error), H5T_NATIVE_DOUBLE);
12059 hid_t decay_set = H5Dopen2(nuc_data_h5,
"/decay/decays", H5P_DEFAULT);
12060 hid_t decay_space = H5Dget_space(decay_set);
12061 int decay_length = H5Sget_simple_extent_npoints(decay_space);
12064 decay * decay_array =
new decay[decay_length];
12065 status = H5Dread(decay_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT,
12069 status = H5Dclose(decay_set);
12070 status = H5Fclose(nuc_data_h5);
12072 for (
int i = 0; i < decay_length; ++i) {
12076 delete[] decay_array;
12081 std::vector<int> result = data_access<int, decay>(
parent,
12087 return std::make_pair(data_access<double, decay>(from_to, offsetof(
12093 std::vector<std::pair<double, double> > result;
12094 std::vector<double> part1 = data_access<double, decay>(
parent,
12096 std::vector<double> part2 = data_access<double, decay>(
parent,
12098 for(
int i = 0; i < part1.size(); ++i){
12099 result.push_back(std::make_pair(part1[i],part2[i]));
12105 return std::make_pair(data_access<double, decay>(from_to, offsetof(
decay,
12111 return data_access<double, decay>(
parent, offsetof(
decay,
12117 return std::make_pair(data_access<double, decay>(from_to,
12119 data_access<double, decay>(from_to, offsetof(
decay,
12125 std::vector<std::pair<double, double> > result;
12126 std::vector<double> part1 = data_access<double, decay>(
parent,
12128 std::vector<double> part2 = data_access<double, decay>(
parent,
12130 for(
int i = 0; i < part1.size(); ++i){
12131 result.push_back(std::make_pair(part1[i],part2[i]));
12138 return std::make_pair(data_access<double, decay>(from_to,
12140 data_access<double, decay>(from_to, offsetof(
decay,
12146 std::vector<std::pair<double, double> > result;
12147 std::vector<double> part1 = data_access<double, decay>(
parent,
12149 std::vector<double> part2 = data_access<double, decay>(
parent,
12151 for(
int i = 0; i < part1.size(); ++i){
12152 result.push_back(std::make_pair(part1[i],part2[i]));
12159 template<>
void pyne::_load_data<pyne::gamma>() {
12173 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
gamma));
12174 status = H5Tinsert(desc,
"from_nuc", HOFFSET(
gamma, from_nuc),
12176 status = H5Tinsert(desc,
"to_nuc", HOFFSET(
gamma, to_nuc),
12178 status = H5Tinsert(desc,
"parent_nuc", HOFFSET(
gamma, parent_nuc),
12180 status = H5Tinsert(desc,
"child_nuc", HOFFSET(
gamma, child_nuc),
12182 status = H5Tinsert(desc,
"energy", HOFFSET(
gamma, energy),
12183 H5T_NATIVE_DOUBLE);
12184 status = H5Tinsert(desc,
"energy_err", HOFFSET(
gamma, energy_err),
12185 H5T_NATIVE_DOUBLE);
12186 status = H5Tinsert(desc,
"photon_intensity", HOFFSET(
gamma,
12187 photon_intensity), H5T_NATIVE_DOUBLE);
12188 status = H5Tinsert(desc,
"photon_intensity_err", HOFFSET(
gamma,
12189 photon_intensity_err), H5T_NATIVE_DOUBLE);
12190 status = H5Tinsert(desc,
"conv_intensity", HOFFSET(
gamma,
12191 conv_intensity), H5T_NATIVE_DOUBLE);
12192 status = H5Tinsert(desc,
"conv_intensity_err", HOFFSET(
gamma,
12193 conv_intensity_err), H5T_NATIVE_DOUBLE);
12194 status = H5Tinsert(desc,
"total_intensity", HOFFSET(
gamma,
12195 total_intensity), H5T_NATIVE_DOUBLE);
12196 status = H5Tinsert(desc,
"total_intensity_err", HOFFSET(
gamma,
12197 total_intensity_err), H5T_NATIVE_DOUBLE);
12198 status = H5Tinsert(desc,
"k_conv_e", HOFFSET(
gamma, k_conv_e),
12199 H5T_NATIVE_DOUBLE);
12200 status = H5Tinsert(desc,
"l_conv_e", HOFFSET(
gamma, l_conv_e),
12201 H5T_NATIVE_DOUBLE);
12202 status = H5Tinsert(desc,
"m_conv_e", HOFFSET(
gamma, m_conv_e),
12203 H5T_NATIVE_DOUBLE);
12211 hid_t gamma_set = H5Dopen2(nuc_data_h5,
"/decay/gammas", H5P_DEFAULT);
12212 hid_t gamma_space = H5Dget_space(gamma_set);
12213 int gamma_length = H5Sget_simple_extent_npoints(gamma_space);
12216 gamma * gamma_array =
new gamma[gamma_length];
12217 status = H5Dread(gamma_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT,
12221 status = H5Dclose(gamma_set);
12222 status = H5Fclose(nuc_data_h5);
12224 for (
int i = 0; i < gamma_length; ++i) {
12225 if ((gamma_array[i].parent_nuc != 0) && !
isnan(gamma_array[i].energy))
12226 gamma_data[std::make_pair(gamma_array[i].parent_nuc,
12227 gamma_array[i].energy)] = gamma_array[i];
12229 delete[] gamma_array;
12233 std::vector<std::pair<double, double> > result;
12234 std::vector<double> part1 = data_access<double, gamma>(
parent, 0.0,
12236 std::vector<double> part2 = data_access<double, gamma>(
parent, 0.0,
12238 for(
int i = 0; i < part1.size(); ++i){
12239 result.push_back(std::make_pair(part1[i],part2[i]));
12246 std::vector<std::pair<double, double> > result;
12247 std::vector<double> part1 = data_access<double, gamma>(energy+error,
12249 std::vector<double> part2 = data_access<double, gamma>(energy+error,
12251 for(
int i = 0; i < part1.size(); ++i){
12252 result.push_back(std::make_pair(part1[i],part2[i]));
12259 std::vector<std::pair<double, double> > result;
12260 std::vector<double> part1 = data_access<double, gamma>(
parent, 0.0,
12262 std::vector<double> part2 = data_access<double, gamma>(
parent, 0.0,
12264 for(
int i = 0; i < part1.size(); ++i){
12265 result.push_back(std::make_pair(part1[i],part2[i]));
12271 double energy,
double error) {
12272 std::vector<std::pair<double, double> > result;
12273 std::vector<double> part1 = data_access<double, gamma>(energy+error,
12275 std::vector<double> part2 = data_access<double, gamma>(energy+error,
12277 for(
int i = 0; i < part1.size(); ++i){
12278 result.push_back(std::make_pair(part1[i],part2[i]));
12285 std::vector<std::pair<double, double> > result;
12286 std::vector<double> part1 = data_access<double, gamma>(
parent, 0.0,
12288 std::vector<double> part2 = data_access<double, gamma>(
parent, 0.0,
12290 for(
int i = 0; i < part1.size(); ++i){
12291 result.push_back(std::make_pair(part1[i],part2[i]));
12298 std::vector<std::pair<double, double> > result;
12299 std::vector<double> part1 = data_access<double, gamma>(
parent, 0.0,
12301 std::vector<double> part2 = data_access<double, gamma>(
parent, 0.0,
12303 for(
int i = 0; i < part1.size(); ++i){
12304 result.push_back(std::make_pair(part1[i],part2[i]));
12310 std::vector<std::pair<int, int> > result;
12311 std::vector<int> part1 = data_access<int, gamma>(
parent, 0.0, DBL_MAX,
12313 std::vector<int> part2 = data_access<int, gamma>(
parent, 0.0, DBL_MAX,
12315 for(
int i = 0; i < part1.size(); ++i){
12316 result.push_back(std::make_pair(part1[i],part2[i]));
12323 std::vector<std::pair<int, int> > result;
12324 std::vector<int> part1 = data_access<int, gamma>(energy+error,
12326 std::vector<int> part2 = data_access<int, gamma>(energy+error,
12328 for(
int i = 0; i < part1.size(); ++i){
12329 result.push_back(std::make_pair(part1[i],part2[i]));
12337 std::vector<std::pair<int, int> > result;
12338 std::vector<int> part1 = data_access<int, gamma>(energy+error,
12340 std::vector<int> part2 = data_access<int, gamma>(energy+error,
12342 for(
int i = 0; i < part1.size(); ++i){
12343 result.push_back(std::make_pair(part1[i],part2[i]));
12349 return data_access<int, gamma>(energy+error, energy-error,
12354 return data_access<int, gamma>(energy+error, energy-error,
12359 return data_access<int, gamma>(
parent, 0.0, DBL_MAX,
12364 std::vector<std::pair<double, double> > result;
12365 std::vector<std::pair<double, double> > temp;
12366 std::vector<double> k_list = data_access<double, gamma>(
parent, 0.0, DBL_MAX,
12368 std::vector<double> l_list = data_access<double, gamma>(
parent, 0.0, DBL_MAX,
12370 std::vector<int> children = data_access<int, gamma>(
parent, 0.0,
12373 std::vector<std::pair<double, double> >
decay_br =
12375 for(
int i = 0; i < k_list.size(); ++i){
12376 for (
int j = 0; j < decay_children.size(); ++j) {
12379 k_list[i]*decay_br[j].first, l_list[i]*decay_br[j].first);
12380 for (
int k = 0; k < temp.size(); ++k) {
12381 if (!
isnan(temp[k].second) && !
isnan(temp[k].first)) {
12383 for (
int l = 0; l < result.size(); ++l) {
12384 if (temp[k].first == result[l].first) {
12385 result[l].second = result[l].second + temp[k].second;
12391 result.push_back(temp[k]);
12404 template<>
void pyne::_load_data<pyne::alpha>() {
12418 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
alpha));
12419 status = H5Tinsert(desc,
"from_nuc", HOFFSET(
alpha, from_nuc),
12421 status = H5Tinsert(desc,
"to_nuc", HOFFSET(
alpha, to_nuc),
12423 status = H5Tinsert(desc,
"energy", HOFFSET(
alpha, energy),
12424 H5T_NATIVE_DOUBLE);
12425 status = H5Tinsert(desc,
"intensity", HOFFSET(
alpha, intensity),
12426 H5T_NATIVE_DOUBLE);
12434 hid_t alpha_set = H5Dopen2(nuc_data_h5,
"/decay/alphas", H5P_DEFAULT);
12435 hid_t alpha_space = H5Dget_space(alpha_set);
12436 int alpha_length = H5Sget_simple_extent_npoints(alpha_space);
12439 alpha * alpha_array =
new alpha[alpha_length];
12440 status = H5Dread(alpha_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT,
12444 status = H5Dclose(alpha_set);
12445 status = H5Fclose(nuc_data_h5);
12447 for (
int i = 0; i < alpha_length; ++i) {
12448 if ((alpha_array[i].from_nuc != 0) && !
isnan(alpha_array[i].energy))
12449 alpha_data[std::make_pair(alpha_array[i].from_nuc, alpha_array[i].energy)]
12452 delete[] alpha_array;
12456 return data_access<double, alpha>(
parent, 0.0, DBL_MAX,
12460 return data_access<double, alpha>(
parent, 0.0, DBL_MAX,
12465 return data_access<int, alpha>(energy+error, energy-error,
12470 return data_access<int, alpha>(energy+error, energy-error,
12475 return data_access<int, alpha>(
parent, 0.0, DBL_MAX,
12481 template<>
void pyne::_load_data<pyne::beta>() {
12495 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
beta));
12496 status = H5Tinsert(desc,
"endpoint_energy", HOFFSET(
beta,
12497 endpoint_energy), H5T_NATIVE_DOUBLE);
12498 status = H5Tinsert(desc,
"avg_energy", HOFFSET(
beta, avg_energy),
12499 H5T_NATIVE_DOUBLE);
12500 status = H5Tinsert(desc,
"intensity", HOFFSET(
beta, intensity),
12501 H5T_NATIVE_DOUBLE);
12502 status = H5Tinsert(desc,
"from_nuc", HOFFSET(
beta, from_nuc),
12504 status = H5Tinsert(desc,
"to_nuc", HOFFSET(
beta, to_nuc),
12513 hid_t beta_set = H5Dopen2(nuc_data_h5,
"/decay/betas", H5P_DEFAULT);
12514 hid_t beta_space = H5Dget_space(beta_set);
12515 int beta_length = H5Sget_simple_extent_npoints(beta_space);
12518 beta * beta_array =
new beta[beta_length];
12519 status = H5Dread(beta_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, beta_array);
12522 status = H5Dclose(beta_set);
12523 status = H5Fclose(nuc_data_h5);
12525 for (
int i = 0; i < beta_length; ++i) {
12526 if ((beta_array[i].from_nuc != 0) && !
isnan(beta_array[i].avg_energy))
12527 beta_data[std::make_pair(beta_array[i].from_nuc, beta_array[i].avg_energy)]
12530 delete[] beta_array;
12534 return data_access<double, beta>(
parent, 0.0, DBL_MAX,
12539 return data_access<double, beta>(
parent, 0.0, DBL_MAX,
12544 return data_access<double, beta>(
parent, 0.0, DBL_MAX,
12549 return data_access<int, beta>(energy+error, energy-error,
12554 return data_access<int, beta>(energy+error, energy-error,
12559 return data_access<int, beta>(
parent, 0.0, DBL_MAX,
12566 template<>
void pyne::_load_data<pyne::ecbp>() {
12580 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
ecbp));
12581 status = H5Tinsert(desc,
"from_nuc", HOFFSET(
ecbp, from_nuc),
12583 status = H5Tinsert(desc,
"to_nuc", HOFFSET(
ecbp, to_nuc),
12585 status = H5Tinsert(desc,
"endpoint_energy", HOFFSET(
ecbp,
12586 endpoint_energy),H5T_NATIVE_DOUBLE);
12587 status = H5Tinsert(desc,
"avg_energy", HOFFSET(
ecbp, avg_energy),
12588 H5T_NATIVE_DOUBLE);
12589 status = H5Tinsert(desc,
"beta_plus_intensity", HOFFSET(
ecbp,
12590 beta_plus_intensity), H5T_NATIVE_DOUBLE);
12592 H5T_NATIVE_DOUBLE);
12593 status = H5Tinsert(desc,
"k_conv_e", HOFFSET(
ecbp, k_conv_e),
12594 H5T_NATIVE_DOUBLE);
12595 status = H5Tinsert(desc,
"l_conv_e", HOFFSET(
ecbp, l_conv_e),
12596 H5T_NATIVE_DOUBLE);
12597 status = H5Tinsert(desc,
"m_conv_e", HOFFSET(
ecbp, m_conv_e),
12598 H5T_NATIVE_DOUBLE);
12605 hid_t ecbp_set = H5Dopen2(nuc_data_h5,
"/decay/ecbp", H5P_DEFAULT);
12606 hid_t ecbp_space = H5Dget_space(ecbp_set);
12607 int ecbp_length = H5Sget_simple_extent_npoints(ecbp_space);
12610 ecbp * ecbp_array =
new ecbp[ecbp_length];
12611 status = H5Dread(ecbp_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, ecbp_array);
12614 status = H5Dclose(ecbp_set);
12615 status = H5Fclose(nuc_data_h5);
12617 for (
int i = 0; i < ecbp_length; ++i) {
12618 if ((ecbp_array[i].from_nuc != 0) && !
isnan(ecbp_array[i].avg_energy))
12619 ecbp_data[std::make_pair(ecbp_array[i].from_nuc, ecbp_array[i].avg_energy)]
12622 delete[] ecbp_array;
12626 return data_access<double, ecbp>(
parent, 0.0, DBL_MAX,
12631 return data_access<double, ecbp>(
parent, 0.0, DBL_MAX,
12636 return data_access<double, ecbp>(
parent, 0.0, DBL_MAX,
12641 return data_access<double, ecbp>(
parent, 0.0, DBL_MAX,
12646 return data_access<int, ecbp>(energy+error, energy-error,
12651 return data_access<int, ecbp>(energy+error, energy-error,
12656 return data_access<int, ecbp>(
parent, 0.0, DBL_MAX,
12661 std::vector<std::pair<double, double> > result;
12662 std::vector<std::pair<double, double> > temp;
12663 std::vector<double> k_list = data_access<double, ecbp>(
parent, 0.0, DBL_MAX,
12665 std::vector<double> l_list = data_access<double, ecbp>(
parent, 0.0, DBL_MAX,
12667 std::vector<int> children = data_access<int, ecbp>(
parent, 0.0, DBL_MAX,
12670 std::vector<std::pair<double, double> >
decay_br =
12672 for(
int i = 0; i < k_list.size(); ++i){
12673 for (
int j = 0; j < decay_children.size(); ++j) {
12676 k_list[i]*decay_br[j].first, l_list[i]*decay_br[j].first);
12677 for (
int k = 0; k < temp.size(); ++k) {
12678 if (!
isnan(temp[k].second) && !
isnan(temp[k].first)) {
12680 for (
int l = 0; l < result.size(); ++l) {
12681 if (temp[k].first == result[l].first) {
12682 result[l].second = result[l].second + temp[k].second;
12688 result.push_back(temp[k]);
12704 std::vector<std::pair<double, double> > result;
12706 std::vector<std::pair<double, double> > energies =
gamma_energy(parent_state_id);
12707 std::vector<std::pair<double, double> > intensities =
12709 std::vector<std::pair<int, int> > children =
gamma_from_to(parent_state_id);
12711 std::vector<std::pair<double, double> >
decay_br =
12713 for (
int i = 0; i < children.size(); ++i) {
12714 for (
int j = 0; j < decay_children.size(); ++j) {
12716 result.push_back(std::make_pair(energies[i].first,
12717 decay_c*intensities[i].first*decay_br[j].first));
12725 std::vector<std::pair<double, double> > result;
12727 std::vector<double> energies =
alpha_energy(parent_state_id);
12729 std::vector<int> children =
alpha_child(parent_state_id);
12732 for (
int i = 0; i < children.size(); ++i) {
12733 for (
int j = 0; j < decay_children.size(); ++j) {
12735 result.push_back(std::make_pair(energies[i],
12736 decay_c*decay_br[j]*intensities[i]));
12743 std::vector<std::pair<double, double> >
pyne::betas(
int parent_state_id) {
12744 std::vector<std::pair<double, double> > result;
12747 std::vector<double> intensities =
beta_intensity(parent_state_id);
12748 std::vector<int> children =
beta_child(parent_state_id);
12750 std::vector<std::pair<double, double> >
decay_br =
12752 for (
int i = 0; i < children.size(); ++i) {
12753 for (
int j = 0; j < decay_children.size(); ++j) {
12755 result.push_back(std::make_pair(energies[i],
12756 decay_c*decay_br[j].first*intensities[i]));
12766 std::vector<std::pair<double, double> > result;
12767 std::vector<std::pair<double, double> > temp;
12768 std::vector<double> k_list = data_access<double, ecbp>(
parent, 0.0, DBL_MAX,
12770 std::vector<double> l_list = data_access<double, ecbp>(
parent, 0.0, DBL_MAX,
12772 std::vector<int> children = data_access<int, ecbp>(
parent, 0.0, DBL_MAX,
12775 std::vector<std::pair<double, double> >
decay_br =
12777 for(
int i = 0; i < k_list.size(); ++i){
12778 for (
int j = 0; j < decay_children.size(); ++j) {
12781 k_list[i]*decay_br[j].first, l_list[i]*decay_br[j].first);
12782 for (
int k = 0; k < temp.size(); ++k) {
12783 if (!
isnan(temp[k].second) && !
isnan(temp[k].first)) {
12785 for (
int l = 0; l < result.size(); ++l) {
12786 if (temp[k].first == result[l].first) {
12787 result[l].second = result[l].second + temp[k].second;
12793 result.push_back(temp[k]);
12801 std::vector<double> gk_list = data_access<double, gamma>(
parent, 0.0, DBL_MAX,
12803 std::vector<double> gl_list = data_access<double, gamma>(
parent, 0.0, DBL_MAX,
12805 std::vector<int> gchildren = data_access<int, gamma>(
parent, 0.0,
12807 std::vector<std::pair<double, double> > decay_nrbr =
12809 for(
int i = 0; i < gk_list.size(); ++i){
12810 for (
int j = 0; j < decay_children.size(); ++j) {
12813 gk_list[i]*decay_nrbr[j].first, gl_list[i]*decay_nrbr[j].first);
12814 for (
int k = 0; k < temp.size(); ++k) {
12815 if (!
isnan(temp[k].second) && !
isnan(temp[k].first)) {
12817 for (
int l = 0; l < result.size(); ++l) {
12818 if (temp[k].first == result[l].first) {
12819 result[l].second = result[l].second + temp[k].second;
12825 result.push_back(temp[k]);
12834 for(
int i = 0; i < result.size(); ++i)
12835 result[i].second = result[i].second * decay_c;
12875 std::map<unsigned int, size_t> rxns;
12881 rxns[
id(
"gamma")] = offsetof(
simple_xs, sigma_gamma);
12883 rxns[
id(
"alpha")] = offsetof(
simple_xs, sigma_alpha);
12884 rxns[
id(
"proton")] = offsetof(
simple_xs, sigma_proton);
12885 rxns[
id(
"deut")] = offsetof(
simple_xs, sigma_deut);
12886 rxns[
id(
"trit")] = offsetof(
simple_xs, sigma_trit);
12887 rxns[
id(
"z_2n")] = offsetof(
simple_xs, sigma_2n);
12888 rxns[
id(
"z_3n")] = offsetof(
simple_xs, sigma_3n);
12889 rxns[
id(
"z_4n")] = offsetof(
simple_xs, sigma_4n);
12892 hid_t desc = H5Tcreate(H5T_COMPOUND,
sizeof(
simple_xs));
12893 H5Tinsert(desc,
"nuc", HOFFSET(
simple_xs, nuc), H5T_NATIVE_INT);
12894 H5Tinsert(desc,
"sigma_t", HOFFSET(
simple_xs, sigma_t), H5T_NATIVE_DOUBLE);
12895 H5Tinsert(desc,
"sigma_s", HOFFSET(
simple_xs, sigma_s), H5T_NATIVE_DOUBLE);
12896 H5Tinsert(desc,
"sigma_e", HOFFSET(
simple_xs, sigma_e), H5T_NATIVE_DOUBLE);
12897 H5Tinsert(desc,
"sigma_i", HOFFSET(
simple_xs, sigma_i), H5T_NATIVE_DOUBLE);
12898 H5Tinsert(desc,
"sigma_a", HOFFSET(
simple_xs, sigma_a), H5T_NATIVE_DOUBLE);
12899 H5Tinsert(desc,
"sigma_gamma", HOFFSET(
simple_xs, sigma_gamma), H5T_NATIVE_DOUBLE);
12900 H5Tinsert(desc,
"sigma_f", HOFFSET(
simple_xs, sigma_f), H5T_NATIVE_DOUBLE);
12901 H5Tinsert(desc,
"sigma_alpha", HOFFSET(
simple_xs, sigma_alpha), H5T_NATIVE_DOUBLE);
12902 H5Tinsert(desc,
"sigma_proton", HOFFSET(
simple_xs, sigma_proton), H5T_NATIVE_DOUBLE);
12903 H5Tinsert(desc,
"sigma_deut", HOFFSET(
simple_xs, sigma_deut), H5T_NATIVE_DOUBLE);
12904 H5Tinsert(desc,
"sigma_trit", HOFFSET(
simple_xs, sigma_trit), H5T_NATIVE_DOUBLE);
12905 H5Tinsert(desc,
"sigma_2n", HOFFSET(
simple_xs, sigma_2n), H5T_NATIVE_DOUBLE);
12906 H5Tinsert(desc,
"sigma_3n", HOFFSET(
simple_xs, sigma_3n), H5T_NATIVE_DOUBLE);
12907 H5Tinsert(desc,
"sigma_4n", HOFFSET(
simple_xs, sigma_4n), H5T_NATIVE_DOUBLE);
12913 std::string path =
"/neutron/simple_xs/" + energy;
12916 hid_t simple_xs_set = H5Dopen2(nuc_data_h5, path.c_str(), H5P_DEFAULT);
12917 hid_t simple_xs_space = H5Dget_space(simple_xs_set);
12918 int n = H5Sget_simple_extent_npoints(simple_xs_space);
12922 H5Dread(simple_xs_set, desc, H5S_ALL, H5S_ALL, H5P_DEFAULT, array);
12925 H5Dclose(simple_xs_set);
12926 H5Fclose(nuc_data_h5);
12929 for(
int i = 0; i < n; i++) {
12930 std::map<unsigned int, size_t>::iterator it;
12931 for (it = rxns.begin(); it != rxns.end(); ++it) {
12932 double xs = *(
double*)((
char*)&array[i] + it->second);
12940 std::set<std::string> energies;
12941 energies.insert(
"thermal");
12942 energies.insert(
"thermal_maxwell_ave");
12943 energies.insert(
"resonance_integral");
12944 energies.insert(
"fourteen_MeV");
12945 energies.insert(
"fission_spectrum_ave");
12947 if (energies.count(energy) == 0) {
12949 "' is not a valid simple_xs group");
12956 " is not a valid simple_xs nuclide");
12959 " is not a valid simple_xs reaction");
13056 #ifdef PYNE_IS_AMALGAMATED 13057 #if !defined(JSON_IS_AMALGAMATION) 13058 #define JSON_IS_AMALGAMATION 13074 #ifndef LIB_JSONCPP_JSON_TOOL_H_INCLUDED 13075 # define LIB_JSONCPP_JSON_TOOL_H_INCLUDED 13094 result[0] =
static_cast<char>(cp);
13095 }
else if (cp <= 0x7FF) {
13097 result[1] =
static_cast<char>(0x80 | (0x3f & cp));
13098 result[0] =
static_cast<char>(0xC0 | (0x1f & (cp >> 6)));
13099 }
else if (cp <= 0xFFFF) {
13101 result[2] =
static_cast<char>(0x80 | (0x3f & cp));
13102 result[1] = 0x80 |
static_cast<char>((0x3f & (cp >> 6)));
13103 result[0] = 0xE0 |
static_cast<char>((0xf & (cp >> 12)));
13104 }
else if (cp <= 0x10FFFF) {
13106 result[3] =
static_cast<char>(0x80 | (0x3f & cp));
13107 result[2] =
static_cast<char>(0x80 | (0x3f & (cp >> 6)));
13108 result[1] =
static_cast<char>(0x80 | (0x3f & (cp >> 12)));
13109 result[0] =
static_cast<char>(0xF0 | (0x7 & (cp >> 18)));
13119 return ch > 0 && ch <= 0x1F;
13142 *--current = char(value % 10) +
'0';
13145 while ( value != 0 );
13150 #endif // LIB_JSONCPP_JSON_TOOL_H_INCLUDED 13170 #if !defined(JSON_IS_AMALGAMATION) 13171 # include <json/reader.h> 13172 # include <json/value.h> 13173 # include "json_tool.h" 13174 #endif // if !defined(JSON_IS_AMALGAMATION) 13179 #include <iostream> 13180 #include <stdexcept> 13182 #if _MSC_VER >= 1400 // VC++ 8.0 13183 #pragma warning( disable : 4996 ) // disable warning about strdup being deprecated. 13191 Features::Features()
13192 : allowComments_( true )
13193 , strictRoot_( false ) {
13217 return c == c1 || c == c2 || c == c3 || c == c4;
13222 return c == c1 || c == c2 || c == c3 || c == c4 || c == c5;
13230 if ( *begin ==
'\n' || *begin ==
'\r' )
13245 : features_( features ) {
13252 bool collectComments ) {
13253 document_ = document;
13254 const char *
begin = document_.c_str();
13255 const char *
end = begin + document_.length();
13256 return parse( begin, end, root, collectComments );
13263 bool collectComments ) {
13272 std::getline(sin, doc, (
char)EOF);
13273 return parse( doc, root, collectComments );
13279 bool collectComments ) {
13281 collectComments =
false;
13286 collectComments_ = collectComments;
13290 commentsBefore_ =
"";
13292 while ( !nodes_.empty() )
13294 nodes_.push( &root );
13296 bool successful = readValue();
13298 skipCommentTokens( token );
13299 if ( collectComments_ && !commentsBefore_.empty() )
13304 token.type_ = tokenError;
13305 token.start_ = beginDoc;
13306 token.end_ = endDoc;
13307 addError(
"A valid JSON document must be either an array or an object value.",
13317 Reader::readValue() {
13319 skipCommentTokens( token );
13320 bool successful =
true;
13322 if ( collectComments_ && !commentsBefore_.empty() ) {
13324 commentsBefore_ =
"";
13328 switch ( token.type_ ) {
13329 case tokenObjectBegin:
13330 successful = readObject( token );
13332 case tokenArrayBegin:
13333 successful = readArray( token );
13336 successful = decodeNumber( token );
13339 successful = decodeString( token );
13342 currentValue() =
true;
13345 currentValue() =
false;
13348 currentValue() =
Value();
13351 return addError(
"Syntax error: value, object or array expected.", token );
13354 if ( collectComments_ ) {
13355 lastValueEnd_ = current_;
13356 lastValue_ = ¤tValue();
13364 Reader::skipCommentTokens( Token &token ) {
13367 readToken( token );
13369 while ( token.type_ == tokenComment );
13371 readToken( token );
13377 Reader::expectToken( TokenType type, Token &token,
const char *message ) {
13378 readToken( token );
13379 if ( token.type_ != type )
13380 return addError( message, token );
13386 Reader::readToken( Token &token ) {
13388 token.start_ = current_;
13389 Char c = getNextChar();
13393 token.type_ = tokenObjectBegin;
13396 token.type_ = tokenObjectEnd;
13399 token.type_ = tokenArrayBegin;
13402 token.type_ = tokenArrayEnd;
13405 token.type_ = tokenString;
13409 token.type_ = tokenComment;
13410 ok = readComment();
13423 token.type_ = tokenNumber;
13427 token.type_ = tokenTrue;
13428 ok = match(
"rue", 3 );
13431 token.type_ = tokenFalse;
13432 ok = match(
"alse", 4 );
13435 token.type_ = tokenNull;
13436 ok = match(
"ull", 3 );
13439 token.type_ = tokenArraySeparator;
13442 token.type_ = tokenMemberSeparator;
13445 token.type_ = tokenEndOfStream;
13452 token.type_ = tokenError;
13453 token.end_ = current_;
13459 Reader::skipSpaces() {
13460 while ( current_ != end_ ) {
13461 Char c = *current_;
13462 if ( c ==
' ' || c ==
'\t' || c ==
'\r' || c ==
'\n' )
13472 int patternLength ) {
13473 if ( end_ - current_ < patternLength )
13475 int index = patternLength;
13477 if ( current_[index] != pattern[index] )
13479 current_ += patternLength;
13485 Reader::readComment() {
13486 Location commentBegin = current_ - 1;
13487 Char c = getNextChar();
13488 bool successful =
false;
13490 successful = readCStyleComment();
13491 else if ( c ==
'/' )
13492 successful = readCppStyleComment();
13496 if ( collectComments_ ) {
13498 if ( lastValueEnd_ && !
containsNewLine( lastValueEnd_, commentBegin ) )
13504 addComment( commentBegin, current_, placement );
13514 assert( collectComments_ );
13517 assert( lastValue_ != 0 );
13520 if ( !commentsBefore_.empty() )
13521 commentsBefore_ +=
"\n";
13528 Reader::readCStyleComment() {
13529 while ( current_ != end_ ) {
13530 Char c = getNextChar();
13531 if ( c ==
'*' && *current_ ==
'/' )
13534 return getNextChar() ==
'/';
13539 Reader::readCppStyleComment() {
13540 while ( current_ != end_ ) {
13541 Char c = getNextChar();
13542 if ( c ==
'\r' || c ==
'\n' )
13550 Reader::readNumber() {
13551 while ( current_ != end_ ) {
13552 if ( !(*current_ >=
'0' && *current_ <=
'9') &&
13553 !
in( *current_,
'.',
'e',
'E',
'+',
'-' ) )
13560 Reader::readString() {
13562 while ( current_ != end_ ) {
13566 else if ( c ==
'"' )
13574 Reader::readObject( Token & ) {
13578 while ( readToken( tokenName ) ) {
13579 bool initialTokenOk =
true;
13580 while ( tokenName.type_ == tokenComment && initialTokenOk )
13581 initialTokenOk = readToken( tokenName );
13582 if ( !initialTokenOk )
13584 if ( tokenName.type_ == tokenObjectEnd && name.empty() )
13586 if ( tokenName.type_ != tokenString )
13590 if ( !decodeString( tokenName, name ) )
13591 return recoverFromError( tokenObjectEnd );
13594 if ( !readToken( colon ) || colon.type_ != tokenMemberSeparator ) {
13595 return addErrorAndRecover(
"Missing ':' after object member name",
13600 nodes_.push( &value );
13601 bool ok = readValue();
13604 return recoverFromError( tokenObjectEnd );
13607 if ( !readToken( comma )
13608 || ( comma.type_ != tokenObjectEnd &&
13609 comma.type_ != tokenArraySeparator &&
13610 comma.type_ != tokenComment ) ) {
13611 return addErrorAndRecover(
"Missing ',' or '}' in object declaration",
13615 bool finalizeTokenOk =
true;
13616 while ( comma.type_ == tokenComment &&
13618 finalizeTokenOk = readToken( comma );
13619 if ( comma.type_ == tokenObjectEnd )
13622 return addErrorAndRecover(
"Missing '}' or object member name",
13629 Reader::readArray( Token & ) {
13632 if ( *current_ ==
']' ) {
13634 readToken( endArray );
13639 Value &value = currentValue()[ index++ ];
13640 nodes_.push( &value );
13641 bool ok = readValue();
13644 return recoverFromError( tokenArrayEnd );
13648 ok = readToken( token );
13649 while ( token.type_ == tokenComment && ok ) {
13650 ok = readToken( token );
13652 bool badTokenType = ( token.type_ != tokenArraySeparator &&
13653 token.type_ != tokenArrayEnd );
13654 if ( !ok || badTokenType ) {
13655 return addErrorAndRecover(
"Missing ',' or ']' in array declaration",
13659 if ( token.type_ == tokenArrayEnd )
13667 Reader::decodeNumber( Token &token ) {
13668 bool isDouble =
false;
13669 for (
Location inspect = token.start_; inspect != token.end_; ++inspect )
13671 isDouble = isDouble
13672 ||
in( *inspect,
'.',
'e',
'E',
'+' )
13673 || ( *inspect ==
'-' && inspect != token.start_ );
13676 return decodeDouble( token );
13681 bool isNegative = *current ==
'-';
13686 Value::LargestUInt threshold = maxIntegerValue / 10;
13688 assert( lastDigitThreshold >=0 && lastDigitThreshold <= 9 );
13689 Value::LargestUInt value = 0;
13690 while ( current < token.end_ ) {
13691 Char c = *current++;
13692 if ( c < '0' || c >
'9' )
13693 return addError(
"'" +
std::string( token.start_, token.end_ ) +
"' is not a number.", token );
13695 if ( value >= threshold ) {
13699 if ( current != token.end_ || digit > lastDigitThreshold ) {
13700 return decodeDouble( token );
13703 value = value * 10 + digit;
13710 currentValue() = value;
13716 Reader::decodeDouble( Token &token ) {
13718 const int bufferSize = 32;
13720 int length = int(token.end_ - token.start_);
13721 if ( length <= bufferSize ) {
13722 Char buffer[bufferSize+1];
13723 memcpy( buffer, token.start_, length );
13724 buffer[length] = 0;
13725 count = sscanf( buffer,
"%lf", &value );
13728 count = sscanf( buffer.c_str(),
"%lf", &value );
13732 return addError(
"'" +
std::string( token.start_, token.end_ ) +
"' is not a number.", token );
13733 currentValue() = value;
13739 Reader::decodeString( Token &token ) {
13741 if ( !decodeString( token, decoded ) )
13743 currentValue() = decoded;
13749 Reader::decodeString( Token &token,
std::string &decoded ) {
13750 decoded.reserve( token.end_ - token.start_ - 2 );
13751 Location current = token.start_ + 1;
13753 while ( current != end ) {
13754 Char c = *current++;
13757 else if ( c ==
'\\' ) {
13758 if ( current == end )
13759 return addError(
"Empty escape sequence in string", token, current );
13760 Char escape = *current++;
13761 switch ( escape ) {
13762 case '"': decoded +=
'"';
break;
13763 case '/': decoded +=
'/';
break;
13764 case '\\': decoded +=
'\\';
break;
13765 case 'b': decoded +=
'\b';
break;
13766 case 'f': decoded +=
'\f';
break;
13767 case 'n': decoded +=
'\n';
break;
13768 case 'r': decoded +=
'\r';
break;
13769 case 't': decoded +=
'\t';
break;
13771 unsigned int unicode;
13772 if ( !decodeUnicodeCodePoint( token, current, end, unicode ) )
13778 return addError(
"Bad escape sequence in string", token, current );
13789 Reader::decodeUnicodeCodePoint( Token &token,
13792 unsigned int &unicode ) {
13794 if ( !decodeUnicodeEscapeSequence( token, current, end, unicode ) )
13796 if (unicode >= 0xD800 && unicode <= 0xDBFF) {
13798 if (end - current < 6)
13799 return addError(
"additional six characters expected to parse unicode surrogate pair.", token, current );
13800 unsigned int surrogatePair;
13801 if (*(current++) ==
'\\' && *(current++)==
'u') {
13802 if (decodeUnicodeEscapeSequence( token, current, end, surrogatePair )) {
13803 unicode = 0x10000 + ((unicode & 0x3FF) << 10) + (surrogatePair & 0x3FF);
13807 return addError(
"expecting another \\u token to begin the second half of a unicode surrogate pair", token, current );
13813 Reader::decodeUnicodeEscapeSequence( Token &token,
13816 unsigned int &unicode ) {
13817 if ( end - current < 4 )
13818 return addError(
"Bad unicode escape sequence in string: four digits expected.", token, current );
13820 for (
int index =0; index < 4; ++index ) {
13821 Char c = *current++;
13823 if ( c >=
'0' && c <=
'9' )
13824 unicode += c -
'0';
13825 else if ( c >=
'a' && c <=
'f' )
13826 unicode += c -
'a' + 10;
13827 else if ( c >=
'A' && c <=
'F' )
13828 unicode += c -
'A' + 10;
13830 return addError(
"Bad unicode escape sequence in string: hexadecimal digit expected.", token, current );
13841 info.token_ = token;
13842 info.message_ = message;
13843 info.extra_ = extra;
13844 errors_.push_back( info );
13850 Reader::recoverFromError( TokenType skipUntilToken ) {
13851 int errorCount = int(errors_.size());
13854 if ( !readToken(skip) )
13855 errors_.resize( errorCount );
13856 if ( skip.type_ == skipUntilToken || skip.type_ == tokenEndOfStream )
13859 errors_.resize( errorCount );
13865 Reader::addErrorAndRecover(
const std::string &message,
13867 TokenType skipUntilToken ) {
13868 addError( message, token );
13869 return recoverFromError( skipUntilToken );
13874 Reader::currentValue() {
13875 return *(nodes_.top());
13880 Reader::getNextChar() {
13881 if ( current_ == end_ )
13883 return *current_++;
13888 Reader::getLocationLineAndColumn(
Location location,
13890 int &column )
const {
13894 while ( current < location && current != end_ ) {
13895 Char c = *current++;
13897 if ( *current ==
'\n' )
13899 lastLineStart = current;
13901 }
else if ( c ==
'\n' ) {
13902 lastLineStart = current;
13907 column = int(location - lastLineStart) + 1;
13913 Reader::getLocationLineAndColumn(
Location location )
const {
13915 getLocationLineAndColumn( location, line, column );
13916 char buffer[18+16+16+1];
13917 sprintf( buffer,
"Line %d, Column %d", line, column );
13932 for ( Errors::const_iterator itError = errors_.begin();
13933 itError != errors_.end();
13935 const ErrorInfo &error = *itError;
13936 formattedMessage +=
"* " + getLocationLineAndColumn( error.token_.start_ ) +
"\n";
13937 formattedMessage +=
" " + error.message_ +
"\n";
13938 if ( error.extra_ )
13939 formattedMessage +=
"See " + getLocationLineAndColumn( error.extra_ ) +
" for detail.\n";
13941 return formattedMessage;
13947 bool ok = reader.
parse(sin, root,
true);
13974 #ifndef JSONCPP_BATCHALLOCATOR_H_INCLUDED 13975 # define JSONCPP_BATCHALLOCATOR_H_INCLUDED 13977 # include <stdlib.h> 13978 # include <assert.h> 13980 # ifndef JSONCPP_DOC_EXCLUDE_IMPLEMENTATION 13996 template<
typename AllocatedType
13997 ,
const unsigned int objectPerAllocation>
14004 , objectsPerPage_( objectsPerPage ) {
14006 assert(
sizeof(AllocatedType) * objectPerAllocation >=
sizeof(AllocatedType *) );
14007 assert( objectsPerPage >= 16 );
14008 batches_ = allocateBatch( 0 );
14009 currentBatch_ = batches_;
14013 for ( BatchInfo *batch = batches_; batch; ) {
14014 BatchInfo *nextBatch = batch->next_;
14024 AllocatedType *
object = freeHead_;
14025 freeHead_ = *(AllocatedType **)
object;
14028 if ( currentBatch_->used_ == currentBatch_->end_ ) {
14029 currentBatch_ = currentBatch_->next_;
14030 while ( currentBatch_ && currentBatch_->used_ == currentBatch_->end_ )
14031 currentBatch_ = currentBatch_->next_;
14033 if ( !currentBatch_ ) {
14034 currentBatch_ = allocateBatch( objectsPerPage_ );
14035 currentBatch_->next_ = batches_;
14036 batches_ = currentBatch_;
14039 AllocatedType *allocated = currentBatch_->used_;
14040 currentBatch_->used_ += objectPerAllocation;
14047 assert(
object != 0 );
14048 *(AllocatedType **)
object = freeHead_;
14049 freeHead_ = object;
14055 AllocatedType *used_;
14056 AllocatedType *end_;
14057 AllocatedType buffer_[objectPerAllocation];
14064 static BatchInfo *allocateBatch(
unsigned int objectsPerPage ) {
14065 const unsigned int mallocSize =
sizeof(BatchInfo) -
sizeof(AllocatedType)* objectPerAllocation
14066 +
sizeof(AllocatedType) * objectPerAllocation * objectsPerPage;
14067 BatchInfo *batch =
static_cast<BatchInfo*
>( malloc( mallocSize ) );
14069 batch->used_ = batch->buffer_;
14070 batch->end_ = batch->buffer_ + objectsPerPage;
14074 BatchInfo *batches_;
14075 BatchInfo *currentBatch_;
14077 AllocatedType *freeHead_;
14078 unsigned int objectsPerPage_;
14084 # endif // ifndef JSONCPP_DOC_INCLUDE_IMPLEMENTATION 14086 #endif // JSONCPP_BATCHALLOCATOR_H_INCLUDED 14120 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14122 , isNull_(
true ) {
14126 , isNull_(
true ) {
14127 iterator_.array_ = ValueInternalArray::IteratorState();
14132 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14134 : current_( current )
14135 , isNull_( false ) {
14139 : isArray_(
true ) {
14140 iterator_.array_ = state;
14145 : isArray_(
false ) {
14146 iterator_.map_ = state;
14152 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14153 return current_->second;
14156 return ValueInternalArray::dereference( iterator_.array_ );
14157 return ValueInternalMap::value( iterator_.map_ );
14164 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14168 ValueInternalArray::increment( iterator_.array_ );
14169 ValueInternalMap::increment( iterator_.map_ );
14176 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14180 ValueInternalArray::decrement( iterator_.array_ );
14181 ValueInternalMap::decrement( iterator_.map_ );
14188 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14189 # ifdef JSON_USE_CPPTL_SMALLMAP 14190 return current_ - other.current_;
14197 if ( isNull_ && other.isNull_ ) {
14207 for ( Value::ObjectValues::iterator it = current_; it != other.current_; ++it ) {
14214 return ValueInternalArray::distance( iterator_.array_, other.iterator_.array_ );
14215 return ValueInternalMap::distance( iterator_.map_, other.iterator_.map_ );
14222 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14224 return other.isNull_;
14226 return current_ == other.current_;
14229 return ValueInternalArray::equals( iterator_.array_, other.iterator_.array_ );
14230 return ValueInternalMap::equals( iterator_.map_, other.iterator_.map_ );
14237 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14238 current_ = other.current_;
14241 iterator_.array_ = other.iterator_.array_;
14242 iterator_.map_ = other.iterator_.map_;
14249 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14250 const Value::CZString czstring = (*current_).first;
14251 if ( czstring.c_str() ) {
14252 if ( czstring.isStaticString() )
14254 return Value( czstring.c_str() );
14256 return Value( czstring.index() );
14259 return Value( ValueInternalArray::indexOf( iterator_.array_ ) );
14261 const char *
memberName = ValueInternalMap::key( iterator_.map_, isStatic );
14264 return Value( memberName );
14271 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14272 const Value::CZString czstring = (*current_).first;
14273 if ( !czstring.c_str() )
14274 return czstring.index();
14278 return Value::UInt( ValueInternalArray::indexOf( iterator_.array_ ) );
14286 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14287 const char *
name = (*current_).first.c_str();
14288 return name ?
name :
"";
14291 return ValueInternalMap::key( iterator_.map_ );
14309 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14342 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14390 #if !defined(JSON_IS_AMALGAMATION) 14391 # include <json/value.h> 14392 # include <json/writer.h> 14393 # ifndef JSON_USE_SIMPLE_INTERNAL_ALLOCATOR 14394 # include "json_batchallocator.h" 14395 # endif // #ifndef JSON_USE_SIMPLE_INTERNAL_ALLOCATOR 14396 #endif // if !defined(JSON_IS_AMALGAMATION) 14397 #include <iostream> 14399 #include <stdexcept> 14402 #ifdef JSON_USE_CPPTL 14403 # include <cpptl/conststring.h> 14407 #define JSON_ASSERT_UNREACHABLE assert( false ) 14408 #define JSON_ASSERT( condition ) assert( condition ); // @todo <= change this into an exception throw 14409 #define JSON_FAIL_MESSAGE( message ) throw std::runtime_error( message ); 14410 #define JSON_ASSERT_MESSAGE( condition, message ) if (!( condition )) JSON_FAIL_MESSAGE( message ) 14437 static inline char *
14439 unsigned int length = unknown ) {
14440 if ( length == unknown )
14441 length = (
unsigned int)strlen(value);
14442 char *newString =
static_cast<char *
>( malloc( length + 1 ) );
14444 memcpy( newString, value, length );
14445 newString[length] = 0;
14468 #if !defined(JSON_IS_AMALGAMATION) 14469 # ifdef JSON_VALUE_USE_INTERNAL_MAP 14470 # include "json_internalarray.inl" 14471 # include "json_internalmap.inl" 14472 # endif // JSON_VALUE_USE_INTERNAL_MAP 14474 # include "json_valueiterator.inl" 14475 #endif // if !defined(JSON_IS_AMALGAMATION) 14488 Value::CommentInfo::CommentInfo()
14492 Value::CommentInfo::~CommentInfo() {
14499 Value::CommentInfo::setComment(
const char *text ) {
14516 # ifndef JSON_VALUE_USE_INTERNAL_MAP 14523 , index_( index ) {
14526 Value::CZString::CZString(
const char *cstr, DuplicationPolicy allocate )
14529 , index_( allocate ) {
14532 Value::CZString::CZString(
const CZString &other )
14533 : cstr_( other.index_ != noDuplication && other.cstr_ != 0
14536 , index_( other.cstr_ ? (other.index_ == noDuplication ? noDuplication : duplicate)
14540 Value::CZString::~CZString() {
14541 if ( cstr_ && index_ == duplicate )
14546 Value::CZString::swap( CZString &other ) {
14547 std::swap( cstr_, other.cstr_ );
14548 std::swap( index_, other.index_ );
14552 Value::CZString::operator =(
const CZString &other ) {
14553 CZString temp( other );
14561 return strcmp( cstr_, other.cstr_ ) < 0;
14562 return index_ < other.index_;
14568 return strcmp( cstr_, other.cstr_ ) == 0;
14569 return index_ == other.index_;
14574 Value::CZString::index()
const {
14580 Value::CZString::c_str()
const {
14585 Value::CZString::isStaticString()
const {
14586 return index_ == noDuplication;
14589 #endif // ifndef JSON_VALUE_USE_INTERNAL_MAP 14608 # ifdef JSON_VALUE_USE_INTERNAL_MAP
14620 value_.real_ = 0.0;
14623 value_.string_ = 0;
14625 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14632 value_.array_ = arrayAllocator()->newArray();
14635 value_.map_ = mapAllocator()->newMap();
14639 value_.bool_ =
false;
14647 #if defined(JSON_HAS_INT64) 14651 # ifdef JSON_VALUE_USE_INTERNAL_MAP
14655 value_.uint_ = value;
14661 # ifdef JSON_VALUE_USE_INTERNAL_MAP
14665 value_.int_ = value;
14668 #endif // if defined(JSON_HAS_INT64) 14674 # ifdef JSON_VALUE_USE_INTERNAL_MAP
14678 value_.int_ = value;
14685 # ifdef JSON_VALUE_USE_INTERNAL_MAP
14689 value_.uint_ = value;
14695 # ifdef JSON_VALUE_USE_INTERNAL_MAP
14699 value_.real_ = value;
14704 , allocated_( true )
14706 # ifdef JSON_VALUE_USE_INTERNAL_MAP
14715 const char *endValue )
14717 , allocated_( true )
14719 # ifdef JSON_VALUE_USE_INTERNAL_MAP
14724 (
unsigned int)(endValue - beginValue) );
14730 , allocated_( true )
14732 # ifdef JSON_VALUE_USE_INTERNAL_MAP
14737 (
unsigned int)value.length() );
14743 , allocated_( false )
14745 # ifdef JSON_VALUE_USE_INTERNAL_MAP
14749 value_.string_ =
const_cast<char *
>( value.
c_str() );
14753 # ifdef JSON_USE_CPPTL 14756 , allocated_(
true )
14758 # ifdef JSON_VALUE_USE_INTERNAL_MAP 14769 # ifdef JSON_VALUE_USE_INTERNAL_MAP
14773 value_.bool_ = value;
14778 : type_( other.type_ )
14780 # ifdef JSON_VALUE_USE_INTERNAL_MAP
14790 value_ = other.value_;
14793 if ( other.value_.string_ ) {
14798 value_.string_ = 0;
14800 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14807 value_.array_ = arrayAllocator()->newArrayCopy( *other.value_.array_ );
14810 value_.map_ = mapAllocator()->newMapCopy( *other.value_.map_ );
14816 if ( other.comments_ ) {
14819 const CommentInfo &otherComment = other.comments_[comment];
14820 if ( otherComment.comment_ )
14821 comments_[comment].setComment( otherComment.comment_ );
14839 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14842 delete value_.map_;
14846 arrayAllocator()->destructArray( value_.array_ );
14849 mapAllocator()->destructMap( value_.map_ );
14857 delete[] comments_;
14862 Value temp( other );
14870 type_ = other.type_;
14871 other.type_ = temp;
14872 std::swap( value_, other.value_ );
14873 int temp2 = allocated_;
14874 allocated_ = other.allocated_;
14875 other.allocated_ = temp2;
14886 if ( *
this < other )
14888 if ( *
this > other )
14896 int typeDelta = type_ - other.type_;
14898 return typeDelta < 0 ? true :
false;
14903 return value_.int_ < other.value_.int_;
14905 return value_.uint_ < other.value_.uint_;
14907 return value_.real_ < other.value_.real_;
14909 return value_.bool_ < other.value_.bool_;
14911 return ( value_.string_ == 0 && other.value_.string_ )
14912 || ( other.value_.string_
14914 && strcmp( value_.string_, other.value_.string_ ) < 0 );
14915 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14918 int delta = int( value_.map_->size() - other.value_.map_->size() );
14921 return (*value_.map_) < (*other.value_.map_);
14925 return value_.array_->compare( *(other.value_.array_) ) < 0;
14927 return value_.map_->compare( *(other.value_.map_) ) < 0;
14937 return !(other < *
this);
14942 return !(*
this < other);
14947 return other < *
this;
14956 int temp = other.type_;
14957 if ( type_ != temp )
14963 return value_.int_ == other.value_.int_;
14965 return value_.uint_ == other.value_.uint_;
14967 return value_.real_ == other.value_.real_;
14969 return value_.bool_ == other.value_.bool_;
14971 return ( value_.string_ == other.value_.string_ )
14972 || ( other.value_.string_
14974 && strcmp( value_.string_, other.value_.string_ ) == 0 );
14975 #ifndef JSON_VALUE_USE_INTERNAL_MAP 14978 return value_.map_->size() == other.value_.map_->size()
14979 && (*value_.map_) == (*other.value_.map_);
14982 return value_.array_->compare( *(other.value_.array_) ) == 0;
14984 return value_.map_->compare( *(other.value_.map_) ) == 0;
14995 return !( *
this == other );
15001 return value_.string_;
15011 return value_.string_ ? value_.string_ :
"";
15013 return value_.bool_ ?
"true" :
"false";
15026 # ifdef JSON_USE_CPPTL 15028 Value::asConstString()
const 15030 return CppTL::ConstString(
asString().c_str() );
15043 return Int(value_.int_);
15046 return Int(value_.uint_);
15049 return Int( value_.real_ );
15051 return value_.bool_ ? 1 : 0;
15069 JSON_ASSERT_MESSAGE( value_.int_ >= 0,
"Negative integer can not be converted to unsigned integer" );
15071 return UInt(value_.int_);
15074 return UInt(value_.uint_);
15077 return UInt( value_.real_ );
15079 return value_.bool_ ? 1 : 0;
15091 # if defined(JSON_HAS_INT64) 15099 return value_.int_;
15102 return value_.uint_;
15105 return Int( value_.real_ );
15107 return value_.bool_ ? 1 : 0;
15125 JSON_ASSERT_MESSAGE( value_.int_ >= 0,
"Negative integer can not be converted to UInt64" );
15126 return value_.int_;
15128 return value_.uint_;
15131 return UInt( value_.real_ );
15133 return value_.bool_ ? 1 : 0;
15143 # endif // if defined(JSON_HAS_INT64) 15148 #if defined(JSON_NO_INT64) 15158 #if defined(JSON_NO_INT64) 15172 return static_cast<double>( value_.int_ );
15174 #if !defined(JSON_USE_INT64_DOUBLE_CONVERSION) 15175 return static_cast<double>( value_.uint_ );
15176 #else // if !defined(JSON_USE_INT64_DOUBLE_CONVERSION) 15177 return static_cast<double>(
Int(value_.uint_/2) ) * 2 +
Int(value_.uint_ & 1);
15178 #endif // if !defined(JSON_USE_INT64_DOUBLE_CONVERSION) 15180 return value_.real_;
15182 return value_.bool_ ? 1.0 : 0.0;
15199 return static_cast<float>( value_.int_ );
15201 #if !defined(JSON_USE_INT64_DOUBLE_CONVERSION) 15202 return static_cast<float>( value_.uint_ );
15203 #else // if !defined(JSON_USE_INT64_DOUBLE_CONVERSION) 15204 return static_cast<float>(
Int(value_.uint_/2) ) * 2 +
Int(value_.uint_ & 1);
15205 #endif // if !defined(JSON_USE_INT64_DOUBLE_CONVERSION) 15207 return static_cast<float>( value_.real_ );
15209 return value_.bool_ ? 1.0f : 0.0f;
15227 return value_.int_ != 0;
15229 return value_.real_ != 0.0;
15231 return value_.bool_;
15233 return value_.string_ && value_.string_[0] != 0;
15236 return value_.map_->size() != 0;
15250 return ( other ==
nullValue && value_.int_ == 0 )
15252 || ( other ==
uintValue && value_.int_ >= 0 )
15257 return ( other ==
nullValue && value_.uint_ == 0 )
15264 return ( other ==
nullValue && value_.real_ == 0.0 )
15271 return ( other ==
nullValue && value_.bool_ ==
false )
15279 || ( other ==
nullValue && (!value_.string_ || value_.string_[0] == 0) );
15282 || ( other ==
nullValue && value_.map_->size() == 0 );
15285 || ( other ==
nullValue && value_.map_->size() == 0 );
15304 #ifndef JSON_VALUE_USE_INTERNAL_MAP 15306 if ( !value_.map_->empty() ) {
15307 ObjectValues::const_iterator itLast = value_.map_->end();
15309 return (*itLast).first.index()+1;
15316 return Int( value_.array_->size() );
15318 return Int( value_.map_->size() );
15330 return size() == 0u;
15348 #ifndef JSON_VALUE_USE_INTERNAL_MAP 15351 value_.map_->clear();
15355 value_.array_->clear();
15358 value_.map_->clear();
15371 #ifndef JSON_VALUE_USE_INTERNAL_MAP 15373 if ( newSize == 0 )
15375 else if ( newSize > oldSize )
15376 (*this)[ newSize - 1 ];
15378 for (
ArrayIndex index = newSize; index < oldSize; ++index )
15380 value_.map_->erase( index );
15382 assert(
size() == newSize );
15385 value_.array_->resize( newSize );
15395 #ifndef JSON_VALUE_USE_INTERNAL_MAP 15396 CZString key( index );
15397 ObjectValues::iterator it = value_.map_->lower_bound( key );
15398 if ( it != value_.map_->end() && (*it).first == key )
15399 return (*it).second;
15401 ObjectValues::value_type defaultValue( key,
null );
15402 it = value_.map_->insert( it, defaultValue );
15403 return (*it).second;
15405 return value_.array_->resolveReference( index );
15422 #ifndef JSON_VALUE_USE_INTERNAL_MAP 15423 CZString key( index );
15424 ObjectValues::const_iterator it = value_.map_->find( key );
15425 if ( it == value_.map_->end() )
15427 return (*it).second;
15429 Value *value = value_.array_->find( index );
15430 return value ? *value :
null;
15444 return resolveReference( key,
false );
15449 Value::resolveReference(
const char *key,
15454 #ifndef JSON_VALUE_USE_INTERNAL_MAP 15455 CZString actualKey( key, isStatic ? CZString::noDuplication
15456 : CZString::duplicateOnCopy );
15457 ObjectValues::iterator it = value_.map_->lower_bound( actualKey );
15458 if ( it != value_.map_->end() && (*it).first == actualKey )
15459 return (*it).second;
15461 ObjectValues::value_type defaultValue( actualKey,
null );
15462 it = value_.map_->insert( it, defaultValue );
15463 Value &value = (*it).second;
15466 return value_.map_->resolveReference( key, isStatic );
15473 const Value &defaultValue )
const {
15474 const Value *value = &((*this)[index]);
15475 return value == &
null ? defaultValue : *value;
15481 return index <
size();
15491 #ifndef JSON_VALUE_USE_INTERNAL_MAP 15492 CZString actualKey( key, CZString::noDuplication );
15493 ObjectValues::const_iterator it = value_.map_->find( actualKey );
15494 if ( it == value_.map_->end() )
15496 return (*it).second;
15498 const Value *value = value_.map_->find( key );
15499 return value ? *value :
null;
15506 return (*
this)[ key.c_str() ];
15512 return (*
this)[ key.c_str() ];
15517 return resolveReference( key,
true );
15521 # ifdef JSON_USE_CPPTL 15524 return (*
this)[ key.c_str() ];
15530 return (*
this)[ key.c_str() ];
15537 return (*
this)[
size()] = value;
15543 const Value &defaultValue )
const {
15544 const Value *value = &((*this)[key]);
15545 return value == &
null ? defaultValue : *value;
15551 const Value &defaultValue )
const {
15552 return get( key.c_str(), defaultValue );
15560 #ifndef JSON_VALUE_USE_INTERNAL_MAP 15561 CZString actualKey( key, CZString::noDuplication );
15562 ObjectValues::iterator it = value_.map_->find( actualKey );
15563 if ( it == value_.map_->end() )
15565 Value old(it->second);
15566 value_.map_->erase(it);
15569 Value *value = value_.map_->find( key );
15572 value_.map_.remove( key );
15585 # ifdef JSON_USE_CPPTL 15588 const Value &defaultValue )
const {
15589 return get( key.c_str(), defaultValue );
15595 const Value *value = &((*this)[key]);
15596 return value != &
null;
15606 # ifdef JSON_USE_CPPTL 15619 members.reserve( value_.map_->size() );
15620 #ifndef JSON_VALUE_USE_INTERNAL_MAP 15621 ObjectValues::const_iterator it = value_.map_->begin();
15622 ObjectValues::const_iterator itEnd = value_.map_->end();
15623 for ( ; it != itEnd; ++it )
15624 members.push_back(
std::string( (*it).first.c_str() ) );
15626 ValueInternalMap::IteratorState it;
15627 ValueInternalMap::IteratorState itEnd;
15628 value_.map_->makeBeginIterator( it );
15629 value_.map_->makeEndIterator( itEnd );
15630 for ( ; !ValueInternalMap::equals( it, itEnd ); ValueInternalMap::increment(it) )
15631 members.push_back(
std::string( ValueInternalMap::key( it ) ) );
15729 comments_[placement].setComment( comment );
15742 return comments_ != 0 && comments_[placement].comment_ != 0;
15748 return comments_[placement].comment_;
15756 return writer.
write( *
this );
15763 #ifdef JSON_VALUE_USE_INTERNAL_MAP 15765 if ( value_.array_ ) {
15766 ValueInternalArray::IteratorState it;
15767 value_.array_->makeBeginIterator( it );
15772 if ( value_.map_ ) {
15773 ValueInternalMap::IteratorState it;
15774 value_.map_->makeBeginIterator( it );
15794 #ifdef JSON_VALUE_USE_INTERNAL_MAP 15796 if ( value_.array_ ) {
15797 ValueInternalArray::IteratorState it;
15798 value_.array_->makeEndIterator( it );
15803 if ( value_.map_ ) {
15804 ValueInternalMap::IteratorState it;
15805 value_.map_->makeEndIterator( it );
15826 #ifdef JSON_VALUE_USE_INTERNAL_MAP 15828 if ( value_.array_ ) {
15829 ValueInternalArray::IteratorState it;
15830 value_.array_->makeBeginIterator( it );
15835 if ( value_.map_ ) {
15836 ValueInternalMap::IteratorState it;
15837 value_.map_->makeBeginIterator( it );
15845 return iterator( value_.map_->begin() );
15857 #ifdef JSON_VALUE_USE_INTERNAL_MAP 15859 if ( value_.array_ ) {
15860 ValueInternalArray::IteratorState it;
15861 value_.array_->makeEndIterator( it );
15866 if ( value_.map_ ) {
15867 ValueInternalMap::IteratorState it;
15868 value_.map_->makeEndIterator( it );
15876 return iterator( value_.map_->end() );
15890 : kind_( kindNone ) {
15896 , kind_( kindIndex ) {
15902 , kind_( kindKey ) {
15907 : key_( key.c_str() )
15908 , kind_( kindKey ) {
15921 in.push_back( &a1 );
15922 in.push_back( &a2 );
15923 in.push_back( &a3 );
15924 in.push_back( &a4 );
15925 in.push_back( &a5 );
15926 makePath( path, in );
15932 const InArgs &
in ) {
15933 const char *current = path.c_str();
15934 const char *
end = current + path.length();
15935 InArgs::const_iterator itInArg = in.begin();
15936 while ( current != end ) {
15937 if ( *current ==
'[' ) {
15939 if ( *current ==
'%' )
15940 addPathInArg( path, in, itInArg, PathArgument::kindIndex );
15943 for ( ; current != end && *current >=
'0' && *current <=
'9'; ++current )
15944 index = index * 10 +
ArrayIndex(*current -
'0');
15945 args_.push_back( index );
15947 if ( current == end || *current++ !=
']' )
15948 invalidPath( path,
int(current - path.c_str()) );
15950 else if ( *current ==
'%' ) {
15951 addPathInArg( path, in, itInArg, PathArgument::kindKey );
15954 else if ( *current ==
'.' ) {
15957 const char *beginName = current;
15958 while ( current != end && !strchr(
"[.", *current ) )
15960 args_.push_back(
std::string( beginName, current ) );
15969 InArgs::const_iterator &itInArg,
15970 PathArgument::Kind kind ) {
15971 if ( itInArg == in.end() ) {
15973 }
else if ( (*itInArg)->kind_ != kind ) {
15976 args_.push_back( **itInArg );
15990 const Value *node = &root;
15991 for ( Args::const_iterator it = args_.begin(); it != args_.end(); ++it ) {
15993 if ( arg.kind_ == PathArgument::kindIndex ) {
15997 node = &((*node)[arg.index_]);
15998 }
else if ( arg.kind_ == PathArgument::kindKey ) {
16002 node = &((*node)[arg.key_]);
16014 const Value &defaultValue )
const {
16015 const Value *node = &root;
16016 for ( Args::const_iterator it = args_.begin(); it != args_.end(); ++it ) {
16018 if ( arg.kind_ == PathArgument::kindIndex ) {
16020 return defaultValue;
16021 node = &((*node)[arg.index_]);
16022 }
else if ( arg.kind_ == PathArgument::kindKey ) {
16024 return defaultValue;
16025 node = &((*node)[arg.key_]);
16027 return defaultValue;
16036 Value *node = &root;
16037 for ( Args::const_iterator it = args_.begin(); it != args_.end(); ++it ) {
16039 if ( arg.kind_ == PathArgument::kindIndex ) {
16043 node = &((*node)[arg.index_]);
16044 }
else if ( arg.kind_ == PathArgument::kindKey ) {
16048 node = &((*node)[arg.key_]);
16075 #if !defined(JSON_IS_AMALGAMATION) 16076 # include <json/writer.h> 16077 # include "json_tool.h" 16078 #endif // if !defined(JSON_IS_AMALGAMATION) 16080 #include <assert.h> 16082 #include <string.h> 16083 #include <iostream> 16087 #if _MSC_VER >= 1400 // VC++ 8.0 16088 #pragma warning( disable : 4996 ) // disable warning about strdup being deprecated. 16104 char *current = buffer +
sizeof(buffer);
16105 bool isNegative = value < 0;
16111 assert( current >= buffer );
16118 char *current = buffer +
sizeof(buffer);
16120 assert( current >= buffer );
16124 #if defined(JSON_HAS_INT64) 16136 #endif // # if defined(JSON_HAS_INT64) 16141 #if defined(_MSC_VER) && defined(__STDC_SECURE_LIB__) // Use secure version with visual studio 2005 to avoid warning. 16142 sprintf_s(buffer,
sizeof(buffer),
"%#.16g", value);
16144 sprintf(buffer,
"%#.16g", value);
16146 char* ch = buffer + strlen(buffer) - 1;
16147 if (*ch !=
'0')
return buffer;
16148 while(ch > buffer && *ch ==
'0'){
16151 char* last_nonzero = ch;
16152 while(ch >= buffer){
16168 *(last_nonzero+2) =
'\0';
16179 return value ?
"true" :
"false";
16189 std::string::size_type maxsize = strlen(value)*2 + 3;
16191 result.reserve(maxsize);
16193 for (
const char* c=value; *c != 0; ++c) {
16226 std::ostringstream oss;
16227 oss <<
"\\u" << std::hex << std::uppercase << std::setfill('0') << std::setw(4) << static_cast<int>(*c);
16228 result += oss.str();
16249 : yamlCompatiblityEnabled_( false ) {
16255 yamlCompatiblityEnabled_ =
true;
16262 writeValue( root );
16269 FastWriter::writeValue(
const Value &value ) {
16270 switch ( value.
type() ) {
16272 document_ +=
"null";
16291 int size = value.
size();
16292 for (
int index =0; index < size; ++index ) {
16295 writeValue( value[index] );
16303 for ( Value::Members::iterator it = members.begin();
16304 it != members.end();
16307 if ( it != members.begin() )
16310 document_ += yamlCompatiblityEnabled_ ?
": " 16312 writeValue( value[name] );
16325 : rightMargin_( 74 )
16326 , indentSize_( 3 ) {
16333 addChildValues_ =
false;
16334 indentString_ =
"";
16335 writeCommentBeforeValue( root );
16336 writeValue( root );
16337 writeCommentAfterValueOnSameLine( root );
16344 StyledWriter::writeValue(
const Value &value ) {
16345 switch ( value.
type() ) {
16347 pushValue(
"null" );
16365 writeArrayValue( value);
16370 if ( members.empty() )
16373 writeWithIndent(
"{" );
16375 Value::Members::iterator it = members.begin();
16379 writeCommentBeforeValue( childValue );
16381 document_ +=
" : ";
16382 writeValue( childValue );
16383 if ( ++it == members.end() ) {
16384 writeCommentAfterValueOnSameLine( childValue );
16388 writeCommentAfterValueOnSameLine( childValue );
16391 writeWithIndent(
"}" );
16400 StyledWriter::writeArrayValue(
const Value &value ) {
16401 unsigned size = value.
size();
16405 bool isArrayMultiLine = isMultineArray( value );
16406 if ( isArrayMultiLine ) {
16407 writeWithIndent(
"[" );
16409 bool hasChildValue = !childValues_.empty();
16412 const Value &childValue = value[index];
16413 writeCommentBeforeValue( childValue );
16414 if ( hasChildValue )
16415 writeWithIndent( childValues_[index] );
16418 writeValue( childValue );
16420 if ( ++index == size ) {
16421 writeCommentAfterValueOnSameLine( childValue );
16425 writeCommentAfterValueOnSameLine( childValue );
16428 writeWithIndent(
"]" );
16430 assert( childValues_.size() == size );
16432 for (
unsigned index =0; index < size; ++index ) {
16435 document_ += childValues_[index];
16444 StyledWriter::isMultineArray(
const Value &value ) {
16445 int size = value.
size();
16446 bool isMultiLine = size*3 >= rightMargin_ ;
16447 childValues_.clear();
16448 for (
int index =0; index < size && !isMultiLine; ++index ) {
16449 const Value &childValue = value[index];
16450 isMultiLine = isMultiLine ||
16452 childValue.
size() > 0 );
16454 if ( !isMultiLine ) {
16455 childValues_.reserve( size );
16456 addChildValues_ =
true;
16457 int lineLength = 4 + (size-1)*2;
16458 for (
int index =0; index < size && !isMultiLine; ++index ) {
16459 writeValue( value[index] );
16460 lineLength += int( childValues_[index].length() );
16461 isMultiLine = isMultiLine && hasCommentForValue( value[index] );
16463 addChildValues_ =
false;
16464 isMultiLine = isMultiLine || lineLength >= rightMargin_;
16466 return isMultiLine;
16471 StyledWriter::pushValue(
const std::string &value ) {
16472 if ( addChildValues_ )
16473 childValues_.push_back( value );
16475 document_ += value;
16480 StyledWriter::writeIndent() {
16481 if ( !document_.empty() )
16483 char last = document_[document_.length()-1];
16486 if ( last !=
'\n' )
16489 document_ += indentString_;
16494 StyledWriter::writeWithIndent(
const std::string &value ) {
16496 document_ += value;
16501 StyledWriter::indent() {
16502 indentString_ +=
std::string( indentSize_,
' ' );
16507 StyledWriter::unindent() {
16508 assert(
int(indentString_.size()) >= indentSize_ );
16509 indentString_.resize( indentString_.size() - indentSize_ );
16514 StyledWriter::writeCommentBeforeValue(
const Value &root ) {
16523 StyledWriter::writeCommentAfterValueOnSameLine(
const Value &root ) {
16536 StyledWriter::hasCommentForValue(
const Value &value ) {
16544 StyledWriter::normalizeEOL(
const std::string &text ) {
16546 normalized.reserve( text.length() );
16547 const char *
begin = text.c_str();
16548 const char *
end = begin + text.length();
16549 const char *current =
begin;
16550 while ( current != end ) {
16551 char c = *current++;
16553 if ( *current ==
'\n' )
16555 normalized +=
'\n';
16568 , rightMargin_( 74 )
16569 , indentation_( indentation ) {
16576 addChildValues_ =
false;
16577 indentString_ =
"";
16578 writeCommentBeforeValue( root );
16579 writeValue( root );
16580 writeCommentAfterValueOnSameLine( root );
16581 *document_ <<
"\n";
16587 StyledStreamWriter::writeValue(
const Value &value ) {
16588 switch ( value.
type() ) {
16590 pushValue(
"null" );
16608 writeArrayValue( value);
16612 if ( members.empty() )
16615 writeWithIndent(
"{" );
16617 Value::Members::iterator it = members.begin();
16621 writeCommentBeforeValue( childValue );
16623 *document_ <<
" : ";
16624 writeValue( childValue );
16625 if ( ++it == members.end() ) {
16626 writeCommentAfterValueOnSameLine( childValue );
16630 writeCommentAfterValueOnSameLine( childValue );
16633 writeWithIndent(
"}" );
16642 StyledStreamWriter::writeArrayValue(
const Value &value ) {
16643 unsigned size = value.
size();
16647 bool isArrayMultiLine = isMultineArray( value );
16648 if ( isArrayMultiLine ) {
16649 writeWithIndent(
"[" );
16651 bool hasChildValue = !childValues_.empty();
16654 const Value &childValue = value[index];
16655 writeCommentBeforeValue( childValue );
16656 if ( hasChildValue )
16657 writeWithIndent( childValues_[index] );
16660 writeValue( childValue );
16662 if ( ++index == size ) {
16663 writeCommentAfterValueOnSameLine( childValue );
16667 writeCommentAfterValueOnSameLine( childValue );
16670 writeWithIndent(
"]" );
16673 assert( childValues_.size() == size );
16674 *document_ <<
"[ ";
16675 for (
unsigned index =0; index < size; ++index ) {
16677 *document_ <<
", ";
16678 *document_ << childValues_[index];
16680 *document_ <<
" ]";
16687 StyledStreamWriter::isMultineArray(
const Value &value ) {
16688 int size = value.
size();
16689 bool isMultiLine = size*3 >= rightMargin_ ;
16690 childValues_.clear();
16691 for (
int index =0; index < size && !isMultiLine; ++index ) {
16692 const Value &childValue = value[index];
16693 isMultiLine = isMultiLine ||
16695 childValue.
size() > 0 );
16697 if ( !isMultiLine ) {
16698 childValues_.reserve( size );
16699 addChildValues_ =
true;
16700 int lineLength = 4 + (size-1)*2;
16701 for (
int index =0; index < size && !isMultiLine; ++index ) {
16702 writeValue( value[index] );
16703 lineLength += int( childValues_[index].length() );
16704 isMultiLine = isMultiLine && hasCommentForValue( value[index] );
16706 addChildValues_ =
false;
16707 isMultiLine = isMultiLine || lineLength >= rightMargin_;
16709 return isMultiLine;
16714 StyledStreamWriter::pushValue(
const std::string &value ) {
16715 if ( addChildValues_ )
16716 childValues_.push_back( value );
16718 *document_ << value;
16723 StyledStreamWriter::writeIndent() {
16736 *document_ <<
'\n' << indentString_;
16741 StyledStreamWriter::writeWithIndent(
const std::string &value ) {
16743 *document_ << value;
16748 StyledStreamWriter::indent() {
16749 indentString_ += indentation_;
16754 StyledStreamWriter::unindent() {
16755 assert( indentString_.size() >= indentation_.size() );
16756 indentString_.resize( indentString_.size() - indentation_.size() );
16761 StyledStreamWriter::writeCommentBeforeValue(
const Value &root ) {
16765 *document_ <<
"\n";
16770 StyledStreamWriter::writeCommentAfterValueOnSameLine(
const Value &root ) {
16775 *document_ <<
"\n";
16777 *document_ <<
"\n";
16783 StyledStreamWriter::hasCommentForValue(
const Value &value ) {
16791 StyledStreamWriter::normalizeEOL(
const std::string &text ) {
16793 normalized.reserve( text.length() );
16794 const char *
begin = text.c_str();
16795 const char *
end = begin + text.length();
16796 const char *current =
begin;
16797 while ( current != end ) {
16798 char c = *current++;
16800 if ( *current ==
'\n' )
16802 normalized +=
'\n';
16812 writer.
write(sout, root);
16860 #ifndef PYNE_IS_AMALGAMATED 16862 #include "jsoncustomwriter.h" 16875 : opencurly_( opencurly )
16876 , closecurly_( closecurly )
16877 , opensquare_( opensquare )
16878 , closesquare_( closesquare )
16881 , indent_( indent )
16882 , maxWidth_( maxWidth )
16891 indentString_ =
"";
16892 writeValue( root, document_,
false );
16901 switch ( value.
type() )
16923 bool isMulti =
false;
16924 if (!forceSingleLine)
16927 writeValue( value, valLine,
true);
16928 if (valLine.length() > maxWidth_)
16938 doc += opensquare_;
16941 for (
int index =0; index < value.
size(); ++index )
16946 doc += indentString_;
16948 writeValue( value[index], doc,
false );
16949 if ( index < value.
size()-1 )
16956 doc += indentString_;
16958 doc += closesquare_;
16963 bool isMulti =
false;
16964 if (!forceSingleLine)
16967 writeValue( value, valLine,
true);
16968 if (valLine.length() > maxWidth_)
16982 for ( Value::Members::iterator it = members.begin();
16983 it != members.end();
16989 doc += indentString_;
16995 writeValue( value[name], doc, forceSingleLine );
16996 if ( !(it + 1 == members.end()) )
17003 doc += indentString_;
17005 doc += closecurly_;
17013 CustomWriter::indent()
17015 indentString_ += indent_;
17020 CustomWriter::unindent()
17022 int idSize = int(indent_.size());
17023 int idsSize = int(indentString_.size());
17024 if (idsSize >= idSize)
17025 indentString_.resize (idsSize - idSize);
17045 #include <stdexcept> 17047 #ifndef PYNE_IS_AMALGAMATED 17064 sum = sum + i->second;
17072 double sum = get_comp_sum();
17073 if (sum != 1.0 && sum != 0.0) {
17074 for (
comp_iter i = comp.begin(); i != comp.end(); i++)
17075 i->second = i->second / sum;
17088 hid_t matgroup = H5Gopen2(db, datapath.c_str(), H5P_DEFAULT);
17095 H5G_info_t group_info;
17096 H5Gget_info(matgroup, &group_info);
17097 hsize_t matG = group_info.nlinks;
17100 for (
int matg = 0; matg < matG; matg++) {
17101 nuckeylen = 1 + H5Lget_name_by_idx(matgroup,
".", H5_INDEX_NAME, H5_ITER_INC, matg,
17102 NULL, 0, H5P_DEFAULT);
17103 char * nkey =
new char[nuckeylen];
17104 nuckeylen = H5Lget_name_by_idx(matgroup,
".", H5_INDEX_NAME, H5_ITER_INC, matg,
17105 nkey, nuckeylen, H5P_DEFAULT);
17107 nucset = H5Dopen2(matgroup, nkey, H5P_DEFAULT);
17108 nucvalue = h5wrap::get_array_index<double>(nucset, row);
17110 if (nuckey ==
"Mass" || nuckey ==
"MASS" || nuckey ==
"mass")
17120 atoms_per_molecule = -1.0;
17127 hid_t data_set = H5Dopen2(db, datapath.c_str(), H5P_DEFAULT);
17129 hsize_t data_offset[1] = {
static_cast<hsize_t
>(row)};
17132 hid_t data_space = H5Dget_space(data_set);
17133 hsize_t data_dims[1];
17134 H5Sget_simple_extent_dims(data_space, data_dims, NULL);
17135 data_offset[0] += data_dims[0];
17139 hid_t nuc_attr = H5Aopen(data_set,
"nucpath", H5P_DEFAULT);
17140 H5A_info_t nuc_info;
17141 H5Aget_info(nuc_attr, &nuc_info);
17142 hsize_t nuc_attr_len = nuc_info.data_size;
17143 hid_t str_attr = H5Tcopy(H5T_C_S1);
17144 H5Tset_size(str_attr, nuc_attr_len);
17145 char * nucpathbuf =
new char [nuc_attr_len];
17146 H5Aread(nuc_attr, str_attr, nucpathbuf);
17148 delete[] nucpathbuf;
17151 std::vector<int> nuclides = h5wrap::h5_array_to_cpp_vector_1d<int>(db, nucpath, H5T_NATIVE_INT);
17152 int nuc_size = nuclides.size();
17153 hsize_t nuc_dims[1] = {
static_cast<hsize_t
>(nuc_size)};
17156 hid_t data_hyperslab = H5Dget_space(data_set);
17157 hsize_t data_count[1] = {1};
17158 H5Sselect_hyperslab(data_hyperslab, H5S_SELECT_SET, data_offset, NULL, data_count, NULL);
17161 hid_t mem_space = H5Screate_simple(1, data_count, NULL);
17165 hid_t desc = H5Tcreate(H5T_COMPOUND, material_data_size);
17166 hid_t comp_values_array_type = H5Tarray_create2(H5T_NATIVE_DOUBLE, 1, nuc_dims);
17171 H5T_NATIVE_DOUBLE);
17173 H5T_NATIVE_DOUBLE);
17180 H5Dread(data_set, desc, mem_space, data_hyperslab, H5P_DEFAULT, mat_data);
17182 mass = (*mat_data).mass;
17183 density = (*mat_data).density;
17184 atoms_per_molecule = (*mat_data).atoms_per_mol;
17185 for (
int i = 0; i < nuc_size; i++)
17186 comp[nuclides[i]] = (
double) (*mat_data).comp[i];
17189 H5Tclose(str_attr);
17196 if (!attrpath_exists)
17199 hid_t metadatapace, attrtype, metadataet, metadatalab, attrmemspace;
17201 hvl_t attrdata [1];
17203 attrtype = H5Tvlen_create(H5T_NATIVE_CHAR);
17206 metadataet = H5Dopen2(db, attrpath.c_str(), H5P_DEFAULT);
17207 metadatalab = H5Dget_space(metadataet);
17208 H5Sselect_hyperslab(metadatalab, H5S_SELECT_SET, data_offset, NULL, data_count, NULL);
17209 attrmemspace = H5Screate_simple(1, data_count, NULL);
17210 H5Dread(metadataet, attrtype, attrmemspace, metadatalab, H5P_DEFAULT, attrdata);
17214 reader.
parse((
char *) attrdata[0].p, (
char *) attrdata[0].p+attrdata[0].len, metadata,
false);
17217 H5Fflush(db, H5F_SCOPE_GLOBAL);
17218 H5Dclose(metadataet);
17219 H5Sclose(metadatapace);
17220 H5Tclose(attrtype);
17233 from_hdf5(fname, dpath, row, protocol);
17241 H5Eset_auto2(H5E_DEFAULT, NULL, NULL);
17248 bool ish5 = H5Fis_hdf5(filename.c_str());
17254 fapl = H5Pcreate(H5P_FILE_ACCESS);
17255 H5Pset_fclose_degree(fapl,H5F_CLOSE_STRONG);
17257 hid_t db = H5Fopen(filename.c_str(), H5F_ACC_RDONLY, fapl);
17260 if (!datapath_exists)
17268 _load_comp_protocol0(db, datapath, row);
17269 else if (protocol == 1)
17270 _load_comp_protocol1(db, datapath, row);
17275 status = H5Fclose(db);
17289 write_hdf5(fname, groupname, nuclist, row, chunksize);
17296 int row_num = (int) row;
17299 H5Eset_auto2(H5E_DEFAULT, NULL, NULL);
17303 fapl = H5Pcreate(H5P_FILE_ACCESS);
17304 H5Pset_fclose_degree(fapl,H5F_CLOSE_STRONG);
17308 bool ish5 = H5Fis_hdf5(filename.c_str());
17311 db = H5Fopen(filename.c_str(), H5F_ACC_RDWR, fapl);
17314 db = H5Fcreate(filename.c_str(), H5F_ACC_TRUNC, H5P_DEFAULT, fapl);
17320 std::vector<int> nuclides;
17322 hsize_t nuc_dims[1];
17324 if (nucpath_exists) {
17325 nuclides = h5wrap::h5_array_to_cpp_vector_1d<int>(db, nucpath, H5T_NATIVE_INT);
17326 nuc_size = nuclides.size();
17327 nuc_dims[0] = nuc_size;
17329 nuclides = std::vector<int>();
17331 nuclides.push_back(i->first);
17332 nuc_size = nuclides.size();
17335 int nuc_data [nuc_size];
17336 for (
int n = 0; n != nuc_size; n++)
17337 nuc_data[n] = nuclides[n];
17338 nuc_dims[0] = nuc_size;
17339 hid_t nuc_space = H5Screate_simple(1, nuc_dims, NULL);
17340 hid_t nuc_set = H5Dcreate2(db, nucpath.c_str(), H5T_NATIVE_INT, nuc_space,
17341 H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT);
17342 H5Dwrite(nuc_set, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, nuc_data);
17343 H5Fflush(db, H5F_SCOPE_GLOBAL);
17350 hid_t data_set, data_space, data_hyperslab;
17352 hsize_t data_dims[1] = {1};
17353 hsize_t data_max_dims[1] = {H5S_UNLIMITED};
17354 hsize_t data_offset[1] = {0};
17357 hid_t desc = H5Tcreate(H5T_COMPOUND, material_data_size);
17358 hid_t comp_values_array_type = H5Tarray_create2(H5T_NATIVE_DOUBLE, 1, nuc_dims);
17363 H5T_NATIVE_DOUBLE);
17365 H5T_NATIVE_DOUBLE);
17367 comp_values_array_type);
17370 (*mat_data).
mass = mass;
17371 (*mat_data).density = density;
17372 (*mat_data).atoms_per_mol = atoms_per_molecule;
17373 for (
int n = 0; n != nuc_size; n++) {
17374 if (0 < comp.count(nuclides[n]))
17375 (*mat_data).comp[n] = comp[nuclides[n]];
17377 (*mat_data).comp[n] = 0.0;
17382 if (datapath_exists) {
17383 data_set = H5Dopen2(db, datapath.c_str(), H5P_DEFAULT);
17384 data_space = H5Dget_space(data_set);
17385 data_rank = H5Sget_simple_extent_dims(data_space, data_dims, data_max_dims);
17388 if (std::signbit(row))
17389 row_num = data_dims[0] + row;
17391 if (data_dims[0] <= row_num) {
17394 data_dims[0] = row_num + 1;
17395 H5Dset_extent(data_set, data_dims);
17398 data_offset[0] = row_num;
17401 data_space = H5Screate_simple(1, data_dims, data_max_dims);
17404 hid_t data_set_params = H5Pcreate(H5P_DATASET_CREATE);
17405 hsize_t chunk_dims[1] = {
static_cast<hsize_t
>(chunksize)};
17406 H5Pset_chunk(data_set_params, 1, chunk_dims);
17407 H5Pset_deflate(data_set_params, 1);
17410 data_set = H5Dcreate2(db, datapath.c_str(), desc, data_space, H5P_DEFAULT,
17411 data_set_params, H5P_DEFAULT);
17412 H5Dset_extent(data_set, data_dims);
17415 hid_t nuc_attr_type = H5Tcopy(H5T_C_S1);
17416 H5Tset_size(nuc_attr_type, nucpath.length());
17417 hid_t nuc_attr_space = H5Screate(H5S_SCALAR);
17418 hid_t nuc_attr = H5Acreate2(data_set,
"nucpath", nuc_attr_type, nuc_attr_space,
17419 H5P_DEFAULT, H5P_DEFAULT);
17420 H5Awrite(nuc_attr, nuc_attr_type, nucpath.c_str());
17421 H5Fflush(db, H5F_SCOPE_GLOBAL);
17425 data_hyperslab = H5Dget_space(data_set);
17426 hsize_t data_count[1] = {1};
17427 H5Sselect_hyperslab(data_hyperslab, H5S_SELECT_SET, data_offset, NULL, data_count, NULL);
17430 hid_t mem_space = H5Screate_simple(1, data_count, data_max_dims);
17433 H5Dwrite(data_set, desc, mem_space, data_hyperslab, H5P_DEFAULT, mat_data);
17436 H5Fflush(db, H5F_SCOPE_GLOBAL);
17437 H5Dclose(data_set);
17438 H5Sclose(data_space);
17445 hid_t metadatapace, attrtype, metadataet, metadatalab, attrmemspace;
17448 attrtype = H5Tvlen_create(H5T_NATIVE_CHAR);
17452 if (attrpath_exists) {
17453 metadataet = H5Dopen2(db, attrpath.c_str(), H5P_DEFAULT);
17454 metadatapace = H5Dget_space(metadataet);
17455 attrrank = H5Sget_simple_extent_dims(metadatapace, data_dims, data_max_dims);
17457 if (data_dims[0] <= row_num) {
17460 data_dims[0] = row_num + 1;
17461 H5Dset_extent(metadataet, data_dims);
17464 data_offset[0] = row_num;
17466 hid_t metadataetparams;
17467 hsize_t attrchunkdims [1];
17470 metadataetparams = H5Pcreate(H5P_DATASET_CREATE);
17471 attrchunkdims[0] = chunksize;
17472 H5Pset_chunk(metadataetparams, 1, attrchunkdims);
17473 H5Pset_deflate(metadataetparams, 1);
17475 hvl_t attrfillvalue [1];
17476 attrfillvalue[0].len = 3;
17477 attrfillvalue[0].p = (
char *)
"{}\n";
17478 H5Pset_fill_value(metadataetparams, attrtype, &attrfillvalue);
17481 metadatapace = H5Screate_simple(1, data_dims, data_max_dims);
17482 metadataet = H5Dcreate2(db, attrpath.c_str(), attrtype, metadatapace,
17483 H5P_DEFAULT, metadataetparams, H5P_DEFAULT);
17484 H5Dset_extent(metadataet, data_dims);
17485 H5Pclose(metadataetparams);
17489 hvl_t attrdata [1];
17492 attrdata[0].p = (
char *) metadatatr.c_str();
17493 attrdata[0].len = metadatatr.length();
17496 metadatalab = H5Dget_space(metadataet);
17497 H5Sselect_hyperslab(metadatalab, H5S_SELECT_SET, data_offset, NULL, data_count, NULL);
17498 attrmemspace = H5Screate_simple(1, data_count, data_max_dims);
17499 H5Dwrite(metadataet, attrtype, attrmemspace, metadatalab, H5P_DEFAULT, attrdata);
17502 H5Fflush(db, H5F_SCOPE_GLOBAL);
17503 H5Dclose(metadataet);
17504 H5Sclose(metadatapace);
17505 H5Tclose(attrtype);
17516 std::ostringstream oss;
17518 if (metadata.isMember(
"name")) {
17519 oss <<
"C name: " << metadata[
"name"].asString() << std::endl;
17522 if (density != -1.0) {
17523 std::stringstream ds;
17524 ds << std::setprecision(1) << std::fixed <<
"C density = " << density << std::endl;
17528 if (metadata.isMember(
"source")) {
17529 oss <<
"C source: " << metadata[
"source"].asString() << std::endl;
17532 if (metadata.isMember(
"comments")) {
17533 std::string comment_string =
"comments: " + metadata[
"comments"].asString();
17535 if (comment_string.length() <= 77) {
17536 oss <<
"C " << comment_string << std::endl;
17539 oss <<
"C " << comment_string.substr(0,77) << std::endl;
17540 std::string remainder_string = comment_string.substr(77);
17541 while (remainder_string.length() > 77) {
17542 oss <<
"C " << remainder_string.substr(0,77) << std::endl;
17543 remainder_string.erase(0,77);
17545 if (remainder_string.length() > 0) {
17546 oss <<
"C " << remainder_string << std::endl;
17553 if (metadata.isMember(
"mat_number")) {
17554 int mat_num = metadata[
"mat_number"].asInt();
17555 oss << mat_num << std::endl;
17557 oss <<
"?" << std::endl;
17561 std::map<int, double> fracs;
17564 if (
"atom" == frac_type) {
17565 fracs = to_atom_frac();
17574 std::stringstream ss;
17578 if (i->second > 0.0) {
17583 nucmcnp = ss.str();
17588 table_item = metadata[
"table_ids"][nucmcnp].asString();
17589 if (!table_item.empty()) {
17590 oss <<
" " << mcnp_id <<
"." << table_item <<
" ";
17592 oss <<
" " << mcnp_id <<
" ";
17595 std::stringstream fs;
17596 fs << std::setprecision(4) << std::scientific << frac_sign << i->second \
17616 return (fluka_builtin.find(fluka_name) == fluka_builtin.end());
17624 std::stringstream rs;
17627 if (comp.size() == 1) {
17628 rs << fluka_material_str(
id);
17629 }
else if (comp.size() > 1) {
17631 rs << fluka_compound_str(
id, frac_type);
17633 rs <<
"There is no nuclide information in the Material Object" << std::endl;
17649 std::stringstream ms;
17652 int nucid = comp.begin()->first;
17655 if (metadata.isMember(
"fluka_name")) {
17656 fluka_name = metadata[
"fluka_name"].asString();
17658 if (comp.size() > 1 ) {
17659 std::cerr <<
"Error: this mix is a compound, there should be a fluka_name defined." 17666 if (not_fluka_builtin(fluka_name)) {
17667 ms << fluka_material_component(
id, nucid, fluka_name);
17693 return fluka_material_line(znum, atomic_mass, fid, fluka_name);
17702 std::stringstream ls;
17704 if (metadata.isMember(
"comments") ) {
17705 std::string comment = metadata[
"comments"].asString();
17706 ls <<
"* " << comment;
17709 ls << std::setw(10) << std::left <<
"MATERIAL";
17710 ls << std::setprecision(0) << std::fixed << std::showpoint <<
17711 std::setw(10) << std::right << (float)znum;
17713 ls << fluka_format_field(atomic_mass);
17715 ls << fluka_format_field(std::sqrt(density*density));
17717 ls << std::setprecision(0) << std::fixed << std::showpoint <<
17718 std::setw(10) << std::right << (float)fid;
17719 ls << std::setw(10) << std::right <<
"";
17720 ls << std::setw(10) << std::right <<
"";
17721 ls << std::setw(10) << std::left << fluka_name << std::endl;
17735 std::stringstream ls;
17737 modf (field, &intpart);
17738 if (field == intpart) {
17739 ls << std::setprecision(0) << std::fixed << std::showpoint
17740 << std::setw(10) << std::right << field;
17743 ls.unsetf(std::ios::showpoint);
17744 ls.unsetf(std::ios::floatfield);
17746 ls << std::setw(10) << std::right << field;
17759 std::stringstream ss;
17760 std::map<double, std::string> frac_name_map;
17762 std::vector<std::string> material_names;
17769 if (metadata.isMember(
"fluka_name")) {
17770 compound_name = metadata[
"fluka_name"].asString();
17772 std::cerr <<
"Error: metadata \"fluka_name\" expected." << std::endl;
17773 compound_name =
"NotFound";
17775 ss << fluka_material_line(znum, atomic_mass,
id, compound_name);
17778 if (
"atom" == frac_type) {
17784 std::stringstream temp_s;
17785 temp_s << std::scientific;
17786 temp_s << std::setprecision(3);
17788 int counter = comp.size();
17791 while (counter >= 3) {
17792 ss << std::setw(10) << std::left <<
"COMPOUND";
17794 temp_s << frac_sign << nuc->second;
17796 ss << std::setw(10) << std::right << temp_s.str();
17797 ss << std::setw(10) << std::right <<
nucname::fluka(nuc->first);
17801 temp_s << frac_sign << nuc->second;
17802 ss << std::setw(10) << std::right << temp_s.str();
17803 ss << std::setw(10) << std::right <<
nucname::fluka(nuc->first);
17807 temp_s << frac_sign << nuc->second;
17808 ss << std::setw(10) << std::right << temp_s.str();
17809 ss << std::setw(10) << std::right <<
nucname::fluka(nuc->first);
17813 ss << std::setw(10) << std::left << compound_name;
17820 if (nuc != comp.end()) {
17821 ss << std::setw(10) << std::left <<
"COMPOUND";
17822 temp_s << frac_sign << nuc->second;
17823 ss << std::setw(10) << std::right << temp_s.str();
17824 ss << std::setw(10) << std::right <<
nucname::fluka(nuc->first);
17828 if (nuc != comp.end()) {
17829 temp_s << frac_sign << nuc->second;
17830 ss << std::setw(10) << std::right << temp_s.str();
17831 ss << std::setw(10) << std::right <<
nucname::fluka(nuc->first);
17835 ss << std::setw(10) << std::right <<
"";
17836 ss << std::setw(10) << std::right <<
"";
17839 ss << std::setw(10) << std::right <<
"";
17840 ss << std::setw(10) << std::right <<
"";
17841 ss << std::setw(10) << std::left << compound_name;
17861 f.open(filename.c_str());
17868 while ( !f.eof() ) {
17870 if (0 == keystr.length())
17873 if (keystr ==
"Mass"){
17876 }
else if (keystr ==
"Density") {
17879 }
else if (keystr ==
"APerM") {
17891 getline(f, valstr);
17892 valstr= valstr.substr(0, valstr.length()-1);
17893 metadata[keystr]= valstr;
17913 f.open(filename.c_str(), std::ios_base::trunc);
17916 std::vector<std::string> obj = metadata.getMemberNames();
17919 f <<
"Mass " << mass <<
"\n";
17922 f <<
"Density " << density <<
"\n";
17924 if (0 <= atoms_per_molecule)
17925 f <<
"APerM " << atoms_per_molecule <<
"\n";
17927 for (
int i=0; i < metadata.size(); i=i+2){
17928 f <<metadata.get(obj.at(i),
"") << metadata.get(obj.at(i+1),
"");
17934 while (nuc_name.length() < 8)
17936 f << nuc_name << i->second <<
"\n";
17945 Json::Value::Members::const_iterator ikey = keys.begin();
17946 Json::Value::Members::const_iterator ikey_end = keys.end();
17948 for (; ikey != ikey_end; ++ikey)
17952 density = json[
"density"].
asDouble();
17953 atoms_per_molecule = json[
"atoms_per_molecule"].
asDouble();
17954 metadata = json[
"metadata"];
17961 json[
"mass"] = mass;
17962 json[
"density"] = density;
17963 json[
"atoms_per_molecule"] = atoms_per_molecule;
17964 json[
"metadata"] = metadata;
17965 for(
comp_iter i = comp.begin(); i != comp.end(); i++)
17967 json[
"comp"] = jcomp;
17981 std::ifstream f (filename.c_str(),
std::ios::in | std::ios::binary);
17983 s.resize(f.tellg());
17984 f.seekg(0, std::ios::beg);
17985 f.read(&s[0], s.size());
17989 reader.
parse(s, json);
18004 f.open(filename.c_str(), std::ios_base::trunc);
18020 atoms_per_molecule = -1.0;
18031 atoms_per_molecule = apm;
18032 metadata = attributes;
18043 atoms_per_molecule = apm;
18044 metadata = attributes;
18052 bool ish5 = H5Fis_hdf5(fname.c_str());
18065 atoms_per_molecule = apm;
18066 metadata = attributes;
18073 bool ish5 = H5Fis_hdf5(filename.c_str());
18075 from_hdf5(filename);
18077 from_text(filename);
18091 os <<
"\tMass: " << mat.
mass <<
"\n";
18092 os <<
"\t---------\n";
18118 cm[i->first] = (i->second) * mass;
18129 act[i->first] = masspermole * (i->second) *
decay_const(i->first) / \
18130 atomic_mass(i->first);
18140 dh[i->first] = masspermole * (i->second) * \
18150 const double pCi_per_Bq = 27.027027;
18151 if (dose_type ==
"ext_air") {
18155 atomic_mass(i->first);
18157 }
else if (dose_type ==
"ext_soil") {
18161 atomic_mass(i->first);
18163 }
else if (dose_type ==
"ingest") {
18165 dose[i->first] = pCi_per_Bq *
pyne::N_A * (i->second) * \
18167 atomic_mass(i->first);
18169 }
else if (dose_type ==
"inhale") {
18171 dose[i->first] = pCi_per_Bq *
pyne::N_A * (i->second) * \
18173 atomic_mass(i->first);
18176 throw std::invalid_argument(
"Dose type must be one of: ext_air, ext_soil, ingest, inhale.");
18184 double inverseA = 0.0;
18189 if (inverseA == 0.0)
18193 double atsperm = 1.0;
18196 if (atoms_per_molecule < 0.0)
18197 atoms_per_molecule = apm;
18198 }
else if (0.0 <= atoms_per_molecule)
18199 atsperm = atoms_per_molecule;
18201 return atsperm / inverseA;
18209 int n, nabund, znuc, zabund;
18211 std::map<int, double>::iterator abund_itr, abund_end;
18217 for (
comp_iter nuc = comp.begin(); nuc != comp.end(); nuc++) {
18218 if(abund_itr == abund_end)
18219 newcomp.insert(*nuc);
18223 if (znuc < zabund) {
18224 newcomp.insert(*nuc);
18227 while(zabund <= znuc) {
18228 nabund = (*abund_itr).first;
18229 if (zabund == znuc && 0 !=
nucname::anum(nabund) && 0.0 != (*abund_itr).second)
18230 newcomp[nabund] = (*abund_itr).second * (*nuc).second * \
18232 else if (n == nabund && 0.0 == (*abund_itr).second)
18233 newcomp.insert(*nuc);
18235 if (abund_itr == abund_end) {
18242 newcomp.insert(*nuc);
18244 return Material(newcomp, mass, density, atoms_per_molecule, metadata);
18268 if (0 < ptr->second) {
18273 if (0 < exception_ids.count(cur_stripped_id)) {
18276 cm[ptr->first] = (ptr->second) * mass;
18280 cm[znum_id] += (ptr->second) * mass;
18286 atoms_per_molecule, metadata);
18292 std::set<int> nucvec;
18294 int *int_ptr = *int_ptr_arry;
18295 while (int_ptr != NULL)
18297 nucvec.insert(*int_ptr);
18300 return collapse_elements(nucvec);
18304 if (0.0 <= num_dens) {
18305 double mw = molecular_mass(apm);
18306 density = num_dens * mw /
pyne::N_A / atoms_per_molecule;
18313 if (0 <= mass_dens)
18314 density = mass_dens;
18315 double mw = molecular_mass(apm);
18316 double num_dens = density *
pyne::N_A * atoms_per_molecule / mw;
18329 if ( 0 < nucset.count(i->first) )
18330 cm[i->first] = (i->second) * mass;
18341 std::set<int> iset;
18342 for (std::set<std::string>::iterator i = nucset.begin(); i != nucset.end(); i++) {
18346 return sub_mat(iset);
18360 if ( 0 == nucset.count(i->first) )
18361 cm[i->first] = (i->second) * mass;
18365 for (std::set<int>::iterator nuc = nucset.begin(); nuc != nucset.end(); nuc++)
18376 std::set<int> iset;
18377 for (std::set<std::string>::iterator i = nucset.begin(); i != nucset.end(); i++) {
18381 return set_mat(iset, value);
18395 if ( 0 == nucset.count(i->first) )
18396 cm[i->first] = (i->second) * mass;
18407 std::set<int> iset;
18408 for (std::set<std::string>::iterator i = nucset.begin(); i != nucset.end(); i++) {
18412 return del_mat(iset);
18424 int temp_upper = upper;
18426 lower = temp_upper;
18431 if ((lower <= (i->first)) && ((i->first) < upper))
18432 cm[i->first] = (i->second) * mass;
18442 if (upper < lower) {
18443 int temp_upper = upper;
18445 lower = temp_upper;
18450 if ((lower <= (i->first)) && ((i->first) < upper))
18451 cm[i->first] = value;
18453 cm[i->first] = (i->second) * mass;
18463 if (upper < lower) {
18464 int temp_upper = upper;
18466 lower = temp_upper;
18471 if ((upper <= (i->first)) || ((i->first) < lower))
18472 cm[i->first] = (i->second) * mass;
18489 return sub_range(elem, elem + 10000000);
18496 return sub_range(570000000, 720000000);
18503 return sub_range(890000000, 1040000000);
18509 return sub_range(930000000, INT_MAX);
18516 return sub_range(930000000, 1040000000).
del_range(940000000, 950000000);
18523 return sub_range(0, 890000000);
18534 double mat_mw = molecular_mass();
18536 std::map<int, double> atom_fracs = std::map<int, double>();
18538 for (
comp_iter ci = comp.begin(); ci != comp.end(); ci++)
18552 atoms_per_molecule = 0.0;
18554 for (std::map<int, double>::iterator afi = atom_fracs.begin(); afi != atom_fracs.end(); afi++) {
18556 atoms_per_molecule += (afi->second);
18567 std::map<int, double> atom_dens = std::map<int, double>();
18569 for (
comp_iter ci = comp.begin(); ci != comp.end(); ci++)
18577 std::vector<std::pair<double, double> > result;
18578 std::map<int, double> atom_fracs = this->to_atom_frac();
18580 for (
comp_iter ci = comp.begin(); ci != comp.end(); ci++) {
18581 if (ci->first % 10000 > 0)
18584 state_id = ci->first;
18586 std::vector<std::pair<double, double> > raw_gammas =
pyne::gammas(state_id);
18587 for (
int i = 0; i < raw_gammas.size(); ++i) {
18588 result.push_back(std::make_pair(raw_gammas[i].first,
18589 atom_fracs[ci->first]*raw_gammas[i].second));
18596 std::vector<std::pair<double, double> > result;
18597 std::map<int, double> atom_fracs = this->to_atom_frac();
18599 for (
comp_iter ci = comp.begin(); ci != comp.end(); ci++) {
18600 if (ci->first % 10000 > 0)
18603 state_id = ci->first;
18605 std::vector<std::pair<double, double> > raw_xrays =
pyne::xrays(state_id);
18606 for (
int i = 0; i < raw_xrays.size(); ++i) {
18607 result.push_back(std::make_pair(raw_xrays[i].first,
18608 atom_fracs[ci->first]*raw_xrays[i].second));
18615 std::vector<std::pair<double, double> > txray = this->
xrays();
18616 std::vector<std::pair<double, double> > tgammas = this->
gammas();
18617 for (
int i = 0; i < txray.size(); ++i)
18618 tgammas.push_back(txray[i]);
18620 tgammas = normalize_radioactivity(tgammas);
18625 std::vector<std::pair<double, double> > unnormed) {
18626 std::vector<std::pair<double, double> > normed;
18628 for (
int i = 0; i < unnormed.size(); ++i) {
18629 if (!
isnan(unnormed[i].second))
18630 sum = sum + unnormed[i].second;
18632 for (
int i = 0; i < unnormed.size(); ++i) {
18633 if (!
isnan(unnormed[i].second)) {
18634 normed.push_back(std::make_pair(unnormed[i].first,
18635 (unnormed[i].second)/sum));
18665 if ( 0 < ywgt.count(i->first) )
18666 cm[i->first] = xwgt[i->first] + ywgt[i->first];
18668 cm[i->first] = xwgt[i->first];
18672 if ( 0 == cm.count(i->first) )
18673 cm[i->first] = ywgt[i->first];
18701 #ifndef PYNE_IS_AMALGAMATED 18702 #include "enrichment_cascade.h" 18728 l_t_per_feed = 0.0;
18740 x_feed_j = mat_feed.comp[j];
18741 x_prod_j = mat_prod.comp[j];
18742 x_tail_j = mat_tail.comp[j];
18754 #ifndef PYNE_IS_AMALGAMATED 18778 cm[922340000] = 0.000055;
18779 cm[922350000] = 0.00720;
18780 cm[922380000] = 0.992745;
18802 return (x_feed - x_tail) / (x_prod - x_tail);
18806 return (x_feed - x_prod) / (x_tail - x_prod);
18810 return (x_feed - x_prod) / (x_tail - x_feed);
18814 return (2 * x - 1) * log(x / (1 - x));
18820 tail_per_feed(x_feed, x_prod, x_tail) *
value_func(x_tail) - \
18821 value_func(x_feed);
18827 tail_per_prod(x_feed, x_prod, x_tail) *
value_func(x_tail) - \
18828 feed_per_prod(x_feed, x_prod, x_tail) *
value_func(x_feed);
18834 value_func(x_tail) - \
18835 feed_per_tail(x_feed, x_prod, x_tail) *
value_func(x_feed);
18841 return pow(alpha, (Mstar - M_i));
18854 double origN = casc.
N;
18855 double origM = casc.
M;
18858 double rhs_prod = (pow(astar_j, M+1.0) - 1.0) / (pow(astar_j, M+1.0) - pow(astar_j, -N));
18860 double rhs_tail = (1.0 - pow(astar_j, -N)) / (pow(astar_j, M+1.0) - pow(astar_j, -N));
18863 double delta_prod = lhs_prod - rhs_prod;
18864 double delta_tail = lhs_tail - rhs_tail;
18865 while (tolerance < fabs(delta_prod) && tolerance < fabs(delta_tail)) {
18866 delta_prod = lhs_prod - rhs_prod;
18867 delta_tail = lhs_tail - rhs_tail;
18869 if (tolerance < fabs(delta_prod)) {
18870 N = N - (delta_prod * N);
18871 rhs_prod = (pow(astar_j, M+1.0) - 1.0) / (pow(astar_j, M+1.0) - pow(astar_j, -N));
18874 if (tolerance < fabs(delta_tail)) {
18875 M = M - (delta_tail * M);
18876 rhs_tail = (1.0 - pow(astar_j, -N)) / (pow(astar_j, M+1.0) - pow(astar_j, -N));
18879 if (N < tolerance) {
18885 if (M < tolerance) {
18909 double astar_i, numer_prod, numer_tail, denom_prod, denom_tail;
18922 numer_prod = casc.
mat_feed.
comp[nuc] * (pow(astar_i, M+1.0) - 1.0);
18923 denom_prod = (pow(astar_i, M+1.0) - pow(astar_i, -N)) / ppf;
18924 comp_prod[nuc] = numer_prod / denom_prod;
18927 numer_tail = casc.
mat_feed.
comp[nuc] * (1.0 - pow(astar_i, -N));
18928 denom_tail = (pow(astar_i, M+1.0) - pow(astar_i, -N)) / tpf;
18929 comp_tail[nuc] = numer_tail / denom_tail;
18940 double tolerance,
int max_iter) {
18953 int max_hist = max_iter / 10;
18954 std::vector<double> historyN;
18955 std::vector<double> historyM;
18958 prev_casc.
N += 1.0;
18959 prev_casc.
M += 1.0;
18962 historyN.push_back(prev_casc.
N);
18963 historyM.push_back(prev_casc.
M);
18969 historyN.push_back(curr_casc.
N);
18970 historyM.push_back(curr_casc.
M);
18975 double prev_N = prev_casc.
N;
18976 double prev_M = prev_casc.
M;
18977 double curr_N = curr_casc.
N;
18978 double curr_M = curr_casc.
M;
18979 double temp_prev_N = 0.0;
18980 double temp_prev_M = 0.0;
18981 double temp_curr_N = 0.0;
18982 double temp_curr_M = 0.0;
18987 while ((tolerance < fabs(delta_x_prod_j) / curr_casc.
mat_prod.
comp[j] || \
18988 tolerance < fabs(delta_x_tail_j) / curr_casc.
mat_tail.
comp[j]) && \
18989 niter < max_iter) {
18993 if (tolerance <= fabs(delta_x_prod_j)/curr_casc.
mat_prod.
comp[j]) {
18995 temp_curr_N = curr_N;
18996 temp_prev_N = prev_N;
18997 curr_N = curr_N + delta_x_prod_j*\
18999 prev_N = temp_curr_N;
19003 curr_N = (temp_curr_N + temp_prev_N)/2.0;
19006 if (tolerance <= fabs(delta_x_tail_j)/curr_casc.
mat_tail.
comp[j]) {
19008 temp_curr_M = curr_M;
19009 temp_prev_M = prev_M;
19010 curr_M = curr_M + delta_x_tail_j*\
19012 prev_M = temp_curr_M;
19016 curr_M = (temp_curr_M + temp_prev_M)/2.0;
19020 for (h = 0; h < historyN.size(); h++) {
19021 if (historyN[h] == curr_N && historyM[h] == curr_M) {
19022 curr_N = curr_N + delta_x_prod_j * \
19024 curr_M = curr_M + delta_x_tail_j * \
19030 if (max_hist <= historyN.size()) {
19031 historyN.erase(historyN.begin());
19032 historyM.erase(historyM.begin());
19034 historyN.push_back(curr_N);
19035 historyM.push_back(curr_M);
19040 prev_casc = curr_casc;
19041 curr_casc.
N = curr_N;
19042 curr_casc.
M = curr_M;
19062 ((astar_i - 1.0)/(astar_i + 1.0));
19067 double tolerance,
int max_iter) {
19084 double ltotpf = 0.0;
19085 double swupf = 0.0;
19086 double temp_numer = 0.0;
19090 temp_numer = (ppf*casc.
mat_prod.
comp[nuc]*log(rprod) + \
19092 casc.mat_feed.comp[nuc]*log(rfeed));
19094 swupf = swupf + temp_numer;
19114 char * solver,
double tolerance,
int max_iter) {
19116 return multicomponent(orig_casc, strsolver, tolerance, max_iter);
19120 std::string solver,
double tolerance,
int max_iter) {
19130 if (solver ==
"symbolic")
19132 else if (solver ==
"numeric")
19135 throw "solver not known: " + solver;
19143 prev_casc.
Mstar = ms;
19144 curr_casc.
Mstar = ms;
19148 double ooe = -log10(tolerance);
19152 switch (solver_code) {
19163 switch (solver_code) {
19174 double m_sign = m / fabs(m);
19177 double temp_m_sign;
19185 prev_casc = curr_casc;
19187 curr_casc.
Mstar = curr_casc.
Mstar - (m_sign * pow(10.0, -xpn));
19188 switch (solver_code) {
19198 temp_casc = curr_casc;
19199 temp_casc.
Mstar = temp_casc.
Mstar - (m_sign * pow(10.0, -xpn));
19200 switch (solver_code) {
19211 if (temp_m == 0.0) {
19212 prev_casc = curr_casc;
19213 curr_casc = temp_casc;
19217 temp_m_sign = temp_m / fabs(temp_m);
19218 if (m_sign != temp_m_sign) {
19221 temp_casc = prev_casc;
19222 temp_casc.
Mstar = temp_casc.
Mstar + (m_sign * pow(10.0, -xpn));
19223 switch (solver_code) {
19234 if (temp_m == 0.0) {
19235 prev_casc = curr_casc;
19236 curr_casc = temp_casc;
19240 m_sign = temp_m / fabs(temp_m);
19242 prev_casc = curr_casc;
19243 curr_casc = temp_casc;
19264 #ifndef PYNE_IS_AMALGAMATED 19265 #include "enrichment_symbolic.h" 19274 double NP0 = casc.
N;
19276 double Mstar = casc.
Mstar;
19281 double LpF = -1.0, PpF = -1.0, TpF = -1.0,
19282 SWUpF = -1.0, SWUpP = -1.0,
19283 NP_b = -1.0, NP_sqrt_base = -1.0, NP_2a = -1.0,
19284 NP1 = -1.0, NT1 = -1.0;
19285 double * MW =
new double [ncomp];
19286 double * xP =
new double [ncomp];
19287 double * xF =
new double [ncomp];
19288 double * xT =
new double [ncomp];
20299 if (nuc == j || nuc == k)
20302 xF[i] = (*ci).second;
20309 n0 = -2.00000000000000;
20310 n1 = MW[0] - Mstar;
20314 n5 = MW[1] - Mstar;
20315 n6 = MW[2] - Mstar;
20322 n13 = pow(n1, -n0);
20323 n14 = pow(n2, -n0);
20324 n15 = pow(n5, -n0);
20325 n16 = pow(n6, -n0);
20329 n20 = pow(alpha, NP0*n1);
20330 n21 = n11*xF[0] + n9;
20331 n22 = n11*xPj + n9;
20332 n23 = pow(alpha, NP0*n5);
20333 n24 = pow(alpha, NP0*n6);
20339 n30 = pow(alpha, n1*n12);
20340 n31 = pow(n22, -n0);
20350 n41 = log((-1.0 + xPj/xF[0])/n3);
20358 n49 = n17 + n25 + n41 + n7;
20359 n50 = n36*(n49 - log(n48)) + 1;
20360 n51 = pow(alpha, n1*n50);
20361 n52 = pow(alpha, n5*n50);
20362 n53 = pow(alpha, n50*n6);
20363 n54 = n28 - 1 + 1.0/n51;
20364 n55 = n29 - 1 + 1.0/n52;
20365 n56 = n32 - 1 + 1.0/n53;
20372 n63 = n2*n38*xF[1]/n55;
20374 n65 = n46*xF[0]/n54;
20375 n66 = n14*n15*n23*xF[1]/n55;
20377 n68 = n19*n26*n42/n54;
20378 n69 = n20*n5/(n48*n52);
20379 n70 = n20*n6/(n48*n53);
20385 n76 = pow(n21, n8)*n30*n31*pow(n48, n8)/n53;
20386 n77 = pow(n21, n8)*n30*n31*pow(n48, n8)/n52;
20387 n78 = n2*n39*n44*n64 + n2*n39;
20388 n79 = n2*n38 + n2*n44*n69;
20389 n80 = n2*n37 + n2*n44*n70;
20390 n81 = pow(n78, -n0);
20391 n82 = pow(n79, -n0);
20392 n83 = pow(n80, -n0);
20394 n85 = n18*n39*n44*n64 + n18*n39;
20395 n86 = n44*n46*n64 + n46;
20396 n87 = pow(n54, n8)*n78;
20397 n88 = pow(n55, n8)*n79;
20398 n89 = n29*n82*xF[1]/n58;
20399 n90 = n40*pow(n54, n8)*n86;
20400 n91 = -n26*n40*n87;
20401 n92 = n18*n26*n42*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n1*n2*n44/n48 + n2*n39);
20402 n93 = n18*n26*n38*pow(n55, n8)*xF[1]*(pow(alpha, NP0*n1 - n5*n50)*n2*n44*n5/n48 + n2*n38);
20403 n94 = n18*n26*n37*pow(n56, n8)*xF[2]*(pow(alpha, NP0*n1 - n50*n6)*n2*n44*n6/n48 + n2*n37);
20404 n95 = 1.0*n2*n26*n42*n87;
20406 n97 = -0.5*n26*n90;
20409 n100 = n14*n15*n23 + n15*n27*n77 + n35*n44*n69 + n35*n5*n77;
20410 n101 = n16*n27*n76 + n35*n44*n70 + n35*n6*n76 + n45;
20411 n102 = n26*n43*pow(n55, n8)*(pow(alpha, n1*n12 - n5*n50)*n15*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n5*n50)*pow(n21, n8)*n31*n35*pow(n48, n8)*n5 + n14*n15*n23 + n35*n44*n69);
20412 n103 = n26*n33*pow(n56, n8)*xF[2]*(pow(alpha, n1*n12 - n50*n6)*n16*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n50*n6)*pow(n21, n8)*n31*n35*pow(n48, n8)*n6 + n35*n44*n70 + n45);
20413 n104 = n74 + n95 + n97;
20414 n105 = n2*n26*n37*n60 + n26*n33*pow(n56, n8)*n84 + n26*n43*n88 + n26*n63 + n99;
20415 n106 = n102 + n103 + n71 + n72 + n73 + n92 + n93 + n94 + n96;
20416 n107 = n106 + n26*n33*n84*(n18*n37 + n18*n44*n70)/n59 + n26*n43*n79*(n18*n38 + n18*n44*n69)/n58 + n26*n62*n98;
20417 NP_b = -n12*(1.0*n2*n26*n42*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n1*n2*n44/n48 + n2*n39) - 0.5*n26*n40*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n13*n14*n44/n48 + n46) - 1.0*n26*n62*n81 + n74 - 0.5*xTj*(n26*n32*n8*n83*xF[2]/n59 + n26*n33*pow(n56, n8)*xF[2]*(pow(alpha, NP0*n1 - n50*n6)*n35*n44*n6/n48 + pow(alpha, n1*n12 - n50*n6)*n16*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n50*n6)*pow(n21, n8)*n31*n35*pow(n48, n8)*n6 + n45) - n26*n40*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n13*n14*n44/n48 + n46) + n26*n43*pow(n55, n8)*(pow(alpha, NP0*n1 - n5*n50)*n35*n44*n5/n48 + pow(alpha, n1*n12 - n5*n50)*n15*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n5*n50)*pow(n21, n8)*n31*n35*pow(n48, n8)*n5 + n14*n15*n23) + n26*n62*n8*n81 + n26*n8*n89 + n71 + n72 + n73 + n92 + n93 + n94)) - n2*n26*n39*n40*pow(n54, n8)*n75 - n26*xTj*(n2*n37*n60 + n33*pow(n56, n8)*n84 - n40*n87 + n42*n61 + n43*n88 + n63) - n68;
20418 NP_2a = -n26*(n0*n13*n27*n30*n62*pow(n75, -n0) + n0*n47*pow(n54, n8)*n75*xF[0] + n40*n46*pow(n54, n8)*n75 - 1.0*n65 + 1.0*xTj*(n18*n37*pow(n56, n8)*xF[2]*(pow(alpha, NP0*n1 - n50*n6)*n2*n44*n6/n48 + n2*n37) + n18*n38*pow(n55, n8)*xF[1]*(pow(alpha, NP0*n1 - n5*n50)*n2*n44*n5/n48 + n2*n38) + n18*n42*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n1*n2*n44/n48 + n2*n39) + n32*n8*n83*xF[2]/n59 + n33*pow(n56, n8)*xF[2]*(pow(alpha, n1*n12 - n50*n6)*n16*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n50*n6)*pow(n21, n8)*n31*n35*pow(n48, n8)*n6 + n35*n44*n70 + n45) + n43*pow(n55, n8)*(pow(alpha, n1*n12 - n5*n50)*n15*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n5*n50)*pow(n21, n8)*n31*n35*pow(n48, n8)*n5 + n14*n15*n23 + n35*n44*n69) + n45*n60 + n62*n8*n81 + n65 + n66 + n8*n89 - n90));
20419 NP_sqrt_base = (NP0*(n11*(n2*n26*n37*n60 + n26*n33*pow(n56, n8)*xF[2]*(pow(alpha, NP0*n1 - n50*n6)*n2*n44*n6/n48 + n2*n37) - n26*n40*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n1*n2*n44/n48 + n2*n39) + n26*n43*pow(n55, n8)*(pow(alpha, NP0*n1 - n5*n50)*n2*n44*n5/n48 + n2*n38) + n26*n63 + n67) + n99) + n26*n40/n54 + xTj*(n26*n33*n60 - n26*n40/n54 + n26*n43/n55) + pow(NP0, -n0)*(0.5*n107*xTj - 1.0*n2*n26*n42*n87 + 0.5*n26*n62*n78*n85 + 0.5*n26*n90 - 0.5*n71))*(-n0*n11*(n26*n33*pow(n56, n8)*xF[2]*(pow(alpha, NP0*n1 - n50*n6)*n35*n44*n6/n48 + pow(alpha, n1*n12 - n50*n6)*n16*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n50*n6)*pow(n21, n8)*n31*n35*pow(n48, n8)*n6 + n45) + n26*n33*xF[2]*(pow(alpha, NP0*n1 - n50*n6)*n18*n44*n6/n48 + n18*n37)*(pow(alpha, NP0*n1 - n50*n6)*n2*n44*n6/n48 + n2*n37)/n59 - n26*n40*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n13*n14*n44/n48 + n46) + n26*n43*pow(n55, n8)*(pow(alpha, NP0*n1 - n5*n50)*n35*n44*n5/n48 + pow(alpha, n1*n12 - n5*n50)*n15*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n5*n50)*pow(n21, n8)*n31*n35*pow(n48, n8)*n5 + n14*n15*n23) + n26*n43*(pow(alpha, NP0*n1 - n5*n50)*n18*n44*n5/n48 + n18*n38)*(pow(alpha, NP0*n1 - n5*n50)*n2*n44*n5/n48 + n2*n38)/n58 - n26*n62*(pow(alpha, NP0*n1 - n1*n50)*n1*n18*n44/n48 + n18*n39)*(pow(alpha, NP0*n1 - n1*n50)*n1*n2*n44/n48 + n2*n39) + n71 + n72 + n73 + n92 + n93 + n94) - n0*n71 - n0*n96 + 4.0*n2*n26*n42*n87 - 4.0*n26*n62*n81) + pow(-n105*xTj - n12*(1.0*n2*n26*n42*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n1*n2*n44/n48 + n2*n39) - 0.5*n26*n40*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n13*n14*n44/n48 + n46) - 0.5*n26*n62*(pow(alpha, NP0*n1 - n1*n50)*n1*n18*n44/n48 + n18*n39)*(pow(alpha, NP0*n1 - n1*n50)*n1*n2*n44/n48 + n2*n39) + n74 - 0.5*xTj*(n26*n33*pow(n56, n8)*xF[2]*(pow(alpha, NP0*n1 - n50*n6)*n35*n44*n6/n48 + pow(alpha, n1*n12 - n50*n6)*n16*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n50*n6)*pow(n21, n8)*n31*n35*pow(n48, n8)*n6 + n45) + n26*n33*xF[2]*(pow(alpha, NP0*n1 - n50*n6)*n18*n44*n6/n48 + n18*n37)*(pow(alpha, NP0*n1 - n50*n6)*n2*n44*n6/n48 + n2*n37)/n59 - n26*n40*pow(n54, n8)*(pow(alpha, NP0*n1 - n1*n50)*n13*n14*n44/n48 + n46) + n26*n43*pow(n55, n8)*(pow(alpha, NP0*n1 - n5*n50)*n35*n44*n5/n48 + pow(alpha, n1*n12 - n5*n50)*n15*pow(n21, n8)*n27*n31*pow(n48, n8) + pow(alpha, n1*n12 - n5*n50)*pow(n21, n8)*n31*n35*pow(n48, n8)*n5 + n14*n15*n23) + n26*n43*(pow(alpha, NP0*n1 - n5*n50)*n18*n44*n5/n48 + n18*n38)*(pow(alpha, NP0*n1 - n5*n50)*n2*n44*n5/n48 + n2*n38)/n58 - n26*n62*(pow(alpha, NP0*n1 - n1*n50)*n1*n18*n44/n48 + n18*n39)*(pow(alpha, NP0*n1 - n1*n50)*n1*n2*n44/n48 + n2*n39) + n71 + n72 + n73 + n92 + n93 + n94)) - n26*n40*n87 - n68, -n0);
20420 NP_sqrt_base = fabs(NP_sqrt_base);
20421 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
20422 NT1 = n36*(n49 - log(-pow(alpha, NP1*n1)*n44 + 1));
20423 g0 = MW[1] - Mstar;
20424 g1 = MW[0] - Mstar;
20427 g4 = MW[2] - Mstar;
20432 g9 = pow(alpha, -g1);
20433 g10 = pow(alpha, -g0);
20434 g11 = pow(alpha, -g4);
20435 g12 = log(xF[0]/xF[1]);
20437 g14 = pow(alpha, NP1*g0);
20438 g15 = pow(alpha, NP1*g1);
20440 g17 = pow(alpha, NP1*g4);
20452 g29 = pow(alpha, g0*g13) - 1;
20453 g30 = pow(alpha, g0*g13) - 1;
20454 g31 = pow(alpha, g1*g13) - 1;
20455 g32 = pow(alpha, g13*g4) - 1;
20456 g33 = -pow(alpha, g1*g13);
20457 g34 = -pow(alpha, g13*g4);
20458 g35 = g6*g7/(g3*xF[1]);
20462 g39 = pow(alpha, g1*g13) + g25;
20464 g41 = pow(alpha, g13*g4) + g26;
20477 g54 = log(g35*g40/g22);
20478 g55 = log(g35*g36/g21);
20479 g56 = log(g20*g40*g8/g30);
20481 g58 = log(g20*g36*g8/g29);
20483 g60 = -g22*g42*g57 - g27*xF[0] - g27*xF[1] - g27*xF[2] - g30*g42*g59 - g43*g57*(g26 + 1) - g43*g59*(pow(alpha, g13*g4) - 1) - g44*g57*(g25 + 1) - g44*g59*(pow(alpha, g1*g13) - 1);
20484 LpF = xF[0]*(g9 + 1.0)*(g18 + g48*g55 + g53*g58)/(g16*(g9 - 1.0)) + xF[1]*(g10 + 1.0)*(g18 + g49*g55 + g52*g58)/(g16*(g10 - 1.0)) + xF[2]*(g11 + 1.0)*(g18 + g50*g55 + g51*g58)/(g16*(g11 - 1.0));
20489 xP[0] = g19*g31*g47;
20490 xP[1] = g19*g29*g46;
20491 xP[2] = g19*g32*g45;
20492 xT[0] = g23*g28*g47;
20493 xT[1] = g21*g28*g46;
20494 xT[2] = g24*g28*g45;
20497 n0 = -0.500000000000000;
20498 n1 = MW[0] - Mstar;
20502 n5 = MW[1] - Mstar;
20503 n6 = MW[2] - Mstar;
20504 n7 = MW[3] - Mstar;
20513 n16 = pow(n1, -n9);
20514 n17 = pow(n2, -n9);
20515 n18 = pow(n5, -n9);
20516 n19 = pow(n6, -n9);
20517 n20 = pow(n7, -n9);
20520 n23 = pow(alpha, NP0*n1);
20521 n24 = n10 + n12*xTj;
20522 n25 = n10 + n13*xTj;
20523 n26 = pow(alpha, NP0*n5);
20524 n27 = pow(alpha, NP0*n6);
20525 n28 = pow(alpha, NP0*n7);
20530 n33 = pow(alpha, n1*n14);
20531 n34 = pow(n24, -n9);
20532 n35 = pow(n25, -n9);
20547 n50 = log((-1.0 + xPj/xF[0])/n3);
20553 n56 = pow(n55, -n9);
20554 n57 = n21 + n29 + n50 + n8;
20556 n59 = n17*n33*n35/(n34*n56);
20557 n60 = n41*(n57 - log(n55)) + 1;
20558 n61 = pow(alpha, n1*n60);
20559 n62 = pow(alpha, n5*n60);
20560 n63 = pow(alpha, n6*n60);
20561 n64 = pow(alpha, n60*n7);
20565 n68 = n31 - 1 + 1.0/n61;
20566 n69 = n32 - 1 + 1.0/n62;
20567 n70 = n36 - 1 + 1.0/n63;
20568 n71 = n37 - 1 + 1.0/n64;
20569 n72 = pow(n68, -n9);
20570 n73 = pow(n69, -n9);
20571 n74 = pow(n70, -n9);
20572 n75 = pow(n71, -n9);
20582 n85 = n31*xF[0]/n76;
20584 n87 = n2*n48*xF[1]/n69;
20585 n88 = n53*xF[0]/n68;
20586 n89 = n17*n18*n26*xF[1]/n69;
20587 n90 = n12*n30*n46*n82;
20592 n95 = n0*n12*n30*n53/n68;
20593 n96 = n51/(n55*n61) + 1;
20595 n98 = n2*n46*n51/(n55*n61) + n2*n46;
20596 n99 = n2*n48 + n2*n58*n65;
20597 n100 = n2*n43 + n2*n58*n67;
20598 n101 = n2*n45 + n2*n58*n66;
20599 n102 = pow(n98, -n9);
20600 n103 = pow(n99, -n9);
20601 n104 = pow(n100, -n9);
20602 n105 = pow(n101, -n9);
20604 n107 = n22*n46*n51/(n55*n61) + n22*n46;
20606 n109 = n51*n53/(n55*n61) + n53;
20608 n111 = n105*n9/n79;
20609 n112 = n30*n31*n83*n98;
20610 n113 = n12*n2*n30*n46*n9*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)/n72;
20611 n114 = n22*n30*n48*xF[1]*(pow(alpha, NP0*n1 - n5*n60)*n2*n5*n51/n55 + n2*n48)/n73;
20612 n115 = n22*n30*n43*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n2*n51*n6/n55 + n2*n43)/n74;
20613 n116 = n22*n30*n45*xF[3]*(pow(alpha, NP0*n1 - n60*n7)*n2*n51*n7/n55 + n2*n45)/n75;
20614 n117 = 1.0*n108*n30*n46*n83;
20615 n118 = n12*n30*n31*(pow(alpha, NP0*n1 - n1*n60)*n49*n51/n55 + n53)/n72;
20616 n119 = n0*n109*n30*n31*n83;
20617 n120 = n17*n18*n26 - n18*n59/n62 + n33*n35*n42*n65/(n34*n56) + n42*n58*n65;
20618 n121 = -n19*n59/n63 + n33*n35*n42*n67/(n34*n56) + n42*n58*n67 + n52;
20619 n122 = -n30*n47*(-pow(alpha, n1*n14 - n5*n60)*n17*n18*n35/(n34*n56) + pow(alpha, n1*n14 - n5*n60)*n35*n42*n5/(n34*n56) + n17*n18*n26 + n42*n58*n65)/n73;
20620 n123 = n30*n38*xF[2]*(-pow(alpha, n1*n14 - n6*n60)*n17*n19*n35/(n34*n56) + pow(alpha, n1*n14 - n6*n60)*n35*n42*n6/(n34*n56) + n42*n58*n67 + n52)/n74;
20621 n124 = n30*n86*(-pow(alpha, n1*n14 - n60*n7)*n17*n20*n35/(n34*n56) + pow(alpha, n1*n14 - n60*n7)*n35*n42*n7/(n34*n56) + n42*n58*n66 + n54);
20622 n125 = xTj*(n101*n30*n86 + n106*n30*n38/n74 + n12*n30*n31*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)/n72 + n2*n30*n43*n80 + n30*n45*n84 + n30*n46*n82*xF[0] - n30*n47*n99/n73 + n30*n87);
20623 n126 = n112 + n125 + n90;
20624 n127 = n113 + n114 + n115 + n116 + n118 + n122 + n123 + n124 + n91 + n92 + n93 + n94;
20625 n128 = -n101*n30*n44*(n22*n45 + n22*n58*n66)/n79 + n106*n30*n38*(n22*n43 + n22*n58*n67)/n78 + n12*n30*n31*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)*(pow(alpha, NP0*n1 - n1*n60)*n1*n22*n51/n55 + n22*n46)/n76 + n127 - n30*n47*n99*(n22*n48 + n22*n58*n65)/n77;
20626 NP_b = -n14*(n0*n30*n31*n83*(pow(alpha, NP0*n1 - n1*n60)*n49*n51/n55 + n53) + n0*xTj*(n102*n30*n85*n9 + n104*n30*n36*n9*xF[2]/n78 + n110*n30*n47*n9 + n111*n30*n44 + n113 + n114 + n115 + n116 + n118 + n30*n38*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n42*n51*n6/n55 - pow(alpha, n1*n14 - n6*n60)*n17*n19*n35/(n34*n56) + pow(alpha, n1*n14 - n6*n60)*n35*n42*n6/(n34*n56) + n52)/n74 - n30*n47*(pow(alpha, NP0*n1 - n5*n60)*n42*n5*n51/n55 - pow(alpha, n1*n14 - n5*n60)*n17*n18*n35/(n34*n56) + pow(alpha, n1*n14 - n5*n60)*n35*n42*n5/(n34*n56) + n17*n18*n26)/n73 + n30*n86*(pow(alpha, NP0*n1 - n60*n7)*n42*n51*n7/n55 - pow(alpha, n1*n14 - n60*n7)*n17*n20*n35/(n34*n56) + pow(alpha, n1*n14 - n60*n7)*n35*n42*n7/(n34*n56) + n54) + n91 + n92 + n93 + n94) - 1.0*n102*n30*n85 + 1.0*n2*n30*n46*n83*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46) + n95) - n2*n30*n46*n83*n97 - n30*xTj*(n101*n86 + n106*n38/n74 + n12*n31*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)/n72 + n2*n43*n80 + n45*n84 + n46*n82*xF[0] - n47*n99/n73 + n87) - n90;
20627 NP_2a = -n30*(n12*n31*n33*n49*n9*pow(n96, -n9)/n76 - 2.0*n33*n49*n83*n96 + n53*n83*n97 - 1.0*n88 + 1.0*xTj*(n102*n85*n9 + n104*n36*n9*xF[2]/n78 + n110*n47*n9 + n111*n44 + n12*n2*n46*n9*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)/n72 + n12*n31*(pow(alpha, NP0*n1 - n1*n60)*n49*n51/n55 + n53)/n72 + n22*n43*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n2*n51*n6/n55 + n2*n43)/n74 + n22*n45*xF[3]*(pow(alpha, NP0*n1 - n60*n7)*n2*n51*n7/n55 + n2*n45)/n75 + n22*n48*xF[1]*(pow(alpha, NP0*n1 - n5*n60)*n2*n5*n51/n55 + n2*n48)/n73 + n38*xF[2]*(-pow(alpha, n1*n14 - n6*n60)*n17*n19*n35/(n34*n56) + pow(alpha, n1*n14 - n6*n60)*n35*n42*n6/(n34*n56) + n42*n58*n67 + n52)/n74 - n47*(-pow(alpha, n1*n14 - n5*n60)*n17*n18*n35/(n34*n56) + pow(alpha, n1*n14 - n5*n60)*n35*n42*n5/(n34*n56) + n17*n18*n26 + n42*n58*n65)/n73 + n52*n80 + n54*n81 + n86*(-pow(alpha, n1*n14 - n60*n7)*n17*n20*n35/(n34*n56) + pow(alpha, n1*n14 - n60*n7)*n35*n42*n7/(n34*n56) + n42*n58*n66 + n54) + n88 + n89));
20628 NP_sqrt_base = (-NP0*n126 - n12*n30*n31/(n31 - 1 + pow(alpha, -n1*(n41*(n57 - log(n25*n39/(n10 + n15*xF[0]) + 1)) + 1))) - n15*(-n30*n31*xF[0]/n68 - n30*n36*n80 - n30*n44/n71 - n30*n47/n69) - pow(NP0, -n9)*(-n0*n118 - n0*n12*n30*n31*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)*(pow(alpha, NP0*n1 - n1*n60)*n1*n22*n51/n55 + n22*n46)/n76 - n0*n15*(n113 + n114 + n115 + n116 + n118 + n12*n30*n31*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)*(pow(alpha, NP0*n1 - n1*n60)*n1*n22*n51/n55 + n22*n46)/n76 + n30*n38*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n2*n51*n6/n55 + n2*n43)*(pow(alpha, NP0*n1 - n6*n60)*n22*n51*n6/n55 + n22*n43)/n78 + n30*n38*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n42*n51*n6/n55 - pow(alpha, n1*n14 - n6*n60)*n17*n19*n35/(n34*n56) + pow(alpha, n1*n14 - n6*n60)*n35*n42*n6/(n34*n56) + n52)/n74 - n30*n44*(pow(alpha, NP0*n1 - n60*n7)*n2*n51*n7/n55 + n2*n45)*(pow(alpha, NP0*n1 - n60*n7)*n22*n51*n7/n55 + n22*n45)/n79 - n30*n47*(pow(alpha, NP0*n1 - n5*n60)*n2*n5*n51/n55 + n2*n48)*(pow(alpha, NP0*n1 - n5*n60)*n22*n5*n51/n55 + n22*n48)/n77 - n30*n47*(pow(alpha, NP0*n1 - n5*n60)*n42*n5*n51/n55 - pow(alpha, n1*n14 - n5*n60)*n17*n18*n35/(n34*n56) + pow(alpha, n1*n14 - n5*n60)*n35*n42*n5/(n34*n56) + n17*n18*n26)/n73 + n30*n86*(pow(alpha, NP0*n1 - n60*n7)*n42*n51*n7/n55 - pow(alpha, n1*n14 - n60*n7)*n17*n20*n35/(n34*n56) + pow(alpha, n1*n14 - n60*n7)*n35*n42*n7/(n34*n56) + n54) + n91 + n92 + n93 + n94) - n0*n91 + 1.0*n108*n30*n46*n83))*(-4.0*n102*n30*n85 + 4.0*n108*n30*n46*n83 - n118*n9 - n15*n9*(n113 + n114 + n115 + n116 + n118 + n12*n30*n31*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)*(pow(alpha, NP0*n1 - n1*n60)*n1*n22*n51/n55 + n22*n46)/n76 + n30*n38*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n2*n51*n6/n55 + n2*n43)*(pow(alpha, NP0*n1 - n6*n60)*n22*n51*n6/n55 + n22*n43)/n78 + n30*n38*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n42*n51*n6/n55 - pow(alpha, n1*n14 - n6*n60)*n17*n19*n35/(n34*n56) + pow(alpha, n1*n14 - n6*n60)*n35*n42*n6/(n34*n56) + n52)/n74 - n30*n44*(pow(alpha, NP0*n1 - n60*n7)*n2*n51*n7/n55 + n2*n45)*(pow(alpha, NP0*n1 - n60*n7)*n22*n51*n7/n55 + n22*n45)/n79 - n30*n47*(pow(alpha, NP0*n1 - n5*n60)*n2*n5*n51/n55 + n2*n48)*(pow(alpha, NP0*n1 - n5*n60)*n22*n5*n51/n55 + n22*n48)/n77 - n30*n47*(pow(alpha, NP0*n1 - n5*n60)*n42*n5*n51/n55 - pow(alpha, n1*n14 - n5*n60)*n17*n18*n35/(n34*n56) + pow(alpha, n1*n14 - n5*n60)*n35*n42*n5/(n34*n56) + n17*n18*n26)/n73 + n30*n86*(pow(alpha, NP0*n1 - n60*n7)*n42*n51*n7/n55 - pow(alpha, n1*n14 - n60*n7)*n17*n20*n35/(n34*n56) + pow(alpha, n1*n14 - n60*n7)*n35*n42*n7/(n34*n56) + n54) + n91 + n92 + n93 + n94) + 2.0*n91) + pow(-n126 - n14*(n0*n30*n31*n83*(pow(alpha, NP0*n1 - n1*n60)*n49*n51/n55 + n53) + n0*n30*n85*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)*(pow(alpha, NP0*n1 - n1*n60)*n1*n22*n51/n55 + n22*n46) + n0*xTj*(n113 + n114 + n115 + n116 + n118 + n12*n30*n31*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46)*(pow(alpha, NP0*n1 - n1*n60)*n1*n22*n51/n55 + n22*n46)/n76 + n30*n38*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n2*n51*n6/n55 + n2*n43)*(pow(alpha, NP0*n1 - n6*n60)*n22*n51*n6/n55 + n22*n43)/n78 + n30*n38*xF[2]*(pow(alpha, NP0*n1 - n6*n60)*n42*n51*n6/n55 - pow(alpha, n1*n14 - n6*n60)*n17*n19*n35/(n34*n56) + pow(alpha, n1*n14 - n6*n60)*n35*n42*n6/(n34*n56) + n52)/n74 - n30*n44*(pow(alpha, NP0*n1 - n60*n7)*n2*n51*n7/n55 + n2*n45)*(pow(alpha, NP0*n1 - n60*n7)*n22*n51*n7/n55 + n22*n45)/n79 - n30*n47*(pow(alpha, NP0*n1 - n5*n60)*n2*n5*n51/n55 + n2*n48)*(pow(alpha, NP0*n1 - n5*n60)*n22*n5*n51/n55 + n22*n48)/n77 - n30*n47*(pow(alpha, NP0*n1 - n5*n60)*n42*n5*n51/n55 - pow(alpha, n1*n14 - n5*n60)*n17*n18*n35/(n34*n56) + pow(alpha, n1*n14 - n5*n60)*n35*n42*n5/(n34*n56) + n17*n18*n26)/n73 + n30*n86*(pow(alpha, NP0*n1 - n60*n7)*n42*n51*n7/n55 - pow(alpha, n1*n14 - n60*n7)*n17*n20*n35/(n34*n56) + pow(alpha, n1*n14 - n60*n7)*n35*n42*n7/(n34*n56) + n54) + n91 + n92 + n93 + n94) + 1.0*n2*n30*n46*n83*(pow(alpha, NP0*n1 - n1*n60)*n1*n2*n51/n55 + n2*n46) + n95), -n9);
20629 NP_sqrt_base = fabs(NP_sqrt_base);
20630 NP1 = (-NP_b - pow(NP_sqrt_base, -n0))/NP_2a;
20631 NT1 = n41*(n57 - log(-pow(alpha, NP1*n1)*n51 + 1));
20632 g0 = MW[1] - Mstar;
20633 g1 = MW[0] - Mstar;
20636 g4 = MW[2] - Mstar;
20637 g5 = MW[3] - Mstar;
20642 g10 = pow(alpha, -g1);
20643 g11 = pow(alpha, -g0);
20644 g12 = pow(alpha, -g4);
20645 g13 = pow(alpha, -g5);
20646 g14 = log(xF[0]/xF[1]);
20648 g16 = pow(alpha, NP1*g0);
20649 g17 = pow(alpha, NP1*g1);
20651 g19 = pow(alpha, NP1*g4);
20652 g20 = pow(alpha, NP1*g5);
20666 g34 = pow(alpha, g0*g15) - 1;
20667 g35 = pow(alpha, g0*g15) - 1;
20668 g36 = pow(alpha, g1*g15) - 1;
20669 g37 = pow(alpha, g15*g4) - 1;
20670 g38 = pow(alpha, g15*g5) - 1;
20671 g39 = -pow(alpha, g1*g15);
20672 g40 = -pow(alpha, g15*g4);
20673 g41 = -pow(alpha, g15*g5);
20674 g42 = g7*g8/(g3*xF[1]);
20679 g47 = pow(alpha, g1*g15) + g29;
20681 g49 = pow(alpha, g15*g4) + g30;
20682 g50 = pow(alpha, g15*g5) + g31;
20699 g67 = log(g42*g48/g25);
20700 g68 = log(g42*g43/g24);
20701 g69 = log(g23*g48*g9/g35);
20703 g71 = log(g23*g43*g9/g34);
20705 g73 = -g25*g52*g70 - g32*xF[0] - g32*xF[1] - g32*xF[2] - g32*xF[3] - g35*g52*g72 - g51*g70*(g29 + 1) - g51*g72*(pow(alpha, g1*g15) - 1) - g53*g70*(g31 + 1) - g53*g72*(pow(alpha, g15*g5) - 1) - g54*g70*(g30 + 1) - g54*g72*(pow(alpha, g15*g4) - 1);
20706 LpF = xF[0]*(g10 + 1.0)*(g21 + g59*g68 + g65*g71)/(g18*(g10 - 1.0)) + xF[1]*(g11 + 1.0)*(g21 + g61*g68 + g63*g71)/(g18*(g11 - 1.0)) + xF[2]*(g12 + 1.0)*(g21 + g62*g68 + g64*g71)/(g18*(g12 - 1.0)) + xF[3]*(g13 + 1.0)*(g21 + g60*g68 + g66*g71)/(g18*(g13 - 1.0));
20711 xP[0] = g22*g36*g56;
20712 xP[1] = g22*g34*g55;
20713 xP[2] = g22*g37*g58;
20714 xP[3] = g22*g38*g57;
20715 xT[0] = g26*g33*g56;
20716 xT[1] = g24*g33*g55;
20717 xT[2] = g27*g33*g58;
20718 xT[3] = g28*g33*g57;
20721 n0 = MW[0] - Mstar;
20725 n4 = MW[1] - Mstar;
20726 n5 = MW[2] - Mstar;
20727 n6 = MW[3] - Mstar;
20728 n7 = MW[4] - Mstar;
20744 n23 = pow(alpha, NP0*n0);
20745 n24 = n13*xTj + n9;
20746 n25 = n12*xTj + n9;
20747 n26 = pow(alpha, NP0*n4);
20748 n27 = pow(alpha, NP0*n5);
20749 n28 = pow(alpha, NP0*n6);
20750 n29 = pow(alpha, NP0*n7);
20755 n34 = pow(alpha, n0*n11);
20772 n51 = log((-1.0 + xPj/xF[0])/n2);
20782 n61 = n21 + n30 + n51 + n8;
20784 n63 = n16*n34*n36/(n35*n60);
20785 n64 = n43*(n61 - log(n59)) + 1;
20786 n65 = pow(alpha, n0*n64);
20787 n66 = pow(alpha, n4*n64);
20788 n67 = pow(alpha, n5*n64);
20789 n68 = pow(alpha, n6*n64);
20790 n69 = pow(alpha, n64*n7);
20795 n74 = n32 - 1 + 1.0/n65;
20796 n75 = n33 - 1 + 1.0/n66;
20797 n76 = n37 - 1 + 1.0/n67;
20798 n77 = n38 - 1 + 1.0/n68;
20799 n78 = n39 - 1 + 1.0/n69;
20817 n96 = n32*xF[0]/n84;
20818 n97 = n41*xF[3]/n82;
20819 n98 = n1*n49*xF[1]/n75;
20820 n99 = n57*xF[0]/n74;
20821 n100 = n16*n17*n26*xF[1]/n75;
20822 n101 = n31*n48*n92*xF[0];
20823 n102 = n13*n31*n48*n92;
20826 n105 = n31*n55*n89;
20827 n106 = n31*n58*n91;
20828 n107 = n31*n56*n90;
20830 n109 = n54/(n59*n65) + 1;
20832 n111 = n1*n48*n54/(n59*n65) + n1*n48;
20833 n112 = n1*n49 + n1*n62*n70;
20834 n113 = n1*n45 + n1*n62*n73;
20835 n114 = n1*n46 + n1*n62*n72;
20836 n115 = n1*n47 + n1*n62*n71;
20837 n116 = pow(n111, 2);
20838 n117 = pow(n112, 2);
20839 n118 = pow(n113, 2);
20840 n119 = pow(n114, 2);
20841 n120 = pow(n115, 2);
20844 n123 = n22*n48*n54/(n59*n65) + n22*n48;
20847 n126 = n54*n57/(n59*n65) + n57;
20853 n132 = 2*n118*xF[2]/n86;
20854 n133 = -2*n119*n38*xF[3]/n87;
20855 n134 = n13*n31*n32*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48)/n79;
20856 n135 = n22*n31*n48*n93*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48);
20857 n136 = n22*n31*n49*xF[1]*(pow(alpha, NP0*n0 - n4*n64)*n1*n4*n54/n59 + n1*n49)/n80;
20858 n137 = n22*n31*n45*xF[2]*(pow(alpha, NP0*n0 - n5*n64)*n1*n5*n54/n59 + n1*n45)/n81;
20859 n138 = n22*n31*n46*xF[3]*(pow(alpha, NP0*n0 - n6*n64)*n1*n54*n6/n59 + n1*n46)/n82;
20860 n139 = n22*n31*n47*xF[4]*(pow(alpha, NP0*n0 - n64*n7)*n1*n54*n7/n59 + n1*n47)/n83;
20861 n140 = 1.0*n124*n31*n48*n93;
20862 n141 = n13*n31*n32*(pow(alpha, NP0*n0 - n0*n64)*n50*n54/n59 + n57)/n79;
20863 n142 = -0.5*n126*n31*n32*n93;
20864 n143 = n101 + n134;
20865 n144 = n16*n17*n26 - n17*n63/n66 + n34*n36*n44*n70/(n35*n60) + n44*n62*n70;
20866 n145 = -n18*n63/n67 + n34*n36*n44*n73/(n35*n60) + n44*n62*n73 + n55;
20867 n146 = -n20*n63/n69 + n34*n36*n44*n71/(n35*n60) + n44*n62*n71 + n56;
20868 n147 = n31*n52*(-pow(alpha, n0*n11 - n4*n64)*n16*n17*n36/(n35*n60) + pow(alpha, n0*n11 - n4*n64)*n36*n4*n44/(n35*n60) + n16*n17*n26 + n44*n62*n70)/n80;
20869 n148 = n31*n40*xF[2]*(-pow(alpha, n0*n11 - n5*n64)*n16*n18*n36/(n35*n60) + pow(alpha, n0*n11 - n5*n64)*n36*n44*n5/(n35*n60) + n44*n62*n73 + n55)/n81;
20870 n149 = n31*n97*(-pow(alpha, n0*n11 - n6*n64)*n16*n19*n36/(n35*n60) + pow(alpha, n0*n11 - n6*n64)*n36*n44*n6/(n35*n60) + n44*n62*n72 + n58);
20871 n150 = n31*n53*(-pow(alpha, n0*n11 - n64*n7)*n16*n20*n36/(n35*n60) + pow(alpha, n0*n11 - n64*n7)*n36*n44*n7/(n35*n60) + n44*n62*n71 + n56)/n83;
20872 n151 = n108 + n140 + n142;
20873 n152 = n1*n31*n45*n89 + n1*n31*n47*n90 + n114*n31*n97 + n121*n31*n40/n81 + n128*n31/n83 + n129*n31*n52 + n143 + n31*n46*n94 + n31*n98;
20875 n154 = n103 + n104 + n105 + n106 + n107 + n135 + n136 + n137 + n138 + n139 + n141 + n147 + n148 + n149 + n150;
20876 n155 = n112*n31*n52*(n22*n49 + n22*n62*n70)/n85 + n121*n31*n40*(n22*n45 + n22*n62*n73)/n86 + n122*n31*n41*(n22*n46 + n22*n62*n72)/n87 + n128*n31*(n22*n47 + n22*n62*n71)/n88 + n13*n31*n32*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48)*(pow(alpha, NP0*n0 - n0*n64)*n0*n22*n54/n59 + n22*n48)/n84 + n154;
20878 n157 = -0.5*n111*n123*n31*n96 + n151 - 0.5*n156;
20879 NP_b = -n1*n110*n31*n48*n93 - n102 - n11*(1.0*n1*n31*n48*n93*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48) + n108 - 1.0*n116*n31*n96 - 0.5*n31*n32*n93*(pow(alpha, NP0*n0 - n0*n64)*n50*n54/n59 + n57) - 0.5*xTj*(n103 + n104 + n105 + n106 + n107 + n125*n31*n96 - n130*n31*n39*xF[4] - n131*n31*n33*xF[1] - n132*n31*n37 + n133*n31 + n135 + n136 + n137 + n138 + n139 + n141 + n31*n40*xF[2]*(pow(alpha, NP0*n0 - n5*n64)*n44*n5*n54/n59 - pow(alpha, n0*n11 - n5*n64)*n16*n18*n36/(n35*n60) + pow(alpha, n0*n11 - n5*n64)*n36*n44*n5/(n35*n60) + n55)/n81 + n31*n52*(pow(alpha, NP0*n0 - n4*n64)*n4*n44*n54/n59 - pow(alpha, n0*n11 - n4*n64)*n16*n17*n36/(n35*n60) + pow(alpha, n0*n11 - n4*n64)*n36*n4*n44/(n35*n60) + n16*n17*n26)/n80 + n31*n53*(pow(alpha, NP0*n0 - n64*n7)*n44*n54*n7/n59 - pow(alpha, n0*n11 - n64*n7)*n16*n20*n36/(n35*n60) + pow(alpha, n0*n11 - n64*n7)*n36*n44*n7/(n35*n60) + n56)/n83 + n31*n97*(pow(alpha, NP0*n0 - n6*n64)*n44*n54*n6/n59 - pow(alpha, n0*n11 - n6*n64)*n16*n19*n36/(n35*n60) + pow(alpha, n0*n11 - n6*n64)*n36*n44*n6/(n35*n60) + n58))) - n31*xTj*(n1*n45*n89 + n1*n47*n90 + n114*n97 + n121*n40/n81 + n128/n83 + n129*n52 + n13*n32*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48)/n79 + n46*n94 + n48*n92*xF[0] + n98);
20880 NP_2a = -n31*(2*pow(n109, 2)*n34*n50*n96 - 2.0*n109*n34*n50*n93 + n110*n57*n93 - 1.0*n99 + 1.0*xTj*(n100 + n125*n96 + n13*n32*(pow(alpha, NP0*n0 - n0*n64)*n50*n54/n59 + n57)/n79 - n130*n39*xF[4] - n131*n33*xF[1] - n132*n37 + n133 + n22*n45*xF[2]*(pow(alpha, NP0*n0 - n5*n64)*n1*n5*n54/n59 + n1*n45)/n81 + n22*n46*xF[3]*(pow(alpha, NP0*n0 - n6*n64)*n1*n54*n6/n59 + n1*n46)/n82 + n22*n47*xF[4]*(pow(alpha, NP0*n0 - n64*n7)*n1*n54*n7/n59 + n1*n47)/n83 + n22*n48*n93*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48) + n22*n49*xF[1]*(pow(alpha, NP0*n0 - n4*n64)*n1*n4*n54/n59 + n1*n49)/n80 + n40*xF[2]*(-pow(alpha, n0*n11 - n5*n64)*n16*n18*n36/(n35*n60) + pow(alpha, n0*n11 - n5*n64)*n36*n44*n5/(n35*n60) + n44*n62*n73 + n55)/n81 + n52*(-pow(alpha, n0*n11 - n4*n64)*n16*n17*n36/(n35*n60) + pow(alpha, n0*n11 - n4*n64)*n36*n4*n44/(n35*n60) + n16*n17*n26 + n44*n62*n70)/n80 + n53*(-pow(alpha, n0*n11 - n64*n7)*n16*n20*n36/(n35*n60) + pow(alpha, n0*n11 - n64*n7)*n36*n44*n7/(n35*n60) + n44*n62*n71 + n56)/n83 + n55*n89 + n56*n90 + n58*n91 + n97*(-pow(alpha, n0*n11 - n6*n64)*n16*n19*n36/(n35*n60) + pow(alpha, n0*n11 - n6*n64)*n36*n44*n6/(n35*n60) + n44*n62*n72 + n58) + n99));
20881 NP_sqrt_base = pow(-n102 - n11*(1.0*n1*n31*n48*n93*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48) + n108 - 0.5*n31*n32*n93*(pow(alpha, NP0*n0 - n0*n64)*n50*n54/n59 + n57) - 0.5*n31*n96*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48)*(pow(alpha, NP0*n0 - n0*n64)*n0*n22*n54/n59 + n22*n48) - 0.5*xTj*(n103 + n104 + n105 + n106 + n107 + n13*n31*n32*(pow(alpha, NP0*n0 - n0*n64)*n0*n1*n54/n59 + n1*n48)*(pow(alpha, NP0*n0 - n0*n64)*n0*n22*n54/n59 + n22*n48)/n84 + n135 + n136 + n137 + n138 + n139 + n141 + n31*n40*xF[2]*(pow(alpha, NP0*n0 - n5*n64)*n1*n5*n54/n59 + n1*n45)*(pow(alpha, NP0*n0 - n5*n64)*n22*n5*n54/n59 + n22*n45)/n86 + n31*n40*xF[2]*(pow(alpha, NP0*n0 - n5*n64)*n44*n5*n54/n59 - pow(alpha, n0*n11 - n5*n64)*n16*n18*n36/(n35*n60) + pow(alpha, n0*n11 - n5*n64)*n36*n44*n5/(n35*n60) + n55)/n81 + n31*n41*xF[3]*(pow(alpha, NP0*n0 - n6*n64)*n1*n54*n6/n59 + n1*n46)*(pow(alpha, NP0*n0 - n6*n64)*n22*n54*n6/n59 + n22*n46)/n87 + n31*n52*(pow(alpha, NP0*n0 - n4*n64)*n1*n4*n54/n59 + n1*n49)*(pow(alpha, NP0*n0 - n4*n64)*n22*n4*n54/n59 + n22*n49)/n85 + n31*n52*(pow(alpha, NP0*n0 - n4*n64)*n4*n44*n54/n59 - pow(alpha, n0*n11 - n4*n64)*n16*n17*n36/(n35*n60) + pow(alpha, n0*n11 - n4*n64)*n36*n4*n44/(n35*n60) + n16*n17*n26)/n80 + n31*n53*(pow(alpha, NP0*n0 - n64*n7)*n1*n54*n7/n59 + n1*n47)*(pow(alpha, NP0*n0 - n64*n7)*n22*n54*n7/n59 + n22*n47)/n88 + n31*n53*(pow(alpha, NP0*n0 - n64*n7)*n44*n54*n7/n59 - pow(alpha, n0*n11 - n64*n7)*n16*n20*n36/(n35*n60) + pow(alpha, n0*n11 - n64*n7)*n36*n44*n7/(n35*n60) + n56)/n83 + n31*n97*(pow(alpha, NP0*n0 - n6*n64)*n44*n54*n6/n59 - pow(alpha, n0*n11 - n6*n64)*n16*n19*n36/(n35*n60) + pow(alpha, n0*n11 - n6*n64)*n36*n44*n6/(n35*n60) + n58))) - n127*n31*n93 - n153, 2) + (-pow(NP0, 2)*n157 + NP0*(n14*(n1*n31*n45*n89 + n1*n31*n47*n90 + n143 + n31*n40*xF[2]*(pow(alpha, NP0*n0 - n5*n64)*n1*n5*n54/n59 + n1*n45)/n81 + n31*n46*n94 + n31*n52*(pow(alpha, NP0*n0 - n4*n64)*n1*n4*n54/n59 + n1*n49)/n80 + n31*n53*(pow(alpha, NP0*n0 - n64*n7)*n1*n54*n7/n59 + n1*n47)/n83 + n31*n97*(pow(alpha, NP0*n0 - n6*n64)*n1*n54*n6/n59 + n1*n46) + n31*n98) + n143) + n31*n95*xF[0] + xTj*(n13*n31*n95 + n31*n40*n89 + n31*n41*n91 + n31*n52/n75 + n31*n53/n78))*(2.0*n103 - 4.0*n116*n31*n96 + 4.0*n124*n31*n48*n93 - 2.0*n126*n31*n32*n93 - 2.0*n156);
20882 NP_sqrt_base = fabs(NP_sqrt_base);
20883 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
20884 NT1 = n43*(n61 - log(-pow(alpha, NP1*n0)*n54 + 1));
20885 g0 = MW[1] - Mstar;
20886 g1 = MW[0] - Mstar;
20889 g4 = MW[2] - Mstar;
20890 g5 = MW[3] - Mstar;
20891 g6 = MW[4] - Mstar;
20899 g14 = pow(alpha, -g1);
20900 g15 = pow(alpha, -g0);
20901 g16 = pow(alpha, -g4);
20902 g17 = pow(alpha, -g5);
20903 g18 = pow(alpha, -g6);
20904 g19 = log(xF[0]/xF[1]);
20906 g21 = pow(alpha, NP1*g0);
20907 g22 = pow(alpha, NP1*g1);
20909 g24 = pow(alpha, NP1*g4);
20910 g25 = pow(alpha, NP1*g5);
20911 g26 = pow(alpha, NP1*g6);
20932 g47 = pow(alpha, g0*g20) - 1;
20933 g48 = pow(alpha, g0*g20) - 1;
20934 g49 = pow(alpha, g1*g20) - 1;
20935 g50 = pow(alpha, g20*g4) - 1;
20936 g51 = pow(alpha, g20*g5) - 1;
20937 g52 = pow(alpha, g20*g6) - 1;
20938 g53 = -pow(alpha, g1*g20);
20939 g54 = -pow(alpha, g20*g4);
20940 g55 = -pow(alpha, g20*g5);
20941 g56 = -pow(alpha, g20*g6);
20942 g57 = g8*g9/(g3*xF[1]);
20948 g63 = pow(alpha, g1*g20) + g36;
20950 g65 = pow(alpha, g20*g4) + g37;
20951 g66 = pow(alpha, g20*g5) + g38;
20952 g67 = pow(alpha, g20*g6) + g39;
20979 g94 = log(g57*g64/g31);
20980 g95 = log(g57*g58/g30);
20981 g96 = log(g13*g29*g64/g48);
20983 g98 = log(g13*g29*g58/g47);
20985 g100 = g42 + g43 + g44 + g45 + g46;
20996 LpF = xF[0]*(g14 + 1.0)*(g102 + g110 + g27)/(g23*(g14 - 1.0)) + xF[1]*(g15 + 1.0)*(g104 + g109 + g27)/(g23*(g15 - 1.0)) + xF[2]*(g16 + 1.0)*(g103 + g106 + g27)/(g23*(g16 - 1.0)) + xF[3]*(g17 + 1.0)*(g105 + g107 + g27)/(g23*(g17 - 1.0)) + xF[4]*(g18 + 1.0)*(g101 + g108 + g27)/(g23*(g18 - 1.0));
20999 SWUpF = -g10*g94*(g39 + 1)/g67 - g10*g96*(pow(alpha, g20*g6) - 1)/g67 - g100 - g11*g94*(g38 + 1)/g66 - g11*g96*(pow(alpha, g20*g5) - 1)/g66 - g12*g94*(g36 + 1)/g63 - g12*g96*(pow(alpha, g1*g20) - 1)/g63 - g31*g68*g97 - g48*g68*g99 - g69*g97*(g37 + 1) - g69*g99*(pow(alpha, g20*g4) - 1);
21000 SWUpP = -g28*(g10*g101 + g10*g108 + g100 + g105*g11 + g107*g11 + g30*g77*g95 + g32*g75*g95 + g33*g76*g95 + g47*g77*g98 + g49*g75*g98 + g50*g76*g98);
21004 xP[3] = g28*g51*g71;
21005 xP[4] = g28*g52*g74;
21009 xT[3] = g34*g41*g71;
21010 xT[4] = g35*g41*g74;
21013 n0 = MW[0] - Mstar;
21017 n4 = MW[1] - Mstar;
21018 n5 = MW[2] - Mstar;
21019 n6 = MW[3] - Mstar;
21020 n7 = MW[4] - Mstar;
21021 n8 = MW[5] - Mstar;
21040 n27 = pow(alpha, NP0*n0);
21041 n28 = n10 + n12*xTj;
21042 n29 = n10 + n13*xPj;
21043 n30 = pow(alpha, NP0*n4);
21044 n31 = pow(alpha, NP0*n5);
21045 n32 = pow(alpha, NP0*n6);
21046 n33 = pow(alpha, NP0*n7);
21047 n34 = pow(alpha, NP0*n8);
21052 n39 = pow(alpha, n0*n15);
21071 n58 = log((-1.0 + xPj/xF[0])/n2);
21084 n71 = n24 + n35 + n58 + n9;
21086 n73 = n18*n39*n41/(n40*n70);
21087 n74 = n47*(n71 - log(n69)) + 1;
21088 n75 = pow(alpha, n0*n74);
21089 n76 = pow(alpha, n4*n74);
21090 n77 = pow(alpha, n5*n74);
21091 n78 = pow(alpha, n6*n74);
21092 n79 = pow(alpha, n7*n74);
21093 n80 = pow(alpha, n74*n8);
21099 n86 = n37 - 1 + 1.0/n75;
21100 n87 = n38 - 1 + 1.0/n76;
21101 n88 = n42 - 1 + 1.0/n77;
21102 n89 = n43 - 1 + 1.0/n78;
21103 n90 = n44 - 1 + 1.0/n79;
21104 n91 = n45 - 1 + 1.0/n80;
21113 n100 = pow(n88, 3);
21114 n101 = pow(n89, 3);
21115 n102 = pow(n90, 3);
21116 n103 = pow(n91, 3);
21125 n112 = -n43*xF[3]/n95;
21126 n113 = n1*n54*xF[5]/n91;
21128 n115 = n18*n23*n34*xF[5]/n91;
21129 n116 = n109*n12*n36*n53;
21130 n117 = n114*n36*xF[0];
21131 n118 = n104*n36*n67;
21132 n119 = n106*n36*n63;
21133 n120 = n107*n36*n66;
21134 n121 = n105*n36*n64;
21136 n123 = n114*n16*n36;
21137 n124 = n62/(n69*n75) + 1;
21138 n125 = n1*n53*n62/(n69*n75) + n1*n53;
21139 n126 = n1*n51 + n1*n72*n81;
21140 n127 = n1*n56 + n1*n72*n85;
21141 n128 = n1*n50 + n1*n72*n83;
21142 n129 = n1*n52 + n1*n72*n82;
21143 n130 = n1*n54 + n1*n72*n84;
21144 n131 = pow(n125, 2);
21145 n132 = pow(n126, 2);
21146 n133 = pow(n127, 2);
21147 n134 = pow(n128, 2);
21148 n135 = pow(n129, 2);
21149 n136 = pow(n130, 2);
21151 n138 = n25*n53*n62/(n69*n75) + n25*n53;
21153 n140 = n62*n65/(n69*n75) + n65;
21155 n142 = n124*n37*xF[0]/n92;
21159 n146 = n129*xF[4]/n96;
21160 n147 = n125*xF[0]/n92;
21161 n148 = 2*n136/n103;
21162 n149 = 2*n135/n102;
21164 n151 = -2*n133/n100;
21165 n152 = -2*n134*n43*xF[3]/n101;
21166 n153 = n140*n37/n92;
21167 n154 = n147*n36*n37;
21168 n155 = n25*n36*n53*xF[0]*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)/n92;
21169 n156 = n25*n36*n51*xF[1]*(pow(alpha, NP0*n0 - n4*n74)*n1*n4*n62/n69 + n1*n51)/n93;
21170 n157 = n25*n36*n59*(pow(alpha, NP0*n0 - n5*n74)*n1*n5*n62/n69 + n1*n56)/n94;
21171 n158 = n25*n36*n50*xF[3]*(pow(alpha, NP0*n0 - n6*n74)*n1*n6*n62/n69 + n1*n50)/n95;
21172 n159 = n25*n36*n52*xF[4]*(pow(alpha, NP0*n0 - n7*n74)*n1*n62*n7/n69 + n1*n52)/n96;
21173 n160 = n25*n36*n54*xF[5]*(pow(alpha, NP0*n0 - n74*n8)*n1*n62*n8/n69 + n1*n54)/n97;
21174 n161 = 1.0*n1*n147*n36*n53;
21175 n162 = n12*n36*n37*(pow(alpha, NP0*n0 - n0*n74)*n57*n62/n69 + n65)/n92;
21176 n163 = -0.5*n153*n36*xF[0];
21178 n165 = -n19*n73/n76 + n39*n41*n48*n81/(n40*n70) + n48*n72*n81 + n67;
21179 n166 = -n20*n73/n77 + n39*n41*n48*n85/(n40*n70) + n48*n72*n85 + n63;
21180 n167 = -n22*n73/n79 + n39*n41*n48*n82/(n40*n70) + n48*n72*n82 + n64;
21181 n168 = n18*n23*n34 - n23*n73/n80 + n39*n41*n48*n84/(n40*n70) + n48*n72*n84;
21182 n169 = n36*n61*(-pow(alpha, n0*n15 - n4*n74)*n18*n19*n41/(n40*n70) + pow(alpha, n0*n15 - n4*n74)*n4*n41*n48/(n40*n70) + n48*n72*n81 + n67)/n93;
21183 n170 = -n36*n55*(-pow(alpha, n0*n15 - n5*n74)*n18*n20*n41/(n40*n70) + pow(alpha, n0*n15 - n5*n74)*n41*n48*n5/(n40*n70) + n48*n72*n85 + n63)/n94;
21184 n171 = n112*n36*(-pow(alpha, n0*n15 - n6*n74)*n18*n21*n41/(n40*n70) + pow(alpha, n0*n15 - n6*n74)*n41*n48*n6/(n40*n70) + n48*n72*n83 + n66);
21185 n172 = n36*n60*(-pow(alpha, n0*n15 - n7*n74)*n18*n22*n41/(n40*n70) + pow(alpha, n0*n15 - n7*n74)*n41*n48*n7/(n40*n70) + n48*n72*n82 + n64)/n96;
21186 n173 = n68*(-pow(alpha, n0*n15 - n74*n8)*n18*n23*n41/(n40*n70) + pow(alpha, n0*n15 - n74*n8)*n41*n48*n8/(n40*n70) + n18*n23*n34 + n48*n72*n84)/n97;
21187 n174 = n123 + n161 + n163;
21188 n175 = xTj*(n1*n104*n36*n51 + n1*n105*n36*n52 + n108*n36*n59 + n109*n36*n53*xF[0] + n110*n36*n50 + n112*n128*n36 + n113*n36 + n12*n36*n37*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)/n92 + n141*n36/n96 + n143*n68 - n144*n36*n55 + n145*n36*n61);
21189 n176 = n116 + n154 + n175;
21190 n177 = n117 + n118 + n119 + n120 + n121 + n122 + n155 + n156 + n157 + n158 + n159 + n160 + n162 + n169 + n170 + n171 + n172 + n173;
21191 n178 = n111*n12*n36*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)*(pow(alpha, NP0*n0 - n0*n74)*n0*n25*n62/n69 + n25*n53) + n126*n36*n61*(n25*n51 + n25*n72*n81)/n99 + n177 + n130*n68*(n25*n54 + n25*n72*n84)/n103 + n141*n36*(n25*n52 + n25*n72*n82)/n102 - n137*n36*n43*(n25*n50 + n25*n72*n83)/n101 - n127*n36*n55*(n25*n56 + n25*n72*n85)/n100;
21192 NP_b = -n1*n142*n36*n53 - n116 - n15*(1.0*n1*n36*n53*xF[0]*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)/n92 + n111*n131*n26*n36 + n123 - 0.5*n36*n37*xF[0]*(pow(alpha, NP0*n0 - n0*n74)*n57*n62/n69 + n65)/n92 - 0.5*xTj*(-n111*n139*n36*xF[0] + n112*n36*(pow(alpha, NP0*n0 - n6*n74)*n48*n6*n62/n69 - pow(alpha, n0*n15 - n6*n74)*n18*n21*n41/(n40*n70) + pow(alpha, n0*n15 - n6*n74)*n41*n48*n6/(n40*n70) + n66) + n117 + n118 + n119 + n120 + n121 + n122 - n148*n36*n49 - n149*n36*n44*xF[4] - n150*n36*n38*xF[1] + n151*n36*n55 + n152*n36 + n155 + n156 + n157 + n158 + n159 + n160 + n162 - n36*n55*(pow(alpha, NP0*n0 - n5*n74)*n48*n5*n62/n69 - pow(alpha, n0*n15 - n5*n74)*n18*n20*n41/(n40*n70) + pow(alpha, n0*n15 - n5*n74)*n41*n48*n5/(n40*n70) + n63)/n94 + n36*n60*(pow(alpha, NP0*n0 - n7*n74)*n48*n62*n7/n69 - pow(alpha, n0*n15 - n7*n74)*n18*n22*n41/(n40*n70) + pow(alpha, n0*n15 - n7*n74)*n41*n48*n7/(n40*n70) + n64)/n96 + n36*n61*(pow(alpha, NP0*n0 - n4*n74)*n4*n48*n62/n69 - pow(alpha, n0*n15 - n4*n74)*n18*n19*n41/(n40*n70) + pow(alpha, n0*n15 - n4*n74)*n4*n41*n48/(n40*n70) + n67)/n93 + n68*(pow(alpha, NP0*n0 - n74*n8)*n48*n62*n8/n69 - pow(alpha, n0*n15 - n74*n8)*n18*n23*n41/(n40*n70) + pow(alpha, n0*n15 - n74*n8)*n41*n48*n8/(n40*n70) + n18*n23*n34)/n97)) - n36*xTj*(n1*n104*n51 + n1*n105*n52 + n108*n59 + n109*n53*xF[0] + n110*n50 + n112*n128 + n113 + n12*n37*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)/n92 + n141/n96 - n143*n49 - n144*n55 + n145*n61);
21193 NP_2a = -n36*(2*n111*pow(n124, 2)*n39*n57*xF[0] + n114*n26 - 2.0*n124*n39*n57*xF[0]/n92 + n142*n65 + 1.0*xTj*(n104*n67 + n105*n64 + n106*n63 + n107*n66 - n111*n139*xF[0] + n112*(-pow(alpha, n0*n15 - n6*n74)*n18*n21*n41/(n40*n70) + pow(alpha, n0*n15 - n6*n74)*n41*n48*n6/(n40*n70) + n48*n72*n83 + n66) + n114*xF[0] + n115 + n12*n37*(pow(alpha, NP0*n0 - n0*n74)*n57*n62/n69 + n65)/n92 - n148*n49 - n149*n44*xF[4] - n150*n38*xF[1] + n151*n55 + n152 + n25*n50*xF[3]*(pow(alpha, NP0*n0 - n6*n74)*n1*n6*n62/n69 + n1*n50)/n95 + n25*n51*xF[1]*(pow(alpha, NP0*n0 - n4*n74)*n1*n4*n62/n69 + n1*n51)/n93 + n25*n52*xF[4]*(pow(alpha, NP0*n0 - n7*n74)*n1*n62*n7/n69 + n1*n52)/n96 + n25*n53*xF[0]*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)/n92 + n25*n54*xF[5]*(pow(alpha, NP0*n0 - n74*n8)*n1*n62*n8/n69 + n1*n54)/n97 + n25*n59*(pow(alpha, NP0*n0 - n5*n74)*n1*n5*n62/n69 + n1*n56)/n94 - n49*(-pow(alpha, n0*n15 - n74*n8)*n18*n23*n41/(n40*n70) + pow(alpha, n0*n15 - n74*n8)*n41*n48*n8/(n40*n70) + n18*n23*n34 + n48*n72*n84)/n97 - n55*(-pow(alpha, n0*n15 - n5*n74)*n18*n20*n41/(n40*n70) + pow(alpha, n0*n15 - n5*n74)*n41*n48*n5/(n40*n70) + n48*n72*n85 + n63)/n94 + n60*(-pow(alpha, n0*n15 - n7*n74)*n18*n22*n41/(n40*n70) + pow(alpha, n0*n15 - n7*n74)*n41*n48*n7/(n40*n70) + n48*n72*n82 + n64)/n96 + n61*(-pow(alpha, n0*n15 - n4*n74)*n18*n19*n41/(n40*n70) + pow(alpha, n0*n15 - n4*n74)*n4*n41*n48/(n40*n70) + n48*n72*n81 + n67)/n93));
21194 NP_sqrt_base = pow(-n15*(1.0*n1*n36*n53*xF[0]*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)/n92 - 0.5*n111*n36*xF[0]*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)*(pow(alpha, NP0*n0 - n0*n74)*n0*n25*n62/n69 + n25*n53) + n123 - 0.5*n36*n37*xF[0]*(pow(alpha, NP0*n0 - n0*n74)*n57*n62/n69 + n65)/n92 - 0.5*xTj*(n111*n12*n36*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)*(pow(alpha, NP0*n0 - n0*n74)*n0*n25*n62/n69 + n25*n53) + n112*n36*(pow(alpha, NP0*n0 - n6*n74)*n48*n6*n62/n69 - pow(alpha, n0*n15 - n6*n74)*n18*n21*n41/(n40*n70) + pow(alpha, n0*n15 - n6*n74)*n41*n48*n6/(n40*n70) + n66) + n117 + n118 + n119 + n120 + n121 + n122 + n155 + n156 + n157 + n158 + n159 + n160 + n162 - n36*n55*(pow(alpha, NP0*n0 - n5*n74)*n48*n5*n62/n69 - pow(alpha, n0*n15 - n5*n74)*n18*n20*n41/(n40*n70) + pow(alpha, n0*n15 - n5*n74)*n41*n48*n5/(n40*n70) + n63)/n94 + n36*n60*(pow(alpha, NP0*n0 - n7*n74)*n48*n62*n7/n69 - pow(alpha, n0*n15 - n7*n74)*n18*n22*n41/(n40*n70) + pow(alpha, n0*n15 - n7*n74)*n41*n48*n7/(n40*n70) + n64)/n96 + n36*n61*(pow(alpha, NP0*n0 - n4*n74)*n1*n4*n62/n69 + n1*n51)*(pow(alpha, NP0*n0 - n4*n74)*n25*n4*n62/n69 + n25*n51)/n99 + n36*n61*(pow(alpha, NP0*n0 - n4*n74)*n4*n48*n62/n69 - pow(alpha, n0*n15 - n4*n74)*n18*n19*n41/(n40*n70) + pow(alpha, n0*n15 - n4*n74)*n4*n41*n48/(n40*n70) + n67)/n93 + n68*(pow(alpha, NP0*n0 - n74*n8)*n48*n62*n8/n69 - pow(alpha, n0*n15 - n74*n8)*n18*n23*n41/(n40*n70) + pow(alpha, n0*n15 - n74*n8)*n41*n48*n8/(n40*n70) + n18*n23*n34)/n97 + n68*(pow(alpha, NP0*n0 - n74*n8)*n1*n62*n8/n69 + n1*n54)*(pow(alpha, NP0*n0 - n74*n8)*n25*n62*n8/n69 + n25*n54)/n103 + n36*n60*(pow(alpha, NP0*n0 - n7*n74)*n1*n62*n7/n69 + n1*n52)*(pow(alpha, NP0*n0 - n7*n74)*n25*n62*n7/n69 + n25*n52)/n102 - n36*n43*xF[3]*(pow(alpha, NP0*n0 - n6*n74)*n1*n6*n62/n69 + n1*n50)*(pow(alpha, NP0*n0 - n6*n74)*n25*n6*n62/n69 + n25*n50)/n101 - n36*n55*(pow(alpha, NP0*n0 - n5*n74)*n1*n5*n62/n69 + n1*n56)*(pow(alpha, NP0*n0 - n5*n74)*n25*n5*n62/n69 + n25*n56)/n100)) - n176, 2) + (-pow(NP0, 2)*(-n1*n26*n36*n53*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)/n92 - n111*n16*n36*(pow(alpha, NP0*n0 - n0*n74)*n0*n1*n62/n69 + n1*n53)*(pow(alpha, NP0*n0 - n0*n74)*n0*n25*n62/n69 + n25*n53) + 0.5*n117 - n16*n36*n37*(pow(alpha, NP0*n0 - n0*n74)*n57*n62/n69 + n65)/n92 - 0.5*n178*xTj) - NP0*n176 - n12*n36*n37/(n37 - 1 + pow(alpha, -n0*(n47*(n71 - log(n29*n46/(n10 + n13*xF[0]) + 1)) + 1))) - n13*(-n36*n37*xF[0]/(n37 - 1 + pow(alpha, -n0*(n47*(n71 - log(1 + n46*(n10 + n14*xTj)/n28)) + 1))) - n36*n38*xF[1]/(n38 - 1 + pow(alpha, -n4*(n47*(n71 - log(1 + n46*(n10 + n14*xTj)/n28)) + 1))) - n36*n43*xF[3]/(n43 - 1 + pow(alpha, -n6*(n47*(n71 - log(1 + n46*(n10 + n14*xTj)/n28)) + 1))) - n36*n44*xF[4]/(n44 - 1 + pow(alpha, -n7*(n47*(n71 - log(1 + n46*(n10 + n14*xTj)/n28)) + 1))) - n36*n49/(n45 - 1 + pow(alpha, -n8*(n47*(n71 - log(1 + n46*(n10 + n14*xTj)/n28)) + 1))) - n36*n55/(n42 - 1 + pow(alpha, -n5*(n47*(n71 - log(1 + n46*(n10 + n14*xTj)/n28)) + 1)))))*(4.0*n1*n147*n36*n53 - 4.0*n111*n131*n36*xF[0] + 2.0*n117 - 2.0*n153*n36*xF[0] - 2.0*n178*xTj);
21195 NP_sqrt_base = fabs(NP_sqrt_base);
21196 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
21197 NT1 = n47*(n71 - log(-pow(alpha, NP1*n0)*n62 + 1));
21198 g0 = MW[1] - Mstar;
21199 g1 = MW[0] - Mstar;
21202 g4 = MW[2] - Mstar;
21203 g5 = MW[3] - Mstar;
21204 g6 = MW[4] - Mstar;
21205 g7 = MW[5] - Mstar;
21210 g12 = pow(alpha, -g1);
21211 g13 = pow(alpha, -g0);
21212 g14 = pow(alpha, -g4);
21213 g15 = pow(alpha, -g5);
21214 g16 = pow(alpha, -g6);
21215 g17 = pow(alpha, -g7);
21216 g18 = log(xF[0]/xF[1]);
21218 g20 = pow(alpha, NP1*g0);
21219 g21 = pow(alpha, NP1*g1);
21221 g23 = pow(alpha, NP1*g4);
21222 g24 = pow(alpha, NP1*g5);
21223 g25 = pow(alpha, NP1*g6);
21224 g26 = pow(alpha, NP1*g7);
21242 g44 = pow(alpha, g0*g19) - 1;
21243 g45 = pow(alpha, g0*g19) - 1;
21244 g46 = pow(alpha, g1*g19) - 1;
21245 g47 = pow(alpha, g19*g4) - 1;
21246 g48 = pow(alpha, g19*g5) - 1;
21247 g49 = pow(alpha, g19*g6) - 1;
21248 g50 = pow(alpha, g19*g7) - 1;
21249 g51 = -pow(alpha, g1*g19);
21250 g52 = -pow(alpha, g19*g4);
21251 g53 = -pow(alpha, g19*g5);
21252 g54 = -pow(alpha, g19*g6);
21253 g55 = -pow(alpha, g19*g7);
21254 g56 = g10*g9/(g3*xF[1]);
21261 g63 = pow(alpha, g1*g19) + g37;
21263 g65 = pow(alpha, g19*g4) + g38;
21264 g66 = pow(alpha, g19*g5) + g39;
21265 g67 = pow(alpha, g19*g6) + g40;
21266 g68 = pow(alpha, g19*g7) + g41;
21291 g93 = log(g56*g64/g31);
21292 g94 = log(g56*g57/g30);
21293 g95 = log(g11*g29*g64/g45);
21295 g97 = log(g11*g29*g57/g44);
21297 g99 = -g31*g72*g96 - g42*xF[0] - g42*xF[1] - g42*xF[2] - g42*xF[3] - g42*xF[4] - g42*xF[5] - g45*g72*g98 - g69*g96*(g41 + 1) - g69*g98*(pow(alpha, g19*g7) - 1) - g70*g96*(g40 + 1) - g70*g98*(pow(alpha, g19*g6) - 1) - g71*g96*(g39 + 1) - g71*g98*(pow(alpha, g19*g5) - 1) - g73*g96*(g38 + 1) - g73*g98*(pow(alpha, g19*g4) - 1) - g74*g96*(g37 + 1) - g74*g98*(pow(alpha, g1*g19) - 1);
21298 LpF = xF[0]*(g12 + 1.0)*(g27 + g82*g94 + g91*g97)/(g22*(g12 - 1.0)) + xF[1]*(g13 + 1.0)*(g27 + g85*g94 + g87*g97)/(g22*(g13 - 1.0)) + xF[2]*(g14 + 1.0)*(g27 + g86*g94 + g88*g97)/(g22*(g14 - 1.0)) + xF[3]*(g15 + 1.0)*(g27 + g83*g94 + g89*g97)/(g22*(g15 - 1.0)) + xF[4]*(g16 + 1.0)*(g27 + g81*g94 + g92*g97)/(g22*(g16 - 1.0)) + xF[5]*(g17 + 1.0)*(g27 + g84*g94 + g90*g97)/(g22*(g17 - 1.0));
21303 xP[0] = g28*g46*g77;
21304 xP[1] = g28*g44*g75;
21305 xP[2] = g28*g47*g80;
21306 xP[3] = g28*g48*g76;
21307 xP[4] = g28*g49*g78;
21308 xP[5] = g28*g50*g79;
21309 xT[0] = g32*g43*g77;
21310 xT[1] = g30*g43*g75;
21311 xT[2] = g33*g43*g80;
21312 xT[3] = g34*g43*g76;
21313 xT[4] = g35*g43*g78;
21314 xT[5] = g36*g43*g79;
21317 n0 = MW[0] - Mstar;
21321 n4 = MW[1] - Mstar;
21322 n5 = MW[2] - Mstar;
21323 n6 = MW[3] - Mstar;
21324 n7 = MW[4] - Mstar;
21325 n8 = MW[5] - Mstar;
21326 n9 = MW[6] - Mstar;
21334 n17 = pow(n0, -n11);
21335 n18 = pow(n1, -n11);
21336 n19 = pow(n4, -n11);
21337 n20 = pow(n5, -n11);
21338 n21 = pow(n6, -n11);
21339 n22 = pow(n7, -n11);
21340 n23 = pow(n8, -n11);
21341 n24 = pow(n9, -n11);
21345 n28 = pow(alpha, NP0*n0);
21346 n29 = n12 + n16*xTj;
21347 n30 = n12 + n15*xTj;
21348 n31 = pow(alpha, NP0*n4);
21349 n32 = pow(alpha, NP0*n5);
21350 n33 = pow(alpha, NP0*n6);
21351 n34 = pow(alpha, NP0*n7);
21352 n35 = pow(alpha, NP0*n8);
21353 n36 = pow(alpha, NP0*n9);
21358 n41 = pow(alpha, n0*n14);
21359 n42 = pow(n29, -n11);
21360 n43 = pow(n30, -n11);
21379 n62 = log((-1.0 + xPj/xF[0])/n2);
21391 n74 = pow(n73, -n11);
21392 n75 = n10 + n25 + n37 + n62;
21394 n77 = n18*n41*n43/(n42*n74);
21395 n78 = n52*(n75 - log(n73)) + 1;
21396 n79 = pow(alpha, n0*n78);
21397 n80 = pow(alpha, n4*n78);
21398 n81 = pow(alpha, n5*n78);
21399 n82 = pow(alpha, n6*n78);
21400 n83 = pow(alpha, n7*n78);
21401 n84 = pow(alpha, n78*n8);
21402 n85 = pow(alpha, n78*n9);
21409 n92 = n39 - 1 + 1.0/n79;
21410 n93 = n40 - 1 + 1.0/n80;
21411 n94 = n44 - 1 + 1.0/n81;
21412 n95 = n45 - 1 + 1.0/n82;
21413 n96 = n46 - 1 + 1.0/n83;
21414 n97 = n47 - 1 + 1.0/n84;
21415 n98 = n48 - 1 + 1.0/n85;
21416 n99 = pow(n92, -n11);
21417 n100 = pow(n93, -n11);
21418 n101 = pow(n94, -n11);
21419 n102 = pow(n95, -n11);
21420 n103 = pow(n96, -n11);
21421 n104 = pow(n97, -n11);
21422 n105 = pow(n98, -n11);
21423 n106 = pow(n92, 3);
21424 n107 = pow(n93, 3);
21425 n108 = pow(n94, 3);
21426 n109 = pow(n95, 3);
21427 n110 = pow(n96, 3);
21428 n111 = pow(n97, 3);
21429 n112 = pow(n98, 3);
21436 n119 = n1*xF[5]/n97;
21437 n120 = n1*xF[1]/n93;
21440 n123 = n39*xF[0]/n106;
21441 n124 = n45*xF[3]/n109;
21442 n125 = -n45*xF[3]/n102;
21443 n126 = n69*xF[0]/n92;
21444 n127 = n18*n19*n31*xF[1]/n93;
21445 n128 = n18*n23*n35*xF[5]/n97;
21446 n129 = n117*n38*n60*xF[0];
21447 n130 = n117*n16*n38*n60;
21450 n133 = n114*n38*n67;
21451 n134 = n116*n38*n70;
21452 n135 = n115*n38*n68;
21454 n137 = n113*n38*n71;
21456 n139 = n66/(n73*n79) + 1;
21457 n140 = n1*n60*n66/(n73*n79) + n1*n60;
21458 n141 = n1*n59 + n1*n76*n86;
21459 n142 = n1*n54 + n1*n76*n91;
21460 n143 = n1*n57 + n1*n76*n88;
21461 n144 = n1*n58 + n1*n76*n87;
21462 n145 = n1*n55 + n1*n76*n90;
21463 n146 = n1*n56 + n1*n76*n89;
21464 n147 = pow(n140, -n11);
21465 n148 = pow(n141, -n11);
21466 n149 = pow(n142, -n11);
21467 n150 = pow(n143, -n11);
21468 n151 = pow(n144, -n11);
21469 n152 = pow(n145, -n11);
21470 n153 = pow(n146, -n11);
21472 n155 = n26*n60*n66/(n73*n79) + n26*n60;
21473 n156 = n66*n69/(n73*n79) + n69;
21476 n159 = n139*n39*xF[0]/n99;
21480 n163 = n146*xF[6]/n105;
21482 n165 = n149*n44*xF[2]/n108;
21483 n166 = n156*n39/n99;
21484 n167 = n16*n38*n39*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)/n99;
21485 n168 = n1*n11*n16*n38*n60*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)/n99;
21486 n169 = n26*n38*n59*xF[1]*(pow(alpha, NP0*n0 - n4*n78)*n1*n4*n66/n73 + n1*n59)/n100;
21487 n170 = n26*n38*n54*xF[2]*(pow(alpha, NP0*n0 - n5*n78)*n1*n5*n66/n73 + n1*n54)/n101;
21488 n171 = n26*n38*n57*xF[3]*(pow(alpha, NP0*n0 - n6*n78)*n1*n6*n66/n73 + n1*n57)/n102;
21489 n172 = n26*n38*n58*xF[4]*(pow(alpha, NP0*n0 - n7*n78)*n1*n66*n7/n73 + n1*n58)/n103;
21490 n173 = n26*n38*n55*xF[5]*(pow(alpha, NP0*n0 - n78*n8)*n1*n66*n8/n73 + n1*n55)/n104;
21491 n174 = n26*n38*n56*xF[6]*(pow(alpha, NP0*n0 - n78*n9)*n1*n66*n9/n73 + n1*n56)/n105;
21492 n175 = 1.0*n1*n164*n38*n60;
21493 n176 = n16*n38*n39*(pow(alpha, NP0*n0 - n0*n78)*n61*n66/n73 + n69)/n99;
21494 n177 = -0.5*n166*n38*xF[0];
21495 n178 = n129 + n167;
21496 n179 = n18*n19*n31 - n19*n77/n80 + n41*n43*n53*n86/(n42*n74) + n53*n76*n86;
21497 n180 = -n20*n77/n81 + n41*n43*n53*n91/(n42*n74) + n53*n76*n91 + n67;
21498 n181 = -n22*n77/n83 + n41*n43*n53*n87/(n42*n74) + n53*n76*n87 + n68;
21499 n182 = n18*n23*n35 - n23*n77/n84 + n41*n43*n53*n90/(n42*n74) + n53*n76*n90;
21500 n183 = -n24*n77/n85 + n41*n43*n53*n89/(n42*n74) + n53*n76*n89 + n71;
21501 n184 = n38*n64*(-pow(alpha, n0*n14 - n4*n78)*n18*n19*n43/(n42*n74) + pow(alpha, n0*n14 - n4*n78)*n4*n43*n53/(n42*n74) + n18*n19*n31 + n53*n76*n86)/n100;
21502 n185 = n38*n50*xF[2]*(-pow(alpha, n0*n14 - n5*n78)*n18*n20*n43/(n42*n74) + pow(alpha, n0*n14 - n5*n78)*n43*n5*n53/(n42*n74) + n53*n76*n91 + n67)/n101;
21503 n186 = n125*n38*(-pow(alpha, n0*n14 - n6*n78)*n18*n21*n43/(n42*n74) + pow(alpha, n0*n14 - n6*n78)*n43*n53*n6/(n42*n74) + n53*n76*n88 + n70);
21504 n187 = n38*n65*(-pow(alpha, n0*n14 - n7*n78)*n18*n22*n43/(n42*n74) + pow(alpha, n0*n14 - n7*n78)*n43*n53*n7/(n42*n74) + n53*n76*n87 + n68)/n103;
21505 n188 = n72*(-pow(alpha, n0*n14 - n78*n8)*n18*n23*n43/(n42*n74) + pow(alpha, n0*n14 - n78*n8)*n43*n53*n8/(n42*n74) + n18*n23*n35 + n53*n76*n90)/n104;
21506 n189 = n38*n49*xF[6]*(-pow(alpha, n0*n14 - n78*n9)*n18*n24*n43/(n42*n74) + pow(alpha, n0*n14 - n78*n9)*n43*n53*n9/(n42*n74) + n53*n76*n89 + n71)/n105;
21507 n190 = n138 + n175 + n177;
21508 n191 = n1*n113*n38*n56 + n1*n114*n38*n54 + n1*n115*n38*n58 + n119*n38*n55 + n120*n38*n59 + n121*n38*n57 + n125*n143*n38 + n160*n72 + n161*n38*n64 + n163*n38*n49 + n178 + n158*n38/n103 + n154*n38*n50/n101;
21510 n193 = n131 + n132 + n133 + n134 + n135 + n136 + n137 + n168 + n169 + n170 + n171 + n172 + n173 + n174 + n176 + n184 + n185 + n186 + n187 + n188 + n189;
21511 n194 = n118*n146*n38*n49*(n26*n56 + n26*n76*n89) - n124*n143*n38*(n26*n57 + n26*n76*n88) + n193 + n145*n72*(n26*n55 + n26*n76*n90)/n111 + n158*n38*(n26*n58 + n26*n76*n87)/n110 + n154*n38*n50*(n26*n54 + n26*n76*n91)/n108 + n141*n38*n64*(n26*n59 + n26*n76*n86)/n107 + n16*n38*n39*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)*(pow(alpha, NP0*n0 - n0*n78)*n0*n26*n66/n73 + n26*n60)/n106;
21512 NP_b = -n1*n159*n38*n60 - n130 - n14*(1.0*n1*n38*n60*xF[0]*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)/n99 - 1.0*n123*n147*n38 + n138 + n27*(n11*n118*n157*n38 + n11*n123*n147*n38 + n11*n124*n150*n38 + n11*n165*n38 + n11*n152*n38*n47*xF[5]/n111 + n11*n151*n38*n46*xF[4]/n110 + n125*n38*(pow(alpha, NP0*n0 - n6*n78)*n53*n6*n66/n73 - pow(alpha, n0*n14 - n6*n78)*n18*n21*n43/(n42*n74) + pow(alpha, n0*n14 - n6*n78)*n43*n53*n6/(n42*n74) + n70) + n131 + n132 + n133 + n134 + n135 + n136 + n137 + n168 + n169 + n170 + n171 + n172 + n173 + n174 + n176 + n11*n148*n38*n40*xF[1]/n107 + n38*n49*xF[6]*(pow(alpha, NP0*n0 - n78*n9)*n53*n66*n9/n73 - pow(alpha, n0*n14 - n78*n9)*n18*n24*n43/(n42*n74) + pow(alpha, n0*n14 - n78*n9)*n43*n53*n9/(n42*n74) + n71)/n105 + n72*(pow(alpha, NP0*n0 - n78*n8)*n53*n66*n8/n73 - pow(alpha, n0*n14 - n78*n8)*n18*n23*n43/(n42*n74) + pow(alpha, n0*n14 - n78*n8)*n43*n53*n8/(n42*n74) + n18*n23*n35)/n104 + n38*n65*(pow(alpha, NP0*n0 - n7*n78)*n53*n66*n7/n73 - pow(alpha, n0*n14 - n7*n78)*n18*n22*n43/(n42*n74) + pow(alpha, n0*n14 - n7*n78)*n43*n53*n7/(n42*n74) + n68)/n103 + n38*n50*xF[2]*(pow(alpha, NP0*n0 - n5*n78)*n5*n53*n66/n73 - pow(alpha, n0*n14 - n5*n78)*n18*n20*n43/(n42*n74) + pow(alpha, n0*n14 - n5*n78)*n43*n5*n53/(n42*n74) + n67)/n101 + n38*n64*(pow(alpha, NP0*n0 - n4*n78)*n4*n53*n66/n73 - pow(alpha, n0*n14 - n4*n78)*n18*n19*n43/(n42*n74) + pow(alpha, n0*n14 - n4*n78)*n4*n43*n53/(n42*n74) + n18*n19*n31)/n100) - 0.5*n38*n39*xF[0]*(pow(alpha, NP0*n0 - n0*n78)*n61*n66/n73 + n69)/n99) - n38*xTj*(n1*n113*n56 + n1*n114*n54 + n1*n115*n58 + n117*n60*xF[0] + n119*n55 + n120*n59 + n121*n57 + n125*n143 + n16*n39*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)/n99 + n160*n63 + n161*n64 + n163*n49 + n158/n103 + n154*n50/n101);
21513 NP_2a = -n38*(-1.0*n126 - 2.0*n139*n41*n61*xF[0]/n99 + n159*n69 + 1.0*xTj*(n1*n11*n16*n60*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)/n99 + n11*n118*n157 + n11*n123*n147 + n11*n124*n150 + n11*n165 + n11*n152*n47*xF[5]/n111 + n11*n151*n46*xF[4]/n110 + n113*n71 + n114*n67 + n115*n68 + n116*n70 + n125*(-pow(alpha, n0*n14 - n6*n78)*n18*n21*n43/(n42*n74) + pow(alpha, n0*n14 - n6*n78)*n43*n53*n6/(n42*n74) + n53*n76*n88 + n70) + n126 + n127 + n128 + n16*n39*(pow(alpha, NP0*n0 - n0*n78)*n61*n66/n73 + n69)/n99 + n11*n148*n40*xF[1]/n107 + n26*n56*xF[6]*(pow(alpha, NP0*n0 - n78*n9)*n1*n66*n9/n73 + n1*n56)/n105 + n49*xF[6]*(-pow(alpha, n0*n14 - n78*n9)*n18*n24*n43/(n42*n74) + pow(alpha, n0*n14 - n78*n9)*n43*n53*n9/(n42*n74) + n53*n76*n89 + n71)/n105 + n26*n55*xF[5]*(pow(alpha, NP0*n0 - n78*n8)*n1*n66*n8/n73 + n1*n55)/n104 + n63*(-pow(alpha, n0*n14 - n78*n8)*n18*n23*n43/(n42*n74) + pow(alpha, n0*n14 - n78*n8)*n43*n53*n8/(n42*n74) + n18*n23*n35 + n53*n76*n90)/n104 + n26*n58*xF[4]*(pow(alpha, NP0*n0 - n7*n78)*n1*n66*n7/n73 + n1*n58)/n103 + n65*(-pow(alpha, n0*n14 - n7*n78)*n18*n22*n43/(n42*n74) + pow(alpha, n0*n14 - n7*n78)*n43*n53*n7/(n42*n74) + n53*n76*n87 + n68)/n103 + n26*n57*xF[3]*(pow(alpha, NP0*n0 - n6*n78)*n1*n6*n66/n73 + n1*n57)/n102 + n26*n54*xF[2]*(pow(alpha, NP0*n0 - n5*n78)*n1*n5*n66/n73 + n1*n54)/n101 + n50*xF[2]*(-pow(alpha, n0*n14 - n5*n78)*n18*n20*n43/(n42*n74) + pow(alpha, n0*n14 - n5*n78)*n43*n5*n53/(n42*n74) + n53*n76*n91 + n67)/n101 + n26*n59*xF[1]*(pow(alpha, NP0*n0 - n4*n78)*n1*n4*n66/n73 + n1*n59)/n100 + n64*(-pow(alpha, n0*n14 - n4*n78)*n18*n19*n43/(n42*n74) + pow(alpha, n0*n14 - n4*n78)*n4*n43*n53/(n42*n74) + n18*n19*n31 + n53*n76*n86)/n100) + n11*pow(n139, -n11)*n16*n39*n41*n61/n106);
21514 NP_sqrt_base = (NP0*(n178 - n192) + n122*n38*xF[0] + xTj*(n113*n38*n49 + n114*n38*n50 - n116*n38*n45 + n122*n16*n38 + n38*n64/n93 + n38*n65/n96 + n72/n97) + pow(NP0, -n11)*(-1.0*n1*n164*n38*n60 + 0.5*n123*n140*n155*n38 - 0.5*n131 + 0.5*n166*n38*xF[0] + 0.5*n194*xTj))*(4.0*n1*n164*n38*n60 - n11*n176 + n11*n194*xTj - 4.0*n123*n147*n38 + 2.0*n131) + pow(-n130 - n14*(1.0*n1*n38*n60*xF[0]*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)/n99 - 0.5*n123*n38*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)*(pow(alpha, NP0*n0 - n0*n78)*n0*n26*n66/n73 + n26*n60) + n138 + n27*(n118*n38*n49*(pow(alpha, NP0*n0 - n78*n9)*n1*n66*n9/n73 + n1*n56)*(pow(alpha, NP0*n0 - n78*n9)*n26*n66*n9/n73 + n26*n56) - n124*n38*(pow(alpha, NP0*n0 - n6*n78)*n1*n6*n66/n73 + n1*n57)*(pow(alpha, NP0*n0 - n6*n78)*n26*n6*n66/n73 + n26*n57) + n125*n38*(pow(alpha, NP0*n0 - n6*n78)*n53*n6*n66/n73 - pow(alpha, n0*n14 - n6*n78)*n18*n21*n43/(n42*n74) + pow(alpha, n0*n14 - n6*n78)*n43*n53*n6/(n42*n74) + n70) + n131 + n132 + n133 + n134 + n135 + n136 + n137 + n168 + n169 + n170 + n171 + n172 + n173 + n174 + n176 + n72*(pow(alpha, NP0*n0 - n78*n8)*n1*n66*n8/n73 + n1*n55)*(pow(alpha, NP0*n0 - n78*n8)*n26*n66*n8/n73 + n26*n55)/n111 + n38*n65*(pow(alpha, NP0*n0 - n7*n78)*n1*n66*n7/n73 + n1*n58)*(pow(alpha, NP0*n0 - n7*n78)*n26*n66*n7/n73 + n26*n58)/n110 + n38*n50*xF[2]*(pow(alpha, NP0*n0 - n5*n78)*n1*n5*n66/n73 + n1*n54)*(pow(alpha, NP0*n0 - n5*n78)*n26*n5*n66/n73 + n26*n54)/n108 + n38*n64*(pow(alpha, NP0*n0 - n4*n78)*n1*n4*n66/n73 + n1*n59)*(pow(alpha, NP0*n0 - n4*n78)*n26*n4*n66/n73 + n26*n59)/n107 + n16*n38*n39*(pow(alpha, NP0*n0 - n0*n78)*n0*n1*n66/n73 + n1*n60)*(pow(alpha, NP0*n0 - n0*n78)*n0*n26*n66/n73 + n26*n60)/n106 + n38*n49*xF[6]*(pow(alpha, NP0*n0 - n78*n9)*n53*n66*n9/n73 - pow(alpha, n0*n14 - n78*n9)*n18*n24*n43/(n42*n74) + pow(alpha, n0*n14 - n78*n9)*n43*n53*n9/(n42*n74) + n71)/n105 + n72*(pow(alpha, NP0*n0 - n78*n8)*n53*n66*n8/n73 - pow(alpha, n0*n14 - n78*n8)*n18*n23*n43/(n42*n74) + pow(alpha, n0*n14 - n78*n8)*n43*n53*n8/(n42*n74) + n18*n23*n35)/n104 + n38*n65*(pow(alpha, NP0*n0 - n7*n78)*n53*n66*n7/n73 - pow(alpha, n0*n14 - n7*n78)*n18*n22*n43/(n42*n74) + pow(alpha, n0*n14 - n7*n78)*n43*n53*n7/(n42*n74) + n68)/n103 + n38*n50*xF[2]*(pow(alpha, NP0*n0 - n5*n78)*n5*n53*n66/n73 - pow(alpha, n0*n14 - n5*n78)*n18*n20*n43/(n42*n74) + pow(alpha, n0*n14 - n5*n78)*n43*n5*n53/(n42*n74) + n67)/n101 + n38*n64*(pow(alpha, NP0*n0 - n4*n78)*n4*n53*n66/n73 - pow(alpha, n0*n14 - n4*n78)*n18*n19*n43/(n42*n74) + pow(alpha, n0*n14 - n4*n78)*n4*n43*n53/(n42*n74) + n18*n19*n31)/n100) - 0.5*n38*n39*xF[0]*(pow(alpha, NP0*n0 - n0*n78)*n61*n66/n73 + n69)/n99) - n164*n38*n39 - n192, -n11);
21515 NP_sqrt_base = fabs(NP_sqrt_base);
21516 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
21517 NT1 = n52*(n75 - log(-pow(alpha, NP1*n0)*n66 + 1));
21518 g0 = MW[1] - Mstar;
21519 g1 = MW[0] - Mstar;
21522 g4 = MW[2] - Mstar;
21523 g5 = MW[3] - Mstar;
21524 g6 = MW[4] - Mstar;
21525 g7 = MW[5] - Mstar;
21526 g8 = MW[6] - Mstar;
21531 g13 = pow(alpha, -g1);
21532 g14 = pow(alpha, -g0);
21533 g15 = pow(alpha, -g4);
21534 g16 = pow(alpha, -g5);
21535 g17 = pow(alpha, -g6);
21536 g18 = pow(alpha, -g7);
21537 g19 = pow(alpha, -g8);
21538 g20 = log(xF[0]/xF[1]);
21540 g22 = pow(alpha, NP1*g0);
21541 g23 = pow(alpha, NP1*g1);
21543 g25 = pow(alpha, NP1*g4);
21544 g26 = pow(alpha, NP1*g5);
21545 g27 = pow(alpha, NP1*g6);
21546 g28 = pow(alpha, NP1*g7);
21547 g29 = pow(alpha, NP1*g8);
21567 g49 = g10/(g3*xF[1]);
21568 g50 = pow(alpha, g0*g21) - 1;
21569 g51 = pow(alpha, g0*g21) - 1;
21570 g52 = pow(alpha, g1*g21) - 1;
21571 g53 = pow(alpha, g21*g4) - 1;
21572 g54 = pow(alpha, g21*g5) - 1;
21573 g55 = pow(alpha, g21*g6) - 1;
21574 g56 = pow(alpha, g21*g7) - 1;
21575 g57 = pow(alpha, g21*g8) - 1;
21576 g58 = -pow(alpha, g1*g21);
21577 g59 = -pow(alpha, g21*g4);
21578 g60 = -pow(alpha, g21*g5);
21579 g61 = -pow(alpha, g21*g6);
21580 g62 = -pow(alpha, g21*g7);
21581 g63 = -pow(alpha, g21*g8);
21589 g71 = pow(alpha, g1*g21) + g41;
21591 g73 = pow(alpha, g21*g4) + g42;
21592 g74 = pow(alpha, g21*g5) + g43;
21593 g75 = pow(alpha, g21*g6) + g44;
21594 g76 = pow(alpha, g21*g7) + g45;
21595 g77 = pow(alpha, g21*g8) + g46;
21624 g106 = log(g11*g49*g72/g34);
21625 g107 = log(g11*g49*g64/g33);
21626 g108 = log(g12*g31*g72/g51);
21628 g110 = log(g12*g31*g64/g50);
21630 g112 = -g109*g34*g79 - g109*g78*(g41 + 1) - g109*g80*(g42 + 1) - g109*g81*(g43 + 1) - g109*g82*(g46 + 1) - g109*g83*(g44 + 1) - g109*g84*(g45 + 1) - g111*g51*g79 - g111*g78*(pow(alpha, g1*g21) - 1) - g111*g80*(pow(alpha, g21*g4) - 1) - g111*g81*(pow(alpha, g21*g5) - 1) - g111*g82*(pow(alpha, g21*g8) - 1) - g111*g83*(pow(alpha, g21*g6) - 1) - g111*g84*(pow(alpha, g21*g7) - 1) - g47*xF[0] - g47*xF[1] - g47*xF[2] - g47*xF[3] - g47*xF[4] - g47*xF[5] - g47*xF[6];
21631 LpF = xF[0]*(g13 + 1.0)*(g100*g110 + g107*g94 + g30)/(g24*(g13 - 1.0)) + xF[1]*(g14 + 1.0)*(g107*g97 + g110*g99 + g30)/(g24*(g14 - 1.0)) + xF[2]*(g15 + 1.0)*(g102*g110 + g107*g98 + g30)/(g24*(g15 - 1.0)) + xF[3]*(g16 + 1.0)*(g103*g110 + g107*g96 + g30)/(g24*(g16 - 1.0)) + xF[4]*(g17 + 1.0)*(g104*g110 + g107*g93 + g30)/(g24*(g17 - 1.0)) + xF[5]*(g18 + 1.0)*(g101*g110 + g107*g95 + g30)/(g24*(g18 - 1.0)) + xF[6]*(g19 + 1.0)*(g105*g110 + g107*g92 + g30)/(g24*(g19 - 1.0));
21636 xP[0] = g32*g52*g86;
21637 xP[1] = g32*g50*g85;
21638 xP[2] = g32*g53*g89;
21639 xP[3] = g32*g54*g91;
21640 xP[4] = g32*g55*g87;
21641 xP[5] = g32*g56*g88;
21642 xP[6] = g32*g57*g90;
21643 xT[0] = g35*g48*g86;
21644 xT[1] = g33*g48*g85;
21645 xT[2] = g36*g48*g89;
21646 xT[3] = g37*g48*g91;
21647 xT[4] = g38*g48*g87;
21648 xT[5] = g39*g48*g88;
21649 xT[6] = g40*g48*g90;
21652 n0 = -0.500000000000000;
21653 n1 = -2.00000000000000;
21654 n2 = MW[0] - Mstar;
21658 n6 = MW[1] - Mstar;
21659 n7 = MW[2] - Mstar;
21660 n8 = MW[3] - Mstar;
21661 n9 = MW[4] - Mstar;
21662 n10 = MW[5] - Mstar;
21663 n11 = MW[6] - Mstar;
21664 n12 = MW[7] - Mstar;
21672 n20 = pow(n2, -n1);
21673 n21 = pow(n3, -n1);
21674 n22 = pow(n6, -n1);
21675 n23 = pow(n7, -n1);
21676 n24 = pow(n8, -n1);
21677 n25 = pow(n9, -n1);
21678 n26 = pow(n10, -n1);
21679 n27 = pow(n11, -n1);
21680 n28 = pow(n12, -n1);
21683 n31 = pow(alpha, NP0*n2);
21684 n32 = n15 + n19*xF[0];
21685 n33 = n15 + n17*xTj;
21686 n34 = pow(alpha, NP0*n6);
21687 n35 = pow(alpha, NP0*n7);
21688 n36 = pow(alpha, NP0*n8);
21689 n37 = pow(alpha, NP0*n9);
21690 n38 = pow(alpha, NP0*n10);
21691 n39 = pow(alpha, NP0*n11);
21692 n40 = pow(alpha, NP0*n12);
21697 n45 = pow(alpha, n18*n2);
21698 n46 = pow(n33, -n1);
21727 n75 = log((-1.0 + xPj/xF[0])/n4);
21741 n89 = n13 + n29 + n41 + n75;
21743 n91 = n21*pow(n32, n14)*n45*n46*pow(n88, n14);
21744 n92 = n62*(n89 - log(n88)) + 1;
21745 n93 = pow(alpha, n2*n92);
21746 n94 = pow(alpha, n6*n92);
21747 n95 = pow(alpha, n7*n92);
21748 n96 = pow(alpha, n8*n92);
21749 n97 = pow(alpha, n9*n92);
21750 n98 = pow(alpha, n10*n92);
21751 n99 = pow(alpha, n11*n92);
21752 n100 = pow(alpha, n12*n92);
21761 n109 = n43 - 1 + 1.0/n93;
21762 n110 = n44 - 1 + 1.0/n94;
21763 n111 = n47 - 1 + 1.0/n95;
21764 n112 = n48 - 1 + 1.0/n96;
21765 n113 = n49 - 1 + 1.0/n97;
21766 n114 = n50 - 1 + 1.0/n98;
21767 n115 = n51 - 1 + 1.0/n99;
21768 n116 = n52 - 1 + 1.0/n100;
21769 n117 = pow(n109, 3);
21770 n118 = pow(n110, 3);
21771 n119 = pow(n111, 3);
21772 n120 = pow(n112, 3);
21773 n121 = pow(n113, 3);
21774 n122 = pow(n114, 3);
21775 n123 = pow(n115, 3);
21776 n124 = pow(n116, 3);
21785 n133 = pow(n109, n14)*xF[0];
21787 n135 = -pow(n110, n14);
21789 n137 = n43*xF[0]/n117;
21790 n138 = n52*xF[7]/n124;
21791 n139 = pow(n116, n14)*n52*xF[7];
21792 n140 = -pow(n112, n14)*n48*xF[3];
21794 n142 = n129*n2*n3*n42*n53;
21796 n144 = n127*n42*n87;
21797 n145 = n128*n42*n80;
21798 n146 = n132*n42*n85;
21799 n147 = n131*n42*n81;
21800 n148 = n130*n42*n82;
21801 n149 = n125*n42*n86;
21802 n150 = n126*n42*n84;
21803 n151 = n0*n129*n42*n53*n74;
21804 n152 = n79/(n88*n93) + 1;
21806 n154 = n77*n79/(n88*n93) + n77;
21807 n155 = n101*n3*n90 + n3*n71;
21808 n156 = n108*n3*n90 + n3*n64;
21809 n157 = n103*n3*n90 + n3*n70;
21810 n158 = n102*n3*n90 + n3*n72;
21811 n159 = n106*n3*n90 + n3*n65;
21812 n160 = n105*n3*n90 + n3*n69;
21813 n161 = n104*n3*n90 + n78;
21814 n162 = pow(n154, -n1);
21815 n163 = pow(n155, -n1);
21816 n164 = pow(n156, -n1);
21817 n165 = pow(n157, -n1);
21818 n166 = pow(n158, -n1);
21819 n167 = pow(n159, -n1);
21820 n168 = pow(n160, -n1);
21821 n169 = pow(n161, -n1);
21823 n171 = n107*n30*n90 + n2*n30*n31;
21824 n172 = n79*n83/(n88*n93) + n83;
21827 n175 = pow(n114, n14)*n159;
21828 n176 = pow(n111, n14)*n156;
21829 n177 = pow(n115, n14)*n160;
21832 n180 = pow(n113, n14)*n158*xF[4];
21834 n182 = pow(n110, n14)*n155*xF[1];
21836 n184 = pow(n116, n14)*n161*xF[7];
21837 n185 = n165*n48*xF[3]/n120;
21838 n186 = n133*n154*n42*n43;
21839 n187 = n133*n2*n30*n31*n42*(pow(alpha, NP0*n2 - n2*n92)*n2*n3*n79/n88 + n77);
21840 n188 = pow(n110, n14)*n30*n42*n71*xF[1]*(pow(alpha, NP0*n2 - n6*n92)*n3*n6*n79/n88 + n3*n71);
21841 n189 = pow(n111, n14)*n30*n42*n64*xF[2]*(pow(alpha, NP0*n2 - n7*n92)*n3*n7*n79/n88 + n3*n64);
21842 n190 = pow(n112, n14)*n30*n42*n70*xF[3]*(pow(alpha, NP0*n2 - n8*n92)*n3*n79*n8/n88 + n3*n70);
21843 n191 = pow(n113, n14)*n30*n42*n72*xF[4]*(pow(alpha, NP0*n2 - n9*n92)*n3*n79*n9/n88 + n3*n72);
21844 n192 = pow(n114, n14)*n30*n42*n65*xF[5]*(pow(alpha, NP0*n2 - n10*n92)*n10*n3*n79/n88 + n3*n65);
21845 n193 = pow(n115, n14)*n30*n42*n69*xF[6]*(pow(alpha, NP0*n2 - n11*n92)*n11*n3*n79/n88 + n3*n69);
21846 n194 = pow(n116, n14)*n30*n42*n73*xF[7]*(pow(alpha, NP0*n2 - n12*n92)*n12*n3*n79/n88 + n78);
21847 n195 = 1.0*n133*n154*n42*n77;
21848 n196 = -n133*n174*n42;
21849 n197 = n0*n133*n174*n42;
21851 n199 = n108*pow(n32, n14)*n45*n46*n61*pow(n88, n14) + n108*n61*n90 - n23*n91/n95 + n80;
21852 n200 = n102*pow(n32, n14)*n45*n46*n61*pow(n88, n14) + n102*n61*n90 - n25*n91/n97 + n81;
21853 n201 = n106*pow(n32, n14)*n45*n46*n61*pow(n88, n14) + n106*n61*n90 - n26*n91/n98 + n82;
21854 n202 = n105*pow(n32, n14)*n45*n46*n61*pow(n88, n14) + n105*n61*n90 - n27*n91/n99 + n86;
21855 n203 = n135*n42*n66*(-pow(alpha, n18*n2 - n6*n92)*n21*n22*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n6*n92)*pow(n32, n14)*n46*n6*n61*pow(n88, n14) + n101*n61*n90 + n87);
21856 n204 = -pow(n111, n14)*n42*n63*(-pow(alpha, n18*n2 - n7*n92)*n21*n23*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n7*n92)*pow(n32, n14)*n46*n61*n7*pow(n88, n14) + n108*n61*n90 + n80);
21857 n205 = n140*n42*(-pow(alpha, n18*n2 - n8*n92)*n21*n24*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n8*n92)*pow(n32, n14)*n46*n61*n8*pow(n88, n14) + n103*n61*n90 + n85);
21858 n206 = -pow(n113, n14)*n42*n67*(-pow(alpha, n18*n2 - n9*n92)*n21*n25*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n9*n92)*pow(n32, n14)*n46*n61*pow(n88, n14)*n9 + n102*n61*n90 + n81);
21859 n207 = pow(n114, n14)*n42*n76*(pow(alpha, -n10*n92 + n18*n2)*n10*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n10*n92 + n18*n2)*n21*n26*pow(n32, n14)*n46*pow(n88, n14) + n106*n61*n90 + n82);
21860 n208 = -pow(n115, n14)*n42*n68*(pow(alpha, -n11*n92 + n18*n2)*n11*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n11*n92 + n18*n2)*n21*n27*pow(n32, n14)*n46*pow(n88, n14) + n105*n61*n90 + n86);
21861 n209 = -n139*n42*(pow(alpha, -n12*n92 + n18*n2)*n12*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n12*n92 + n18*n2)*n21*n28*pow(n32, n14)*n46*pow(n88, n14) + n104*n61*n90 + n84);
21862 n210 = n151 + n195 + n197;
21863 n211 = xTj*(pow(n113, n14)*n173*n42 + n125*n3*n42*n69 + n126*n42*n78 + n127*n3*n42*n71 + n128*n3*n42*n64 + n129*n42*n77 + n131*n3*n42*n72 + n134*n42*n65 + n135*n155*n42*n66 + n136*n42*n70 - n139*n161*n42 + n140*n157*n42 + n175*n42*n76 - n176*n42*n63 - n177*n42*n68 - n186);
21864 n212 = n142 + n186 + n211;
21865 n213 = n143 + n144 + n145 + n146 + n147 + n148 + n149 + n150 + n187 + n188 + n189 + n190 + n191 + n192 + n193 + n194 + n196 + n203 + n204 + n205 + n206 + n207 + n208 + n209;
21866 NP_b = -n133*n153*n42*n77 - n142 - n18*(n0*n133*n42*n43*(pow(alpha, NP0*n2 - n2*n92)*n74*n79/n88 + n83) + n0*xTj*(-pow(n111, n14)*n42*n63*(pow(alpha, NP0*n2 - n7*n92)*n61*n7*n79/n88 - pow(alpha, n18*n2 - n7*n92)*n21*n23*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n7*n92)*pow(n32, n14)*n46*n61*n7*pow(n88, n14) + n80) - pow(n113, n14)*n42*n67*(pow(alpha, NP0*n2 - n9*n92)*n61*n79*n9/n88 - pow(alpha, n18*n2 - n9*n92)*n21*n25*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n9*n92)*pow(n32, n14)*n46*n61*pow(n88, n14)*n9 + n81) + pow(n114, n14)*n42*n76*(pow(alpha, NP0*n2 - n10*n92)*n10*n61*n79/n88 + pow(alpha, -n10*n92 + n18*n2)*n10*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n10*n92 + n18*n2)*n21*n26*pow(n32, n14)*n46*pow(n88, n14) + n82) - pow(n115, n14)*n42*n68*(pow(alpha, NP0*n2 - n11*n92)*n11*n61*n79/n88 + pow(alpha, -n11*n92 + n18*n2)*n11*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n11*n92 + n18*n2)*n21*n27*pow(n32, n14)*n46*pow(n88, n14) + n86) - n133*n42*n43*(pow(alpha, NP0*n2 - n2*n92)*n74*n79/n88 + n83) + n135*n42*n66*(pow(alpha, NP0*n2 - n6*n92)*n6*n61*n79/n88 - pow(alpha, n18*n2 - n6*n92)*n21*n22*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n6*n92)*pow(n32, n14)*n46*n6*n61*pow(n88, n14) + n87) + n137*n14*n162*n42 + n138*n14*n169*n42 - n139*n42*(pow(alpha, NP0*n2 - n12*n92)*n12*n61*n79/n88 + pow(alpha, -n12*n92 + n18*n2)*n12*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n12*n92 + n18*n2)*n21*n28*pow(n32, n14)*n46*pow(n88, n14) + n84) + n14*n178*n42*n67 + n14*n179*n42*n68 + n14*n181*n42*n63 + n14*n183*n42*n66 + n14*n185*n42 + n140*n42*(pow(alpha, NP0*n2 - n8*n92)*n61*n79*n8/n88 - pow(alpha, n18*n2 - n8*n92)*n21*n24*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n8*n92)*pow(n32, n14)*n46*n61*n8*pow(n88, n14) + n85) + n143 + n144 + n145 + n146 + n147 + n148 + n149 + n150 + n187 + n188 + n189 + n190 + n191 + n192 + n193 + n194 + n14*n167*n42*n50*xF[5]/n122) + 1.0*n133*n42*n77*(pow(alpha, NP0*n2 - n2*n92)*n2*n3*n79/n88 + n77) - 1.0*n137*n162*n42 + n151) - n42*xTj*(pow(n113, n14)*n173 + n125*n3*n69 + n126*n78 + n127*n3*n71 + n128*n3*n64 + n129*n77 + n131*n3*n72 - n133*n154*n43 + n134*n65 + n135*n155*n66 + n136*n70 - n139*n161 + n140*n157 + n175*n76 - n176*n63 - n177*n68);
21867 NP_2a = -n42*(n1*n133*n152*n45*n74 - n1*n137*pow(n152, -n1)*n45*n74 + n133*n153*n83 - 1.0*n141 + 1.0*xTj*(pow(n110, n14)*n30*n71*xF[1]*(pow(alpha, NP0*n2 - n6*n92)*n3*n6*n79/n88 + n3*n71) + pow(n111, n14)*n30*n64*xF[2]*(pow(alpha, NP0*n2 - n7*n92)*n3*n7*n79/n88 + n3*n64) - pow(n111, n14)*n63*(-pow(alpha, n18*n2 - n7*n92)*n21*n23*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n7*n92)*pow(n32, n14)*n46*n61*n7*pow(n88, n14) + n108*n61*n90 + n80) + pow(n112, n14)*n30*n70*xF[3]*(pow(alpha, NP0*n2 - n8*n92)*n3*n79*n8/n88 + n3*n70) + pow(n113, n14)*n30*n72*xF[4]*(pow(alpha, NP0*n2 - n9*n92)*n3*n79*n9/n88 + n3*n72) - pow(n113, n14)*n67*(-pow(alpha, n18*n2 - n9*n92)*n21*n25*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n9*n92)*pow(n32, n14)*n46*n61*pow(n88, n14)*n9 + n102*n61*n90 + n81) + pow(n114, n14)*n30*n65*xF[5]*(pow(alpha, NP0*n2 - n10*n92)*n10*n3*n79/n88 + n3*n65) + pow(n114, n14)*n76*(pow(alpha, -n10*n92 + n18*n2)*n10*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n10*n92 + n18*n2)*n21*n26*pow(n32, n14)*n46*pow(n88, n14) + n106*n61*n90 + n82) + pow(n115, n14)*n30*n69*xF[6]*(pow(alpha, NP0*n2 - n11*n92)*n11*n3*n79/n88 + n3*n69) - pow(n115, n14)*n68*(pow(alpha, -n11*n92 + n18*n2)*n11*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n11*n92 + n18*n2)*n21*n27*pow(n32, n14)*n46*pow(n88, n14) + n105*n61*n90 + n86) + pow(n116, n14)*n30*n73*xF[7]*(pow(alpha, NP0*n2 - n12*n92)*n12*n3*n79/n88 + n78) + n125*n86 + n126*n84 + n127*n87 + n128*n80 + n130*n82 + n131*n81 + n132*n85 - n133*n174 + n133*n2*n30*n31*(pow(alpha, NP0*n2 - n2*n92)*n2*n3*n79/n88 + n77) + n135*n66*(-pow(alpha, n18*n2 - n6*n92)*n21*n22*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n6*n92)*pow(n32, n14)*n46*n6*n61*pow(n88, n14) + n101*n61*n90 + n87) + n137*n14*n162 + n138*n14*n169 - n139*(pow(alpha, -n12*n92 + n18*n2)*n12*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n12*n92 + n18*n2)*n21*n28*pow(n32, n14)*n46*pow(n88, n14) + n104*n61*n90 + n84) + n14*n178*n67 + n14*n179*n68 + n14*n181*n63 + n14*n183*n66 + n14*n185 + n140*(-pow(alpha, n18*n2 - n8*n92)*n21*n24*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n8*n92)*pow(n32, n14)*n46*n61*n8*pow(n88, n14) + n103*n61*n90 + n85) + n141 + n14*n167*n50*xF[5]/n122));
21868 NP_sqrt_base = (-NP0*n212 - n19*(-n42*n43*xF[0]/(n43 - 1 + pow(alpha, -n2*(n62*(n89 - log(n33*n53/(n15 - xF[0]*xTj) + 1)) + 1))) - n42*n48*xF[3]/(n48 - 1 + pow(alpha, -n8*(n62*(n89 - log(n33*n53/(n15 - xF[0]*xTj) + 1)) + 1))) - n42*n50*xF[5]/(n50 - 1 + pow(alpha, -n10*(n62*(n89 - log(n33*n53/(n15 - xF[0]*xTj) + 1)) + 1))) - n42*n52*xF[7]/(n52 - 1 + pow(alpha, -n12*(n62*(n89 - log(n33*n53/(n15 - xF[0]*xTj) + 1)) + 1))) - n42*n63/(n47 - 1 + pow(alpha, -n7*(n62*(n89 - log(n33*n53/(n15 - xF[0]*xTj) + 1)) + 1))) - n42*n66/(n44 - 1 + pow(alpha, -n6*(n62*(n89 - log(n33*n53/(n15 - xF[0]*xTj) + 1)) + 1))) - n42*n67/(n49 - 1 + pow(alpha, -n9*(n62*(n89 - log(n33*n53/(n15 - xF[0]*xTj) + 1)) + 1))) - n42*n68/(n51 - 1 + pow(alpha, -n11*(n62*(n89 - log(n33*n53/(n15 - xF[0]*xTj) + 1)) + 1)))) + n42*n43*xF[0]/n109 - pow(NP0, -n1)*(n0*n137*n198*n42 - n0*n143 - n0*n19*(-pow(n111, n14)*n42*n63*(pow(alpha, NP0*n2 - n7*n92)*n61*n7*n79/n88 - pow(alpha, n18*n2 - n7*n92)*n21*n23*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n7*n92)*pow(n32, n14)*n46*n61*n7*pow(n88, n14) + n80) - pow(n113, n14)*n42*n67*(pow(alpha, NP0*n2 - n9*n92)*n61*n79*n9/n88 - pow(alpha, n18*n2 - n9*n92)*n21*n25*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n9*n92)*pow(n32, n14)*n46*n61*pow(n88, n14)*n9 + n81) + pow(n114, n14)*n42*n76*(pow(alpha, NP0*n2 - n10*n92)*n10*n61*n79/n88 + pow(alpha, -n10*n92 + n18*n2)*n10*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n10*n92 + n18*n2)*n21*n26*pow(n32, n14)*n46*pow(n88, n14) + n82) - pow(n115, n14)*n42*n68*(pow(alpha, NP0*n2 - n11*n92)*n11*n61*n79/n88 + pow(alpha, -n11*n92 + n18*n2)*n11*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n11*n92 + n18*n2)*n21*n27*pow(n32, n14)*n46*pow(n88, n14) + n86) - n133*n42*n43*(pow(alpha, NP0*n2 - n2*n92)*n74*n79/n88 + n83) + n135*n42*n66*(pow(alpha, NP0*n2 - n6*n92)*n6*n61*n79/n88 - pow(alpha, n18*n2 - n6*n92)*n21*n22*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n6*n92)*pow(n32, n14)*n46*n6*n61*pow(n88, n14) + n87) - n137*n42*(pow(alpha, NP0*n2 - n2*n92)*n2*n3*n79/n88 + n77)*(pow(alpha, NP0*n2 - n2*n92)*n2*n30*n79/n88 + n2*n30*n31) - n138*n42*(pow(alpha, NP0*n2 - n12*n92)*n12*n3*n79/n88 + n78)*(pow(alpha, NP0*n2 - n12*n92)*n12*n30*n79/n88 + n30*n73) - n139*n42*(pow(alpha, NP0*n2 - n12*n92)*n12*n61*n79/n88 + pow(alpha, -n12*n92 + n18*n2)*n12*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n12*n92 + n18*n2)*n21*n28*pow(n32, n14)*n46*pow(n88, n14) + n84) + n140*n42*(pow(alpha, NP0*n2 - n8*n92)*n61*n79*n8/n88 - pow(alpha, n18*n2 - n8*n92)*n21*n24*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n8*n92)*pow(n32, n14)*n46*n61*n8*pow(n88, n14) + n85) + n143 + n144 + n145 + n146 + n147 + n148 + n149 + n150 + n187 + n188 + n189 + n190 + n191 + n192 + n193 + n194 - n42*n68*(pow(alpha, NP0*n2 - n11*n92)*n11*n3*n79/n88 + n3*n69)*(pow(alpha, NP0*n2 - n11*n92)*n11*n30*n79/n88 + n30*n69)/n123 + n42*n76*(pow(alpha, NP0*n2 - n10*n92)*n10*n3*n79/n88 + n3*n65)*(pow(alpha, NP0*n2 - n10*n92)*n10*n30*n79/n88 + n30*n65)/n122 - n42*n67*(pow(alpha, NP0*n2 - n9*n92)*n3*n79*n9/n88 + n3*n72)*(pow(alpha, NP0*n2 - n9*n92)*n30*n79*n9/n88 + n30*n72)/n121 - n42*n48*xF[3]*(pow(alpha, NP0*n2 - n8*n92)*n3*n79*n8/n88 + n3*n70)*(pow(alpha, NP0*n2 - n8*n92)*n30*n79*n8/n88 + n30*n70)/n120 - n42*n63*(pow(alpha, NP0*n2 - n7*n92)*n3*n7*n79/n88 + n3*n64)*(pow(alpha, NP0*n2 - n7*n92)*n30*n7*n79/n88 + n30*n64)/n119 - n42*n66*(pow(alpha, NP0*n2 - n6*n92)*n3*n6*n79/n88 + n3*n71)*(pow(alpha, NP0*n2 - n6*n92)*n30*n6*n79/n88 + n30*n71)/n118) - n0*n196 + 1.0*n133*n154*n42*n77))*(-n1*n143 - n1*n19*(-pow(n111, n14)*n42*n63*(pow(alpha, NP0*n2 - n7*n92)*n61*n7*n79/n88 - pow(alpha, n18*n2 - n7*n92)*n21*n23*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n7*n92)*pow(n32, n14)*n46*n61*n7*pow(n88, n14) + n80) - pow(n113, n14)*n42*n67*(pow(alpha, NP0*n2 - n9*n92)*n61*n79*n9/n88 - pow(alpha, n18*n2 - n9*n92)*n21*n25*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n9*n92)*pow(n32, n14)*n46*n61*pow(n88, n14)*n9 + n81) + pow(n114, n14)*n42*n76*(pow(alpha, NP0*n2 - n10*n92)*n10*n61*n79/n88 + pow(alpha, -n10*n92 + n18*n2)*n10*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n10*n92 + n18*n2)*n21*n26*pow(n32, n14)*n46*pow(n88, n14) + n82) - pow(n115, n14)*n42*n68*(pow(alpha, NP0*n2 - n11*n92)*n11*n61*n79/n88 + pow(alpha, -n11*n92 + n18*n2)*n11*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n11*n92 + n18*n2)*n21*n27*pow(n32, n14)*n46*pow(n88, n14) + n86) - n133*n42*n43*(pow(alpha, NP0*n2 - n2*n92)*n74*n79/n88 + n83) + n135*n42*n66*(pow(alpha, NP0*n2 - n6*n92)*n6*n61*n79/n88 - pow(alpha, n18*n2 - n6*n92)*n21*n22*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n6*n92)*pow(n32, n14)*n46*n6*n61*pow(n88, n14) + n87) - n137*n42*(pow(alpha, NP0*n2 - n2*n92)*n2*n3*n79/n88 + n77)*(pow(alpha, NP0*n2 - n2*n92)*n2*n30*n79/n88 + n2*n30*n31) - n138*n42*(pow(alpha, NP0*n2 - n12*n92)*n12*n3*n79/n88 + n78)*(pow(alpha, NP0*n2 - n12*n92)*n12*n30*n79/n88 + n30*n73) - n139*n42*(pow(alpha, NP0*n2 - n12*n92)*n12*n61*n79/n88 + pow(alpha, -n12*n92 + n18*n2)*n12*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n12*n92 + n18*n2)*n21*n28*pow(n32, n14)*n46*pow(n88, n14) + n84) + n140*n42*(pow(alpha, NP0*n2 - n8*n92)*n61*n79*n8/n88 - pow(alpha, n18*n2 - n8*n92)*n21*n24*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n8*n92)*pow(n32, n14)*n46*n61*n8*pow(n88, n14) + n85) + n143 + n144 + n145 + n146 + n147 + n148 + n149 + n150 + n187 + n188 + n189 + n190 + n191 + n192 + n193 + n194 - n42*n68*(pow(alpha, NP0*n2 - n11*n92)*n11*n3*n79/n88 + n3*n69)*(pow(alpha, NP0*n2 - n11*n92)*n11*n30*n79/n88 + n30*n69)/n123 + n42*n76*(pow(alpha, NP0*n2 - n10*n92)*n10*n3*n79/n88 + n3*n65)*(pow(alpha, NP0*n2 - n10*n92)*n10*n30*n79/n88 + n30*n65)/n122 - n42*n67*(pow(alpha, NP0*n2 - n9*n92)*n3*n79*n9/n88 + n3*n72)*(pow(alpha, NP0*n2 - n9*n92)*n30*n79*n9/n88 + n30*n72)/n121 - n42*n48*xF[3]*(pow(alpha, NP0*n2 - n8*n92)*n3*n79*n8/n88 + n3*n70)*(pow(alpha, NP0*n2 - n8*n92)*n30*n79*n8/n88 + n30*n70)/n120 - n42*n63*(pow(alpha, NP0*n2 - n7*n92)*n3*n7*n79/n88 + n3*n64)*(pow(alpha, NP0*n2 - n7*n92)*n30*n7*n79/n88 + n30*n64)/n119 - n42*n66*(pow(alpha, NP0*n2 - n6*n92)*n3*n6*n79/n88 + n3*n71)*(pow(alpha, NP0*n2 - n6*n92)*n30*n6*n79/n88 + n30*n71)/n118) - n1*n196 + 4.0*n133*n154*n42*n77 - 4.0*n137*n162*n42) + pow(-n18*(n0*n133*n42*n43*(pow(alpha, NP0*n2 - n2*n92)*n74*n79/n88 + n83) + n0*n137*n42*(pow(alpha, NP0*n2 - n2*n92)*n2*n3*n79/n88 + n77)*(pow(alpha, NP0*n2 - n2*n92)*n2*n30*n79/n88 + n2*n30*n31) + n0*xTj*(-pow(n111, n14)*n42*n63*(pow(alpha, NP0*n2 - n7*n92)*n61*n7*n79/n88 - pow(alpha, n18*n2 - n7*n92)*n21*n23*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n7*n92)*pow(n32, n14)*n46*n61*n7*pow(n88, n14) + n80) - pow(n113, n14)*n42*n67*(pow(alpha, NP0*n2 - n9*n92)*n61*n79*n9/n88 - pow(alpha, n18*n2 - n9*n92)*n21*n25*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n9*n92)*pow(n32, n14)*n46*n61*pow(n88, n14)*n9 + n81) + pow(n114, n14)*n42*n76*(pow(alpha, NP0*n2 - n10*n92)*n10*n61*n79/n88 + pow(alpha, -n10*n92 + n18*n2)*n10*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n10*n92 + n18*n2)*n21*n26*pow(n32, n14)*n46*pow(n88, n14) + n82) - pow(n115, n14)*n42*n68*(pow(alpha, NP0*n2 - n11*n92)*n11*n61*n79/n88 + pow(alpha, -n11*n92 + n18*n2)*n11*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n11*n92 + n18*n2)*n21*n27*pow(n32, n14)*n46*pow(n88, n14) + n86) - n133*n42*n43*(pow(alpha, NP0*n2 - n2*n92)*n74*n79/n88 + n83) + n135*n42*n66*(pow(alpha, NP0*n2 - n6*n92)*n6*n61*n79/n88 - pow(alpha, n18*n2 - n6*n92)*n21*n22*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n6*n92)*pow(n32, n14)*n46*n6*n61*pow(n88, n14) + n87) - n137*n42*(pow(alpha, NP0*n2 - n2*n92)*n2*n3*n79/n88 + n77)*(pow(alpha, NP0*n2 - n2*n92)*n2*n30*n79/n88 + n2*n30*n31) - n138*n42*(pow(alpha, NP0*n2 - n12*n92)*n12*n3*n79/n88 + n78)*(pow(alpha, NP0*n2 - n12*n92)*n12*n30*n79/n88 + n30*n73) - n139*n42*(pow(alpha, NP0*n2 - n12*n92)*n12*n61*n79/n88 + pow(alpha, -n12*n92 + n18*n2)*n12*pow(n32, n14)*n46*n61*pow(n88, n14) - pow(alpha, -n12*n92 + n18*n2)*n21*n28*pow(n32, n14)*n46*pow(n88, n14) + n84) + n140*n42*(pow(alpha, NP0*n2 - n8*n92)*n61*n79*n8/n88 - pow(alpha, n18*n2 - n8*n92)*n21*n24*pow(n32, n14)*n46*pow(n88, n14) + pow(alpha, n18*n2 - n8*n92)*pow(n32, n14)*n46*n61*n8*pow(n88, n14) + n85) + n143 + n144 + n145 + n146 + n147 + n148 + n149 + n150 + n187 + n188 + n189 + n190 + n191 + n192 + n193 + n194 - n42*n68*(pow(alpha, NP0*n2 - n11*n92)*n11*n3*n79/n88 + n3*n69)*(pow(alpha, NP0*n2 - n11*n92)*n11*n30*n79/n88 + n30*n69)/n123 + n42*n76*(pow(alpha, NP0*n2 - n10*n92)*n10*n3*n79/n88 + n3*n65)*(pow(alpha, NP0*n2 - n10*n92)*n10*n30*n79/n88 + n30*n65)/n122 - n42*n67*(pow(alpha, NP0*n2 - n9*n92)*n3*n79*n9/n88 + n3*n72)*(pow(alpha, NP0*n2 - n9*n92)*n30*n79*n9/n88 + n30*n72)/n121 - n42*n48*xF[3]*(pow(alpha, NP0*n2 - n8*n92)*n3*n79*n8/n88 + n3*n70)*(pow(alpha, NP0*n2 - n8*n92)*n30*n79*n8/n88 + n30*n70)/n120 - n42*n63*(pow(alpha, NP0*n2 - n7*n92)*n3*n7*n79/n88 + n3*n64)*(pow(alpha, NP0*n2 - n7*n92)*n30*n7*n79/n88 + n30*n64)/n119 - n42*n66*(pow(alpha, NP0*n2 - n6*n92)*n3*n6*n79/n88 + n3*n71)*(pow(alpha, NP0*n2 - n6*n92)*n30*n6*n79/n88 + n30*n71)/n118) + 1.0*n133*n42*n77*(pow(alpha, NP0*n2 - n2*n92)*n2*n3*n79/n88 + n77) + n151) - n212, -n1);
21869 NP_sqrt_base = fabs(NP_sqrt_base);
21870 NP1 = (-NP_b - pow(NP_sqrt_base, -n0))/NP_2a;
21871 NT1 = n62*(n89 - log(-pow(alpha, NP1*n2)*n79 + 1));
21872 g0 = MW[1] - Mstar;
21873 g1 = MW[0] - Mstar;
21876 g4 = MW[2] - Mstar;
21877 g5 = MW[3] - Mstar;
21878 g6 = MW[4] - Mstar;
21879 g7 = MW[5] - Mstar;
21880 g8 = MW[6] - Mstar;
21881 g9 = MW[7] - Mstar;
21886 g14 = pow(alpha, -g1);
21887 g15 = pow(alpha, -g0);
21888 g16 = pow(alpha, -g4);
21889 g17 = pow(alpha, -g5);
21890 g18 = pow(alpha, -g6);
21891 g19 = pow(alpha, -g7);
21892 g20 = pow(alpha, -g8);
21893 g21 = pow(alpha, -g9);
21894 g22 = log(xF[0]/xF[1]);
21896 g24 = pow(alpha, NP1*g0);
21897 g25 = pow(alpha, NP1*g1);
21899 g27 = pow(alpha, NP1*g4);
21900 g28 = pow(alpha, NP1*g5);
21901 g29 = pow(alpha, NP1*g6);
21902 g30 = pow(alpha, NP1*g7);
21903 g31 = pow(alpha, NP1*g8);
21904 g32 = pow(alpha, NP1*g9);
21926 g54 = g11/(g3*xF[1]);
21927 g55 = pow(alpha, g0*g23) - 1;
21928 g56 = pow(alpha, g0*g23) - 1;
21929 g57 = pow(alpha, g1*g23) - 1;
21930 g58 = pow(alpha, g23*g4) - 1;
21931 g59 = pow(alpha, g23*g5) - 1;
21932 g60 = pow(alpha, g23*g6) - 1;
21933 g61 = pow(alpha, g23*g7) - 1;
21934 g62 = pow(alpha, g23*g8) - 1;
21935 g63 = pow(alpha, g23*g9) - 1;
21936 g64 = -pow(alpha, g1*g23);
21937 g65 = -pow(alpha, g23*g4);
21938 g66 = -pow(alpha, g23*g5);
21939 g67 = -pow(alpha, g23*g6);
21940 g68 = -pow(alpha, g23*g7);
21941 g69 = -pow(alpha, g23*g8);
21942 g70 = -pow(alpha, g23*g9);
21951 g79 = pow(alpha, g1*g23) + g45;
21953 g81 = pow(alpha, g23*g4) + g46;
21954 g82 = pow(alpha, g23*g5) + g47;
21955 g83 = pow(alpha, g23*g6) + g48;
21956 g84 = pow(alpha, g23*g7) + g49;
21957 g85 = pow(alpha, g23*g8) + g50;
21958 g86 = pow(alpha, g23*g9) + g51;
21991 g119 = log(g12*g54*g80/g37);
21992 g120 = log(g12*g54*g71/g36);
21993 g121 = log(g13*g34*g80/g56);
21995 g123 = log(g13*g34*g71/g55);
21997 g125 = -g122*g37*g88 - g122*g87*(g45 + 1) - g122*g89*(g46 + 1) - g122*g90*(g47 + 1) - g122*g91*(g50 + 1) - g122*g92*(g51 + 1) - g122*g93*(g48 + 1) - g122*g94*(g49 + 1) - g124*g56*g88 - g124*g87*(pow(alpha, g1*g23) - 1) - g124*g89*(pow(alpha, g23*g4) - 1) - g124*g90*(pow(alpha, g23*g5) - 1) - g124*g91*(pow(alpha, g23*g8) - 1) - g124*g92*(pow(alpha, g23*g9) - 1) - g124*g93*(pow(alpha, g23*g6) - 1) - g124*g94*(pow(alpha, g23*g7) - 1) - g52*xF[0] - g52*xF[1] - g52*xF[2] - g52*xF[3] - g52*xF[4] - g52*xF[5] - g52*xF[6] - g52*xF[7];
21998 LpF = xF[0]*(g14 + 1.0)*(g106*g120 + g112*g123 + g33)/(g26*(g14 - 1.0)) + xF[1]*(g15 + 1.0)*(g109*g120 + g111*g123 + g33)/(g26*(g15 - 1.0)) + xF[2]*(g16 + 1.0)*(g110*g120 + g114*g123 + g33)/(g26*(g16 - 1.0)) + xF[3]*(g17 + 1.0)*(g108*g120 + g115*g123 + g33)/(g26*(g17 - 1.0)) + xF[4]*(g18 + 1.0)*(g104*g120 + g116*g123 + g33)/(g26*(g18 - 1.0)) + xF[5]*(g19 + 1.0)*(g107*g120 + g113*g123 + g33)/(g26*(g19 - 1.0)) + xF[6]*(g20 + 1.0)*(g103*g120 + g117*g123 + g33)/(g26*(g20 - 1.0)) + xF[7]*(g21 + 1.0)*(g105*g120 + g118*g123 + g33)/(g26*(g21 - 1.0));
22003 xP[0] = g35*g57*g96;
22004 xP[1] = g35*g55*g95;
22005 xP[2] = g100*g35*g58;
22006 xP[3] = g102*g35*g59;
22007 xP[4] = g35*g60*g97;
22008 xP[5] = g35*g61*g98;
22009 xP[6] = g101*g35*g62;
22010 xP[7] = g35*g63*g99;
22011 xT[0] = g38*g53*g96;
22012 xT[1] = g36*g53*g95;
22013 xT[2] = g100*g39*g53;
22014 xT[3] = g102*g40*g53;
22015 xT[4] = g41*g53*g97;
22016 xT[5] = g42*g53*g98;
22017 xT[6] = g101*g43*g53;
22018 xT[7] = g44*g53*g99;
22021 n0 = MW[0] - Mstar;
22025 n4 = MW[1] - Mstar;
22026 n5 = MW[2] - Mstar;
22027 n6 = MW[3] - Mstar;
22028 n7 = MW[4] - Mstar;
22029 n8 = MW[5] - Mstar;
22030 n9 = MW[6] - Mstar;
22031 n10 = MW[7] - Mstar;
22032 n11 = MW[8] - Mstar;
22041 n20 = pow(n0, -n13);
22042 n21 = pow(n1, -n13);
22043 n22 = pow(n4, -n13);
22044 n23 = pow(n5, -n13);
22045 n24 = pow(n6, -n13);
22046 n25 = pow(n7, -n13);
22047 n26 = pow(n8, -n13);
22048 n27 = pow(n9, -n13);
22049 n28 = pow(n10, -n13);
22050 n29 = pow(n11, -n13);
22053 n32 = pow(alpha, NP0*n0);
22054 n33 = n14 + n18*xTj;
22055 n34 = n14 + n16*xTj;
22056 n35 = pow(alpha, NP0*n4);
22057 n36 = pow(alpha, NP0*n5);
22058 n37 = pow(alpha, NP0*n6);
22059 n38 = pow(alpha, NP0*n7);
22060 n39 = pow(alpha, NP0*n8);
22061 n40 = pow(alpha, NP0*n9);
22062 n41 = pow(alpha, NP0*n10);
22063 n42 = pow(alpha, NP0*n11);
22069 n48 = pow(alpha, n0*n17);
22070 n49 = pow(n33, -n13);
22071 n50 = pow(n34, -n13);
22097 n76 = log((-1.0 + xPj/xF[0])/n2);
22112 n91 = pow(n90, -n13);
22113 n92 = n12 + n30 + n43 + n76;
22115 n94 = n21*n48*n50/(n49*n91);
22116 n95 = n64*(n92 - log(n90)) + 1;
22117 n96 = pow(alpha, n0*n95);
22118 n97 = pow(alpha, n4*n95);
22119 n98 = pow(alpha, n5*n95);
22120 n99 = pow(alpha, n6*n95);
22121 n100 = pow(alpha, n7*n95);
22122 n101 = pow(alpha, n8*n95);
22123 n102 = pow(alpha, n9*n95);
22124 n103 = pow(alpha, n10*n95);
22125 n104 = pow(alpha, n11*n95);
22134 n113 = n46 - 1 + 1.0/n96;
22135 n114 = n47 - 1 + 1.0/n97;
22136 n115 = n51 - 1 + 1.0/n98;
22137 n116 = n52 - 1 + 1.0/n99;
22138 n117 = n53 - 1 + 1.0/n100;
22139 n118 = n54 - 1 + 1.0/n101;
22140 n119 = n55 - 1 + 1.0/n102;
22141 n120 = n56 - 1 + 1.0/n103;
22142 n121 = n57 - 1 + 1.0/n104;
22143 n122 = pow(n113, -n13);
22144 n123 = pow(n114, -n13);
22145 n124 = pow(n115, -n13);
22146 n125 = pow(n116, -n13);
22147 n126 = pow(n117, -n13);
22148 n127 = pow(n118, -n13);
22149 n128 = pow(n119, -n13);
22150 n129 = pow(n120, -n13);
22151 n130 = pow(n121, -n13);
22152 n131 = pow(n113, 3);
22153 n132 = pow(n114, 3);
22154 n133 = pow(n115, 3);
22155 n134 = pow(n116, 3);
22156 n135 = pow(n117, 3);
22157 n136 = pow(n118, 3);
22158 n137 = pow(n119, 3);
22159 n138 = pow(n120, 3);
22160 n139 = pow(n121, 3);
22169 n148 = n1*xF[5]/n118;
22172 n151 = n32*xF[0]/n113;
22174 n153 = n32*xF[0]/n122;
22175 n154 = n56*xF[7]/n138;
22176 n155 = n56*xF[7]/n129;
22177 n156 = n61*xF[3]/n125;
22178 n157 = n21*n26*n39*xF[5]/n118;
22179 n158 = n151*n44/n64;
22180 n159 = n18*n32*n44/(n113*n64);
22181 n160 = n151*n44*n66;
22182 n161 = n143*n44*n88;
22183 n162 = n144*n44*n82;
22184 n163 = n146*n44*n86;
22185 n164 = n145*n44*n83;
22187 n166 = n141*n44*n87;
22188 n167 = n142*n44*n85;
22189 n168 = n140*n44*n84;
22191 n170 = n81/(n90*n96) + 1;
22193 n172 = n32/n64 + n93/(n64*n96);
22194 n173 = n1*n105*n93 + n1*n72;
22195 n174 = n1*n112*n93 + n1*n67;
22196 n175 = n1*n108*n93 + n1*n71;
22197 n176 = n1*n107*n93 + n1*n73;
22198 n177 = n1*n111*n93 + n1*n68;
22199 n178 = n1*n110*n93 + n1*n70;
22200 n179 = n1*n109*n93 + n80;
22201 n180 = n1*n106*n93 + n79;
22202 n181 = pow(n172, -n13);
22203 n182 = pow(n173, -n13);
22204 n183 = pow(n174, -n13);
22205 n184 = pow(n175, -n13);
22206 n185 = pow(n176, -n13);
22207 n186 = pow(n177, -n13);
22208 n187 = pow(n178, -n13);
22209 n188 = pow(n179, -n13);
22210 n189 = pow(n180, -n13);
22213 n192 = n0*n31*n32 + n0*n31*n93/n96;
22214 n193 = n32*n66 + n66*n93/n96;
22217 n196 = n176*n60*xF[4];
22220 n199 = n178*xF[6]/n128;
22223 n202 = n181*n46*xF[0]/n131;
22224 n203 = n184*n52*xF[3]/n134;
22225 n204 = n185*n53*xF[4]/n135;
22226 n205 = n183*n51*xF[2]/n133;
22227 n206 = n182*n47*xF[1]/n132;
22228 n207 = n193*n46/n122;
22229 n208 = n18*n44*n46*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)/n122;
22230 n209 = n13*n18*n32*n44*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)/(n122*n64);
22231 n210 = n31*n44*n72*xF[1]*(pow(alpha, NP0*n0 - n4*n95)*n1*n4*n81/n90 + n1*n72)/n123;
22232 n211 = n31*n44*n67*xF[2]*(pow(alpha, NP0*n0 - n5*n95)*n1*n5*n81/n90 + n1*n67)/n124;
22233 n212 = n31*n44*n71*xF[3]*(pow(alpha, NP0*n0 - n6*n95)*n1*n6*n81/n90 + n1*n71)/n125;
22234 n213 = n31*n44*n73*xF[4]*(pow(alpha, NP0*n0 - n7*n95)*n1*n7*n81/n90 + n1*n73)/n126;
22235 n214 = n31*n44*n68*xF[5]*(pow(alpha, NP0*n0 - n8*n95)*n1*n8*n81/n90 + n1*n68)/n127;
22236 n215 = n31*n44*n70*xF[6]*(pow(alpha, NP0*n0 - n9*n95)*n1*n81*n9/n90 + n1*n70)/n128;
22237 n216 = n31*n44*n75*xF[7]*(pow(alpha, NP0*n0 - n10*n95)*n1*n10*n81/n90 + n80)/n129;
22238 n217 = n31*n44*n74*xF[8]*(pow(alpha, NP0*n0 - n11*n95)*n1*n11*n81/n90 + n79)/n130;
22239 n218 = 1.0*n153*n172*n44/n64;
22240 n219 = n18*n44*n46*(pow(alpha, NP0*n0 - n0*n95)*n66*n81/n90 + n32*n66)/n122;
22241 n220 = -0.5*n207*n44*xF[0];
22242 n221 = n158 + n208;
22243 n222 = n105*n48*n50*n65/(n49*n91) + n105*n65*n93 - n22*n94/n97 + n88;
22244 n223 = n112*n48*n50*n65/(n49*n91) + n112*n65*n93 - n23*n94/n98 + n82;
22245 n224 = n107*n48*n50*n65/(n49*n91) + n107*n65*n93 + n83 - n25*n94/n100;
22246 n225 = n111*n48*n50*n65/(n49*n91) + n111*n65*n93 + n21*n26*n39 - n26*n94/n101;
22247 n226 = n110*n48*n50*n65/(n49*n91) + n110*n65*n93 + n87 - n27*n94/n102;
22248 n227 = n44*n78*(-pow(alpha, n0*n17 - n4*n95)*n21*n22*n50/(n49*n91) + pow(alpha, n0*n17 - n4*n95)*n4*n50*n65/(n49*n91) + n105*n65*n93 + n88)/n123;
22249 n228 = n44*n59*xF[2]*(-pow(alpha, n0*n17 - n5*n95)*n21*n23*n50/(n49*n91) + pow(alpha, n0*n17 - n5*n95)*n5*n50*n65/(n49*n91) + n112*n65*n93 + n82)/n124;
22250 n229 = n156*n44*(-pow(alpha, n0*n17 - n6*n95)*n21*n24*n50/(n49*n91) + pow(alpha, n0*n17 - n6*n95)*n50*n6*n65/(n49*n91) + n108*n65*n93 + n86);
22251 n230 = n44*n60*xF[4]*(-pow(alpha, n0*n17 - n7*n95)*n21*n25*n50/(n49*n91) + pow(alpha, n0*n17 - n7*n95)*n50*n65*n7/(n49*n91) + n107*n65*n93 + n83)/n126;
22252 n231 = n89*(-pow(alpha, n0*n17 - n8*n95)*n21*n26*n50/(n49*n91) + pow(alpha, n0*n17 - n8*n95)*n50*n65*n8/(n49*n91) + n111*n65*n93 + n21*n26*n39)/n127;
22253 n232 = n44*n58*xF[6]*(-pow(alpha, n0*n17 - n9*n95)*n21*n27*n50/(n49*n91) + pow(alpha, n0*n17 - n9*n95)*n50*n65*n9/(n49*n91) + n110*n65*n93 + n87)/n128;
22254 n233 = -n155*n44*(pow(alpha, n0*n17 - n10*n95)*n10*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n10*n95)*n21*n28*n50/(n49*n91) + n109*n65*n93 + n85);
22255 n234 = n149*n44*n69*(pow(alpha, n0*n17 - n11*n95)*n11*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n11*n95)*n21*n29*n50/(n49*n91) + n106*n65*n93 + n84);
22256 n235 = n169 + n218 + n220;
22257 n236 = n1*n141*n44*n70 + n1*n143*n44*n72 + n1*n144*n44*n67 + n1*n145*n44*n73 + n140*n44*n79 + n142*n44*n80 + n148*n44*n68 + n149*n180*n44*n69 + n150*n44*n71 - n155*n179*n44 + n156*n175*n44 + n197*n89 + n198*n44*n78 + n199*n44*n58 + n221 + n196*n44/n126 + n190*n44*n59/n124;
22259 n238 = n160 + n161 + n162 + n163 + n164 + n165 + n166 + n167 + n168 + n209 + n210 + n211 + n212 + n213 + n214 + n215 + n216 + n217 + n219 + n227 + n228 + n229 + n230 + n231 + n232 + n233 + n234;
22260 n239 = n147*n178*n44*n58*(n110*n31*n93 + n31*n70) - n154*n179*n44*(n109*n31*n93 + n31*n75) + n238 - n180*n44*n69*(n106*n31*n93 + n31*n74)/n139 + n177*n89*(n111*n31*n93 + n31*n68)/n136 + n196*n44*(n107*n31*n93 + n31*n73)/n135 + n191*n44*n61*(n108*n31*n93 + n31*n71)/n134 + n190*n44*n59*(n112*n31*n93 + n31*n67)/n133 + n173*n44*n78*(n105*n31*n93 + n31*n72)/n132 + n18*n44*n46*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)*(pow(alpha, NP0*n0 - n0*n95)*n0*n31*n81/n90 + n0*n31*n32)/n131;
22261 NP_b = -n153*n171*n44/n64 - n159 - n17*(1.0*n153*n44*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)/n64 + n169 - 1.0*n202*n44 - 0.5*xTj*(n13*n147*n195*n44 + n13*n154*n188*n44 + n13*n200*n44*n69 + n13*n202*n44 + n13*n203*n44 + n13*n204*n44 + n13*n205*n44 + n13*n206*n44 + n13*n186*n44*n54*xF[5]/n136 + n149*n44*n69*(pow(alpha, NP0*n0 - n11*n95)*n11*n65*n81/n90 + pow(alpha, n0*n17 - n11*n95)*n11*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n11*n95)*n21*n29*n50/(n49*n91) + n84) - n155*n44*(pow(alpha, NP0*n0 - n10*n95)*n10*n65*n81/n90 + pow(alpha, n0*n17 - n10*n95)*n10*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n10*n95)*n21*n28*n50/(n49*n91) + n85) + n156*n44*(pow(alpha, NP0*n0 - n6*n95)*n6*n65*n81/n90 - pow(alpha, n0*n17 - n6*n95)*n21*n24*n50/(n49*n91) + pow(alpha, n0*n17 - n6*n95)*n50*n6*n65/(n49*n91) + n86) + n160 + n161 + n162 + n163 + n164 + n165 + n166 + n167 + n168 + n209 + n210 + n211 + n212 + n213 + n214 + n215 + n216 + n217 + n219 + n44*n58*xF[6]*(pow(alpha, NP0*n0 - n9*n95)*n65*n81*n9/n90 - pow(alpha, n0*n17 - n9*n95)*n21*n27*n50/(n49*n91) + pow(alpha, n0*n17 - n9*n95)*n50*n65*n9/(n49*n91) + n87)/n128 + n89*(pow(alpha, NP0*n0 - n8*n95)*n65*n8*n81/n90 - pow(alpha, n0*n17 - n8*n95)*n21*n26*n50/(n49*n91) + pow(alpha, n0*n17 - n8*n95)*n50*n65*n8/(n49*n91) + n21*n26*n39)/n127 + n44*n60*xF[4]*(pow(alpha, NP0*n0 - n7*n95)*n65*n7*n81/n90 - pow(alpha, n0*n17 - n7*n95)*n21*n25*n50/(n49*n91) + pow(alpha, n0*n17 - n7*n95)*n50*n65*n7/(n49*n91) + n83)/n126 + n44*n59*xF[2]*(pow(alpha, NP0*n0 - n5*n95)*n5*n65*n81/n90 - pow(alpha, n0*n17 - n5*n95)*n21*n23*n50/(n49*n91) + pow(alpha, n0*n17 - n5*n95)*n5*n50*n65/(n49*n91) + n82)/n124 + n44*n78*(pow(alpha, NP0*n0 - n4*n95)*n4*n65*n81/n90 - pow(alpha, n0*n17 - n4*n95)*n21*n22*n50/(n49*n91) + pow(alpha, n0*n17 - n4*n95)*n4*n50*n65/(n49*n91) + n88)/n123) - 0.5*n44*n46*xF[0]*(pow(alpha, NP0*n0 - n0*n95)*n66*n81/n90 + n32*n66)/n122) - n44*xTj*(n1*n141*n70 + n1*n143*n72 + n1*n144*n67 + n1*n145*n73 + n140*n79 + n142*n80 + n148*n68 + n149*n180*n69 + n150*n71 + n151/n64 - n155*n179 + n156*n175 + n197*n77 + n198*n78 + n199*n58 + n196/n126 + n190*n59/n124 + n18*n46*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)/n122);
22262 NP_2a = -n44*(n13*pow(n170, -n13)*n18*n46*n48*n66/n131 - 1.0*n151*n66 + n153*n171*n66 + 1.0*xTj*(n13*n147*n195 + n13*n154*n188 + n13*n200*n69 + n13*n202 + n13*n203 + n13*n204 + n13*n205 + n13*n206 + n13*n186*n54*xF[5]/n136 + n140*n84 + n141*n87 + n142*n85 + n143*n88 + n144*n82 + n145*n83 + n146*n86 + n149*n69*(pow(alpha, n0*n17 - n11*n95)*n11*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n11*n95)*n21*n29*n50/(n49*n91) + n106*n65*n93 + n84) + n151*n66 - n155*(pow(alpha, n0*n17 - n10*n95)*n10*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n10*n95)*n21*n28*n50/(n49*n91) + n109*n65*n93 + n85) + n156*(-pow(alpha, n0*n17 - n6*n95)*n21*n24*n50/(n49*n91) + pow(alpha, n0*n17 - n6*n95)*n50*n6*n65/(n49*n91) + n108*n65*n93 + n86) + n157 + n31*n74*xF[8]*(pow(alpha, NP0*n0 - n11*n95)*n1*n11*n81/n90 + n79)/n130 + n31*n75*xF[7]*(pow(alpha, NP0*n0 - n10*n95)*n1*n10*n81/n90 + n80)/n129 + n31*n70*xF[6]*(pow(alpha, NP0*n0 - n9*n95)*n1*n81*n9/n90 + n1*n70)/n128 + n58*xF[6]*(-pow(alpha, n0*n17 - n9*n95)*n21*n27*n50/(n49*n91) + pow(alpha, n0*n17 - n9*n95)*n50*n65*n9/(n49*n91) + n110*n65*n93 + n87)/n128 + n31*n68*xF[5]*(pow(alpha, NP0*n0 - n8*n95)*n1*n8*n81/n90 + n1*n68)/n127 + n77*(-pow(alpha, n0*n17 - n8*n95)*n21*n26*n50/(n49*n91) + pow(alpha, n0*n17 - n8*n95)*n50*n65*n8/(n49*n91) + n111*n65*n93 + n21*n26*n39)/n127 + n31*n73*xF[4]*(pow(alpha, NP0*n0 - n7*n95)*n1*n7*n81/n90 + n1*n73)/n126 + n60*xF[4]*(-pow(alpha, n0*n17 - n7*n95)*n21*n25*n50/(n49*n91) + pow(alpha, n0*n17 - n7*n95)*n50*n65*n7/(n49*n91) + n107*n65*n93 + n83)/n126 + n31*n71*xF[3]*(pow(alpha, NP0*n0 - n6*n95)*n1*n6*n81/n90 + n1*n71)/n125 + n31*n67*xF[2]*(pow(alpha, NP0*n0 - n5*n95)*n1*n5*n81/n90 + n1*n67)/n124 + n59*xF[2]*(-pow(alpha, n0*n17 - n5*n95)*n21*n23*n50/(n49*n91) + pow(alpha, n0*n17 - n5*n95)*n5*n50*n65/(n49*n91) + n112*n65*n93 + n82)/n124 + n31*n72*xF[1]*(pow(alpha, NP0*n0 - n4*n95)*n1*n4*n81/n90 + n1*n72)/n123 + n78*(-pow(alpha, n0*n17 - n4*n95)*n21*n22*n50/(n49*n91) + pow(alpha, n0*n17 - n4*n95)*n4*n50*n65/(n49*n91) + n105*n65*n93 + n88)/n123 + n13*n18*n32*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)/(n122*n64) + n18*n46*(pow(alpha, NP0*n0 - n0*n95)*n66*n81/n90 + n32*n66)/n122) - 2.0*n170*n48*n66*xF[0]/n122);
22263 NP_sqrt_base = (NP0*(n19*(n1*n141*n44*n70 + n1*n143*n44*n72 + n1*n144*n44*n67 + n1*n145*n44*n73 + n140*n44*n79 + n142*n44*n80 + n148*n44*n68 + n149*n44*n69*(pow(alpha, NP0*n0 - n11*n95)*n1*n11*n81/n90 + n79) + n150*n44*n71 - n155*n44*(pow(alpha, NP0*n0 - n10*n95)*n1*n10*n81/n90 + n80) + n156*n44*(pow(alpha, NP0*n0 - n6*n95)*n1*n6*n81/n90 + n1*n71) + n221 + n44*n58*xF[6]*(pow(alpha, NP0*n0 - n9*n95)*n1*n81*n9/n90 + n1*n70)/n128 + n89*(pow(alpha, NP0*n0 - n8*n95)*n1*n8*n81/n90 + n1*n68)/n127 + n44*n60*xF[4]*(pow(alpha, NP0*n0 - n7*n95)*n1*n7*n81/n90 + n1*n73)/n126 + n44*n59*xF[2]*(pow(alpha, NP0*n0 - n5*n95)*n1*n5*n81/n90 + n1*n67)/n124 + n44*n78*(pow(alpha, NP0*n0 - n4*n95)*n1*n4*n81/n90 + n1*n72)/n123) + n221) + n152*n44*xF[0] + xTj*(n141*n44*n58 - n142*n44*n56 + n144*n44*n59 + n145*n44*n60 + n146*n44*n61 + n152*n18*n44 - n44*n69/n121 + n89/n118 + n44*n78/n114) + pow(NP0, -n13)*(-1.0*n153*n172*n44/n64 - 0.5*n160 + 0.5*n194*n201*n44*xF[0] + 0.5*n207*n44*xF[0] + 0.5*n239*xTj))*(-n13*n19*(n147*n44*n58*(pow(alpha, NP0*n0 - n9*n95)*n1*n81*n9/n90 + n1*n70)*(pow(alpha, NP0*n0 - n9*n95)*n31*n81*n9/n90 + n31*n70) + n149*n44*n69*(pow(alpha, NP0*n0 - n11*n95)*n11*n65*n81/n90 + pow(alpha, n0*n17 - n11*n95)*n11*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n11*n95)*n21*n29*n50/(n49*n91) + n84) - n154*n44*(pow(alpha, NP0*n0 - n10*n95)*n1*n10*n81/n90 + n80)*(pow(alpha, NP0*n0 - n10*n95)*n10*n31*n81/n90 + n31*n75) - n155*n44*(pow(alpha, NP0*n0 - n10*n95)*n10*n65*n81/n90 + pow(alpha, n0*n17 - n10*n95)*n10*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n10*n95)*n21*n28*n50/(n49*n91) + n85) + n156*n44*(pow(alpha, NP0*n0 - n6*n95)*n6*n65*n81/n90 - pow(alpha, n0*n17 - n6*n95)*n21*n24*n50/(n49*n91) + pow(alpha, n0*n17 - n6*n95)*n50*n6*n65/(n49*n91) + n86) + n160 + n161 + n162 + n163 + n164 + n165 + n166 + n167 + n168 + n209 + n210 + n211 + n212 + n213 + n214 + n215 + n216 + n217 + n219 - n44*n69*(pow(alpha, NP0*n0 - n11*n95)*n1*n11*n81/n90 + n79)*(pow(alpha, NP0*n0 - n11*n95)*n11*n31*n81/n90 + n31*n74)/n139 + n89*(pow(alpha, NP0*n0 - n8*n95)*n1*n8*n81/n90 + n1*n68)*(pow(alpha, NP0*n0 - n8*n95)*n31*n8*n81/n90 + n31*n68)/n136 + n44*n60*xF[4]*(pow(alpha, NP0*n0 - n7*n95)*n1*n7*n81/n90 + n1*n73)*(pow(alpha, NP0*n0 - n7*n95)*n31*n7*n81/n90 + n31*n73)/n135 + n44*n61*xF[3]*(pow(alpha, NP0*n0 - n6*n95)*n1*n6*n81/n90 + n1*n71)*(pow(alpha, NP0*n0 - n6*n95)*n31*n6*n81/n90 + n31*n71)/n134 + n44*n59*xF[2]*(pow(alpha, NP0*n0 - n5*n95)*n1*n5*n81/n90 + n1*n67)*(pow(alpha, NP0*n0 - n5*n95)*n31*n5*n81/n90 + n31*n67)/n133 + n44*n78*(pow(alpha, NP0*n0 - n4*n95)*n1*n4*n81/n90 + n1*n72)*(pow(alpha, NP0*n0 - n4*n95)*n31*n4*n81/n90 + n31*n72)/n132 + n18*n44*n46*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)*(pow(alpha, NP0*n0 - n0*n95)*n0*n31*n81/n90 + n0*n31*n32)/n131 + n44*n58*xF[6]*(pow(alpha, NP0*n0 - n9*n95)*n65*n81*n9/n90 - pow(alpha, n0*n17 - n9*n95)*n21*n27*n50/(n49*n91) + pow(alpha, n0*n17 - n9*n95)*n50*n65*n9/(n49*n91) + n87)/n128 + n89*(pow(alpha, NP0*n0 - n8*n95)*n65*n8*n81/n90 - pow(alpha, n0*n17 - n8*n95)*n21*n26*n50/(n49*n91) + pow(alpha, n0*n17 - n8*n95)*n50*n65*n8/(n49*n91) + n21*n26*n39)/n127 + n44*n60*xF[4]*(pow(alpha, NP0*n0 - n7*n95)*n65*n7*n81/n90 - pow(alpha, n0*n17 - n7*n95)*n21*n25*n50/(n49*n91) + pow(alpha, n0*n17 - n7*n95)*n50*n65*n7/(n49*n91) + n83)/n126 + n44*n59*xF[2]*(pow(alpha, NP0*n0 - n5*n95)*n5*n65*n81/n90 - pow(alpha, n0*n17 - n5*n95)*n21*n23*n50/(n49*n91) + pow(alpha, n0*n17 - n5*n95)*n5*n50*n65/(n49*n91) + n82)/n124 + n44*n78*(pow(alpha, NP0*n0 - n4*n95)*n4*n65*n81/n90 - pow(alpha, n0*n17 - n4*n95)*n21*n22*n50/(n49*n91) + pow(alpha, n0*n17 - n4*n95)*n4*n50*n65/(n49*n91) + n88)/n123) - n13*n219 + 4.0*n153*n172*n44/n64 + 2.0*n160 - 4.0*n202*n44) + pow(-n159 - n17*(1.0*n153*n44*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)/n64 + n169 - 0.5*xTj*(n147*n44*n58*(pow(alpha, NP0*n0 - n9*n95)*n1*n81*n9/n90 + n1*n70)*(pow(alpha, NP0*n0 - n9*n95)*n31*n81*n9/n90 + n31*n70) + n149*n44*n69*(pow(alpha, NP0*n0 - n11*n95)*n11*n65*n81/n90 + pow(alpha, n0*n17 - n11*n95)*n11*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n11*n95)*n21*n29*n50/(n49*n91) + n84) - n154*n44*(pow(alpha, NP0*n0 - n10*n95)*n1*n10*n81/n90 + n80)*(pow(alpha, NP0*n0 - n10*n95)*n10*n31*n81/n90 + n31*n75) - n155*n44*(pow(alpha, NP0*n0 - n10*n95)*n10*n65*n81/n90 + pow(alpha, n0*n17 - n10*n95)*n10*n50*n65/(n49*n91) - pow(alpha, n0*n17 - n10*n95)*n21*n28*n50/(n49*n91) + n85) + n156*n44*(pow(alpha, NP0*n0 - n6*n95)*n6*n65*n81/n90 - pow(alpha, n0*n17 - n6*n95)*n21*n24*n50/(n49*n91) + pow(alpha, n0*n17 - n6*n95)*n50*n6*n65/(n49*n91) + n86) + n160 + n161 + n162 + n163 + n164 + n165 + n166 + n167 + n168 + n209 + n210 + n211 + n212 + n213 + n214 + n215 + n216 + n217 + n219 - n44*n69*(pow(alpha, NP0*n0 - n11*n95)*n1*n11*n81/n90 + n79)*(pow(alpha, NP0*n0 - n11*n95)*n11*n31*n81/n90 + n31*n74)/n139 + n89*(pow(alpha, NP0*n0 - n8*n95)*n1*n8*n81/n90 + n1*n68)*(pow(alpha, NP0*n0 - n8*n95)*n31*n8*n81/n90 + n31*n68)/n136 + n44*n60*xF[4]*(pow(alpha, NP0*n0 - n7*n95)*n1*n7*n81/n90 + n1*n73)*(pow(alpha, NP0*n0 - n7*n95)*n31*n7*n81/n90 + n31*n73)/n135 + n44*n61*xF[3]*(pow(alpha, NP0*n0 - n6*n95)*n1*n6*n81/n90 + n1*n71)*(pow(alpha, NP0*n0 - n6*n95)*n31*n6*n81/n90 + n31*n71)/n134 + n44*n59*xF[2]*(pow(alpha, NP0*n0 - n5*n95)*n1*n5*n81/n90 + n1*n67)*(pow(alpha, NP0*n0 - n5*n95)*n31*n5*n81/n90 + n31*n67)/n133 + n44*n78*(pow(alpha, NP0*n0 - n4*n95)*n1*n4*n81/n90 + n1*n72)*(pow(alpha, NP0*n0 - n4*n95)*n31*n4*n81/n90 + n31*n72)/n132 + n18*n44*n46*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)*(pow(alpha, NP0*n0 - n0*n95)*n0*n31*n81/n90 + n0*n31*n32)/n131 + n44*n58*xF[6]*(pow(alpha, NP0*n0 - n9*n95)*n65*n81*n9/n90 - pow(alpha, n0*n17 - n9*n95)*n21*n27*n50/(n49*n91) + pow(alpha, n0*n17 - n9*n95)*n50*n65*n9/(n49*n91) + n87)/n128 + n89*(pow(alpha, NP0*n0 - n8*n95)*n65*n8*n81/n90 - pow(alpha, n0*n17 - n8*n95)*n21*n26*n50/(n49*n91) + pow(alpha, n0*n17 - n8*n95)*n50*n65*n8/(n49*n91) + n21*n26*n39)/n127 + n44*n60*xF[4]*(pow(alpha, NP0*n0 - n7*n95)*n65*n7*n81/n90 - pow(alpha, n0*n17 - n7*n95)*n21*n25*n50/(n49*n91) + pow(alpha, n0*n17 - n7*n95)*n50*n65*n7/(n49*n91) + n83)/n126 + n44*n59*xF[2]*(pow(alpha, NP0*n0 - n5*n95)*n5*n65*n81/n90 - pow(alpha, n0*n17 - n5*n95)*n21*n23*n50/(n49*n91) + pow(alpha, n0*n17 - n5*n95)*n5*n50*n65/(n49*n91) + n82)/n124 + n44*n78*(pow(alpha, NP0*n0 - n4*n95)*n4*n65*n81/n90 - pow(alpha, n0*n17 - n4*n95)*n21*n22*n50/(n49*n91) + pow(alpha, n0*n17 - n4*n95)*n4*n50*n65/(n49*n91) + n88)/n123) - 0.5*n44*n46*xF[0]*(pow(alpha, NP0*n0 - n0*n95)*n81/(n64*n90) + n32/n64)*(pow(alpha, NP0*n0 - n0*n95)*n0*n31*n81/n90 + n0*n31*n32)/n131 - 0.5*n44*n46*xF[0]*(pow(alpha, NP0*n0 - n0*n95)*n66*n81/n90 + n32*n66)/n122) - n237 - n194*n44*xF[0]/n122, -n13);
22264 NP_sqrt_base = fabs(NP_sqrt_base);
22265 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
22266 NT1 = n64*(n92 - log(-pow(alpha, NP1*n0)*n81 + 1));
22267 g0 = MW[1] - Mstar;
22268 g1 = MW[0] - Mstar;
22271 g4 = MW[2] - Mstar;
22272 g5 = MW[3] - Mstar;
22273 g6 = MW[4] - Mstar;
22274 g7 = MW[5] - Mstar;
22275 g8 = MW[6] - Mstar;
22276 g9 = MW[7] - Mstar;
22277 g10 = MW[8] - Mstar;
22282 g15 = pow(alpha, -g1);
22283 g16 = pow(alpha, -g0);
22284 g17 = pow(alpha, -g4);
22285 g18 = pow(alpha, -g5);
22286 g19 = pow(alpha, -g6);
22287 g20 = pow(alpha, -g7);
22288 g21 = pow(alpha, -g8);
22289 g22 = pow(alpha, -g9);
22290 g23 = pow(alpha, -g10);
22291 g24 = log(xF[0]/xF[1]);
22293 g26 = pow(alpha, NP1*g0);
22294 g27 = pow(alpha, NP1*g1);
22296 g29 = pow(alpha, NP1*g4);
22297 g30 = pow(alpha, NP1*g5);
22298 g31 = pow(alpha, NP1*g6);
22299 g32 = pow(alpha, NP1*g7);
22300 g33 = pow(alpha, NP1*g8);
22301 g34 = pow(alpha, NP1*g9);
22302 g35 = pow(alpha, NP1*g10);
22326 g59 = g12/(g3*xF[1]);
22327 g60 = pow(alpha, g0*g25) - 1;
22328 g61 = pow(alpha, g0*g25) - 1;
22329 g62 = pow(alpha, g1*g25) - 1;
22330 g63 = pow(alpha, g25*g4) - 1;
22331 g64 = pow(alpha, g25*g5) - 1;
22332 g65 = pow(alpha, g25*g6) - 1;
22333 g66 = pow(alpha, g25*g7) - 1;
22334 g67 = pow(alpha, g25*g8) - 1;
22335 g68 = pow(alpha, g25*g9) - 1;
22336 g69 = pow(alpha, g10*g25) - 1;
22337 g70 = -pow(alpha, g1*g25);
22338 g71 = -pow(alpha, g25*g4);
22339 g72 = -pow(alpha, g25*g5);
22340 g73 = -pow(alpha, g25*g6);
22341 g74 = -pow(alpha, g25*g7);
22342 g75 = -pow(alpha, g25*g8);
22343 g76 = -pow(alpha, g25*g9);
22344 g77 = -pow(alpha, g10*g25);
22354 g87 = pow(alpha, g1*g25) + g49;
22356 g89 = pow(alpha, g25*g4) + g50;
22357 g90 = pow(alpha, g25*g5) + g51;
22358 g91 = pow(alpha, g25*g6) + g52;
22359 g92 = pow(alpha, g25*g7) + g53;
22360 g93 = pow(alpha, g25*g8) + g54;
22361 g94 = pow(alpha, g25*g9) + g55;
22362 g95 = pow(alpha, g10*g25) + g56;
22399 g132 = log(g13*g59*g88/g40);
22400 g133 = log(g13*g59*g78/g39);
22401 g134 = log(g14*g37*g88/g61);
22403 g136 = log(g14*g37*g78/g60);
22405 g138 = -g100*g135*(g51 + 1) - g100*g137*(pow(alpha, g25*g5) - 1) - g101*g135*(g54 + 1) - g101*g137*(pow(alpha, g25*g8) - 1) - g102*g135*(g55 + 1) - g102*g137*(pow(alpha, g25*g9) - 1) - g103*g135*(g52 + 1) - g103*g137*(pow(alpha, g25*g6) - 1) - g104*g135*(g53 + 1) - g104*g137*(pow(alpha, g25*g7) - 1) - g135*g40*g98 - g135*g96*(g56 + 1) - g135*g97*(g49 + 1) - g135*g99*(g50 + 1) - g137*g61*g98 - g137*g96*(pow(alpha, g10*g25) - 1) - g137*g97*(pow(alpha, g1*g25) - 1) - g137*g99*(pow(alpha, g25*g4) - 1) - g57*xF[0] - g57*xF[1] - g57*xF[2] - g57*xF[3] - g57*xF[4] - g57*xF[5] - g57*xF[6] - g57*xF[7] - g57*xF[8];
22406 LpF = xF[0]*(g15 + 1.0)*(g117*g133 + g124*g136 + g36)/(g28*(g15 - 1.0)) + xF[1]*(g16 + 1.0)*(g120*g133 + g123*g136 + g36)/(g28*(g16 - 1.0)) + xF[2]*(g17 + 1.0)*(g121*g133 + g126*g136 + g36)/(g28*(g17 - 1.0)) + xF[3]*(g18 + 1.0)*(g119*g133 + g127*g136 + g36)/(g28*(g18 - 1.0)) + xF[4]*(g19 + 1.0)*(g115*g133 + g128*g136 + g36)/(g28*(g19 - 1.0)) + xF[5]*(g20 + 1.0)*(g118*g133 + g125*g136 + g36)/(g28*(g20 - 1.0)) + xF[6]*(g21 + 1.0)*(g114*g133 + g130*g136 + g36)/(g28*(g21 - 1.0)) + xF[7]*(g22 + 1.0)*(g116*g133 + g131*g136 + g36)/(g28*(g22 - 1.0)) + xF[8]*(g23 + 1.0)*(g122*g133 + g129*g136 + g36)/(g28*(g23 - 1.0));
22411 xP[0] = g106*g38*g62;
22412 xP[1] = g105*g38*g60;
22413 xP[2] = g110*g38*g63;
22414 xP[3] = g111*g38*g64;
22415 xP[4] = g107*g38*g65;
22416 xP[5] = g108*g38*g66;
22417 xP[6] = g112*g38*g67;
22418 xP[7] = g109*g38*g68;
22419 xP[8] = g113*g38*g69;
22420 xT[0] = g106*g41*g58;
22421 xT[1] = g105*g39*g58;
22422 xT[2] = g110*g42*g58;
22423 xT[3] = g111*g43*g58;
22424 xT[4] = g107*g44*g58;
22425 xT[5] = g108*g45*g58;
22426 xT[6] = g112*g46*g58;
22427 xT[7] = g109*g47*g58;
22428 xT[8] = g113*g48*g58;
22431 n0 = MW[0] - Mstar;
22435 n4 = MW[1] - Mstar;
22436 n5 = MW[2] - Mstar;
22437 n6 = MW[3] - Mstar;
22438 n7 = MW[4] - Mstar;
22439 n8 = MW[5] - Mstar;
22440 n9 = MW[6] - Mstar;
22441 n10 = MW[7] - Mstar;
22442 n11 = MW[8] - Mstar;
22443 n12 = MW[9] - Mstar;
22452 n21 = pow(n0, -n14);
22453 n22 = pow(n1, -n14);
22454 n23 = pow(n4, -n14);
22455 n24 = pow(n5, -n14);
22456 n25 = pow(n6, -n14);
22457 n26 = pow(n7, -n14);
22458 n27 = pow(n8, -n14);
22459 n28 = pow(n9, -n14);
22460 n29 = pow(n10, -n14);
22461 n30 = pow(n11, -n14);
22462 n31 = pow(n12, -n14);
22465 n34 = pow(alpha, NP0*n0);
22466 n35 = n15 + n19*xF[0];
22467 n36 = n15 + n17*xTj;
22468 n37 = pow(alpha, NP0*n4);
22469 n38 = pow(alpha, NP0*n5);
22470 n39 = pow(alpha, NP0*n6);
22471 n40 = pow(alpha, NP0*n7);
22472 n41 = pow(alpha, NP0*n8);
22473 n42 = pow(alpha, NP0*n9);
22474 n43 = pow(alpha, NP0*n10);
22475 n44 = pow(alpha, NP0*n11);
22476 n45 = pow(alpha, NP0*n12);
22482 n51 = pow(alpha, n0*n18);
22483 n52 = pow(n35, -n14);
22484 n53 = pow(n36, -n14);
22512 n81 = log((-1.0 + xPj/xF[0])/n2);
22529 n98 = pow(n97, -n14);
22530 n99 = n13 + n32 + n46 + n81;
22531 n100 = n34*n86/n97;
22532 n101 = n64*(n99 - log(n97)) + 1;
22533 n102 = pow(alpha, n0*n101);
22534 n103 = pow(alpha, n101*n4);
22535 n104 = pow(alpha, n101*n5);
22536 n105 = pow(alpha, n101*n6);
22537 n106 = pow(alpha, n101*n7);
22538 n107 = pow(alpha, n101*n8);
22539 n108 = pow(alpha, n101*n9);
22540 n109 = pow(alpha, n10*n101);
22541 n110 = pow(alpha, n101*n11);
22542 n111 = pow(alpha, n101*n12);
22557 n126 = n49 - 1 + 1.0/n102;
22558 n127 = n50 - 1 + 1.0/n103;
22559 n128 = n54 - 1 + 1.0/n104;
22560 n129 = n55 - 1 + 1.0/n105;
22561 n130 = n56 - 1 + 1.0/n106;
22562 n131 = n57 - 1 + 1.0/n107;
22563 n132 = n58 - 1 + 1.0/n108;
22564 n133 = n59 - 1 + 1.0/n109;
22565 n134 = n60 - 1 + 1.0/n110;
22566 n135 = n61 - 1 + 1.0/n111;
22567 n136 = pow(n126, -n14);
22568 n137 = pow(n127, -n14);
22569 n138 = pow(n128, -n14);
22570 n139 = pow(n129, -n14);
22571 n140 = pow(n130, -n14);
22572 n141 = pow(n131, -n14);
22573 n142 = pow(n132, -n14);
22574 n143 = pow(n133, -n14);
22575 n144 = pow(n134, -n14);
22576 n145 = pow(n135, -n14);
22577 n146 = pow(n126, 3);
22578 n147 = pow(n127, 3);
22579 n148 = pow(n128, 3);
22580 n149 = pow(n129, 3);
22581 n150 = pow(n130, 3);
22582 n151 = pow(n131, 3);
22583 n152 = pow(n132, 3);
22584 n153 = pow(n133, 3);
22585 n154 = pow(n134, 3);
22586 n155 = pow(n135, 3);
22598 n167 = n1*xF[5]/n131;
22602 n171 = n49*xF[0]/n146;
22603 n172 = n22*n27*n41*xF[5]/n131;
22604 n173 = n0*n1*n158*n47*n62;
22605 n174 = n158*n47*n90;
22606 n175 = n162*n47*n96;
22607 n176 = n156*n47*n88;
22608 n177 = n164*n47*n94;
22609 n178 = n163*n47*n89;
22611 n180 = n160*n47*n95;
22612 n181 = n161*n47*n93;
22613 n182 = n159*n47*n91;
22614 n183 = n157*n47*n92;
22616 n185 = 1 + n86/(n102*n97);
22618 n187 = n84 + n84*n86/(n102*n97);
22619 n188 = n1*n100*n112 + n1*n76;
22620 n189 = n1*n100*n121 + n1*n69;
22621 n190 = n1*n100*n116 + n1*n75;
22622 n191 = n1*n100*n115 + n1*n77;
22623 n192 = n1*n100*n119 + n1*n70;
22624 n193 = n1*n100*n118 + n1*n74;
22625 n194 = n1*n100*n117 + n85;
22626 n195 = n1*n100*n114 + n83;
22627 n196 = n1*n100*n113 + n82;
22628 n197 = pow(n187, -n14);
22629 n198 = pow(n188, -n14);
22630 n199 = pow(n189, -n14);
22631 n200 = pow(n190, -n14);
22632 n201 = pow(n191, -n14);
22633 n202 = pow(n192, -n14);
22634 n203 = pow(n193, -n14);
22635 n204 = pow(n194, -n14);
22636 n205 = pow(n195, -n14);
22637 n206 = pow(n196, -n14);
22639 n208 = n0*n33*n34 + n100*n120*n33;
22641 n210 = n90 + n86*n90/(n102*n97);
22642 n211 = n100*n123*n48 + n21*n34*n48;
22644 n213 = n191*n56*xF[4];
22656 n225 = n193*xF[6]/n142;
22658 n227 = n191*xF[4]/n140;
22661 n230 = n201*n56*xF[4]/n150;
22662 n231 = n165*n212*n47;
22663 n232 = n0*n165*n33*n34*n47*(pow(alpha, NP0*n0 - n0*n101)*n0*n1*n86/n97 + n84);
22664 n233 = n33*n47*n76*xF[1]*(pow(alpha, NP0*n0 - n101*n4)*n1*n4*n86/n97 + n1*n76)/n137;
22665 n234 = n33*n47*n69*xF[2]*(pow(alpha, NP0*n0 - n101*n5)*n1*n5*n86/n97 + n1*n69)/n138;
22666 n235 = n33*n47*n75*xF[3]*(pow(alpha, NP0*n0 - n101*n6)*n1*n6*n86/n97 + n1*n75)/n139;
22667 n236 = n33*n47*n77*xF[4]*(pow(alpha, NP0*n0 - n101*n7)*n1*n7*n86/n97 + n1*n77)/n140;
22668 n237 = n33*n47*n70*xF[5]*(pow(alpha, NP0*n0 - n101*n8)*n1*n8*n86/n97 + n1*n70)/n141;
22669 n238 = n33*n47*n74*xF[6]*(pow(alpha, NP0*n0 - n101*n9)*n1*n86*n9/n97 + n1*n74)/n142;
22670 n239 = n33*n47*n79*xF[7]*(pow(alpha, NP0*n0 - n10*n101)*n1*n10*n86/n97 + n85)/n143;
22671 n240 = n33*n47*n80*xF[8]*(pow(alpha, NP0*n0 - n101*n11)*n1*n11*n86/n97 + n83)/n144;
22672 n241 = n20*n47*n82*(pow(alpha, NP0*n0 - n101*n12)*n1*n12*n86/n97 + n82)/n145;
22673 n242 = 1.0*n165*n187*n47*n84;
22674 n243 = 0.5*n187*n208;
22675 n244 = n184 + n242;
22676 n245 = n100*n112*n65 + n112*n51*n53*n65/(n52*n98) + n96 + n23*n48*n51*n53/(n103*n52*n98);
22677 n246 = n100*n121*n65 + n121*n51*n53*n65/(n52*n98) + n124*n48*n51*n53/(n52*n98) + n88;
22678 n247 = n100*n116*n65 + n116*n51*n53*n65/(n52*n98) + n94 + n25*n48*n51*n53/(n105*n52*n98);
22679 n248 = n100*n115*n65 + n115*n51*n53*n65/(n52*n98) + n89 + n26*n48*n51*n53/(n106*n52*n98);
22680 n249 = n100*n119*n65 + n119*n51*n53*n65/(n52*n98) + n22*n27*n41 + n27*n48*n51*n53/(n107*n52*n98);
22681 n250 = n100*n118*n65 + n118*n51*n53*n65/(n52*n98) + n122*n48*n51*n53/(n52*n98) + n95;
22682 n251 = n100*n117*n65 + n117*n51*n53*n65/(n52*n98) + n93 + n29*n48*n51*n53/(n109*n52*n98);
22683 n252 = n100*n114*n65 + n114*n51*n53*n65/(n52*n98) + n91 + n30*n48*n51*n53/(n110*n52*n98);
22684 n253 = n100*n113*n65 + n113*n51*n53*n65/(n52*n98) + n92 + n31*n48*n51*n53/(n111*n52*n98);
22685 n254 = n63*n72*(pow(alpha, n0*n18 - n101*n4)*n23*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n4)*n4*n53*n65/(n52*n98) + n100*n112*n65 + n96)/n137;
22686 n255 = n63*n68*(pow(alpha, n0*n18 - n101*n6)*n25*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n6)*n53*n6*n65/(n52*n98) + n100*n116*n65 + n94)/n139;
22687 n256 = n56*n63*xF[4]*(pow(alpha, n0*n18 - n101*n7)*n26*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n7)*n53*n65*n7/(n52*n98) + n100*n115*n65 + n89)/n140;
22688 n257 = n63*n66*(pow(alpha, n0*n18 - n101*n8)*n27*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n8)*n53*n65*n8/(n52*n98) + n100*n119*n65 + n22*n27*n41)/n141;
22689 n258 = n63*n71*(pow(alpha, n0*n18 - n10*n101)*n10*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n10*n101)*n29*n48*n53/(n52*n98) + n100*n117*n65 + n93)/n143;
22690 n259 = n63*n73*(pow(alpha, n0*n18 - n101*n11)*n11*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n11)*n30*n48*n53/(n52*n98) + n100*n114*n65 + n91)/n144;
22691 n260 = n63*n67*(pow(alpha, n0*n18 - n101*n12)*n12*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n12)*n31*n48*n53/(n52*n98) + n100*n113*n65 + n92)/n145;
22692 n261 = xTj*(n1*n156*n47*n69 + n1*n160*n47*n74 + n1*n162*n47*n76 + n1*n163*n47*n77 + n157*n47*n82 + n158*n47*n84 + n159*n47*n83 + n161*n47*n85 + n165*n212*n63 + n167*n47*n70 + n168*n47*n75 + n170*n207*n63 + n216*n63*n66 + n217*n63*n72 + n218*n63*n68 + n219*n63*n71 + n220*n63*n73 + n221*n63*n67 + n193*n63*n78/n142 + n213*n63/n140);
22693 n262 = n173 + n231 + n261;
22694 n263 = n174 + n175 + n176 + n177 + n178 + n179 + n180 + n181 + n182 + n183 + n232 + n233 + n234 + n235 + n236 + n237 + n238 + n239 + n240 + n241 + n254 + n255 + n256 + n257 + n258 + n259 + n260;
22695 n264 = n165*n215*n47 + n169*n207*n63*(n100*n121*n33 + n33*n69) + n170*n47*xF[2]*(pow(alpha, n0*n18 - n101*n5)*n0*n48*n5*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n5)*n22*n24*n53/(n52*n98) + n100*n125*n48 + n24*n38*n48) + n171*n187*n208*n63 + n263 + n196*n63*n67*(n100*n113*n33 + n12*n33*n45)/n155 + n195*n63*n73*(n100*n114*n33 + n33*n80)/n154 + n194*n63*n71*(n100*n117*n33 + n33*n79)/n153 + n193*n63*n78*(n100*n118*n33 + n33*n74)/n152 + n192*n63*n66*(n100*n119*n33 + n33*n70)/n151 + n213*n63*(n100*n115*n33 + n33*n77)/n150 + n190*n63*n68*(n100*n116*n33 + n33*n75)/n149 + n188*n63*n72*(n100*n112*n33 + n33*n76)/n147 + n47*n78*(pow(alpha, n0*n18 - n101*n9)*n0*n48*n53*n9/(n52*n98) + pow(alpha, n0*n18 - n101*n9)*n22*n28*n53/(n52*n98) + n0*n100*n118*n48 + n28*n42*n48)/n142;
22696 NP_b = -n165*n186*n47*n84 - n173 - n18*(-0.5*n165*n47*n49*(pow(alpha, NP0*n0 - n0*n101)*n21*n22*n86/n97 + n90) + 1.0*n165*n47*n84*(pow(alpha, NP0*n0 - n0*n101)*n0*n1*n86/n97 + n84) - 1.0*n171*n197*n47 + n184 - 0.5*xTj*(n14*n169*n209*n47 + n14*n171*n197*n47 + n14*n222*n47*n71 + n14*n223*n47*n68 + n14*n224*n47*n73 + n14*n226*n47*n67 + n14*n228*n47*n72 + n14*n229*n47*n78 + n14*n230*n47 + n14*n202*n47*n66/n151 + n165*n49*n63*(pow(alpha, NP0*n0 - n0*n101)*n21*n22*n86/n97 + n90) + n170*n63*xF[2]*(pow(alpha, NP0*n0 - n101*n5)*n5*n65*n86/n97 + pow(alpha, n0*n18 - n101*n5)*n24*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n5)*n5*n53*n65/(n52*n98) + n88) + n174 + n175 + n176 + n177 + n178 + n179 + n180 + n181 + n182 + n183 + n232 + n233 + n234 + n235 + n236 + n237 + n238 + n239 + n240 + n241 + n63*n67*(pow(alpha, NP0*n0 - n101*n12)*n12*n65*n86/n97 + pow(alpha, n0*n18 - n101*n12)*n12*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n12)*n31*n48*n53/(n52*n98) + n92)/n145 + n63*n73*(pow(alpha, NP0*n0 - n101*n11)*n11*n65*n86/n97 + pow(alpha, n0*n18 - n101*n11)*n11*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n11)*n30*n48*n53/(n52*n98) + n91)/n144 + n63*n71*(pow(alpha, NP0*n0 - n10*n101)*n10*n65*n86/n97 + pow(alpha, n0*n18 - n10*n101)*n10*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n10*n101)*n29*n48*n53/(n52*n98) + n93)/n143 + n63*n78*(pow(alpha, NP0*n0 - n101*n9)*n65*n86*n9/n97 + pow(alpha, n0*n18 - n101*n9)*n28*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n9)*n53*n65*n9/(n52*n98) + n95)/n142 + n63*n66*(pow(alpha, NP0*n0 - n101*n8)*n65*n8*n86/n97 + pow(alpha, n0*n18 - n101*n8)*n27*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n8)*n53*n65*n8/(n52*n98) + n22*n27*n41)/n141 + n56*n63*xF[4]*(pow(alpha, NP0*n0 - n101*n7)*n65*n7*n86/n97 + pow(alpha, n0*n18 - n101*n7)*n26*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n7)*n53*n65*n7/(n52*n98) + n89)/n140 + n63*n68*(pow(alpha, NP0*n0 - n101*n6)*n6*n65*n86/n97 + pow(alpha, n0*n18 - n101*n6)*n25*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n6)*n53*n6*n65/(n52*n98) + n94)/n139 + n63*n72*(pow(alpha, NP0*n0 - n101*n4)*n4*n65*n86/n97 + pow(alpha, n0*n18 - n101*n4)*n23*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n4)*n4*n53*n65/(n52*n98) + n96)/n137)) - n47*xTj*(n1*n156*n69 + n1*n160*n74 + n1*n162*n76 + n1*n163*n77 + n157*n82 + n158*n84 + n159*n83 + n161*n85 - n165*n212 + n166*n213 + n167*n70 + n168*n75 - n170*n207 - n216*n66 - n217*n72 - n218*n68 - n219*n71 - n220*n73 - n221*n67 - n193*n78/n142);
22697 NP_2a = -n47*(n14*n171*pow(n185, -n14)*n48*n87 - 1.0*n158*n90 - 2.0*n165*n185*n22*n87 + n165*n186*n90 + 1.0*xTj*(n0*n165*n33*n34*(pow(alpha, NP0*n0 - n0*n101)*n0*n1*n86/n97 + n84) + n14*n169*n209 + n14*n171*n197 + n14*n222*n71 + n14*n223*n68 + n14*n224*n73 + n14*n226*n67 + n14*n228*n72 + n14*n229*n78 + n14*n230 + n14*n202*n66/n151 + n156*n88 + n157*n92 + n158*n90 + n159*n91 + n160*n95 + n161*n93 + n162*n96 + n163*n89 + n164*n94 - n165*n214 + n166*n56*xF[4]*(pow(alpha, n0*n18 - n101*n7)*n26*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n7)*n53*n65*n7/(n52*n98) + n100*n115*n65 + n89) - n170*xF[2]*(pow(alpha, n0*n18 - n101*n5)*n24*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n5)*n5*n53*n65/(n52*n98) + n100*n121*n65 + n88) + n172 + n20*n82*(pow(alpha, NP0*n0 - n101*n12)*n1*n12*n86/n97 + n82)/n145 - n67*(pow(alpha, n0*n18 - n101*n12)*n12*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n12)*n31*n48*n53/(n52*n98) + n100*n113*n65 + n92)/n145 + n33*n80*xF[8]*(pow(alpha, NP0*n0 - n101*n11)*n1*n11*n86/n97 + n83)/n144 - n73*(pow(alpha, n0*n18 - n101*n11)*n11*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n11)*n30*n48*n53/(n52*n98) + n100*n114*n65 + n91)/n144 + n33*n79*xF[7]*(pow(alpha, NP0*n0 - n10*n101)*n1*n10*n86/n97 + n85)/n143 - n71*(pow(alpha, n0*n18 - n10*n101)*n10*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n10*n101)*n29*n48*n53/(n52*n98) + n100*n117*n65 + n93)/n143 + n33*n74*xF[6]*(pow(alpha, NP0*n0 - n101*n9)*n1*n86*n9/n97 + n1*n74)/n142 - n78*(pow(alpha, n0*n18 - n101*n9)*n28*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n9)*n53*n65*n9/(n52*n98) + n100*n118*n65 + n95)/n142 + n33*n70*xF[5]*(pow(alpha, NP0*n0 - n101*n8)*n1*n8*n86/n97 + n1*n70)/n141 - n66*(pow(alpha, n0*n18 - n101*n8)*n27*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n8)*n53*n65*n8/(n52*n98) + n100*n119*n65 + n22*n27*n41)/n141 + n33*n77*xF[4]*(pow(alpha, NP0*n0 - n101*n7)*n1*n7*n86/n97 + n1*n77)/n140 + n33*n75*xF[3]*(pow(alpha, NP0*n0 - n101*n6)*n1*n6*n86/n97 + n1*n75)/n139 - n68*(pow(alpha, n0*n18 - n101*n6)*n25*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n6)*n53*n6*n65/(n52*n98) + n100*n116*n65 + n94)/n139 + n33*n69*xF[2]*(pow(alpha, NP0*n0 - n101*n5)*n1*n5*n86/n97 + n1*n69)/n138 + n33*n76*xF[1]*(pow(alpha, NP0*n0 - n101*n4)*n1*n4*n86/n97 + n1*n76)/n137 - n72*(pow(alpha, n0*n18 - n101*n4)*n23*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n4)*n4*n53*n65/(n52*n98) + n100*n112*n65 + n96)/n137));
22698 NP_sqrt_base = (-NP0*n262 - n19*(-n47*n49*xF[0]/(n49 - 1 + pow(alpha, -n0*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n54*xF[2]/(n54 - 1 + pow(alpha, -n5*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n56*xF[4]/(n56 - 1 + pow(alpha, -n7*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n66/(n57 - 1 + pow(alpha, -n8*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n67/(n61 - 1 + pow(alpha, -n12*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n68/(n55 - 1 + pow(alpha, -n6*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n71/(n59 - 1 + pow(alpha, -n10*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n72/(n50 - 1 + pow(alpha, -n4*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n73/(n60 - 1 + pow(alpha, -n11*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1))) - n47*n78/(n58 - 1 + pow(alpha, -n9*(n64*(n99 - log(n36*n62/(n15 - xF[0]*xTj) + 1)) + 1)))) - n49*n63*xF[0]/n126 - pow(NP0, -n14)*(1.0*n165*n187*n47*n84 + 0.5*n165*n215*n47 - n171*n243*n47 + 0.5*n174 - 0.5*n264*xTj))*(-n14*n19*(n165*n47*n49*(pow(alpha, NP0*n0 - n0*n101)*n21*n22*(-n15 + n17*n19)/(n35*n97) + n21*n34*n48) + n169*n63*xF[2]*(pow(alpha, NP0*n0 - n101*n5)*n1*n5*n86/n97 + n1*n69)*(pow(alpha, NP0*n0 - n101*n5)*n33*n5*n86/n97 + n33*n69) + n170*n47*xF[2]*(pow(alpha, NP0*n0 - n101*n5)*n0*n48*n5*n86/n97 + pow(alpha, n0*n18 - n101*n5)*n0*n48*n5*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n5)*n22*n24*n53/(n52*n98) + n24*n38*n48) + n171*n63*(pow(alpha, NP0*n0 - n0*n101)*n0*n1*n86/n97 + n84)*(pow(alpha, NP0*n0 - n0*n101)*n0*n33*n86/n97 + n0*n33*n34) + n174 + n175 + n176 + n177 + n178 + n179 + n180 + n181 + n182 + n183 + n232 + n233 + n234 + n235 + n236 + n237 + n238 + n239 + n240 + n241 + n63*n67*(pow(alpha, NP0*n0 - n101*n12)*n1*n12*n86/n97 + n82)*(pow(alpha, NP0*n0 - n101*n12)*n12*n33*n86/n97 + n12*n33*n45)/n155 + n63*n73*(pow(alpha, NP0*n0 - n101*n11)*n1*n11*n86/n97 + n83)*(pow(alpha, NP0*n0 - n101*n11)*n11*n33*n86/n97 + n33*n80)/n154 + n63*n71*(pow(alpha, NP0*n0 - n10*n101)*n1*n10*n86/n97 + n85)*(pow(alpha, NP0*n0 - n10*n101)*n10*n33*n86/n97 + n33*n79)/n153 + n63*n78*(pow(alpha, NP0*n0 - n101*n9)*n1*n86*n9/n97 + n1*n74)*(pow(alpha, NP0*n0 - n101*n9)*n33*n86*n9/n97 + n33*n74)/n152 + n63*n66*(pow(alpha, NP0*n0 - n101*n8)*n1*n8*n86/n97 + n1*n70)*(pow(alpha, NP0*n0 - n101*n8)*n33*n8*n86/n97 + n33*n70)/n151 + n56*n63*xF[4]*(pow(alpha, NP0*n0 - n101*n7)*n1*n7*n86/n97 + n1*n77)*(pow(alpha, NP0*n0 - n101*n7)*n33*n7*n86/n97 + n33*n77)/n150 + n63*n68*(pow(alpha, NP0*n0 - n101*n6)*n1*n6*n86/n97 + n1*n75)*(pow(alpha, NP0*n0 - n101*n6)*n33*n6*n86/n97 + n33*n75)/n149 + n63*n72*(pow(alpha, NP0*n0 - n101*n4)*n1*n4*n86/n97 + n1*n76)*(pow(alpha, NP0*n0 - n101*n4)*n33*n4*n86/n97 + n33*n76)/n147 + n63*n67*(pow(alpha, NP0*n0 - n101*n12)*n12*n65*n86/n97 + pow(alpha, n0*n18 - n101*n12)*n12*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n12)*n31*n48*n53/(n52*n98) + n92)/n145 + n63*n73*(pow(alpha, NP0*n0 - n101*n11)*n11*n65*n86/n97 + pow(alpha, n0*n18 - n101*n11)*n11*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n11)*n30*n48*n53/(n52*n98) + n91)/n144 + n63*n71*(pow(alpha, NP0*n0 - n10*n101)*n10*n65*n86/n97 + pow(alpha, n0*n18 - n10*n101)*n10*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n10*n101)*n29*n48*n53/(n52*n98) + n93)/n143 + n47*n78*(pow(alpha, NP0*n0 - n101*n9)*n0*n48*n86*n9/n97 + pow(alpha, n0*n18 - n101*n9)*n0*n48*n53*n9/(n52*n98) + pow(alpha, n0*n18 - n101*n9)*n22*n28*n53/(n52*n98) + n28*n42*n48)/n142 + n63*n66*(pow(alpha, NP0*n0 - n101*n8)*n65*n8*n86/n97 + pow(alpha, n0*n18 - n101*n8)*n27*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n8)*n53*n65*n8/(n52*n98) + n22*n27*n41)/n141 + n56*n63*xF[4]*(pow(alpha, NP0*n0 - n101*n7)*n65*n7*n86/n97 + pow(alpha, n0*n18 - n101*n7)*n26*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n7)*n53*n65*n7/(n52*n98) + n89)/n140 + n63*n68*(pow(alpha, NP0*n0 - n101*n6)*n6*n65*n86/n97 + pow(alpha, n0*n18 - n101*n6)*n25*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n6)*n53*n6*n65/(n52*n98) + n94)/n139 + n63*n72*(pow(alpha, NP0*n0 - n101*n4)*n4*n65*n86/n97 + pow(alpha, n0*n18 - n101*n4)*n23*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n4)*n4*n53*n65/(n52*n98) + n96)/n137) + 4.0*n165*n187*n47*n84 + 2.0*n165*n215*n47 - 4.0*n171*n197*n47 + 2.0*n174) + pow(-n18*(0.5*n165*n47*n49*(pow(alpha, NP0*n0 - n0*n101)*n21*n22*(-n15 + n17*n19)/(n35*n97) + n21*n34*n48) + 1.0*n165*n47*n84*(pow(alpha, NP0*n0 - n0*n101)*n0*n1*n86/n97 + n84) - 0.5*n171*n47*(pow(alpha, NP0*n0 - n0*n101)*n0*n1*n86/n97 + n84)*(pow(alpha, NP0*n0 - n0*n101)*n0*n33*n86/n97 + n0*n33*n34) + n184 - 0.5*xTj*(n165*n47*n49*(pow(alpha, NP0*n0 - n0*n101)*n21*n22*(-n15 + n17*n19)/(n35*n97) + n21*n34*n48) + n169*n63*xF[2]*(pow(alpha, NP0*n0 - n101*n5)*n1*n5*n86/n97 + n1*n69)*(pow(alpha, NP0*n0 - n101*n5)*n33*n5*n86/n97 + n33*n69) + n170*n47*xF[2]*(pow(alpha, NP0*n0 - n101*n5)*n0*n48*n5*n86/n97 + pow(alpha, n0*n18 - n101*n5)*n0*n48*n5*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n5)*n22*n24*n53/(n52*n98) + n24*n38*n48) + n171*n63*(pow(alpha, NP0*n0 - n0*n101)*n0*n1*n86/n97 + n84)*(pow(alpha, NP0*n0 - n0*n101)*n0*n33*n86/n97 + n0*n33*n34) + n174 + n175 + n176 + n177 + n178 + n179 + n180 + n181 + n182 + n183 + n232 + n233 + n234 + n235 + n236 + n237 + n238 + n239 + n240 + n241 + n63*n67*(pow(alpha, NP0*n0 - n101*n12)*n1*n12*n86/n97 + n82)*(pow(alpha, NP0*n0 - n101*n12)*n12*n33*n86/n97 + n12*n33*n45)/n155 + n63*n73*(pow(alpha, NP0*n0 - n101*n11)*n1*n11*n86/n97 + n83)*(pow(alpha, NP0*n0 - n101*n11)*n11*n33*n86/n97 + n33*n80)/n154 + n63*n71*(pow(alpha, NP0*n0 - n10*n101)*n1*n10*n86/n97 + n85)*(pow(alpha, NP0*n0 - n10*n101)*n10*n33*n86/n97 + n33*n79)/n153 + n63*n78*(pow(alpha, NP0*n0 - n101*n9)*n1*n86*n9/n97 + n1*n74)*(pow(alpha, NP0*n0 - n101*n9)*n33*n86*n9/n97 + n33*n74)/n152 + n63*n66*(pow(alpha, NP0*n0 - n101*n8)*n1*n8*n86/n97 + n1*n70)*(pow(alpha, NP0*n0 - n101*n8)*n33*n8*n86/n97 + n33*n70)/n151 + n56*n63*xF[4]*(pow(alpha, NP0*n0 - n101*n7)*n1*n7*n86/n97 + n1*n77)*(pow(alpha, NP0*n0 - n101*n7)*n33*n7*n86/n97 + n33*n77)/n150 + n63*n68*(pow(alpha, NP0*n0 - n101*n6)*n1*n6*n86/n97 + n1*n75)*(pow(alpha, NP0*n0 - n101*n6)*n33*n6*n86/n97 + n33*n75)/n149 + n63*n72*(pow(alpha, NP0*n0 - n101*n4)*n1*n4*n86/n97 + n1*n76)*(pow(alpha, NP0*n0 - n101*n4)*n33*n4*n86/n97 + n33*n76)/n147 + n63*n67*(pow(alpha, NP0*n0 - n101*n12)*n12*n65*n86/n97 + pow(alpha, n0*n18 - n101*n12)*n12*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n12)*n31*n48*n53/(n52*n98) + n92)/n145 + n63*n73*(pow(alpha, NP0*n0 - n101*n11)*n11*n65*n86/n97 + pow(alpha, n0*n18 - n101*n11)*n11*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n101*n11)*n30*n48*n53/(n52*n98) + n91)/n144 + n63*n71*(pow(alpha, NP0*n0 - n10*n101)*n10*n65*n86/n97 + pow(alpha, n0*n18 - n10*n101)*n10*n53*n65/(n52*n98) + pow(alpha, n0*n18 - n10*n101)*n29*n48*n53/(n52*n98) + n93)/n143 + n47*n78*(pow(alpha, NP0*n0 - n101*n9)*n0*n48*n86*n9/n97 + pow(alpha, n0*n18 - n101*n9)*n0*n48*n53*n9/(n52*n98) + pow(alpha, n0*n18 - n101*n9)*n22*n28*n53/(n52*n98) + n28*n42*n48)/n142 + n63*n66*(pow(alpha, NP0*n0 - n101*n8)*n65*n8*n86/n97 + pow(alpha, n0*n18 - n101*n8)*n27*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n8)*n53*n65*n8/(n52*n98) + n22*n27*n41)/n141 + n56*n63*xF[4]*(pow(alpha, NP0*n0 - n101*n7)*n65*n7*n86/n97 + pow(alpha, n0*n18 - n101*n7)*n26*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n7)*n53*n65*n7/(n52*n98) + n89)/n140 + n63*n68*(pow(alpha, NP0*n0 - n101*n6)*n6*n65*n86/n97 + pow(alpha, n0*n18 - n101*n6)*n25*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n6)*n53*n6*n65/(n52*n98) + n94)/n139 + n63*n72*(pow(alpha, NP0*n0 - n101*n4)*n4*n65*n86/n97 + pow(alpha, n0*n18 - n101*n4)*n23*n48*n53/(n52*n98) + pow(alpha, n0*n18 - n101*n4)*n4*n53*n65/(n52*n98) + n96)/n137)) - n262, -n14);
22699 NP_sqrt_base = fabs(NP_sqrt_base);
22700 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
22701 NT1 = n64*(n99 - log(-pow(alpha, NP1*n0)*n86 + 1));
22702 g0 = MW[1] - Mstar;
22703 g1 = MW[0] - Mstar;
22706 g4 = MW[2] - Mstar;
22707 g5 = MW[3] - Mstar;
22708 g6 = MW[4] - Mstar;
22709 g7 = MW[5] - Mstar;
22710 g8 = MW[6] - Mstar;
22711 g9 = MW[7] - Mstar;
22712 g10 = MW[8] - Mstar;
22713 g11 = MW[9] - Mstar;
22718 g16 = pow(alpha, -g1);
22719 g17 = pow(alpha, -g0);
22720 g18 = pow(alpha, -g4);
22721 g19 = pow(alpha, -g5);
22722 g20 = pow(alpha, -g6);
22723 g21 = pow(alpha, -g7);
22724 g22 = pow(alpha, -g8);
22725 g23 = pow(alpha, -g9);
22726 g24 = pow(alpha, -g10);
22727 g25 = pow(alpha, -g11);
22728 g26 = log(xF[0]/xF[1]);
22730 g28 = pow(alpha, NP1*g0);
22731 g29 = pow(alpha, NP1*g1);
22733 g31 = pow(alpha, NP1*g4);
22734 g32 = pow(alpha, NP1*g5);
22735 g33 = pow(alpha, NP1*g6);
22736 g34 = pow(alpha, NP1*g7);
22737 g35 = pow(alpha, NP1*g8);
22738 g36 = pow(alpha, NP1*g9);
22739 g37 = pow(alpha, NP1*g10);
22740 g38 = pow(alpha, NP1*g11);
22766 g64 = g13/(g3*xF[1]);
22767 g65 = pow(alpha, g0*g27) - 1;
22768 g66 = pow(alpha, g0*g27) - 1;
22769 g67 = pow(alpha, g1*g27) - 1;
22770 g68 = pow(alpha, g27*g4) - 1;
22771 g69 = pow(alpha, g27*g5) - 1;
22772 g70 = pow(alpha, g27*g6) - 1;
22773 g71 = pow(alpha, g27*g7) - 1;
22774 g72 = pow(alpha, g27*g8) - 1;
22775 g73 = pow(alpha, g27*g9) - 1;
22776 g74 = pow(alpha, g10*g27) - 1;
22777 g75 = pow(alpha, g11*g27) - 1;
22778 g76 = -pow(alpha, g1*g27);
22779 g77 = -pow(alpha, g27*g4);
22780 g78 = -pow(alpha, g27*g5);
22781 g79 = -pow(alpha, g27*g6);
22782 g80 = -pow(alpha, g27*g7);
22783 g81 = -pow(alpha, g27*g8);
22784 g82 = -pow(alpha, g27*g9);
22785 g83 = -pow(alpha, g10*g27);
22786 g84 = -pow(alpha, g11*g27);
22797 g95 = pow(alpha, g1*g27) + g53;
22799 g97 = pow(alpha, g27*g4) + g54;
22800 g98 = pow(alpha, g27*g5) + g55;
22801 g99 = pow(alpha, g27*g6) + g56;
22802 g100 = pow(alpha, g27*g7) + g57;
22803 g101 = pow(alpha, g27*g8) + g58;
22804 g102 = pow(alpha, g27*g9) + g59;
22805 g103 = pow(alpha, g10*g27) + g60;
22806 g104 = pow(alpha, g11*g27) + g61;
22847 g145 = log(g14*g64*g96/g43);
22848 g146 = log(g14*g64*g85/g42);
22849 g147 = log(g15*g40*g96/g66);
22851 g149 = log(g15*g40*g85/g65);
22853 g151 = -g105*g148*(g61 + 1) - g105*g150*(pow(alpha, g11*g27) - 1) - g106*g148*(g60 + 1) - g106*g150*(pow(alpha, g10*g27) - 1) - g107*g148*g43 - g107*g150*g66 - g108*g148*(g54 + 1) - g108*g150*(pow(alpha, g27*g4) - 1) - g109*g148*(g55 + 1) - g109*g150*(pow(alpha, g27*g5) - 1) - g110*g148*(g58 + 1) - g110*g150*(pow(alpha, g27*g8) - 1) - g111*g148*(g59 + 1) - g111*g150*(pow(alpha, g27*g9) - 1) - g112*g148*(g56 + 1) - g112*g150*(pow(alpha, g27*g6) - 1) - g113*g148*(g57 + 1) - g113*g150*(pow(alpha, g27*g7) - 1) - g114*g148*(g53 + 1) - g114*g150*(pow(alpha, g1*g27) - 1) - g62*xF[0] - g62*xF[1] - g62*xF[2] - g62*xF[3] - g62*xF[4] - g62*xF[5] - g62*xF[6] - g62*xF[7] - g62*xF[8] - g62*xF[9];
22854 LpF = xF[0]*(g16 + 1.0)*(g129*g146 + g136*g149 + g39)/(g30*(g16 - 1.0)) + xF[1]*(g17 + 1.0)*(g132*g146 + g135*g149 + g39)/(g30*(g17 - 1.0)) + xF[2]*(g18 + 1.0)*(g133*g146 + g138*g149 + g39)/(g30*(g18 - 1.0)) + xF[3]*(g19 + 1.0)*(g131*g146 + g139*g149 + g39)/(g30*(g19 - 1.0)) + xF[4]*(g20 + 1.0)*(g127*g146 + g140*g149 + g39)/(g30*(g20 - 1.0)) + xF[5]*(g21 + 1.0)*(g130*g146 + g137*g149 + g39)/(g30*(g21 - 1.0)) + xF[6]*(g22 + 1.0)*(g125*g146 + g143*g149 + g39)/(g30*(g22 - 1.0)) + xF[7]*(g23 + 1.0)*(g128*g146 + g144*g149 + g39)/(g30*(g23 - 1.0)) + xF[8]*(g24 + 1.0)*(g134*g146 + g141*g149 + g39)/(g30*(g24 - 1.0)) + xF[9]*(g25 + 1.0)*(g126*g146 + g142*g149 + g39)/(g30*(g25 - 1.0));
22859 xP[0] = g116*g41*g67;
22860 xP[1] = g115*g41*g65;
22861 xP[2] = g121*g41*g68;
22862 xP[3] = g122*g41*g69;
22863 xP[4] = g118*g41*g70;
22864 xP[5] = g119*g41*g71;
22865 xP[6] = g123*g41*g72;
22866 xP[7] = g120*g41*g73;
22867 xP[8] = g124*g41*g74;
22868 xP[9] = g117*g41*g75;
22869 xT[0] = g116*g44*g63;
22870 xT[1] = g115*g42*g63;
22871 xT[2] = g121*g45*g63;
22872 xT[3] = g122*g46*g63;
22873 xT[4] = g118*g47*g63;
22874 xT[5] = g119*g48*g63;
22875 xT[6] = g123*g49*g63;
22876 xT[7] = g120*g50*g63;
22877 xT[8] = g124*g51*g63;
22878 xT[9] = g117*g52*g63;
22881 n0 = MW[0] - Mstar;
22885 n4 = MW[10] - Mstar;
22886 n5 = MW[1] - Mstar;
22887 n6 = MW[2] - Mstar;
22888 n7 = MW[3] - Mstar;
22889 n8 = MW[4] - Mstar;
22890 n9 = MW[5] - Mstar;
22891 n10 = MW[6] - Mstar;
22892 n11 = MW[7] - Mstar;
22893 n12 = MW[8] - Mstar;
22894 n13 = MW[9] - Mstar;
22902 n21 = pow(n0, -n15);
22903 n22 = pow(n1, -n15);
22904 n23 = pow(n4, -n15);
22905 n24 = pow(n5, -n15);
22906 n25 = pow(n6, -n15);
22907 n26 = pow(n7, -n15);
22908 n27 = pow(n8, -n15);
22909 n28 = pow(n9, -n15);
22910 n29 = pow(n10, -n15);
22911 n30 = pow(n11, -n15);
22912 n31 = pow(n12, -n15);
22913 n32 = pow(n13, -n15);
22917 n36 = pow(alpha, NP0*n0);
22918 n37 = n16 + n20*xF[0];
22919 n38 = n16 + n18*xTj;
22920 n39 = pow(alpha, NP0*n4);
22921 n40 = pow(alpha, NP0*n5);
22922 n41 = pow(alpha, NP0*n6);
22923 n42 = pow(alpha, NP0*n7);
22924 n43 = pow(alpha, NP0*n8);
22925 n44 = pow(alpha, NP0*n9);
22926 n45 = pow(alpha, NP0*n10);
22927 n46 = pow(alpha, NP0*n11);
22928 n47 = pow(alpha, NP0*n12);
22929 n48 = pow(alpha, NP0*n13);
22938 n57 = pow(alpha, n0*n19);
22939 n58 = pow(n37, -n15);
22940 n59 = pow(n38, -n15);
22972 n91 = log((-1.0 + xPj/xF[0])/n2);
22981 n100 = n22*n26*n42;
22982 n101 = n22*n29*n45;
22983 n102 = n22*n24*n40;
22984 n103 = n50*n78*xF[8];
22985 n104 = n70*n94 + 1;
22986 n105 = pow(n104, -n15);
22987 n106 = n14 + n33 + n49 + n91;
22988 n107 = n36*n94/n104;
22989 n108 = n57*n59/(n105*n58);
22991 n110 = n73*(n106 - log(n104)) + 1;
22992 n111 = pow(alpha, n0*n110);
22993 n112 = pow(alpha, n110*n4);
22994 n113 = pow(alpha, n110*n5);
22995 n114 = pow(alpha, n110*n6);
22996 n115 = pow(alpha, n110*n7);
22997 n116 = pow(alpha, n110*n8);
22998 n117 = pow(alpha, n110*n9);
22999 n118 = pow(alpha, n10*n110);
23000 n119 = pow(alpha, n11*n110);
23001 n120 = pow(alpha, n110*n12);
23002 n121 = pow(alpha, n110*n13);
23016 n135 = n55 - 1 + 1.0/n111;
23017 n136 = n56 - 1 + 1.0/n112;
23018 n137 = n60 - 1 + 1.0/n113;
23019 n138 = n61 - 1 + 1.0/n114;
23020 n139 = n62 - 1 + 1.0/n115;
23021 n140 = n63 - 1 + 1.0/n116;
23022 n141 = n64 - 1 + 1.0/n117;
23023 n142 = n65 - 1 + 1.0/n118;
23024 n143 = n66 - 1 + 1.0/n119;
23025 n144 = n67 - 1 + 1.0/n120;
23026 n145 = n68 - 1 + 1.0/n121;
23027 n146 = pow(n135, -n15);
23028 n147 = pow(n136, -n15);
23029 n148 = pow(n137, -n15);
23030 n149 = pow(n138, -n15);
23031 n150 = pow(n139, -n15);
23032 n151 = pow(n140, -n15);
23033 n152 = pow(n141, -n15);
23034 n153 = pow(n142, -n15);
23035 n154 = pow(n143, -n15);
23036 n155 = pow(n144, -n15);
23037 n156 = pow(n145, -n15);
23038 n157 = pow(n135, 3);
23039 n158 = pow(n136, 3);
23040 n159 = pow(n137, 3);
23041 n160 = pow(n138, 3);
23042 n161 = pow(n139, 3);
23043 n162 = pow(n140, 3);
23044 n163 = pow(n141, 3);
23045 n164 = pow(n142, 3);
23046 n165 = pow(n143, 3);
23047 n166 = pow(n144, 3);
23048 n167 = pow(n145, 3);
23055 n174 = xF[10]/n136;
23060 n179 = n46*xF[7]/n143;
23061 n180 = n68*xF[9]/n167;
23062 n181 = n62*xF[3]/n150;
23063 n182 = n66*xF[7]/n165;
23064 n183 = n66*xF[7]/n154;
23065 n184 = n68*xF[9]/n156;
23066 n185 = n44*n53*xF[5]/n141;
23067 n186 = 1/(n104*n111);
23068 n187 = n22*n31*n47*xF[8]/n144;
23069 n188 = n22*n28*n44*xF[5]/n141;
23070 n189 = n35*n50*n85/n135;
23071 n190 = n0*n35*n50*n70/n135;
23072 n191 = n169*n50*n97;
23073 n192 = n174*n22*n50*n92;
23074 n193 = n102*n172*n50;
23075 n194 = n170*n50*n98;
23076 n195 = n100*n175*n50;
23077 n196 = n173*n50*n96;
23079 n198 = n101*n171*n50;
23080 n199 = n179*n50*n88;
23082 n201 = n168*n50*n99;
23084 n203 = n186*n94 + 1;
23085 n204 = n1*n186*n85*n94 + n1*n85;
23086 n205 = n1*n107*n126 + n1*n80;
23087 n206 = n1*n107*n122 + n1*n84;
23088 n207 = n1*n107*n131 + n1*n76;
23089 n208 = n1*n107*n125 + n1*n82;
23090 n209 = n107*n54/n116 + n43*n54;
23091 n210 = n107*n53/n117 + n44*n53;
23092 n211 = n1*n107*n128 + n1*n81;
23093 n212 = n107*n52/n119 + n46*n52;
23094 n213 = n1*n107*n124 + n1*n78;
23095 n214 = n1*n107*n123 + n93;
23096 n215 = pow(n204, -n15);
23097 n216 = pow(n205, -n15);
23098 n217 = pow(n206, -n15);
23099 n218 = pow(n207, -n15);
23100 n219 = pow(n208, -n15);
23101 n220 = pow(n209, -n15);
23102 n221 = pow(n210, -n15);
23103 n222 = pow(n211, -n15);
23104 n223 = pow(n212, -n15);
23105 n224 = pow(n213, -n15);
23106 n225 = pow(n214, -n15);
23107 n226 = n186*n34*n85*n94 + n34*n85;
23108 n227 = n107*n21*n51/n111 + n21*n36*n51;
23109 n228 = n209*n63*xF[4];
23118 n237 = n205*xF[10]/n147;
23123 n242 = n219*n62*xF[3]/n161;
23124 n243 = n220*n63*xF[4]/n162;
23125 n244 = n232*n71*n75;
23126 n245 = n34*n50*n85*xF[0]*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)/n146;
23127 n246 = n34*n50*n80*xF[10]*(pow(alpha, NP0*n0 - n110*n4)*n1*n4*n94/n104 + n1*n80)/n147;
23128 n247 = n34*n50*n84*xF[1]*(pow(alpha, NP0*n0 - n110*n5)*n1*n5*n94/n104 + n1*n84)/n148;
23129 n248 = n34*n50*n76*xF[2]*(pow(alpha, NP0*n0 - n110*n6)*n1*n6*n94/n104 + n1*n76)/n149;
23130 n249 = n34*n50*n82*xF[3]*(pow(alpha, NP0*n0 - n110*n7)*n1*n7*n94/n104 + n1*n82)/n150;
23131 n250 = n34*n43*n50*n8*xF[4]*(pow(alpha, NP0*n0 - n110*n8)*n54*n94/n104 + n43*n54)/n151;
23132 n251 = n34*n50*n90*xF[5]*(pow(alpha, NP0*n0 - n110*n9)*n53*n94/n104 + n44*n53)/n152;
23133 n252 = n34*n50*n81*xF[6]*(pow(alpha, NP0*n0 - n10*n110)*n1*n10*n94/n104 + n1*n81)/n153;
23134 n253 = n34*n50*n86*xF[7]*(pow(alpha, NP0*n0 - n11*n110)*n52*n94/n104 + n46*n52)/n154;
23135 n254 = n103*n34*(pow(alpha, NP0*n0 - n110*n12)*n1*n12*n94/n104 + n1*n78)/n155;
23136 n255 = n13*n34*n48*n50*xF[9]*(pow(alpha, NP0*n0 - n110*n13)*n1*n13*n94/n104 + n93)/n156;
23137 n256 = 1.0*n35*n50*n85*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)/n146;
23138 n257 = n241*n50*n75;
23140 n259 = n189 + n244;
23141 n260 = n204*n226/n157;
23142 n261 = n107*n126*n72 + n108*n126*n72 + n108*n132*n51 + n22*n92;
23143 n262 = n102 + n107*n122*n72 + n108*n122*n72 + n108*n24*n51/n113;
23144 n263 = n108*n134*n51 + n109*n25/n114 + n25*n41*n51 + n131*n51*n85*n94/n104;
23145 n264 = n107*n129*n72 + n108*n129*n72 + n108*n27*n51/n116 + n96;
23146 n265 = n107*n130*n72 + n108*n130*n72 + n108*n28*n51/n117 + n22*n28*n44;
23147 n266 = n0*n108*n128*n51 + n109*n29/n118 + n29*n45*n51 + n128*n51*n85*n94/n104;
23148 n267 = n107*n124*n72 + n108*n124*n72 + n108*n31*n51/n120 + n22*n31*n47;
23149 n268 = n50*n83*(pow(alpha, n0*n19 - n110*n6)*n0*n51*n59*n6/(n105*n58) + pow(alpha, n0*n19 - n110*n6)*n22*n25*n59/(n105*n58) + n25*n41*n51 + n131*n51*n85*n94/n104)/n149;
23150 n269 = n50*n77*(pow(alpha, n0*n19 - n10*n110)*n0*n10*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n10*n110)*n22*n29*n59/(n105*n58) + n29*n45*n51 + n128*n51*n85*n94/n104)/n153;
23151 n270 = n71*n87*(pow(alpha, n0*n19 - n110*n5)*n24*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n5)*n5*n59*n72/(n105*n58) + n102 + n107*n122*n72)/n148;
23152 n271 = n181*n71*(pow(alpha, n0*n19 - n110*n7)*n26*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n7)*n59*n7*n72/(n105*n58) + n100 + n107*n125*n72);
23153 n272 = n63*n71*xF[4]*(pow(alpha, n0*n19 - n110*n8)*n27*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n8)*n59*n72*n8/(n105*n58) + n107*n129*n72 + n96)/n151;
23154 n273 = n71*n74*(pow(alpha, n0*n19 - n110*n9)*n28*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n9)*n59*n72*n9/(n105*n58) + n107*n130*n72 + n22*n28*n44)/n152;
23155 n274 = n183*n71*(pow(alpha, n0*n19 - n11*n110)*n11*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n11*n110)*n30*n51*n59/(n105*n58) + n107*n127*n72 + n46*n88);
23156 n275 = n71*n79*(pow(alpha, n0*n19 - n110*n12)*n12*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n110*n12)*n31*n51*n59/(n105*n58) + n107*n124*n72 + n22*n31*n47)/n155;
23157 n276 = n202 + n256 + n258;
23158 n277 = n1*n170*n50*n76 + n1*n171*n50*n81 + n1*n172*n50*n84 + n1*n174*n50*n80 + n103*n176 + n168*n50*n93 + n173*n43*n50*n54 + n178*n50*n82 + n179*n50*n52 + n181*n208*n71 + n183*n212*n71 + n184*n214*n71 + n185*n50 + n230*n71*n74 + n231*n71*n79 + n233*n71*n77 + n234*n71*n87 + n235*n71*n83 + n237*n50*n69 + n259 + n228*n71/n151;
23159 n278 = n191 + n192 + n193 + n194 + n195 + n196 + n197 + n198 + n199 + n200 + n201 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n255 + n257 + n268 + n269 + n270 + n271 + n272 + n273 + n274 + n275;
23160 n279 = n180*n214*n71*(n107*n123*n34 + n13*n34*n48) + n182*n212*n71*(n107*n127*n34 + n34*n86) + n184*n50*(pow(alpha, n0*n19 - n110*n13)*n0*n13*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n13)*n22*n32*n59/(n105*n58) + n32*n48*n51 + n123*n51*n85*n94/n104) + n260*n71*n75 + n278 + n213*n71*n79*(n107*n124*n34 + n34*n78)/n166 + n211*n71*n77*(n107*n128*n34 + n34*n81)/n164 + n210*n71*n74*(n107*n130*n34 + n34*n90)/n163 + n228*n71*(n107*n129*n34 + n34*n43*n8)/n162 + n208*n62*n71*xF[3]*(n107*n125*n34 + n34*n82)/n161 + n207*n71*n83*(n107*n131*n34 + n34*n76)/n160 + n206*n71*n87*(n107*n122*n34 + n34*n84)/n159 + n205*n50*n69*xF[10]*(n107*n126*n34 + n34*n80)/n158 + n50*n89*(pow(alpha, n0*n19 - n110*n4)*n0*n4*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n4)*n22*n23*n59/(n105*n58) + n51*n92 + n126*n51*n85*n94/n104)/n147;
23161 NP_b = -n19*(n202 - 1.0*n236*n50*n75 + n256 - 0.5*xTj*(n15*n180*n225*n50 + n15*n182*n223*n50 + n15*n236*n50*n75 + n15*n238*n50*n79 + n15*n239*n50*n83 + n15*n240*n50*n87 + n15*n242*n50 + n15*n243*n50 + n15*n222*n50*n77/n164 + n15*n221*n50*n74/n163 + n15*n216*n50*n89/n158 + n181*n71*(pow(alpha, NP0*n0 - n110*n7)*n7*n72*n94/n104 + pow(alpha, n0*n19 - n110*n7)*n26*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n7)*n59*n7*n72/(n105*n58) + n100) + n183*n71*(pow(alpha, NP0*n0 - n11*n110)*n11*n72*n94/n104 + pow(alpha, n0*n19 - n11*n110)*n11*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n11*n110)*n30*n51*n59/(n105*n58) + n46*n88) + n184*n71*(pow(alpha, NP0*n0 - n110*n13)*n13*n72*n94/n104 + pow(alpha, n0*n19 - n110*n13)*n13*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n110*n13)*n32*n51*n59/(n105*n58) + n99) + n191 + n192 + n193 + n194 + n195 + n196 + n197 + n198 + n199 + n200 + n201 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n255 + n71*n79*(pow(alpha, NP0*n0 - n110*n12)*n12*n72*n94/n104 + pow(alpha, n0*n19 - n110*n12)*n12*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n110*n12)*n31*n51*n59/(n105*n58) + n22*n31*n47)/n155 + n50*n77*(pow(alpha, NP0*n0 - n10*n110)*n0*n10*n51*n94/n104 + pow(alpha, n0*n19 - n10*n110)*n0*n10*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n10*n110)*n22*n29*n59/(n105*n58) + n29*n45*n51)/n153 + n71*n74*(pow(alpha, NP0*n0 - n110*n9)*n72*n9*n94/n104 + pow(alpha, n0*n19 - n110*n9)*n28*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n9)*n59*n72*n9/(n105*n58) + n22*n28*n44)/n152 + n63*n71*xF[4]*(pow(alpha, NP0*n0 - n110*n8)*n72*n8*n94/n104 + pow(alpha, n0*n19 - n110*n8)*n27*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n8)*n59*n72*n8/(n105*n58) + n96)/n151 + n50*n83*(pow(alpha, NP0*n0 - n110*n6)*n0*n51*n6*n94/n104 + pow(alpha, n0*n19 - n110*n6)*n0*n51*n59*n6/(n105*n58) + pow(alpha, n0*n19 - n110*n6)*n22*n25*n59/(n105*n58) + n25*n41*n51)/n149 + n71*n87*(pow(alpha, NP0*n0 - n110*n5)*n5*n72*n94/n104 + pow(alpha, n0*n19 - n110*n5)*n24*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n5)*n5*n59*n72/(n105*n58) + n102)/n148 + n50*n69*xF[10]*(pow(alpha, NP0*n0 - n110*n4)*n4*n72*n94/n104 + pow(alpha, n0*n19 - n110*n4)*n23*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n4)*n4*n59*n72/(n105*n58) + n22*n92)/n147 + n50*n75*(pow(alpha, NP0*n0 - n0*n110)*n21*n22*(-n16 + n18*n20)/(n104*n37) + n21*n36*n51)/n146) + 0.5*n50*n75*(pow(alpha, NP0*n0 - n0*n110)*n21*n22*(-n16 + n18*n20)/(n104*n37) + n21*n36*n51)/n146) - n190 - n229*n35*n50*n55*n85 - n50*xTj*(n1*n170*n76 + n1*n171*n81 + n1*n172*n84 + n1*n174*n80 + n168*n93 + n173*n43*n54 + n176*n78*xF[8] + n177*n228 + n178*n82 + n179*n52 - n181*n208 - n183*n212 - n184*n214 + n185 - n230*n74 - n231*n79 - n232*n75 - n233*n77 - n234*n87 - n235*n83 + n237*n69 + n35*n85/n135);
23162 NP_2a = -n50*(n15*pow(n203, -n15)*n51*n75*n95/n157 - 1.0*n169*n97 - 2.0*n22*n229*n95*xF[0] + 1.0*xTj*(n100*n175 + n101*n171 + n102*n172 + n13*n34*n48*xF[9]*(pow(alpha, NP0*n0 - n110*n13)*n1*n13*n94/n104 + n93)/n156 + n15*n180*n225 + n15*n182*n223 + n15*n236*n75 + n15*n238*n79 + n15*n239*n83 + n15*n240*n87 + n15*n242 + n15*n243 + n15*n222*n77/n164 + n15*n221*n74/n163 + n15*n216*n89/n158 + n168*n99 + n169*n97 + n170*n98 + n173*n96 + n174*n22*n92 + n177*n63*xF[4]*(pow(alpha, n0*n19 - n110*n8)*n27*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n8)*n59*n72*n8/(n105*n58) + n107*n129*n72 + n96) + n179*n88 - n181*(pow(alpha, n0*n19 - n110*n7)*n26*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n7)*n59*n7*n72/(n105*n58) + n100 + n107*n125*n72) - n183*(pow(alpha, n0*n19 - n11*n110)*n11*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n11*n110)*n30*n51*n59/(n105*n58) + n107*n127*n72 + n46*n88) - n184*(pow(alpha, n0*n19 - n110*n13)*n13*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n110*n13)*n32*n51*n59/(n105*n58) + n107*n123*n72 + n99) + n187 + n188 + n241*n75 + n34*n78*xF[8]*(pow(alpha, NP0*n0 - n110*n12)*n1*n12*n94/n104 + n1*n78)/n155 - n79*(pow(alpha, n0*n19 - n110*n12)*n12*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n110*n12)*n31*n51*n59/(n105*n58) + n107*n124*n72 + n22*n31*n47)/n155 + n34*n86*xF[7]*(pow(alpha, NP0*n0 - n11*n110)*n52*n94/n104 + n46*n52)/n154 + n34*n81*xF[6]*(pow(alpha, NP0*n0 - n10*n110)*n1*n10*n94/n104 + n1*n81)/n153 + n77*(pow(alpha, n0*n19 - n10*n110)*n0*n10*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n10*n110)*n22*n29*n59/(n105*n58) + n29*n45*n51 + n128*n51*n85*n94/n104)/n153 + n34*n90*xF[5]*(pow(alpha, NP0*n0 - n110*n9)*n53*n94/n104 + n44*n53)/n152 - n74*(pow(alpha, n0*n19 - n110*n9)*n28*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n9)*n59*n72*n9/(n105*n58) + n107*n130*n72 + n22*n28*n44)/n152 + n34*n43*n8*xF[4]*(pow(alpha, NP0*n0 - n110*n8)*n54*n94/n104 + n43*n54)/n151 + n34*n82*xF[3]*(pow(alpha, NP0*n0 - n110*n7)*n1*n7*n94/n104 + n1*n82)/n150 + n34*n76*xF[2]*(pow(alpha, NP0*n0 - n110*n6)*n1*n6*n94/n104 + n1*n76)/n149 + n83*(pow(alpha, n0*n19 - n110*n6)*n0*n51*n59*n6/(n105*n58) + pow(alpha, n0*n19 - n110*n6)*n22*n25*n59/(n105*n58) + n25*n41*n51 + n131*n51*n85*n94/n104)/n149 + n34*n84*xF[1]*(pow(alpha, NP0*n0 - n110*n5)*n1*n5*n94/n104 + n1*n84)/n148 - n87*(pow(alpha, n0*n19 - n110*n5)*n24*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n5)*n5*n59*n72/(n105*n58) + n102 + n107*n122*n72)/n148 + n34*n80*xF[10]*(pow(alpha, NP0*n0 - n110*n4)*n1*n4*n94/n104 + n1*n80)/n147 + n69*xF[10]*(pow(alpha, n0*n19 - n110*n4)*n23*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n4)*n4*n59*n72/(n105*n58) + n107*n126*n72 + n22*n92)/n147 + n34*n85*xF[0]*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)/n146) + n21*n36*n51*n75*(n186*(-n16 + xPj*xTj)/n37 - 1)/n146);
23163 NP_sqrt_base = (NP0*(n20*(n1*n170*n50*n76 + n1*n171*n50*n81 + n1*n172*n50*n84 + n1*n174*n50*n80 + n103*n176 + n168*n50*n93 + n173*n43*n50*n54 + n178*n50*n82 + n179*n50*n52 + n181*n71*(pow(alpha, NP0*n0 - n110*n7)*n1*n7*n94/n104 + n1*n82) + n183*n71*(pow(alpha, NP0*n0 - n11*n110)*n52*n94/n104 + n46*n52) + n184*n71*(pow(alpha, NP0*n0 - n110*n13)*n1*n13*n94/n104 + n93) + n185*n50 + n189 + n71*n79*(pow(alpha, NP0*n0 - n110*n12)*n1*n12*n94/n104 + n1*n78)/n155 + n71*n77*(pow(alpha, NP0*n0 - n10*n110)*n1*n10*n94/n104 + n1*n81)/n153 + n71*n74*(pow(alpha, NP0*n0 - n110*n9)*n53*n94/n104 + n44*n53)/n152 + n63*n71*xF[4]*(pow(alpha, NP0*n0 - n110*n8)*n54*n94/n104 + n43*n54)/n151 + n71*n83*(pow(alpha, NP0*n0 - n110*n6)*n1*n6*n94/n104 + n1*n76)/n149 + n71*n87*(pow(alpha, NP0*n0 - n110*n5)*n1*n5*n94/n104 + n1*n84)/n148 + n50*n69*xF[10]*(pow(alpha, NP0*n0 - n110*n4)*n1*n4*n94/n104 + n1*n80)/n147 + n71*n75*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)/n146) + n259) + xTj*(n168*n68*n71 + n173*n63*n71 + n174*n50*n69 + n175*n62*n71 + n71*n79/n144 + n66*n71*xF[7]/n143 + n71*n77/n142 + n71*n74/n141 + n71*n83/n138 + n71*n87/n137 + n71*n75/n135) + n50*n75/n135 + pow(NP0, -n15)*(-0.5*n191 - 0.5*n257 + 0.5*n260*n50*n75 + 0.5*n279*xTj - 1.0*n35*n50*n85*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)/n146))*(-n15*n20*(n180*n71*(pow(alpha, NP0*n0 - n110*n13)*n1*n13*n94/n104 + n93)*(pow(alpha, NP0*n0 - n110*n13)*n13*n34*n94/n104 + n13*n34*n48) + n181*n71*(pow(alpha, NP0*n0 - n110*n7)*n7*n72*n94/n104 + pow(alpha, n0*n19 - n110*n7)*n26*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n7)*n59*n7*n72/(n105*n58) + n100) + n182*n71*(pow(alpha, NP0*n0 - n11*n110)*n52*n94/n104 + n46*n52)*(pow(alpha, NP0*n0 - n11*n110)*n11*n34*n94/n104 + n34*n86) + n183*n71*(pow(alpha, NP0*n0 - n11*n110)*n11*n72*n94/n104 + pow(alpha, n0*n19 - n11*n110)*n11*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n11*n110)*n30*n51*n59/(n105*n58) + n46*n88) + n184*n50*(pow(alpha, NP0*n0 - n110*n13)*n0*n13*n51*n94/n104 + pow(alpha, n0*n19 - n110*n13)*n0*n13*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n13)*n22*n32*n59/(n105*n58) + n32*n48*n51) + n191 + n192 + n193 + n194 + n195 + n196 + n197 + n198 + n199 + n200 + n201 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n255 + n71*n79*(pow(alpha, NP0*n0 - n110*n12)*n1*n12*n94/n104 + n1*n78)*(pow(alpha, NP0*n0 - n110*n12)*n12*n34*n94/n104 + n34*n78)/n166 + n71*n77*(pow(alpha, NP0*n0 - n10*n110)*n1*n10*n94/n104 + n1*n81)*(pow(alpha, NP0*n0 - n10*n110)*n10*n34*n94/n104 + n34*n81)/n164 + n71*n74*(pow(alpha, NP0*n0 - n110*n9)*n53*n94/n104 + n44*n53)*(pow(alpha, NP0*n0 - n110*n9)*n34*n9*n94/n104 + n34*n90)/n163 + n63*n71*xF[4]*(pow(alpha, NP0*n0 - n110*n8)*n54*n94/n104 + n43*n54)*(pow(alpha, NP0*n0 - n110*n8)*n34*n8*n94/n104 + n34*n43*n8)/n162 + n62*n71*xF[3]*(pow(alpha, NP0*n0 - n110*n7)*n1*n7*n94/n104 + n1*n82)*(pow(alpha, NP0*n0 - n110*n7)*n34*n7*n94/n104 + n34*n82)/n161 + n71*n83*(pow(alpha, NP0*n0 - n110*n6)*n1*n6*n94/n104 + n1*n76)*(pow(alpha, NP0*n0 - n110*n6)*n34*n6*n94/n104 + n34*n76)/n160 + n71*n87*(pow(alpha, NP0*n0 - n110*n5)*n1*n5*n94/n104 + n1*n84)*(pow(alpha, NP0*n0 - n110*n5)*n34*n5*n94/n104 + n34*n84)/n159 + n50*n69*xF[10]*(pow(alpha, NP0*n0 - n110*n4)*n1*n4*n94/n104 + n1*n80)*(pow(alpha, NP0*n0 - n110*n4)*n34*n4*n94/n104 + n34*n80)/n158 + n71*n75*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)*(pow(alpha, NP0*n0 - n0*n110)*n0*n34*n94/n104 + n34*n85)/n157 + n71*n79*(pow(alpha, NP0*n0 - n110*n12)*n12*n72*n94/n104 + pow(alpha, n0*n19 - n110*n12)*n12*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n110*n12)*n31*n51*n59/(n105*n58) + n22*n31*n47)/n155 + n50*n77*(pow(alpha, NP0*n0 - n10*n110)*n0*n10*n51*n94/n104 + pow(alpha, n0*n19 - n10*n110)*n0*n10*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n10*n110)*n22*n29*n59/(n105*n58) + n29*n45*n51)/n153 + n71*n74*(pow(alpha, NP0*n0 - n110*n9)*n72*n9*n94/n104 + pow(alpha, n0*n19 - n110*n9)*n28*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n9)*n59*n72*n9/(n105*n58) + n22*n28*n44)/n152 + n63*n71*xF[4]*(pow(alpha, NP0*n0 - n110*n8)*n72*n8*n94/n104 + pow(alpha, n0*n19 - n110*n8)*n27*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n8)*n59*n72*n8/(n105*n58) + n96)/n151 + n50*n83*(pow(alpha, NP0*n0 - n110*n6)*n0*n51*n6*n94/n104 + pow(alpha, n0*n19 - n110*n6)*n0*n51*n59*n6/(n105*n58) + pow(alpha, n0*n19 - n110*n6)*n22*n25*n59/(n105*n58) + n25*n41*n51)/n149 + n71*n87*(pow(alpha, NP0*n0 - n110*n5)*n5*n72*n94/n104 + pow(alpha, n0*n19 - n110*n5)*n24*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n5)*n5*n59*n72/(n105*n58) + n102)/n148 + n50*n89*(pow(alpha, NP0*n0 - n110*n4)*n0*n4*n51*n94/n104 + pow(alpha, n0*n19 - n110*n4)*n0*n4*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n4)*n22*n23*n59/(n105*n58) + n51*n92)/n147 + n50*n75*(pow(alpha, NP0*n0 - n0*n110)*n21*n22*(-n16 + n18*n20)/(n104*n37) + n21*n36*n51)/n146) + 2.0*n191 - 4.0*n236*n50*n75 + 2.0*n257 + 4.0*n35*n50*n85*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)/n146) + pow(-n19*(n202 + n256 - 0.5*xTj*(n180*n71*(pow(alpha, NP0*n0 - n110*n13)*n1*n13*n94/n104 + n93)*(pow(alpha, NP0*n0 - n110*n13)*n13*n34*n94/n104 + n13*n34*n48) + n181*n71*(pow(alpha, NP0*n0 - n110*n7)*n7*n72*n94/n104 + pow(alpha, n0*n19 - n110*n7)*n26*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n7)*n59*n7*n72/(n105*n58) + n100) + n182*n71*(pow(alpha, NP0*n0 - n11*n110)*n52*n94/n104 + n46*n52)*(pow(alpha, NP0*n0 - n11*n110)*n11*n34*n94/n104 + n34*n86) + n183*n71*(pow(alpha, NP0*n0 - n11*n110)*n11*n72*n94/n104 + pow(alpha, n0*n19 - n11*n110)*n11*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n11*n110)*n30*n51*n59/(n105*n58) + n46*n88) + n184*n50*(pow(alpha, NP0*n0 - n110*n13)*n0*n13*n51*n94/n104 + pow(alpha, n0*n19 - n110*n13)*n0*n13*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n13)*n22*n32*n59/(n105*n58) + n32*n48*n51) + n191 + n192 + n193 + n194 + n195 + n196 + n197 + n198 + n199 + n200 + n201 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n255 + n71*n79*(pow(alpha, NP0*n0 - n110*n12)*n1*n12*n94/n104 + n1*n78)*(pow(alpha, NP0*n0 - n110*n12)*n12*n34*n94/n104 + n34*n78)/n166 + n71*n77*(pow(alpha, NP0*n0 - n10*n110)*n1*n10*n94/n104 + n1*n81)*(pow(alpha, NP0*n0 - n10*n110)*n10*n34*n94/n104 + n34*n81)/n164 + n71*n74*(pow(alpha, NP0*n0 - n110*n9)*n53*n94/n104 + n44*n53)*(pow(alpha, NP0*n0 - n110*n9)*n34*n9*n94/n104 + n34*n90)/n163 + n63*n71*xF[4]*(pow(alpha, NP0*n0 - n110*n8)*n54*n94/n104 + n43*n54)*(pow(alpha, NP0*n0 - n110*n8)*n34*n8*n94/n104 + n34*n43*n8)/n162 + n62*n71*xF[3]*(pow(alpha, NP0*n0 - n110*n7)*n1*n7*n94/n104 + n1*n82)*(pow(alpha, NP0*n0 - n110*n7)*n34*n7*n94/n104 + n34*n82)/n161 + n71*n83*(pow(alpha, NP0*n0 - n110*n6)*n1*n6*n94/n104 + n1*n76)*(pow(alpha, NP0*n0 - n110*n6)*n34*n6*n94/n104 + n34*n76)/n160 + n71*n87*(pow(alpha, NP0*n0 - n110*n5)*n1*n5*n94/n104 + n1*n84)*(pow(alpha, NP0*n0 - n110*n5)*n34*n5*n94/n104 + n34*n84)/n159 + n50*n69*xF[10]*(pow(alpha, NP0*n0 - n110*n4)*n1*n4*n94/n104 + n1*n80)*(pow(alpha, NP0*n0 - n110*n4)*n34*n4*n94/n104 + n34*n80)/n158 + n71*n75*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)*(pow(alpha, NP0*n0 - n0*n110)*n0*n34*n94/n104 + n34*n85)/n157 + n71*n79*(pow(alpha, NP0*n0 - n110*n12)*n12*n72*n94/n104 + pow(alpha, n0*n19 - n110*n12)*n12*n59*n72/(n105*n58) + pow(alpha, n0*n19 - n110*n12)*n31*n51*n59/(n105*n58) + n22*n31*n47)/n155 + n50*n77*(pow(alpha, NP0*n0 - n10*n110)*n0*n10*n51*n94/n104 + pow(alpha, n0*n19 - n10*n110)*n0*n10*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n10*n110)*n22*n29*n59/(n105*n58) + n29*n45*n51)/n153 + n71*n74*(pow(alpha, NP0*n0 - n110*n9)*n72*n9*n94/n104 + pow(alpha, n0*n19 - n110*n9)*n28*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n9)*n59*n72*n9/(n105*n58) + n22*n28*n44)/n152 + n63*n71*xF[4]*(pow(alpha, NP0*n0 - n110*n8)*n72*n8*n94/n104 + pow(alpha, n0*n19 - n110*n8)*n27*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n8)*n59*n72*n8/(n105*n58) + n96)/n151 + n50*n83*(pow(alpha, NP0*n0 - n110*n6)*n0*n51*n6*n94/n104 + pow(alpha, n0*n19 - n110*n6)*n0*n51*n59*n6/(n105*n58) + pow(alpha, n0*n19 - n110*n6)*n22*n25*n59/(n105*n58) + n25*n41*n51)/n149 + n71*n87*(pow(alpha, NP0*n0 - n110*n5)*n5*n72*n94/n104 + pow(alpha, n0*n19 - n110*n5)*n24*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n5)*n5*n59*n72/(n105*n58) + n102)/n148 + n50*n89*(pow(alpha, NP0*n0 - n110*n4)*n0*n4*n51*n94/n104 + pow(alpha, n0*n19 - n110*n4)*n0*n4*n51*n59/(n105*n58) + pow(alpha, n0*n19 - n110*n4)*n22*n23*n59/(n105*n58) + n51*n92)/n147 + n50*n75*(pow(alpha, NP0*n0 - n0*n110)*n21*n22*(-n16 + n18*n20)/(n104*n37) + n21*n36*n51)/n146) - 0.5*n50*n75*(pow(alpha, NP0*n0 - n0*n110)*n0*n1*n94/n104 + n1*n85)*(pow(alpha, NP0*n0 - n0*n110)*n0*n34*n94/n104 + n34*n85)/n157 + 0.5*n50*n75*(pow(alpha, NP0*n0 - n0*n110)*n21*n22*(-n16 + n18*n20)/(n104*n37) + n21*n36*n51)/n146) - n190 - n232*n50*n75 - n277*xTj, -n15);
23164 NP_sqrt_base = fabs(NP_sqrt_base);
23165 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
23166 NT1 = n73*(n106 - log(-pow(alpha, NP1*n0)*n94 + 1));
23167 g0 = MW[1] - Mstar;
23168 g1 = MW[0] - Mstar;
23171 g4 = MW[10] - Mstar;
23172 g5 = MW[2] - Mstar;
23173 g6 = MW[3] - Mstar;
23174 g7 = MW[4] - Mstar;
23175 g8 = MW[5] - Mstar;
23176 g9 = MW[6] - Mstar;
23177 g10 = MW[7] - Mstar;
23178 g11 = MW[8] - Mstar;
23179 g12 = MW[9] - Mstar;
23184 g17 = pow(alpha, -g1);
23185 g18 = pow(alpha, -g4);
23186 g19 = pow(alpha, -g0);
23187 g20 = pow(alpha, -g5);
23188 g21 = pow(alpha, -g6);
23189 g22 = pow(alpha, -g7);
23190 g23 = pow(alpha, -g8);
23191 g24 = pow(alpha, -g9);
23192 g25 = pow(alpha, -g10);
23193 g26 = pow(alpha, -g11);
23194 g27 = pow(alpha, -g12);
23195 g28 = log(xF[0]/xF[1]);
23197 g30 = pow(alpha, NP1*g0);
23198 g31 = pow(alpha, NP1*g1);
23199 g32 = pow(alpha, NP1*g4);
23201 g34 = pow(alpha, NP1*g5);
23202 g35 = pow(alpha, NP1*g6);
23203 g36 = pow(alpha, NP1*g7);
23204 g37 = pow(alpha, NP1*g8);
23205 g38 = pow(alpha, NP1*g9);
23206 g39 = pow(alpha, NP1*g10);
23207 g40 = pow(alpha, NP1*g11);
23208 g41 = pow(alpha, NP1*g12);
23236 g69 = g14/(g3*xF[1]);
23237 g70 = pow(alpha, g0*g29) - 1;
23238 g71 = pow(alpha, g0*g29) - 1;
23239 g72 = pow(alpha, g1*g29) - 1;
23240 g73 = pow(alpha, g29*g5) - 1;
23241 g74 = pow(alpha, g29*g6) - 1;
23242 g75 = pow(alpha, g29*g7) - 1;
23243 g76 = pow(alpha, g29*g8) - 1;
23244 g77 = pow(alpha, g29*g9) - 1;
23245 g78 = pow(alpha, g10*g29) - 1;
23246 g79 = pow(alpha, g11*g29) - 1;
23247 g80 = pow(alpha, g12*g29) - 1;
23248 g81 = pow(alpha, g29*g4) - 1;
23249 g82 = -pow(alpha, g1*g29);
23250 g83 = -pow(alpha, g29*g4);
23251 g84 = -pow(alpha, g29*g5);
23252 g85 = -pow(alpha, g29*g6);
23253 g86 = -pow(alpha, g29*g7);
23254 g87 = -pow(alpha, g29*g8);
23255 g88 = -pow(alpha, g29*g9);
23256 g89 = -pow(alpha, g10*g29);
23257 g90 = -pow(alpha, g11*g29);
23258 g91 = -pow(alpha, g12*g29);
23270 g103 = pow(alpha, g1*g29) + g57;
23272 g105 = pow(alpha, g29*g4) + g58;
23273 g106 = pow(alpha, g29*g5) + g59;
23274 g107 = pow(alpha, g29*g6) + g60;
23275 g108 = pow(alpha, g29*g7) + g61;
23276 g109 = pow(alpha, g29*g8) + g62;
23277 g110 = pow(alpha, g29*g9) + g63;
23278 g111 = pow(alpha, g10*g29) + g64;
23279 g112 = pow(alpha, g11*g29) + g65;
23280 g113 = pow(alpha, g12*g29) + g66;
23284 g117 = xF[10]/g105;
23325 g158 = log(g104*g15*g69/g46);
23326 g159 = log(g15*g69*g92/g45);
23327 g160 = log(g104*g16*g43/g71);
23329 g162 = log(g16*g43*g92/g70);
23331 g164 = -g114*g161*(g66 + 1) - g114*g163*(pow(alpha, g12*g29) - 1) - g115*g161*(g65 + 1) - g115*g163*(pow(alpha, g11*g29) - 1) - g116*g161*g46 - g116*g163*g71 - g117*g161*(g58 + 1) - g117*g163*(pow(alpha, g29*g4) - 1) - g118*g161*(g60 + 1) - g118*g163*(pow(alpha, g29*g6) - 1) - g119*g161*(g63 + 1) - g119*g163*(pow(alpha, g29*g9) - 1) - g120*g161*(g64 + 1) - g120*g163*(pow(alpha, g10*g29) - 1) - g121*g161*(g61 + 1) - g121*g163*(pow(alpha, g29*g7) - 1) - g122*g161*(g62 + 1) - g122*g163*(pow(alpha, g29*g8) - 1) - g123*g161*(g59 + 1) - g123*g163*(pow(alpha, g29*g5) - 1) - g124*g161*(g57 + 1) - g124*g163*(pow(alpha, g1*g29) - 1) - g67*xF[0] - g67*xF[10] - g67*xF[1] - g67*xF[2] - g67*xF[3] - g67*xF[4] - g67*xF[5] - g67*xF[6] - g67*xF[7] - g67*xF[8] - g67*xF[9];
23332 LpF = xF[0]*(g17 + 1.0)*(g140*g159 + g148*g162 + g42)/(g33*(g17 - 1.0)) + xF[10]*(g18 + 1.0)*(g145*g159 + g157*g162 + g42)/(g33*(g18 - 1.0)) + xF[1]*(g19 + 1.0)*(g143*g159 + g147*g162 + g42)/(g33*(g19 - 1.0)) + xF[2]*(g20 + 1.0)*(g144*g159 + g150*g162 + g42)/(g33*(g20 - 1.0)) + xF[3]*(g21 + 1.0)*(g142*g159 + g151*g162 + g42)/(g33*(g21 - 1.0)) + xF[4]*(g22 + 1.0)*(g138*g159 + g152*g162 + g42)/(g33*(g22 - 1.0)) + xF[5]*(g23 + 1.0)*(g141*g159 + g149*g162 + g42)/(g33*(g23 - 1.0)) + xF[6]*(g24 + 1.0)*(g136*g159 + g155*g162 + g42)/(g33*(g24 - 1.0)) + xF[7]*(g25 + 1.0)*(g139*g159 + g156*g162 + g42)/(g33*(g25 - 1.0)) + xF[8]*(g26 + 1.0)*(g146*g159 + g153*g162 + g42)/(g33*(g26 - 1.0)) + xF[9]*(g27 + 1.0)*(g137*g159 + g154*g162 + g42)/(g33*(g27 - 1.0));
23337 xP[0] = g126*g44*g72;
23338 xP[1] = g125*g44*g70;
23339 xP[2] = g131*g44*g73;
23340 xP[3] = g132*g44*g74;
23341 xP[4] = g128*g44*g75;
23342 xP[5] = g129*g44*g76;
23343 xP[6] = g133*g44*g77;
23344 xP[7] = g130*g44*g78;
23345 xP[8] = g134*g44*g79;
23346 xP[9] = g127*g44*g80;
23347 xP[10] = g135*g44*g81;
23348 xT[0] = g126*g47*g68;
23349 xT[1] = g125*g45*g68;
23350 xT[2] = g131*g48*g68;
23351 xT[3] = g132*g49*g68;
23352 xT[4] = g128*g50*g68;
23353 xT[5] = g129*g51*g68;
23354 xT[6] = g133*g52*g68;
23355 xT[7] = g130*g53*g68;
23356 xT[8] = g134*g54*g68;
23357 xT[9] = g127*g55*g68;
23358 xT[10] = g135*g56*g68;
23361 n0 = -2.00000000000000;
23362 n1 = MW[0] - Mstar;
23366 n5 = MW[10] - Mstar;
23367 n6 = MW[11] - Mstar;
23368 n7 = MW[1] - Mstar;
23369 n8 = MW[2] - Mstar;
23370 n9 = MW[3] - Mstar;
23371 n10 = MW[4] - Mstar;
23372 n11 = MW[5] - Mstar;
23373 n12 = MW[6] - Mstar;
23374 n13 = MW[7] - Mstar;
23375 n14 = MW[8] - Mstar;
23376 n15 = MW[9] - Mstar;
23387 n26 = pow(n1, -n0);
23388 n27 = pow(n2, -n0);
23389 n28 = pow(n5, -n0);
23390 n29 = pow(n6, -n0);
23391 n30 = pow(n7, -n0);
23392 n31 = pow(n8, -n0);
23393 n32 = pow(n9, -n0);
23394 n33 = pow(n10, -n0);
23395 n34 = pow(n11, -n0);
23396 n35 = pow(n12, -n0);
23397 n36 = pow(n13, -n0);
23398 n37 = pow(n14, -n0);
23399 n38 = pow(n15, -n0);
23403 n42 = pow(alpha, NP0*n1);
23404 n43 = n19 + n21*xF[0];
23405 n44 = n19 + n21*xPj;
23406 n45 = pow(alpha, NP0*n5);
23407 n46 = pow(alpha, NP0*n6);
23408 n47 = pow(alpha, NP0*n7);
23409 n48 = pow(alpha, NP0*n8);
23410 n49 = pow(alpha, NP0*n9);
23411 n50 = pow(alpha, NP0*n10);
23412 n51 = pow(alpha, NP0*n11);
23413 n52 = pow(alpha, NP0*n12);
23414 n53 = pow(alpha, NP0*n13);
23415 n54 = pow(alpha, NP0*n14);
23416 n55 = pow(alpha, NP0*n15);
23424 n63 = pow(alpha, NP0*n0*n17);
23425 n64 = pow(n44, -n0);
23466 n105 = log((-1.0 + xPj/xF[0])/n3);
23474 n113 = n27*n29*n46;
23475 n114 = n27*n31*n48;
23476 n115 = n27*n37*n54;
23477 n116 = n27*n28*n45;
23478 n117 = n27*n32*n49;
23479 n118 = n111*n78 + 1;
23480 n119 = n105 + n16 + n39 + n56;
23481 n120 = n111*n42/n118;
23482 n121 = n85*(n119 - log(n118)) + 1;
23483 n122 = pow(alpha, n1*n121);
23484 n123 = pow(alpha, n121*n5);
23485 n124 = pow(alpha, n121*n6);
23486 n125 = pow(alpha, n121*n7);
23487 n126 = pow(alpha, n121*n8);
23488 n127 = pow(alpha, n121*n9);
23489 n128 = pow(alpha, n10*n121);
23490 n129 = pow(alpha, n11*n121);
23491 n130 = pow(alpha, n12*n121);
23492 n131 = pow(alpha, n121*n13);
23493 n132 = pow(alpha, n121*n14);
23494 n133 = pow(alpha, n121*n15);
23508 n147 = pow(alpha, n121*n17) + n61 - 1;
23509 n148 = n62 - 1 + 1.0/n123;
23510 n149 = n65 - 1 + 1.0/n124;
23511 n150 = n66 - 1 + 1.0/n125;
23512 n151 = n67 - 1 + 1.0/n126;
23513 n152 = n68 - 1 + 1.0/n127;
23514 n153 = n69 - 1 + 1.0/n128;
23515 n154 = n70 - 1 + 1.0/n129;
23516 n155 = n71 - 1 + 1.0/n130;
23517 n156 = n72 - 1 + 1.0/n131;
23518 n157 = n73 - 1 + 1.0/n132;
23519 n158 = n74 - 1 + 1.0/n133;
23520 n159 = pow(n147, 3);
23521 n160 = pow(n148, 3);
23522 n161 = pow(n149, 3);
23523 n162 = pow(n150, 3);
23524 n163 = pow(n151, 3);
23525 n164 = pow(n152, 3);
23526 n165 = pow(n153, 3);
23527 n166 = pow(n154, 3);
23528 n167 = pow(n155, 3);
23529 n168 = pow(n156, 3);
23530 n169 = pow(n157, 3);
23531 n170 = pow(n158, 3);
23533 n172 = xF[10]/n148;
23535 n174 = xF[11]/n149;
23540 n179 = pow(n148, n18)*xF[10];
23542 n181 = n2*xF[4]/n153;
23544 n183 = pow(n147, n18)*n2;
23545 n184 = n2*xF[6]/n155;
23546 n185 = n51*xF[5]/n154;
23547 n186 = n47*xF[1]/n150;
23548 n187 = n53*xF[7]/n156;
23549 n188 = pow(n147, n18)*n61;
23551 n190 = n61*xF[0]/n159;
23552 n191 = -pow(n154, n18)*n98;
23553 n192 = -n72*xF[7]/n168;
23554 n193 = -pow(n150, n18)*n66*xF[1];
23555 n194 = -pow(n156, n18)*n72*xF[7];
23556 n195 = n175*n2*n97;
23557 n196 = n103*n173*n55;
23558 n197 = n27*n33*n50*xF[4]/n153;
23559 n198 = n27*n35*n52*xF[6]/n155;
23560 n199 = n17*n171*n2*n42*n57;
23561 n200 = n112*n171*n57;
23562 n201 = n116*n172*n57;
23563 n202 = n113*n174*n57;
23564 n203 = n186*n57*n99;
23565 n204 = n114*n175*n57;
23566 n205 = n117*n177*n57;
23568 n207 = n185*n57*n91;
23570 n209 = n187*n57*n95;
23571 n210 = n115*n176*n57;
23574 n213 = n111/(n118*n122);
23577 n216 = n2*n213*n89 + n2*n89;
23578 n217 = n120*n144*n2 + n2*n93;
23579 n218 = n110 + n120*n140*n2;
23580 n219 = n120*n59/n125 + n47*n59;
23581 n220 = n120*n142*n2 + n2*n97;
23582 n221 = n104*n2 + n120*n137*n2;
23583 n222 = n120*n134*n2 + n2*n92;
23584 n223 = n120*n58/n129 + n51*n58;
23585 n224 = n120*n138*n2 + n2*n88;
23586 n225 = n120*n60/n131 + n53*n60;
23587 n226 = n120*n139*n2 + n2*n90;
23588 n227 = n120*n136*n2 + n2*n87;
23589 n228 = pow(n216, -n0);
23590 n229 = pow(n217, -n0);
23591 n230 = pow(n218, -n0);
23592 n231 = pow(n219, -n0);
23593 n232 = pow(n220, -n0);
23594 n233 = pow(n221, -n0);
23595 n234 = pow(n222, -n0);
23596 n235 = pow(n223, -n0);
23597 n236 = pow(n224, -n0);
23598 n237 = pow(n225, -n0);
23599 n238 = pow(n226, -n0);
23600 n239 = pow(n227, -n0);
23604 n243 = n0*n120*n17*n2/n122 + n0*n17*n2*n42;
23605 n244 = n101*n213*n78 + n101*n78;
23607 n246 = pow(n152, n18)*n221;
23608 n247 = pow(n149, n18)*n218;
23609 n248 = pow(n158, n18)*n227;
23610 n249 = pow(n157, n18)*n226;
23611 n250 = pow(n155, n18)*n224*xF[6];
23614 n253 = pow(n156, n18)*n225*xF[7];
23615 n254 = pow(n151, n18)*n220*xF[2];
23616 n255 = pow(n153, n18)*n242*n77;
23617 n256 = n234*n69*xF[4]/n165;
23618 n257 = n188*n240*n57;
23619 n258 = n0*n17*n183*n42*n57*xF[0]*(pow(alpha, NP0*n1 + n121*n17)*n1*n111*n2/n118 + n2*n89);
23620 n259 = n179*n40*n57*n93*(pow(alpha, NP0*n1 - n121*n5)*n111*n2*n5/n118 + n2*n93);
23621 n260 = n110*pow(n149, n18)*n22*n57*(pow(alpha, NP0*n1 - n121*n6)*n111*n2*n6/n118 + n110);
23622 n261 = n100*pow(n150, n18)*n40*n57*xF[1]*(pow(alpha, NP0*n1 - n121*n7)*n111*n59/n118 + n47*n59);
23623 n262 = pow(n151, n18)*n40*n57*n97*xF[2]*(pow(alpha, NP0*n1 - n121*n8)*n111*n2*n8/n118 + n2*n97);
23624 n263 = n108*pow(n152, n18)*n40*n57*(pow(alpha, NP0*n1 - n121*n9)*n111*n2*n9/n118 + n104*n2);
23625 n264 = pow(n153, n18)*n40*n57*n92*xF[4]*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n2/n118 + n2*n92);
23626 n265 = n11*pow(n154, n18)*n40*n51*n57*xF[5]*(pow(alpha, NP0*n1 - n11*n121)*n111*n58/n118 + n51*n58);
23627 n266 = pow(n155, n18)*n40*n57*n88*xF[6]*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n2/n118 + n2*n88);
23628 n267 = n102*pow(n156, n18)*n40*n57*xF[7]*(pow(alpha, NP0*n1 - n121*n13)*n111*n60/n118 + n53*n60);
23629 n268 = pow(n157, n18)*n40*n57*n90*xF[8]*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n2/n118 + n2*n90);
23630 n269 = pow(n158, n18)*n40*n57*n87*xF[9]*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n2/n118 + n2*n87);
23631 n270 = 1.0*n183*n240*n57*n89;
23632 n271 = n188*n245*n57;
23634 n273 = pow(alpha, n1*n24)*pow(n118, n18)*n142*n17*n27*pow(n43, n18)*n64 + pow(alpha, n1*n24)*pow(n118, n18)*n27*n31*pow(n43, n18)*n64/n126 + n120*n142*n17*n27 + n27*n31*n80;
23635 n274 = pow(alpha, n1*n24)*pow(n118, n18)*n137*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24)*pow(n118, n18)*n27*n32*pow(n43, n18)*n64/n127 + n117 + n120*n137*n84;
23636 n275 = pow(alpha, n1*n24)*pow(n118, n18)*n134*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24)*pow(n118, n18)*n27*n33*pow(n43, n18)*n64/n128 + n120*n134*n84 + n27*n33*n50;
23637 n276 = pow(alpha, n1*n24)*pow(n118, n18)*n138*n17*n27*pow(n43, n18)*n64 + pow(alpha, n1*n24)*pow(n118, n18)*n27*n35*pow(n43, n18)*n64/n130 + n120*n138*n17*n27 + n27*n35*n82;
23638 n277 = pow(alpha, n1*n24)*pow(n118, n18)*n139*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24)*pow(n118, n18)*n27*n37*pow(n43, n18)*n64/n132 + n115 + n120*n139*n84;
23639 n278 = -pow(alpha, n1*n24)*n103*pow(n118, n18)*pow(n43, n18)*n64/n133 + pow(alpha, n1*n24)*pow(n118, n18)*n136*pow(n43, n18)*n64*n84 + n103*n55 + n120*n136*n84;
23640 n279 = pow(n151, n18)*n57*n96*(pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n17*n27*pow(n43, n18)*n64*n8 + pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n27*n31*pow(n43, n18)*n64 + n120*n142*n17*n27 + n27*n31*n80);
23641 n280 = pow(n155, n18)*n57*n94*(pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n12*n17*n27*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n27*n35*pow(n43, n18)*n64 + n120*n138*n17*n27 + n27*n35*n82);
23642 n281 = n179*n57*n76*(-pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*n27*n28*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*pow(n43, n18)*n5*n64*n84 + n116 + n120*n144*n84);
23643 n282 = n193*n57*(pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n7*n84 - pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n99 + n120*n141*n84 + n47*n99);
23644 n283 = n106*pow(n152, n18)*n57*(-pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*n27*n32*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*pow(n43, n18)*n64*n84*n9 + n117 + n120*n137*n84);
23645 n284 = pow(n153, n18)*n57*n77*xF[4]*(pow(alpha, n1*n24 - n10*n121)*n10*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n10*n121)*pow(n118, n18)*n27*n33*pow(n43, n18)*n64 + n120*n134*n84 + n27*n33*n50);
23646 n285 = n191*n57*(pow(alpha, n1*n24 - n11*n121)*n11*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n11*n121)*pow(n118, n18)*pow(n43, n18)*n64*n91 + n120*n145*n84 + n51*n91);
23647 n286 = n194*n57*(pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*n13*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*pow(n43, n18)*n64*n95 + n120*n135*n84 + n53*n95);
23648 n287 = n109*pow(n157, n18)*n57*(pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n14*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n27*n37*pow(n43, n18)*n64 + n115 + n120*n139*n84);
23649 n288 = n212 + n270 + n272;
23650 n289 = xTj*(n106*n246*n57 + n107*n248*n57 + n108*n180*n57 + n109*n249*n57 + n110*n174*n57 - pow(n151, n18)*n220*n57*n96 + n171*n2*n57*n89 + n172*n2*n57*n93 + n173*n2*n57*n87 + n176*n2*n57*n90 + n179*n217*n57*n76 + n181*n57*n92 + n184*n57*n88 + n185*n57*n58 + n186*n57*n59 + n187*n57*n60 + n188*n25*n57*(pow(alpha, NP0*n1 - n1*n121)*n1*n111*n2/n118 + n2*n89) + n191*n223*n57 + n193*n219*n57 + n194*n225*n57 + n195*n57 - n247*n57*n86 + n250*n57*n75 + n255*n57);
23651 n290 = n199 + n257 + n289;
23652 n291 = n200 + n201 + n202 + n203 + n204 + n205 + n206 + n207 + n208 + n209 + n210 + n211 + n258 + n259 + n260 + n261 + n262 + n263 + n264 + n265 + n266 + n267 + n268 + n269 + n271 + n279 + n280 + n281 + n282 + n283 + n284 + n285 + n286 + n287;
23653 n292 = n106*n221*n57*(n104*n40 + n120*n137*n40)/n164 + n107*pow(n158, n18)*n57*(-pow(alpha, n1*n24 - n121*n15)*n103*pow(n118, n18)*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n15)*pow(n118, n18)*n15*pow(n43, n18)*n64*n84 + n103*n55 + n120*n136*n84) + n107*n227*n57*(n120*n136*n40 + n40*n87)/n170 + n109*n226*n57*(n120*n139*n40 + n40*n90)/n169 - pow(n149, n18)*n57*n86*(-pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*n27*n29*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*pow(n43, n18)*n6*n64*n84 + n113 + n120*n140*n84) + n178*n224*n57*n75*(n120*n138*n40 + n40*n88) + n182*n218*n57*n86*(n120*n140*n40 + n40*n46*n6) + n189*n241*n57*(n100*n40 + n120*n141*n40) + n192*n225*n57*(n102*n40 + n120*n135*n40) + n291 - n223*n57*n98*(n11*n40*n51 + n120*n145*n40)/n166 + n242*n57*n77*(n120*n134*n40 + n40*n92)/n165 - n220*n57*n96*(n120*n142*n40 + n40*n97)/n163 + n217*n57*n76*xF[10]*(n120*n144*n40 + n40*n93)/n160 + n25*n57*n61*(pow(alpha, NP0*n1 - n1*n121)*n1*n111*n2/n118 + n2*n89)*(pow(alpha, NP0*n1 - n1*n121)*n0*n111*n17*n2/n118 + n0*n17*n2*n42)/n159;
23654 NP_b = -n183*n215*n57*n61*n89 - n199 - n24*(1.0*n183*n57*n89*xF[0]*(pow(alpha, NP0*n1 - n1*n121)*n1*n111*n2/n118 + n2*n89) + 0.5*n188*n57*xF[0]*(-pow(alpha, NP0*n1 - n1*n121)*n101*n111/n118 + n101*n78) - 1.0*n190*n228*n57 + n212 - 0.5*xTj*(n106*pow(n152, n18)*n57*(pow(alpha, NP0*n1 - n121*n9)*n111*n84*n9/n118 - pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*n27*n32*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*pow(n43, n18)*n64*n84*n9 + n117) + n109*pow(n157, n18)*n57*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n84/n118 + pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n14*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n27*n37*pow(n43, n18)*n64 + n115) + pow(n149, n18)*n57*n86*(pow(alpha, NP0*n1 - n121*n6)*n111*n17*n27*n6/n118 + pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*n17*n27*pow(n43, n18)*n6*n64 + pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*n27*n29*pow(n43, n18)*n64 + n27*n29*n79) + pow(n151, n18)*n57*n96*(pow(alpha, NP0*n1 - n121*n8)*n111*n17*n27*n8/n118 + pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n17*n27*pow(n43, n18)*n64*n8 + pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n27*n31*pow(n43, n18)*n64 + n27*n31*n80) + pow(n153, n18)*n57*n77*xF[4]*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n84/n118 + pow(alpha, n1*n24 - n10*n121)*n10*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n10*n121)*pow(n118, n18)*n27*n33*pow(n43, n18)*n64 + n27*n33*n50) + pow(n155, n18)*n57*n94*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n17*n27/n118 + pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n12*n17*n27*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n27*n35*pow(n43, n18)*n64 + n27*n35*n82) + pow(n158, n18)*n57*n74*xF[9]*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n17*n27/n118 + pow(alpha, n1*n24 - n121*n15)*n103*pow(n118, n18)*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n15)*pow(n118, n18)*n15*n17*n27*pow(n43, n18)*n64 + n103*n83) + n179*n57*n76*(pow(alpha, NP0*n1 - n121*n5)*n111*n5*n84/n118 - pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*n27*n28*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*pow(n43, n18)*n5*n64*n84 + n116) + n18*n190*n228*n57 + n18*n251*n57*n96 + n18*n252*n57*n98 + n18*n256*n57 + n188*n57*xF[0]*(-pow(alpha, NP0*n1 - n1*n121)*n101*n111/n118 + n101*n78) + n191*n57*(pow(alpha, NP0*n1 - n11*n121)*n11*n111*n84/n118 + pow(alpha, n1*n24 - n11*n121)*n11*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n11*n121)*pow(n118, n18)*pow(n43, n18)*n64*n91 + n51*n91) + n193*n57*(pow(alpha, NP0*n1 - n121*n7)*n111*n7*n84/n118 + pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n7*n84 - pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n99 + n47*n99) + n194*n57*(pow(alpha, NP0*n1 - n121*n13)*n111*n13*n84/n118 + pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*n13*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*pow(n43, n18)*n64*n95 + n53*n95) + n200 + n201 + n202 + n203 + n204 + n205 + n206 + n207 + n208 + n209 + n210 + n211 + n258 + n259 + n260 + n261 + n262 + n263 + n264 + n265 + n266 + n267 + n268 + n269 + n18*n239*n57*n74*xF[9]/n170 + n18*n238*n57*n73*xF[8]/n169 + n18*n237*n57*n72*xF[7]/n168 + n18*n236*n57*n94/n167 + n18*n233*n57*n68*xF[3]/n164 + n18*n231*n57*n66*xF[1]/n162 + n18*n230*n57*n86/n161 + n18*n229*n57*n62*xF[10]/n160)) - n57*xTj*(n106*n246 + n107*n248 + n108*n180 + n109*n249 + n110*n174 - pow(n151, n18)*n220*n96 + n171*n2*n89 + n172*n2*n93 + n173*n2*n87 + n176*n2*n90 + n179*n217*n76 + n181*n92 + n184*n88 + n185*n58 + n186*n59 + n187*n60 + n188*n25*(pow(alpha, NP0*n1 - n1*n121)*n1*n111*n2/n118 + n2*n89) + n191*n223 + n193*n219 + n194*n225 + n195 - n247*n86 + n250*n75 + n255);
23655 NP_2a = -n57*(pow(alpha, n1*n24)*n0*n101*pow(n147, n18)*n215 + pow(alpha, n1*n24)*n0*n101*pow(n214, -n0)*n25*n61/n159 - 1.0*n112*n171 + n112*n188*n25*(-1 + (-n19 + xPj*xTj)/(n118*n122*n43)) + 1.0*xTj*(n0*n17*n183*n42*xF[0]*(pow(alpha, NP0*n1 + n121*n17)*n1*n111*n2/n118 + n2*n89) + n100*pow(n150, n18)*n40*xF[1]*(pow(alpha, NP0*n1 - n121*n7)*n111*n59/n118 + n47*n59) + n102*pow(n156, n18)*n40*xF[7]*(pow(alpha, NP0*n1 - n121*n13)*n111*n60/n118 + n53*n60) + n106*pow(n152, n18)*(-pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*n27*n32*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*pow(n43, n18)*n64*n84*n9 + n117 + n120*n137*n84) + n107*pow(n158, n18)*(-pow(alpha, n1*n24 - n121*n15)*n103*pow(n118, n18)*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n15)*pow(n118, n18)*n15*pow(n43, n18)*n64*n84 + n103*n55 + n120*n136*n84) + n108*pow(n152, n18)*n40*(pow(alpha, NP0*n1 - n121*n9)*n111*n2*n9/n118 + n104*n2) + n109*pow(n157, n18)*(pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n14*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n27*n37*pow(n43, n18)*n64 + n115 + n120*n139*n84) + n11*pow(n154, n18)*n40*n51*xF[5]*(pow(alpha, NP0*n1 - n11*n121)*n111*n58/n118 + n51*n58) + n110*pow(n149, n18)*n22*(pow(alpha, NP0*n1 - n121*n6)*n111*n2*n6/n118 + n110) + n112*n171 + n113*n174 + n114*n175 + n115*n176 + n116*n172 + n117*n177 - pow(n149, n18)*n86*(-pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*n27*n29*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*pow(n43, n18)*n6*n64*n84 + n113 + n120*n140*n84) + pow(n151, n18)*n40*n97*xF[2]*(pow(alpha, NP0*n1 - n121*n8)*n111*n2*n8/n118 + n2*n97) + pow(n151, n18)*n96*(pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n17*n27*pow(n43, n18)*n64*n8 + pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n27*n31*pow(n43, n18)*n64 + n120*n142*n17*n27 + n27*n31*n80) + pow(n153, n18)*n40*n92*xF[4]*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n2/n118 + n2*n92) + pow(n153, n18)*n77*xF[4]*(pow(alpha, n1*n24 - n10*n121)*n10*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n10*n121)*pow(n118, n18)*n27*n33*pow(n43, n18)*n64 + n120*n134*n84 + n27*n33*n50) + pow(n155, n18)*n40*n88*xF[6]*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n2/n118 + n2*n88) + pow(n155, n18)*n94*(pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n12*n17*n27*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n27*n35*pow(n43, n18)*n64 + n120*n138*n17*n27 + n27*n35*n82) + pow(n157, n18)*n40*n90*xF[8]*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n2/n118 + n2*n90) + pow(n158, n18)*n40*n87*xF[9]*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n2/n118 + n2*n87) + n179*n40*n93*(pow(alpha, NP0*n1 - n121*n5)*n111*n2*n5/n118 + n2*n93) + n179*n76*(-pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*n27*n28*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*pow(n43, n18)*n5*n64*n84 + n116 + n120*n144*n84) + n18*n190*n228 + n18*n251*n96 + n18*n252*n98 + n18*n256 + n185*n91 + n186*n99 + n187*n95 + n188*n245 + n191*(pow(alpha, n1*n24 - n11*n121)*n11*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n11*n121)*pow(n118, n18)*pow(n43, n18)*n64*n91 + n120*n145*n84 + n51*n91) + n193*(pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n7*n84 - pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n99 + n120*n141*n84 + n47*n99) + n194*(pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*n13*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*pow(n43, n18)*n64*n95 + n120*n135*n84 + n53*n95) + n196 + n197 + n198 + n18*n239*n74*xF[9]/n170 + n18*n238*n73*xF[8]/n169 + n18*n237*n72*xF[7]/n168 + n18*n236*n94/n167 + n18*n233*n68*xF[3]/n164 + n18*n231*n66*xF[1]/n162 + n18*n230*n86/n161 + n18*n229*n62*xF[10]/n160));
23656 NP_sqrt_base = (-NP0*n290 - n21*(-n57*n61*xF[0]/(pow(alpha, n17*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1)) + n61 - 1) - n57*n62*xF[10]/(n62 - 1 + pow(alpha, -n5*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n66*xF[1]/(n66 - 1 + pow(alpha, -n7*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n68*xF[3]/(n68 - 1 + pow(alpha, -n9*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n69*xF[4]/(n69 - 1 + pow(alpha, -n10*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n72*xF[7]/(n72 - 1 + pow(alpha, -n13*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n73*xF[8]/(n73 - 1 + pow(alpha, -n14*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n74*xF[9]/(n74 - 1 + pow(alpha, -n15*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n86/(n65 - 1 + pow(alpha, -n6*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n94/(n71 - 1 + pow(alpha, -n12*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n96/(n67 - 1 + pow(alpha, -n8*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1))) - n57*n98/(n70 - 1 + pow(alpha, -n11*(n85*(n119 - log(n78*(n19 + n23*xTj)/(n19 + n25*xTj) + 1)) + 1)))) - n25*n57*n61/(-n143 + n61 - 1) - pow(NP0, -n0)*(1.0*n183*n240*n57*n89 - 0.5*n190*n216*n243*n57 + 0.5*n200 + 0.5*n271 - 0.5*n292*xTj))*(-n0*n200 - n0*n21*(n106*pow(n152, n18)*n57*(pow(alpha, NP0*n1 - n121*n9)*n111*n84*n9/n118 - pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*n27*n32*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*pow(n43, n18)*n64*n84*n9 + n117) + n106*n57*(pow(alpha, NP0*n1 - n121*n9)*n111*n2*n9/n118 + n104*n2)*(pow(alpha, NP0*n1 - n121*n9)*n111*n40*n9/n118 + n104*n40)/n164 + n107*pow(n158, n18)*n57*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n84/n118 - pow(alpha, n1*n24 - n121*n15)*n103*pow(n118, n18)*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n15)*pow(n118, n18)*n15*pow(n43, n18)*n64*n84 + n103*n55) + n107*n57*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n2/n118 + n2*n87)*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n40/n118 + n40*n87)/n170 + n109*pow(n157, n18)*n57*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n84/n118 + pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n14*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n27*n37*pow(n43, n18)*n64 + n115) + n109*n57*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n2/n118 + n2*n90)*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n40/n118 + n40*n90)/n169 - pow(n149, n18)*n57*n86*(pow(alpha, NP0*n1 - n121*n6)*n111*n6*n84/n118 - pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*n27*n29*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*pow(n43, n18)*n6*n64*n84 + n113) + pow(n151, n18)*n57*n96*(pow(alpha, NP0*n1 - n121*n8)*n111*n17*n27*n8/n118 + pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n17*n27*pow(n43, n18)*n64*n8 + pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n27*n31*pow(n43, n18)*n64 + n27*n31*n80) + pow(n153, n18)*n57*n77*xF[4]*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n84/n118 + pow(alpha, n1*n24 - n10*n121)*n10*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n10*n121)*pow(n118, n18)*n27*n33*pow(n43, n18)*n64 + n27*n33*n50) + pow(n155, n18)*n57*n94*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n17*n27/n118 + pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n12*n17*n27*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n27*n35*pow(n43, n18)*n64 + n27*n35*n82) + n178*n57*n75*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n2/n118 + n2*n88)*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n40/n118 + n40*n88) + n179*n57*n76*(pow(alpha, NP0*n1 - n121*n5)*n111*n5*n84/n118 - pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*n27*n28*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*pow(n43, n18)*n5*n64*n84 + n116) + n182*n57*n86*(pow(alpha, NP0*n1 - n121*n6)*n111*n2*n6/n118 + n110)*(pow(alpha, NP0*n1 - n121*n6)*n111*n40*n6/n118 + n40*n46*n6) + n188*n57*xF[0]*(pow(alpha, NP0*n1 - n1*n121)*n101*(-n19 + xPj*xTj)/(n118*n43) + n101*n78) + n189*n57*xF[1]*(pow(alpha, NP0*n1 - n121*n7)*n111*n59/n118 + n47*n59)*(pow(alpha, NP0*n1 - n121*n7)*n111*n40*n7/n118 + n100*n40) + n191*n57*(pow(alpha, NP0*n1 - n11*n121)*n11*n111*n84/n118 + pow(alpha, n1*n24 - n11*n121)*n11*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n11*n121)*pow(n118, n18)*pow(n43, n18)*n64*n91 + n51*n91) + n192*n57*(pow(alpha, NP0*n1 - n121*n13)*n111*n60/n118 + n53*n60)*(pow(alpha, NP0*n1 - n121*n13)*n111*n13*n40/n118 + n102*n40) + n193*n57*(pow(alpha, NP0*n1 - n121*n7)*n111*n7*n84/n118 + pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n7*n84 - pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n99 + n47*n99) + n194*n57*(pow(alpha, NP0*n1 - n121*n13)*n111*n13*n84/n118 + pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*n13*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*pow(n43, n18)*n64*n95 + n53*n95) + n200 + n201 + n202 + n203 + n204 + n205 + n206 + n207 + n208 + n209 + n210 + n211 + n258 + n259 + n260 + n261 + n262 + n263 + n264 + n265 + n266 + n267 + n268 + n269 - n57*n98*(pow(alpha, NP0*n1 - n11*n121)*n111*n58/n118 + n51*n58)*(pow(alpha, NP0*n1 - n11*n121)*n11*n111*n40/n118 + n11*n40*n51)/n166 + n57*n77*xF[4]*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n2/n118 + n2*n92)*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n40/n118 + n40*n92)/n165 - n57*n96*(pow(alpha, NP0*n1 - n121*n8)*n111*n2*n8/n118 + n2*n97)*(pow(alpha, NP0*n1 - n121*n8)*n111*n40*n8/n118 + n40*n97)/n163 + n57*n76*xF[10]*(pow(alpha, NP0*n1 - n121*n5)*n111*n2*n5/n118 + n2*n93)*(pow(alpha, NP0*n1 - n121*n5)*n111*n40*n5/n118 + n40*n93)/n160 + n25*n57*n61*(pow(alpha, NP0*n1 - n1*n121)*n1*n111*n2/n118 + n2*n89)*(pow(alpha, NP0*n1 - n1*n121)*n0*n111*n17*n2/n118 + n0*n17*n2*n42)/n159) - n0*n271 + 4.0*n183*n240*n57*n89 - 4.0*n190*n228*n57) + pow(-n24*(1.0*n183*n57*n89*xF[0]*(pow(alpha, NP0*n1 - n1*n121)*n1*n111*n2/n118 + n2*n89) + 0.5*n188*n57*xF[0]*(-pow(alpha, NP0*n1 - n1*n121)*n101*n111/n118 + n101*n78) - 0.5*n190*n57*(pow(alpha, NP0*n1 - n1*n121)*n1*n111*n2/n118 + n2*n89)*(pow(alpha, NP0*n1 - n1*n121)*n0*n111*n17*n2/n118 + n0*n17*n2*n42) + n212 - 0.5*xTj*(n106*pow(n152, n18)*n57*(pow(alpha, NP0*n1 - n121*n9)*n111*n84*n9/n118 - pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*n27*n32*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n9)*pow(n118, n18)*pow(n43, n18)*n64*n84*n9 + n117) + n106*n57*(pow(alpha, NP0*n1 - n121*n9)*n111*n2*n9/n118 + n104*n2)*(pow(alpha, NP0*n1 - n121*n9)*n111*n40*n9/n118 + n104*n40)/n164 + n107*pow(n158, n18)*n57*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n84/n118 - pow(alpha, n1*n24 - n121*n15)*n103*pow(n118, n18)*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n15)*pow(n118, n18)*n15*pow(n43, n18)*n64*n84 + n103*n55) + n107*n57*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n2/n118 + n2*n87)*(pow(alpha, NP0*n1 - n121*n15)*n111*n15*n40/n118 + n40*n87)/n170 + n109*pow(n157, n18)*n57*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n84/n118 + pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n14*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n14)*pow(n118, n18)*n27*n37*pow(n43, n18)*n64 + n115) + n109*n57*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n2/n118 + n2*n90)*(pow(alpha, NP0*n1 - n121*n14)*n111*n14*n40/n118 + n40*n90)/n169 - pow(n149, n18)*n57*n86*(pow(alpha, NP0*n1 - n121*n6)*n111*n6*n84/n118 - pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*n27*n29*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n6)*pow(n118, n18)*pow(n43, n18)*n6*n64*n84 + n113) + pow(n151, n18)*n57*n96*(pow(alpha, NP0*n1 - n121*n8)*n111*n17*n27*n8/n118 + pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n17*n27*pow(n43, n18)*n64*n8 + pow(alpha, n1*n24 - n121*n8)*pow(n118, n18)*n27*n31*pow(n43, n18)*n64 + n27*n31*n80) + pow(n153, n18)*n57*n77*xF[4]*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n84/n118 + pow(alpha, n1*n24 - n10*n121)*n10*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n10*n121)*pow(n118, n18)*n27*n33*pow(n43, n18)*n64 + n27*n33*n50) + pow(n155, n18)*n57*n94*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n17*n27/n118 + pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n12*n17*n27*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n12*n121)*pow(n118, n18)*n27*n35*pow(n43, n18)*n64 + n27*n35*n82) + n178*n57*n75*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n2/n118 + n2*n88)*(pow(alpha, NP0*n1 - n12*n121)*n111*n12*n40/n118 + n40*n88) + n179*n57*n76*(pow(alpha, NP0*n1 - n121*n5)*n111*n5*n84/n118 - pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*n27*n28*pow(n43, n18)*n64 + pow(alpha, n1*n24 - n121*n5)*pow(n118, n18)*pow(n43, n18)*n5*n64*n84 + n116) + n182*n57*n86*(pow(alpha, NP0*n1 - n121*n6)*n111*n2*n6/n118 + n110)*(pow(alpha, NP0*n1 - n121*n6)*n111*n40*n6/n118 + n40*n46*n6) + n188*n57*xF[0]*(-pow(alpha, NP0*n1 - n1*n121)*n101*n111/n118 + n101*n78) + n189*n57*xF[1]*(pow(alpha, NP0*n1 - n121*n7)*n111*n59/n118 + n47*n59)*(pow(alpha, NP0*n1 - n121*n7)*n111*n40*n7/n118 + n100*n40) + n191*n57*(pow(alpha, NP0*n1 - n11*n121)*n11*n111*n84/n118 + pow(alpha, n1*n24 - n11*n121)*n11*pow(n118, n18)*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n11*n121)*pow(n118, n18)*pow(n43, n18)*n64*n91 + n51*n91) + n192*n57*(pow(alpha, NP0*n1 - n121*n13)*n111*n60/n118 + n53*n60)*(pow(alpha, NP0*n1 - n121*n13)*n111*n13*n40/n118 + n102*n40) + n193*n57*(pow(alpha, NP0*n1 - n121*n7)*n111*n7*n84/n118 + pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n7*n84 - pow(alpha, n1*n24 - n121*n7)*pow(n118, n18)*pow(n43, n18)*n64*n99 + n47*n99) + n194*n57*(pow(alpha, NP0*n1 - n121*n13)*n111*n13*n84/n118 + pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*n13*pow(n43, n18)*n64*n84 - pow(alpha, n1*n24 - n121*n13)*pow(n118, n18)*pow(n43, n18)*n64*n95 + n53*n95) + n200 + n201 + n202 + n203 + n204 + n205 + n206 + n207 + n208 + n209 + n210 + n211 + n258 + n259 + n260 + n261 + n262 + n263 + n264 + n265 + n266 + n267 + n268 + n269 - n57*n98*(pow(alpha, NP0*n1 - n11*n121)*n111*n58/n118 + n51*n58)*(pow(alpha, NP0*n1 - n11*n121)*n11*n111*n40/n118 + n11*n40*n51)/n166 + n57*n77*xF[4]*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n2/n118 + n2*n92)*(pow(alpha, NP0*n1 - n10*n121)*n10*n111*n40/n118 + n40*n92)/n165 - n57*n96*(pow(alpha, NP0*n1 - n121*n8)*n111*n2*n8/n118 + n2*n97)*(pow(alpha, NP0*n1 - n121*n8)*n111*n40*n8/n118 + n40*n97)/n163 + n57*n76*xF[10]*(pow(alpha, NP0*n1 - n121*n5)*n111*n2*n5/n118 + n2*n93)*(pow(alpha, NP0*n1 - n121*n5)*n111*n40*n5/n118 + n40*n93)/n160 + n25*n57*n61*(pow(alpha, NP0*n1 - n1*n121)*n1*n111*n2/n118 + n2*n89)*(pow(alpha, NP0*n1 - n1*n121)*n0*n111*n17*n2/n118 + n0*n17*n2*n42)/n159)) - n290, -n0);
23657 NP_sqrt_base = fabs(NP_sqrt_base);
23658 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
23659 NT1 = n85*(n119 - log(-pow(alpha, NP1*n1)*n111 + 1));
23660 g0 = MW[1] - Mstar;
23661 g1 = MW[0] - Mstar;
23664 g4 = MW[10] - Mstar;
23665 g5 = MW[11] - Mstar;
23666 g6 = MW[2] - Mstar;
23667 g7 = MW[3] - Mstar;
23668 g8 = MW[4] - Mstar;
23669 g9 = MW[5] - Mstar;
23670 g10 = MW[6] - Mstar;
23671 g11 = MW[7] - Mstar;
23672 g12 = MW[8] - Mstar;
23673 g13 = MW[9] - Mstar;
23679 g19 = pow(alpha, -g1);
23680 g20 = pow(alpha, -g4);
23681 g21 = pow(alpha, -g5);
23682 g22 = pow(alpha, -g0);
23683 g23 = pow(alpha, -g6);
23684 g24 = pow(alpha, -g7);
23685 g25 = pow(alpha, -g8);
23686 g26 = pow(alpha, -g9);
23687 g27 = pow(alpha, -g10);
23688 g28 = pow(alpha, -g11);
23689 g29 = pow(alpha, -g12);
23690 g30 = pow(alpha, -g13);
23691 g31 = log(xF[0]/xF[1]);
23693 g33 = pow(alpha, NP1*g0);
23694 g34 = pow(alpha, NP1*g1);
23695 g35 = pow(alpha, NP1*g4);
23697 g37 = pow(alpha, NP1*g5);
23698 g38 = pow(alpha, NP1*g6);
23699 g39 = pow(alpha, NP1*g7);
23700 g40 = pow(alpha, NP1*g8);
23701 g41 = pow(alpha, NP1*g9);
23702 g42 = pow(alpha, NP1*g10);
23703 g43 = pow(alpha, NP1*g11);
23704 g44 = pow(alpha, NP1*g12);
23705 g45 = pow(alpha, NP1*g13);
23735 g75 = g15/(g3*xF[1]);
23748 g88 = pow(alpha, g0*g32) - 1;
23749 g89 = pow(alpha, g0*g32) - 1;
23750 g90 = pow(alpha, g1*g32) - 1;
23751 g91 = pow(alpha, g32*g4) - 1;
23752 g92 = pow(alpha, g32*g5) - 1;
23753 g93 = pow(alpha, g32*g6) - 1;
23754 g94 = pow(alpha, g32*g7) - 1;
23755 g95 = pow(alpha, g32*g8) - 1;
23756 g96 = pow(alpha, g32*g9) - 1;
23757 g97 = pow(alpha, g10*g32) - 1;
23758 g98 = pow(alpha, g11*g32) - 1;
23759 g99 = pow(alpha, g12*g32) - 1;
23760 g100 = pow(alpha, g13*g32) - 1;
23761 g101 = -pow(alpha, g1*g32);
23762 g102 = -pow(alpha, g32*g4);
23763 g103 = -pow(alpha, g32*g5);
23764 g104 = -pow(alpha, g32*g6);
23765 g105 = -pow(alpha, g32*g7);
23766 g106 = -pow(alpha, g32*g8);
23767 g107 = -pow(alpha, g32*g9);
23768 g108 = -pow(alpha, g10*g32);
23769 g109 = -pow(alpha, g11*g32);
23770 g110 = -pow(alpha, g12*g32);
23771 g111 = -pow(alpha, g13*g32);
23773 g113 = -g101 - g34;
23774 g114 = -g102 - g35;
23775 g115 = -g103 - g37;
23776 g116 = -g104 - g38;
23777 g117 = -g105 - g39;
23778 g118 = -g106 - g40;
23779 g119 = -g107 - g41;
23780 g120 = -g108 - g42;
23781 g121 = -g109 - g43;
23782 g122 = -g110 - g44;
23783 g123 = -g111 - g45;
23784 g124 = pow(alpha, g1*g32) + g62;
23786 g126 = pow(alpha, g32*g4) + g63;
23787 g127 = pow(alpha, g32*g5) + g64;
23788 g128 = pow(alpha, g32*g6) + g65;
23789 g129 = pow(alpha, g32*g7) + g66;
23790 g130 = pow(alpha, g32*g8) + g67;
23791 g131 = pow(alpha, g32*g9) + g68;
23792 g132 = pow(alpha, g10*g32) + g69;
23793 g133 = pow(alpha, g11*g32) + g70;
23794 g134 = pow(alpha, g12*g32) + g71;
23795 g135 = pow(alpha, g13*g32) + g72;
23796 g136 = xF[11]/g127;
23801 g141 = xF[10]/g126;
23814 g154 = xF[11]/g115;
23818 g158 = xF[10]/g114;
23877 g217 = log(g125*g16*g75/g50);
23878 g218 = log(g112*g16*g75/g49);
23879 g219 = log(g125*g18*g47/g89);
23881 g221 = log(g112*g18*g47/g88);
23907 g247 = g76 + g77 + g78 + g79 + g80 + g81 + g82 + g83 + g84 + g85 + g86 + g87;
23908 LpF = xF[0]*(g19 + 1.0)*(g226 + g238 + g46)/(g36*(g19 - 1.0)) + xF[10]*(g20 + 1.0)*(g232 + g243 + g46)/(g36*(g20 - 1.0)) + xF[11]*(g21 + 1.0)*(g230 + g236 + g46)/(g36*(g21 - 1.0)) + xF[1]*(g22 + 1.0)*(g233 + g244 + g46)/(g36*(g22 - 1.0)) + xF[2]*(g23 + 1.0)*(g228 + g239 + g46)/(g36*(g23 - 1.0)) + xF[3]*(g24 + 1.0)*(g231 + g237 + g46)/(g36*(g24 - 1.0)) + xF[4]*(g25 + 1.0)*(g223 + g246 + g46)/(g36*(g25 - 1.0)) + xF[5]*(g26 + 1.0)*(g227 + g240 + g46)/(g36*(g26 - 1.0)) + xF[6]*(g27 + 1.0)*(g224 + g235 + g46)/(g36*(g27 - 1.0)) + xF[7]*(g28 + 1.0)*(g234 + g245 + g46)/(g36*(g28 - 1.0)) + xF[8]*(g29 + 1.0)*(g229 + g241 + g46)/(g36*(g29 - 1.0)) + xF[9]*(g30 + 1.0)*(g225 + g242 + g46)/(g36*(g30 - 1.0));
23911 SWUpF = -g136*g220*(g64 + 1) - g136*g222*(pow(alpha, g32*g5) - 1) - g137*g220*(g72 + 1) - g137*g222*(pow(alpha, g13*g32) - 1) - g138*g220*(g71 + 1) - g138*g222*(pow(alpha, g12*g32) - 1) - g139*g220*g50 - g139*g222*g89 - g140*g220*(g66 + 1) - g140*g222*(pow(alpha, g32*g7) - 1) - g141*g220*(g63 + 1) - g141*g222*(pow(alpha, g32*g4) - 1) - g142*g220*(g69 + 1) - g142*g222*(pow(alpha, g10*g32) - 1) - g143*g220*(g70 + 1) - g143*g222*(pow(alpha, g11*g32) - 1) - g144*g220*(g68 + 1) - g144*g222*(pow(alpha, g32*g9) - 1) - g145*g220*(g65 + 1) - g145*g222*(pow(alpha, g32*g6) - 1) - g146*g220*(g62 + 1) - g146*g222*(pow(alpha, g1*g32) - 1) - g247 - g17*g217*(g67 + 1)/g130 - g17*g219*(pow(alpha, g32*g8) - 1)/g130;
23912 SWUpP = -g48*(g100*g164*g221 + g159*g218*g51 + g159*g221*g90 + g160*g218*g58 + g160*g221*g97 + g161*g218*g54 + g161*g221*g93 + g162*g218*g53 + g162*g221*g92 + g163*g218*g57 + g163*g221*g96 + g164*g218*g61 + g165*g218*g60 + g165*g221*g99 + g166*g218*g52 + g166*g221*g91 + g167*g218*g55 + g167*g221*g94 + g168*g218*g49 + g168*g221*g88 + g169*g218*g59 + g169*g221*g98 + g17*g223 + g17*g246 + g247);
23917 xP[4] = g147*g48*g95;
23939 n0 = -0.500000000000000;
23940 n1 = -2.00000000000000;
23941 n2 = MW[0] - Mstar;
23945 n6 = MW[10] - Mstar;
23946 n7 = MW[11] - Mstar;
23947 n8 = MW[12] - Mstar;
23948 n9 = MW[1] - Mstar;
23949 n10 = MW[2] - Mstar;
23950 n11 = MW[3] - Mstar;
23951 n12 = MW[4] - Mstar;
23952 n13 = MW[5] - Mstar;
23953 n14 = MW[6] - Mstar;
23954 n15 = MW[7] - Mstar;
23955 n16 = MW[8] - Mstar;
23956 n17 = MW[9] - Mstar;
23965 n26 = pow(n2, -n1);
23966 n27 = pow(n3, -n1);
23967 n28 = pow(n6, -n1);
23968 n29 = pow(n7, -n1);
23969 n30 = pow(n8, -n1);
23970 n31 = pow(n9, -n1);
23971 n32 = pow(n10, -n1);
23972 n33 = pow(n11, -n1);
23973 n34 = pow(n12, -n1);
23974 n35 = pow(n13, -n1);
23975 n36 = pow(n14, -n1);
23976 n37 = pow(n15, -n1);
23977 n38 = pow(n16, -n1);
23978 n39 = pow(n17, -n1);
23981 n42 = pow(alpha, NP0*n2);
23982 n43 = n21 + n24*xF[0];
23983 n44 = n21 + n24*xPj;
23984 n45 = pow(alpha, NP0*n6);
23985 n46 = pow(alpha, NP0*n7);
23986 n47 = pow(alpha, NP0*n8);
23987 n48 = pow(alpha, NP0*n9);
23988 n49 = pow(alpha, NP0*n10);
23989 n50 = pow(alpha, NP0*n11);
23990 n51 = pow(alpha, NP0*n12);
23991 n52 = pow(alpha, NP0*n13);
23992 n53 = pow(alpha, NP0*n14);
23993 n54 = pow(alpha, NP0*n15);
23994 n55 = pow(alpha, NP0*n16);
23995 n56 = pow(alpha, NP0*n17);
24005 n66 = pow(alpha, NP0*n1*n19);
24006 n67 = pow(n44, -n1);
24051 n112 = log((-1.0 + xPj/xF[0])/n4);
24052 n113 = -n69*xF[12];
24054 n115 = n106*xF[10];
24055 n116 = -n65*xF[10];
24060 n121 = n109*n3*xF[12];
24061 n122 = n27*n29*n46;
24062 n123 = n27*n32*n49;
24063 n124 = n27*n38*n55;
24064 n125 = n27*n34*n51;
24065 n126 = n27*n28*n45;
24066 n127 = n27*n36*n53;
24067 n128 = n27*n33*n50;
24068 n129 = n120*n82 + 1;
24069 n130 = n112 + n18 + n40 + n57;
24072 n133 = n131*n3*n42;
24073 n134 = n90*(n130 - log(n129)) + 1;
24074 n135 = pow(alpha, n134*n2);
24075 n136 = pow(alpha, n134*n6);
24076 n137 = pow(alpha, n134*n7);
24077 n138 = pow(alpha, n134*n8);
24078 n139 = pow(alpha, n134*n9);
24079 n140 = pow(alpha, n10*n134);
24080 n141 = pow(alpha, n11*n134);
24081 n142 = pow(alpha, n12*n134);
24082 n143 = pow(alpha, n13*n134);
24083 n144 = pow(alpha, n134*n14);
24084 n145 = pow(alpha, n134*n15);
24085 n146 = pow(alpha, n134*n16);
24086 n147 = pow(alpha, n134*n17);
24101 n162 = pow(alpha, n134*n19) + n64 - 1;
24102 n163 = n65 - 1 + 1.0/n136;
24103 n164 = n68 - 1 + 1.0/n137;
24104 n165 = n69 - 1 + 1.0/n138;
24105 n166 = n70 - 1 + 1.0/n139;
24106 n167 = n71 - 1 + 1.0/n140;
24107 n168 = n72 - 1 + 1.0/n141;
24108 n169 = n73 - 1 + 1.0/n142;
24109 n170 = n74 - 1 + 1.0/n143;
24110 n171 = n75 - 1 + 1.0/n144;
24111 n172 = n76 - 1 + 1.0/n145;
24112 n173 = n77 - 1 + 1.0/n146;
24113 n174 = n78 - 1 + 1.0/n147;
24114 n175 = pow(n162, 3);
24115 n176 = pow(n163, 3);
24116 n177 = pow(n164, 3);
24117 n178 = pow(n165, 3);
24118 n179 = pow(n166, 3);
24119 n180 = pow(n167, 3);
24120 n181 = pow(n168, 3);
24121 n182 = pow(n169, 3);
24122 n183 = pow(n170, 3);
24123 n184 = pow(n171, 3);
24124 n185 = pow(n172, 3);
24125 n186 = pow(n173, 3);
24126 n187 = pow(n174, 3);
24128 n189 = xF[11]/n164;
24133 n194 = xF[10]/n163;
24134 n195 = pow(n168, n20)*xF[3];
24139 n200 = n3*xF[9]/n174;
24140 n201 = n52*xF[5]/n170;
24141 n202 = n48*xF[1]/n166;
24142 n203 = n54*xF[7]/n172;
24143 n204 = n47*xF[12]/n165;
24145 n206 = pow(n162, n20)*n64;
24146 n207 = -n108*pow(n170, n20);
24148 n209 = -pow(n166, n20)*n70*xF[1];
24149 n210 = n111*n56*xF[9]/n174;
24150 n211 = n58*n89/(n162*n90);
24151 n212 = n19*n3*n58*n89/n162;
24152 n213 = n58*n89*n97/n162;
24153 n214 = n126*n194*n58;
24154 n215 = n122*n189*n58;
24155 n216 = n104*n204*n58;
24156 n217 = n105*n202*n58;
24157 n218 = n123*n188*n58;
24158 n219 = n128*n191*n58;
24159 n220 = n125*n190*n58;
24160 n221 = n201*n58*n95;
24161 n222 = n127*n193*n58;
24162 n223 = n203*n58*n99;
24163 n224 = n124*n192*n58;
24165 n226 = n0*n58*n82*n97*xF[0]/n162;
24166 n227 = n131/n135 + 1;
24167 n228 = n131*n42/(n135*n90) + n42/n90;
24168 n229 = n106*n3 + n133*n157;
24169 n230 = n119 + n133*n154;
24170 n231 = n109*n3 + n133*n148;
24171 n232 = n131*n42*n60/n139 + n48*n60;
24172 n233 = n100*n3 + n133*n156;
24173 n234 = n133*n151 + n3*n92;
24174 n235 = n12*n96 + n133*n158;
24175 n236 = n131*n161*n59 + n52*n59;
24176 n237 = n133*n152 + n3*n93;
24177 n238 = n131*n42*n63/n145 + n54*n63;
24178 n239 = n133*n153 + n3*n94;
24179 n240 = n103*n3 + n133*n150;
24180 n241 = pow(n228, -n1);
24181 n242 = pow(n229, -n1);
24182 n243 = pow(n230, -n1);
24183 n244 = pow(n231, -n1);
24184 n245 = pow(n232, -n1);
24185 n246 = pow(n233, -n1);
24186 n247 = pow(n234, -n1);
24187 n248 = pow(n235, -n1);
24188 n249 = pow(n236, -n1);
24189 n250 = pow(n237, -n1);
24190 n251 = pow(n238, -n1);
24191 n252 = pow(n239, -n1);
24192 n253 = pow(n240, -n1);
24194 n255 = n1*n133*n19/n135 + n1*n19*n3*n42;
24196 n257 = n131*n82*n97/n135 + n82*n97;
24197 n258 = pow(n165, n20)*n231;
24198 n259 = pow(n162, n20)*n228;
24199 n260 = pow(n164, n20)*n230;
24200 n261 = pow(n174, n20)*n240;
24201 n262 = pow(n163, n20)*n229;
24202 n263 = pow(n172, n20)*n238;
24203 n264 = pow(n173, n20)*n239;
24204 n265 = pow(n171, n20)*n237*xF[6];
24207 n268 = pow(n169, n20)*n235*xF[4];
24210 n271 = pow(n162, n20)*n257;
24211 n272 = -n102*n259*n58;
24212 n273 = n1*pow(n162, n20)*n19*n3*n58*n89*(pow(alpha, NP0*n2 + n134*n19)*n131/n90 + n42/n90);
24213 n274 = n115*pow(n163, n20)*n41*n58*(pow(alpha, NP0*n2 - n134*n6)*n131*n3*n6 + n106*n3);
24214 n275 = n119*pow(n164, n20)*n23*n58*(pow(alpha, NP0*n2 - n134*n7)*n131*n3*n7 + n119);
24215 n276 = n109*pow(n165, n20)*n41*n58*xF[12]*(pow(alpha, NP0*n2 - n134*n8)*n131*n3*n8 + n109*n3);
24216 n277 = n107*pow(n166, n20)*n41*n58*xF[1]*(pow(alpha, NP0*n2 - n134*n9)*n131*n60 + n48*n60);
24217 n278 = n100*pow(n167, n20)*n41*n58*xF[2]*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n3 + n100*n3);
24218 n279 = n195*n41*n58*n92*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n3 + n3*n92);
24219 n280 = n12*pow(n169, n20)*n41*n51*n58*xF[4]*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n3 + n12*n96);
24220 n281 = n13*pow(n170, n20)*n41*n52*n58*xF[5]*(pow(alpha, NP0*n2 - n13*n134)*n131*n59 + n52*n59);
24221 n282 = pow(n171, n20)*n41*n58*n93*xF[6]*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n3 + n3*n93);
24222 n283 = n110*pow(n172, n20)*n41*n58*xF[7]*(pow(alpha, NP0*n2 - n134*n15)*n131*n63 + n54*n63);
24223 n284 = pow(n173, n20)*n41*n58*n94*xF[8]*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n3 + n3*n94);
24224 n285 = n103*pow(n174, n20)*n41*n58*xF[9]*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n3 + n103*n3);
24225 n286 = 1.0*n259*n58*n89/n90;
24226 n287 = n102*n271*n58;
24228 n289 = n211 + n272;
24229 n290 = n228*n255/n175;
24230 n291 = pow(alpha, n2*n25)*pow(n129, n20)*n157*n2*n27*pow(n43, n20)*n67 - pow(alpha, n2*n25)*pow(n129, n20)*n27*n28*pow(n43, n20)*n67/n136 + n126 + n132*n157*n98;
24231 n292 = pow(alpha, n2*n25)*pow(n129, n20)*n154*n19*n27*pow(n43, n20)*n67 + pow(alpha, n2*n25)*pow(n129, n20)*n160*n27*pow(n43, n20)*n67 + n132*n154*n19*n42 + n27*n29*n83;
24232 n293 = pow(alpha, n2*n25)*n104*pow(n129, n20)*pow(n43, n20)*n67/n138 + pow(alpha, n2*n25)*pow(n129, n20)*n148*n19*n27*pow(n43, n20)*n67 + n104*n84 + n132*n148*n19*n42;
24233 n294 = pow(alpha, n2*n25)*pow(n129, n20)*n156*n19*n27*pow(n43, n20)*n67 + pow(alpha, n2*n25)*pow(n129, n20)*n27*n32*pow(n43, n20)*n67/n140 + n132*n156*n19*n42 + n27*n32*n85;
24234 n295 = pow(alpha, n2*n25)*pow(n129, n20)*n158*n2*n27*pow(n43, n20)*n67 - pow(alpha, n2*n25)*pow(n129, n20)*n27*n34*pow(n43, n20)*n67/n142 + n125 + n132*n158*n98;
24235 n296 = pow(alpha, n2*n25)*pow(n129, n20)*n152*n19*n27*pow(n43, n20)*n67 + pow(alpha, n2*n25)*pow(n129, n20)*n27*n36*pow(n43, n20)*n67/n144 + n132*n152*n19*n42 + n27*n36*n87;
24236 n297 = pow(alpha, n2*n25)*pow(n129, n20)*n149*n2*n27*pow(n43, n20)*n67 - pow(alpha, n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n99/n145 + n132*n149*n98 + n54*n99;
24237 n298 = pow(alpha, n2*n25)*pow(n129, n20)*n153*n2*n27*pow(n43, n20)*n67 - pow(alpha, n2*n25)*pow(n129, n20)*n27*n38*pow(n43, n20)*n67/n146 + n124 + n132*n153*n98;
24238 n299 = pow(n165, n20)*n58*n69*xF[12]*(pow(alpha, -n134*n8 + n2*n25)*n104*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n8 + n2*n25)*pow(n129, n20)*n19*n27*pow(n43, n20)*n67*n8 + n104*n84 + n132*n148*n19*n42);
24239 n300 = n101*pow(n167, n20)*n58*(pow(alpha, -n10*n134 + n2*n25)*n10*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n10*n134 + n2*n25)*pow(n129, n20)*n27*n32*pow(n43, n20)*n67 + n132*n156*n19*n42 + n27*n32*n85);
24240 n301 = pow(n171, n20)*n58*n75*xF[6]*(pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n14*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n27*n36*pow(n43, n20)*n67 + n132*n152*n19*n42 + n27*n36*n87);
24241 n302 = n116*pow(n163, n20)*n58*(pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n6*n67 - pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n27*n28*pow(n43, n20)*n67 + n126 + n132*n157*n98);
24242 n303 = n209*n58*(-pow(alpha, -n134*n9 + n2*n25)*n105*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n9 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n9 + n105*n48 + n132*n155*n98);
24243 n304 = pow(n169, n20)*n58*n81*xF[4]*(pow(alpha, -n12*n134 + n2*n25)*n12*pow(n129, n20)*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n12*n134 + n2*n25)*pow(n129, n20)*n27*n34*pow(n43, n20)*n67 + n125 + n132*n158*n98);
24244 n305 = n207*n58*(pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*n13*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n95 + n132*n159*n98 + n52*n95);
24245 n306 = n118*pow(n172, n20)*n58*(pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*n15*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n99 + n132*n149*n98 + n54*n99);
24246 n307 = n117*pow(n173, n20)*n58*(pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n16*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n27*n38*pow(n43, n20)*n67 + n124 + n132*n153*n98);
24247 n308 = n114*pow(n174, n20)*n58*(-pow(alpha, -n134*n17 + n2*n25)*n111*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n17 + n2*n25)*pow(n129, n20)*n17*n2*n27*pow(n43, n20)*n67 + n111*n56 + n132*n150*n98);
24248 n309 = n226 + n286 + n288;
24249 n310 = n100*n188*n3*n58 - n101*pow(n167, n20)*n233*n58 + n103*n200*n58 + n113*n258*n58 + n114*n261*n58 + n115*n197*n58 + n116*n262*n58 + n117*n264*n58 + n118*n263*n58 + n119*n189*n58 + n12*n190*n58*n96 + n121*n58/n165 + n191*n3*n58*n92 + n192*n3*n58*n94 + n193*n3*n58*n93 + n195*n234*n58*n79 + n201*n58*n59 + n202*n58*n60 + n203*n58*n63 + n207*n236*n58 + n209*n232*n58 - n260*n58*n91 + n265*n58*n80 + n268*n58*n81 + n289;
24251 n312 = n213 + n214 + n215 + n216 + n217 + n218 + n219 + n220 + n221 + n222 + n223 + n224 + n225 + n273 + n274 + n275 + n276 + n277 + n278 + n279 + n280 + n281 + n282 + n283 + n284 + n285 + n287 + n299 + n300 + n301 + n302 + n303 + n304 + n305 + n306 + n307 + n308;
24252 n313 = -n101*n233*n58*(n100*n41 + n131*n156*n41*n42)/n180 - n102*n290*n58 - n108*n236*n58*(n13*n41*n52 + n131*n159*n41*n42)/n183 + n113*n231*n58*(n109*n41 + n131*n148*n41*n42)/n178 + n114*n240*n58*(n103*n41 + n131*n150*n41*n42)/n187 + n116*n229*n58*(n106*n41 + n131*n157*n41*n42)/n176 + n117*n239*n58*(n131*n153*n41*n42 + n41*n94)/n186 - pow(n164, n20)*n58*n91*(pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n7 - pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n27*n29*pow(n43, n20)*n67 + n122 + n132*n154*n98) + n195*n58*n72*(pow(alpha, -n11*n134 + n2*n25)*n11*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n11*n134 + n2*n25)*pow(n129, n20)*n27*n33*pow(n43, n20)*n67 + n132*n151*n19*n42 + n27*n50*n61) + n196*n237*n58*n80*(n131*n152*n41*n42 + n41*n93) + n199*n235*n58*n81*(n12*n41*n51 + n131*n158*n41*n42) - n205*n254*n58*(n107*n41 + n131*n155*n41*n42) + n208*n238*n58*(n110*n41 + n131*n149*n41*n42) + n312 + n234*n58*n79*xF[3]*(n131*n151*n41*n42 + n41*n92)/n181 - n230*n58*n91*(n131*n154*n41*n42 + n41*n46*n7)/n177;
24254 NP_b = -n206*n227*n58*n89/n90 - n212 - n25*(-n0*n102*pow(n162, n20)*n58*(-pow(alpha, NP0*n2 - n134*n2)*n131*n97 + n82*n97) + n0*xTj*(n101*pow(n167, n20)*n58*(pow(alpha, NP0*n2 - n10*n134)*n10*n132*n19 + pow(alpha, -n10*n134 + n2*n25)*n10*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n10*n134 + n2*n25)*pow(n129, n20)*n27*n32*pow(n43, n20)*n67 + n27*n32*n85) + n101*n20*n267*n58 + n102*pow(n162, n20)*n58*(-pow(alpha, NP0*n2 - n134*n2)*n131*n97 + n82*n97) + n102*n20*n266*n58 + n108*n20*n269*n58 + n114*pow(n174, n20)*n58*(pow(alpha, NP0*n2 - n134*n17)*n132*n17*n2 - pow(alpha, -n134*n17 + n2*n25)*n111*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n17 + n2*n25)*pow(n129, n20)*n17*n2*n27*pow(n43, n20)*n67 + n111*n56) + n116*pow(n163, n20)*n58*(pow(alpha, NP0*n2 - n134*n6)*n132*n2*n6 + pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n6*n67 - pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n27*n28*pow(n43, n20)*n67 + n126) + n117*pow(n173, n20)*n58*(pow(alpha, NP0*n2 - n134*n16)*n132*n16*n2 + pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n16*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n27*n38*pow(n43, n20)*n67 + n124) + n118*pow(n172, n20)*n58*(pow(alpha, NP0*n2 - n134*n15)*n132*n15*n2 + pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*n15*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n99 + n54*n99) + pow(n164, n20)*n58*n91*(pow(alpha, NP0*n2 - n134*n7)*n132*n19*n7 + pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n19*n27*pow(n43, n20)*n67*n7 + pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n27*n29*pow(n43, n20)*n67 + n27*n29*n83) + pow(n165, n20)*n58*n69*xF[12]*(pow(alpha, NP0*n2 - n134*n8)*n132*n19*n8 + pow(alpha, -n134*n8 + n2*n25)*n104*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n8 + n2*n25)*pow(n129, n20)*n19*n27*pow(n43, n20)*n67*n8 + n104*n84) + pow(n169, n20)*n58*n81*xF[4]*(pow(alpha, NP0*n2 - n12*n134)*n12*n132*n2 + pow(alpha, -n12*n134 + n2*n25)*n12*pow(n129, n20)*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n12*n134 + n2*n25)*pow(n129, n20)*n27*n34*pow(n43, n20)*n67 + n125) + pow(n171, n20)*n58*n75*xF[6]*(pow(alpha, NP0*n2 - n134*n14)*n132*n14*n19 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n14*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n27*n36*pow(n43, n20)*n67 + n27*n36*n87) + n195*n58*n79*(pow(alpha, NP0*n2 - n11*n134)*n11*n132*n2 + pow(alpha, -n11*n134 + n2*n25)*n11*pow(n129, n20)*n2*n27*pow(n43, n20)*n67 + pow(alpha, -n11*n134 + n2*n25)*pow(n129, n20)*n27*pow(n43, n20)*n61*n67 + n128) + n196*n20*n250*n58*n75 + n199*n20*n248*n58*n73 + n20*n205*n256*n58 + n20*n270*n58*n91 + n207*n58*(pow(alpha, NP0*n2 - n13*n134)*n13*n132*n2 + pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*n13*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n95 + n52*n95) + n209*n58*(pow(alpha, NP0*n2 - n134*n9)*n132*n2*n9 - pow(alpha, -n134*n9 + n2*n25)*n105*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n9 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n9 + n105*n48) + n213 + n214 + n215 + n216 + n217 + n218 + n219 + n220 + n221 + n222 + n223 + n224 + n225 + n273 + n274 + n275 + n276 + n277 + n278 + n279 + n280 + n281 + n282 + n283 + n284 + n285 + n20*n253*n58*n78*xF[9]/n187 + n20*n252*n58*n77*xF[8]/n186 + n20*n251*n58*n76*xF[7]/n185 + n20*n247*n58*n72*xF[3]/n181 + n20*n244*n58*n69*xF[12]/n178 + n20*n242*n58*n65*xF[10]/n176) - 1.0*n102*n266*n58 + 1.0*pow(n162, n20)*n58*n89*(pow(alpha, NP0*n2 - n134*n2)*n131/n90 + n42/n90)/n90 + n226) - n58*xTj*(n100*n188*n3 - n101*pow(n167, n20)*n233 - n102*n259 + n103*n200 + n113*n258 + n114*n261 + n115*n197 + n116*n262 + n117*n264 + n118*n263 + n119*n189 + n12*n190*n96 + n121/n165 + n191*n3*n92 + n192*n3*n94 + n193*n3*n93 + n195*n234*n79 + n201*n59 + n202*n60 + n203*n63 + n207*n236 + n209*n232 - n260*n91 + n265*n80 + n268*n81 + n89/(n162*n90));
24255 NP_2a = -n58*(-pow(alpha, n2*n25)*n1*n102*pow(n227, -n1)*n97/n175 + pow(alpha, n2*n25)*n1*pow(n162, n20)*n227*n97*xF[0] + n102*pow(n162, n20)*n82*n97*(-1 + (-n21 + xPj*xTj)/(n129*n135*n43)) + 1.0*xTj*(n1*pow(n162, n20)*n19*n3*n89*(pow(alpha, NP0*n2 + n134*n19)*n131/n90 + n42/n90) + n100*pow(n167, n20)*n41*xF[2]*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n3 + n100*n3) + n101*pow(n167, n20)*(pow(alpha, -n10*n134 + n2*n25)*n10*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n10*n134 + n2*n25)*pow(n129, n20)*n27*n32*pow(n43, n20)*n67 + n132*n156*n19*n42 + n27*n32*n85) + n101*n20*n267 + n102*n20*n266 + n102*n271 + n103*pow(n174, n20)*n41*xF[9]*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n3 + n103*n3) + n104*n204 + n105*n202 + n107*pow(n166, n20)*n41*xF[1]*(pow(alpha, NP0*n2 - n134*n9)*n131*n60 + n48*n60) + n108*n20*n269 + n109*pow(n165, n20)*n41*xF[12]*(pow(alpha, NP0*n2 - n134*n8)*n131*n3*n8 + n109*n3) + n110*pow(n172, n20)*n41*xF[7]*(pow(alpha, NP0*n2 - n134*n15)*n131*n63 + n54*n63) + n115*pow(n163, n20)*n41*(pow(alpha, NP0*n2 - n134*n6)*n131*n3*n6 + n106*n3) + n116*pow(n163, n20)*(pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n6*n67 - pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n27*n28*pow(n43, n20)*n67 + n126 + n132*n157*n98) + n117*pow(n173, n20)*(pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n16*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n27*n38*pow(n43, n20)*n67 + n124 + n132*n153*n98) + n118*pow(n172, n20)*(pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*n15*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n99 + n132*n149*n98 + n54*n99) + n119*pow(n164, n20)*n23*(pow(alpha, NP0*n2 - n134*n7)*n131*n3*n7 + n119) + n12*pow(n169, n20)*n41*n51*xF[4]*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n3 + n12*n96) + n122*n189 + n123*n188 + n124*n192 + n125*n190 + n126*n194 + n127*n193 + n128*n191 + n13*pow(n170, n20)*n41*n52*xF[5]*(pow(alpha, NP0*n2 - n13*n134)*n131*n59 + n52*n59) + pow(n164, n20)*n91*(pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n19*n27*pow(n43, n20)*n67*n7 + pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n27*n29*pow(n43, n20)*n67 + n132*n154*n19*n42 + n27*n29*n83) + pow(n165, n20)*n69*xF[12]*(pow(alpha, -n134*n8 + n2*n25)*n104*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n8 + n2*n25)*pow(n129, n20)*n19*n27*pow(n43, n20)*n67*n8 + n104*n84 + n132*n148*n19*n42) + pow(n169, n20)*n81*xF[4]*(pow(alpha, -n12*n134 + n2*n25)*n12*pow(n129, n20)*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n12*n134 + n2*n25)*pow(n129, n20)*n27*n34*pow(n43, n20)*n67 + n125 + n132*n158*n98) + pow(n171, n20)*n41*n93*xF[6]*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n3 + n3*n93) + pow(n171, n20)*n75*xF[6]*(pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n14*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n27*n36*pow(n43, n20)*n67 + n132*n152*n19*n42 + n27*n36*n87) + pow(n173, n20)*n41*n94*xF[8]*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n3 + n3*n94) + pow(n174, n20)*n78*xF[9]*(pow(alpha, -n134*n17 + n2*n25)*n111*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n17 + n2*n25)*pow(n129, n20)*n17*n19*n27*pow(n43, n20)*n67 + n111*n88 + n132*n150*n19*n42) + n195*n41*n92*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n3 + n3*n92) + n195*n79*(pow(alpha, -n11*n134 + n2*n25)*n11*pow(n129, n20)*n2*n27*pow(n43, n20)*n67 + pow(alpha, -n11*n134 + n2*n25)*pow(n129, n20)*n27*pow(n43, n20)*n61*n67 + n128 + n132*n151*n98) + n196*n20*n250*n75 + n199*n20*n248*n73 + n20*n205*n256 + n20*n270*n91 + n201*n95 + n203*n99 + n207*(pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*n13*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n95 + n132*n159*n98 + n52*n95) + n209*(-pow(alpha, -n134*n9 + n2*n25)*n105*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n9 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n9 + n105*n48 + n132*n155*n98) + n210 + n20*n253*n78*xF[9]/n187 + n20*n252*n77*xF[8]/n186 + n20*n251*n76*xF[7]/n185 + n20*n247*n72*xF[3]/n181 + n20*n244*n69*xF[12]/n178 + n20*n242*n65*xF[10]/n176 + n89*n97/n162) - 1.0*n89*n97/n162);
24256 NP_sqrt_base = (NP0*(n24*(n100*n188*n3*n58 - n101*pow(n167, n20)*n58*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n3 + n100*n3) - n102*pow(n162, n20)*n58*(pow(alpha, NP0*n2 - n134*n2)*n131/n90 + n42/n90) + n103*n200*n58 + n113*pow(n165, n20)*n58*(pow(alpha, NP0*n2 - n134*n8)*n131*n3*n8 + n109*n3) + n114*pow(n174, n20)*n58*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n3 + n103*n3) + n115*n197*n58 + n116*pow(n163, n20)*n58*(pow(alpha, NP0*n2 - n134*n6)*n131*n3*n6 + n106*n3) + n117*pow(n173, n20)*n58*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n3 + n3*n94) + n118*pow(n172, n20)*n58*(pow(alpha, NP0*n2 - n134*n15)*n131*n63 + n54*n63) + n119*n189*n58 + n12*n190*n58*n96 + n121*n58/n165 - pow(n164, n20)*n58*n91*(pow(alpha, NP0*n2 - n134*n7)*n131*n3*n7 + n119) + pow(n169, n20)*n58*n81*xF[4]*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n3 + n12*n96) + pow(n171, n20)*n58*n80*xF[6]*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n3 + n3*n93) + n191*n3*n58*n92 + n192*n3*n58*n94 + n193*n3*n58*n93 + n195*n58*n79*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n3 + n3*n92) + n201*n58*n59 + n202*n58*n60 + n203*n58*n63 + n207*n58*(pow(alpha, NP0*n2 - n13*n134)*n131*n59 + n52*n59) + n209*n58*(pow(alpha, NP0*n2 - n134*n9)*n131*n60 + n48*n60) + n211) + n289) + n102*n58/n162 + xTj*(-n101*n58/n167 + n102*n198*n58 - n108*n58/n170 + n113*n58/n165 + n114*n58/n174 + n116*n58/n163 + n117*n58/n173 + n118*n58/n172 + n190*n58*n81 + n191*n58*n79 + n193*n58*n80 - n58*n70*xF[1]/n166 - n58*n91/n164) + pow(NP0, -n1)*(-n0*n102*n290*n58 + n0*n213 + n0*n24*(n101*pow(n167, n20)*n58*(pow(alpha, NP0*n2 - n10*n134)*n10*n132*n19 + pow(alpha, -n10*n134 + n2*n25)*n10*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n10*n134 + n2*n25)*pow(n129, n20)*n27*n32*pow(n43, n20)*n67 + n27*n32*n85) - n101*n58*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n3 + n100*n3)*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n41 + n100*n41)/n180 + n102*pow(n162, n20)*n58*(pow(alpha, NP0*n2 - n134*n2)*n97*(-n21 + xPj*xTj)/(n129*n43) + n82*n97) - n102*n58*(pow(alpha, NP0*n2 - n134*n2)*n131/n90 + n42/n90)*(pow(alpha, NP0*n2 - n134*n2)*n1*n131*n19*n3 + n1*n19*n3*n42)/n175 - n108*n58*(pow(alpha, NP0*n2 - n13*n134)*n131*n59 + n52*n59)*(pow(alpha, NP0*n2 - n13*n134)*n13*n131*n41 + n13*n41*n52)/n183 + n113*n58*(pow(alpha, NP0*n2 - n134*n8)*n131*n3*n8 + n109*n3)*(pow(alpha, NP0*n2 - n134*n8)*n131*n41*n8 + n109*n41)/n178 + n114*pow(n174, n20)*n58*(pow(alpha, NP0*n2 - n134*n17)*n132*n17*n2 - pow(alpha, -n134*n17 + n2*n25)*n111*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n17 + n2*n25)*pow(n129, n20)*n17*n2*n27*pow(n43, n20)*n67 + n111*n56) + n114*n58*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n3 + n103*n3)*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n41 + n103*n41)/n187 + n116*pow(n163, n20)*n58*(pow(alpha, NP0*n2 - n134*n6)*n132*n2*n6 + pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n6*n67 - pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n27*n28*pow(n43, n20)*n67 + n126) + n116*n58*(pow(alpha, NP0*n2 - n134*n6)*n131*n3*n6 + n106*n3)*(pow(alpha, NP0*n2 - n134*n6)*n131*n41*n6 + n106*n41)/n176 + n117*pow(n173, n20)*n58*(pow(alpha, NP0*n2 - n134*n16)*n132*n16*n2 + pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n16*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n27*n38*pow(n43, n20)*n67 + n124) + n117*n58*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n3 + n3*n94)*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n41 + n41*n94)/n186 + n118*pow(n172, n20)*n58*(pow(alpha, NP0*n2 - n134*n15)*n132*n15*n2 + pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*n15*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n99 + n54*n99) - pow(n164, n20)*n58*n91*(pow(alpha, NP0*n2 - n134*n7)*n132*n2*n7 + pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n7 - pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n27*n29*pow(n43, n20)*n67 + n122) + pow(n165, n20)*n58*n69*xF[12]*(pow(alpha, NP0*n2 - n134*n8)*n132*n19*n8 + pow(alpha, -n134*n8 + n2*n25)*n104*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n8 + n2*n25)*pow(n129, n20)*n19*n27*pow(n43, n20)*n67*n8 + n104*n84) + pow(n169, n20)*n58*n81*xF[4]*(pow(alpha, NP0*n2 - n12*n134)*n12*n132*n2 + pow(alpha, -n12*n134 + n2*n25)*n12*pow(n129, n20)*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n12*n134 + n2*n25)*pow(n129, n20)*n27*n34*pow(n43, n20)*n67 + n125) + pow(n171, n20)*n58*n75*xF[6]*(pow(alpha, NP0*n2 - n134*n14)*n132*n14*n19 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n14*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n27*n36*pow(n43, n20)*n67 + n27*n36*n87) + n195*n58*n72*(pow(alpha, NP0*n2 - n11*n134)*n11*n132*n19 + pow(alpha, -n11*n134 + n2*n25)*n11*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n11*n134 + n2*n25)*pow(n129, n20)*n27*n33*pow(n43, n20)*n67 + n27*n50*n61) + n196*n58*n80*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n3 + n3*n93)*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n41 + n41*n93) + n199*n58*n81*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n3 + n12*n96)*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n41 + n12*n41*n51) - n205*n58*xF[1]*(pow(alpha, NP0*n2 - n134*n9)*n131*n60 + n48*n60)*(pow(alpha, NP0*n2 - n134*n9)*n131*n41*n9 + n107*n41) + n207*n58*(pow(alpha, NP0*n2 - n13*n134)*n13*n132*n2 + pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*n13*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n95 + n52*n95) + n208*n58*(pow(alpha, NP0*n2 - n134*n15)*n131*n63 + n54*n63)*(pow(alpha, NP0*n2 - n134*n15)*n131*n15*n41 + n110*n41) + n209*n58*(pow(alpha, NP0*n2 - n134*n9)*n132*n2*n9 - pow(alpha, -n134*n9 + n2*n25)*n105*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n9 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n9 + n105*n48) + n213 + n214 + n215 + n216 + n217 + n218 + n219 + n220 + n221 + n222 + n223 + n224 + n225 + n273 + n274 + n275 + n276 + n277 + n278 + n279 + n280 + n281 + n282 + n283 + n284 + n285 + n58*n79*xF[3]*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n3 + n3*n92)*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n41 + n41*n92)/n181 - n58*n91*(pow(alpha, NP0*n2 - n134*n7)*n131*n3*n7 + n119)*(pow(alpha, NP0*n2 - n134*n7)*n131*n41*n7 + n41*n46*n7)/n177) + n0*n287 - 1.0*n259*n58*n89/n90))*(-n1*n213 - n1*n24*(n101*pow(n167, n20)*n58*(pow(alpha, NP0*n2 - n10*n134)*n10*n132*n19 + pow(alpha, -n10*n134 + n2*n25)*n10*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n10*n134 + n2*n25)*pow(n129, n20)*n27*n32*pow(n43, n20)*n67 + n27*n32*n85) - n101*n58*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n3 + n100*n3)*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n41 + n100*n41)/n180 + n102*pow(n162, n20)*n58*(pow(alpha, NP0*n2 - n134*n2)*n97*(-n21 + xPj*xTj)/(n129*n43) + n82*n97) - n102*n58*(pow(alpha, NP0*n2 - n134*n2)*n131/n90 + n42/n90)*(pow(alpha, NP0*n2 - n134*n2)*n1*n131*n19*n3 + n1*n19*n3*n42)/n175 - n108*n58*(pow(alpha, NP0*n2 - n13*n134)*n131*n59 + n52*n59)*(pow(alpha, NP0*n2 - n13*n134)*n13*n131*n41 + n13*n41*n52)/n183 + n113*n58*(pow(alpha, NP0*n2 - n134*n8)*n131*n3*n8 + n109*n3)*(pow(alpha, NP0*n2 - n134*n8)*n131*n41*n8 + n109*n41)/n178 + n114*pow(n174, n20)*n58*(pow(alpha, NP0*n2 - n134*n17)*n132*n17*n2 - pow(alpha, -n134*n17 + n2*n25)*n111*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n17 + n2*n25)*pow(n129, n20)*n17*n2*n27*pow(n43, n20)*n67 + n111*n56) + n114*n58*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n3 + n103*n3)*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n41 + n103*n41)/n187 + n116*pow(n163, n20)*n58*(pow(alpha, NP0*n2 - n134*n6)*n132*n2*n6 + pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n6*n67 - pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n27*n28*pow(n43, n20)*n67 + n126) + n116*n58*(pow(alpha, NP0*n2 - n134*n6)*n131*n3*n6 + n106*n3)*(pow(alpha, NP0*n2 - n134*n6)*n131*n41*n6 + n106*n41)/n176 + n117*pow(n173, n20)*n58*(pow(alpha, NP0*n2 - n134*n16)*n132*n16*n2 + pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n16*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n27*n38*pow(n43, n20)*n67 + n124) + n117*n58*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n3 + n3*n94)*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n41 + n41*n94)/n186 + n118*pow(n172, n20)*n58*(pow(alpha, NP0*n2 - n134*n15)*n132*n15*n2 + pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*n15*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n99 + n54*n99) - pow(n164, n20)*n58*n91*(pow(alpha, NP0*n2 - n134*n7)*n132*n2*n7 + pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n7 - pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n27*n29*pow(n43, n20)*n67 + n122) + pow(n165, n20)*n58*n69*xF[12]*(pow(alpha, NP0*n2 - n134*n8)*n132*n19*n8 + pow(alpha, -n134*n8 + n2*n25)*n104*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n8 + n2*n25)*pow(n129, n20)*n19*n27*pow(n43, n20)*n67*n8 + n104*n84) + pow(n169, n20)*n58*n81*xF[4]*(pow(alpha, NP0*n2 - n12*n134)*n12*n132*n2 + pow(alpha, -n12*n134 + n2*n25)*n12*pow(n129, n20)*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n12*n134 + n2*n25)*pow(n129, n20)*n27*n34*pow(n43, n20)*n67 + n125) + pow(n171, n20)*n58*n75*xF[6]*(pow(alpha, NP0*n2 - n134*n14)*n132*n14*n19 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n14*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n27*n36*pow(n43, n20)*n67 + n27*n36*n87) + n195*n58*n72*(pow(alpha, NP0*n2 - n11*n134)*n11*n132*n19 + pow(alpha, -n11*n134 + n2*n25)*n11*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n11*n134 + n2*n25)*pow(n129, n20)*n27*n33*pow(n43, n20)*n67 + n27*n50*n61) + n196*n58*n80*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n3 + n3*n93)*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n41 + n41*n93) + n199*n58*n81*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n3 + n12*n96)*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n41 + n12*n41*n51) - n205*n58*xF[1]*(pow(alpha, NP0*n2 - n134*n9)*n131*n60 + n48*n60)*(pow(alpha, NP0*n2 - n134*n9)*n131*n41*n9 + n107*n41) + n207*n58*(pow(alpha, NP0*n2 - n13*n134)*n13*n132*n2 + pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*n13*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n95 + n52*n95) + n208*n58*(pow(alpha, NP0*n2 - n134*n15)*n131*n63 + n54*n63)*(pow(alpha, NP0*n2 - n134*n15)*n131*n15*n41 + n110*n41) + n209*n58*(pow(alpha, NP0*n2 - n134*n9)*n132*n2*n9 - pow(alpha, -n134*n9 + n2*n25)*n105*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n9 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n9 + n105*n48) + n213 + n214 + n215 + n216 + n217 + n218 + n219 + n220 + n221 + n222 + n223 + n224 + n225 + n273 + n274 + n275 + n276 + n277 + n278 + n279 + n280 + n281 + n282 + n283 + n284 + n285 + n58*n79*xF[3]*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n3 + n3*n92)*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n41 + n41*n92)/n181 - n58*n91*(pow(alpha, NP0*n2 - n134*n7)*n131*n3*n7 + n119)*(pow(alpha, NP0*n2 - n134*n7)*n131*n41*n7 + n41*n46*n7)/n177) - n1*n287 - 4.0*n102*n266*n58 + 4.0*n259*n58*n89/n90) + pow(-n102*n259*n58 - n212 - n25*(-n0*n102*pow(n162, n20)*n58*(-pow(alpha, NP0*n2 - n134*n2)*n131*n97 + n82*n97) + n0*n102*n58*(pow(alpha, NP0*n2 - n134*n2)*n131/n90 + n42/n90)*(pow(alpha, NP0*n2 - n134*n2)*n1*n131*n19*n3 + n1*n19*n3*n42)/n175 + n0*xTj*(n101*pow(n167, n20)*n58*(pow(alpha, NP0*n2 - n10*n134)*n10*n132*n19 + pow(alpha, -n10*n134 + n2*n25)*n10*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n10*n134 + n2*n25)*pow(n129, n20)*n27*n32*pow(n43, n20)*n67 + n27*n32*n85) - n101*n58*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n3 + n100*n3)*(pow(alpha, NP0*n2 - n10*n134)*n10*n131*n41 + n100*n41)/n180 + n102*pow(n162, n20)*n58*(-pow(alpha, NP0*n2 - n134*n2)*n131*n97 + n82*n97) - n102*n58*(pow(alpha, NP0*n2 - n134*n2)*n131/n90 + n42/n90)*(pow(alpha, NP0*n2 - n134*n2)*n1*n131*n19*n3 + n1*n19*n3*n42)/n175 - n108*n58*(pow(alpha, NP0*n2 - n13*n134)*n131*n59 + n52*n59)*(pow(alpha, NP0*n2 - n13*n134)*n13*n131*n41 + n13*n41*n52)/n183 + n113*n58*(pow(alpha, NP0*n2 - n134*n8)*n131*n3*n8 + n109*n3)*(pow(alpha, NP0*n2 - n134*n8)*n131*n41*n8 + n109*n41)/n178 + n114*pow(n174, n20)*n58*(pow(alpha, NP0*n2 - n134*n17)*n132*n17*n2 - pow(alpha, -n134*n17 + n2*n25)*n111*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n17 + n2*n25)*pow(n129, n20)*n17*n2*n27*pow(n43, n20)*n67 + n111*n56) + n114*n58*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n3 + n103*n3)*(pow(alpha, NP0*n2 - n134*n17)*n131*n17*n41 + n103*n41)/n187 + n116*pow(n163, n20)*n58*(pow(alpha, NP0*n2 - n134*n6)*n132*n2*n6 + pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n6*n67 - pow(alpha, -n134*n6 + n2*n25)*pow(n129, n20)*n27*n28*pow(n43, n20)*n67 + n126) + n116*n58*(pow(alpha, NP0*n2 - n134*n6)*n131*n3*n6 + n106*n3)*(pow(alpha, NP0*n2 - n134*n6)*n131*n41*n6 + n106*n41)/n176 + n117*pow(n173, n20)*n58*(pow(alpha, NP0*n2 - n134*n16)*n132*n16*n2 + pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n16*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n16 + n2*n25)*pow(n129, n20)*n27*n38*pow(n43, n20)*n67 + n124) + n117*n58*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n3 + n3*n94)*(pow(alpha, NP0*n2 - n134*n16)*n131*n16*n41 + n41*n94)/n186 + n118*pow(n172, n20)*n58*(pow(alpha, NP0*n2 - n134*n15)*n132*n15*n2 + pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*n15*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n134*n15 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n99 + n54*n99) - pow(n164, n20)*n58*n91*(pow(alpha, NP0*n2 - n134*n7)*n132*n2*n7 + pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n7 - pow(alpha, -n134*n7 + n2*n25)*pow(n129, n20)*n27*n29*pow(n43, n20)*n67 + n122) + pow(n165, n20)*n58*n69*xF[12]*(pow(alpha, NP0*n2 - n134*n8)*n132*n19*n8 + pow(alpha, -n134*n8 + n2*n25)*n104*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n8 + n2*n25)*pow(n129, n20)*n19*n27*pow(n43, n20)*n67*n8 + n104*n84) + pow(n169, n20)*n58*n81*xF[4]*(pow(alpha, NP0*n2 - n12*n134)*n12*n132*n2 + pow(alpha, -n12*n134 + n2*n25)*n12*pow(n129, n20)*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n12*n134 + n2*n25)*pow(n129, n20)*n27*n34*pow(n43, n20)*n67 + n125) + pow(n171, n20)*n58*n75*xF[6]*(pow(alpha, NP0*n2 - n134*n14)*n132*n14*n19 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n14*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n134*n14 + n2*n25)*pow(n129, n20)*n27*n36*pow(n43, n20)*n67 + n27*n36*n87) + n195*n58*n72*(pow(alpha, NP0*n2 - n11*n134)*n11*n132*n19 + pow(alpha, -n11*n134 + n2*n25)*n11*pow(n129, n20)*n19*n27*pow(n43, n20)*n67 + pow(alpha, -n11*n134 + n2*n25)*pow(n129, n20)*n27*n33*pow(n43, n20)*n67 + n27*n50*n61) + n196*n58*n80*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n3 + n3*n93)*(pow(alpha, NP0*n2 - n134*n14)*n131*n14*n41 + n41*n93) + n199*n58*n81*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n3 + n12*n96)*(pow(alpha, NP0*n2 - n12*n134)*n12*n131*n41 + n12*n41*n51) - n205*n58*xF[1]*(pow(alpha, NP0*n2 - n134*n9)*n131*n60 + n48*n60)*(pow(alpha, NP0*n2 - n134*n9)*n131*n41*n9 + n107*n41) + n207*n58*(pow(alpha, NP0*n2 - n13*n134)*n13*n132*n2 + pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*n13*n2*n27*pow(n43, n20)*n67 - pow(alpha, -n13*n134 + n2*n25)*pow(n129, n20)*pow(n43, n20)*n67*n95 + n52*n95) + n208*n58*(pow(alpha, NP0*n2 - n134*n15)*n131*n63 + n54*n63)*(pow(alpha, NP0*n2 - n134*n15)*n131*n15*n41 + n110*n41) + n209*n58*(pow(alpha, NP0*n2 - n134*n9)*n132*n2*n9 - pow(alpha, -n134*n9 + n2*n25)*n105*pow(n129, n20)*pow(n43, n20)*n67 + pow(alpha, -n134*n9 + n2*n25)*pow(n129, n20)*n2*n27*pow(n43, n20)*n67*n9 + n105*n48) + n213 + n214 + n215 + n216 + n217 + n218 + n219 + n220 + n221 + n222 + n223 + n224 + n225 + n273 + n274 + n275 + n276 + n277 + n278 + n279 + n280 + n281 + n282 + n283 + n284 + n285 + n58*n79*xF[3]*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n3 + n3*n92)*(pow(alpha, NP0*n2 - n11*n134)*n11*n131*n41 + n41*n92)/n181 - n58*n91*(pow(alpha, NP0*n2 - n134*n7)*n131*n3*n7 + n119)*(pow(alpha, NP0*n2 - n134*n7)*n131*n41*n7 + n41*n46*n7)/n177) + 1.0*pow(n162, n20)*n58*n89*(pow(alpha, NP0*n2 - n134*n2)*n131/n90 + n42/n90)/n90 + n226) - n311, -n1);
24257 NP_sqrt_base = fabs(NP_sqrt_base);
24258 NP1 = (-NP_b - pow(NP_sqrt_base, -n0))/NP_2a;
24259 NT1 = n90*(n130 - log(-pow(alpha, NP1*n2)*n120 + 1));
24260 g0 = MW[1] - Mstar;
24261 g1 = MW[0] - Mstar;
24264 g4 = MW[10] - Mstar;
24265 g5 = MW[11] - Mstar;
24266 g6 = MW[12] - Mstar;
24267 g7 = MW[2] - Mstar;
24268 g8 = MW[3] - Mstar;
24269 g9 = MW[4] - Mstar;
24270 g10 = MW[5] - Mstar;
24271 g11 = MW[6] - Mstar;
24272 g12 = MW[7] - Mstar;
24273 g13 = MW[8] - Mstar;
24274 g14 = MW[9] - Mstar;
24279 g19 = pow(alpha, -g1);
24280 g20 = pow(alpha, -g4);
24281 g21 = pow(alpha, -g5);
24282 g22 = pow(alpha, -g6);
24283 g23 = pow(alpha, -g0);
24284 g24 = pow(alpha, -g7);
24285 g25 = pow(alpha, -g8);
24286 g26 = pow(alpha, -g9);
24287 g27 = pow(alpha, -g10);
24288 g28 = pow(alpha, -g11);
24289 g29 = pow(alpha, -g12);
24290 g30 = pow(alpha, -g13);
24291 g31 = pow(alpha, -g14);
24292 g32 = log(xF[0]/xF[1]);
24294 g34 = pow(alpha, NP1*g0);
24295 g35 = pow(alpha, NP1*g1);
24296 g36 = pow(alpha, NP1*g4);
24298 g38 = pow(alpha, NP1*g5);
24299 g39 = pow(alpha, NP1*g6);
24300 g40 = pow(alpha, NP1*g7);
24301 g41 = pow(alpha, NP1*g8);
24302 g42 = pow(alpha, NP1*g9);
24303 g43 = pow(alpha, NP1*g10);
24304 g44 = pow(alpha, NP1*g11);
24305 g45 = pow(alpha, NP1*g12);
24306 g46 = pow(alpha, NP1*g13);
24307 g47 = pow(alpha, NP1*g14);
24339 g79 = g16/(g3*xF[1]);
24340 g80 = pow(alpha, g0*g33) - 1;
24341 g81 = pow(alpha, g0*g33) - 1;
24342 g82 = pow(alpha, g1*g33) - 1;
24343 g83 = pow(alpha, g33*g7) - 1;
24344 g84 = pow(alpha, g33*g8) - 1;
24345 g85 = pow(alpha, g33*g9) - 1;
24346 g86 = pow(alpha, g10*g33) - 1;
24347 g87 = pow(alpha, g11*g33) - 1;
24348 g88 = pow(alpha, g12*g33) - 1;
24349 g89 = pow(alpha, g13*g33) - 1;
24350 g90 = pow(alpha, g14*g33) - 1;
24351 g91 = pow(alpha, g33*g4) - 1;
24352 g92 = pow(alpha, g33*g5) - 1;
24353 g93 = pow(alpha, g33*g6) - 1;
24354 g94 = -pow(alpha, g1*g33);
24355 g95 = -pow(alpha, g33*g4);
24356 g96 = -pow(alpha, g33*g5);
24357 g97 = -pow(alpha, g33*g6);
24358 g98 = -pow(alpha, g33*g7);
24359 g99 = -pow(alpha, g33*g8);
24360 g100 = -pow(alpha, g33*g9);
24361 g101 = -pow(alpha, g10*g33);
24362 g102 = -pow(alpha, g11*g33);
24363 g103 = -pow(alpha, g12*g33);
24364 g104 = -pow(alpha, g13*g33);
24365 g105 = -pow(alpha, g14*g33);
24373 g113 = -g100 - g42;
24374 g114 = -g101 - g43;
24375 g115 = -g102 - g44;
24376 g116 = -g103 - g45;
24377 g117 = -g104 - g46;
24378 g118 = -g105 - g47;
24379 g119 = pow(alpha, g1*g33) + g65;
24381 g121 = pow(alpha, g33*g4) + g66;
24382 g122 = pow(alpha, g33*g5) + g67;
24383 g123 = pow(alpha, g33*g6) + g68;
24384 g124 = pow(alpha, g33*g7) + g69;
24385 g125 = pow(alpha, g33*g8) + g70;
24386 g126 = pow(alpha, g33*g9) + g71;
24387 g127 = pow(alpha, g10*g33) + g72;
24388 g128 = pow(alpha, g11*g33) + g73;
24389 g129 = pow(alpha, g12*g33) + g74;
24390 g130 = pow(alpha, g13*g33) + g75;
24391 g131 = pow(alpha, g14*g33) + g76;
24392 g132 = xF[11]/g122;
24396 g136 = xF[10]/g121;
24400 g140 = xF[12]/g123;
24410 g150 = xF[11]/g109;
24414 g154 = xF[12]/g110;
24415 g155 = xF[10]/g108;
24444 g184 = log(g120*g17*g79/g52);
24445 g185 = log(g106*g17*g79/g51);
24446 g186 = log(g120*g18*g49/g81);
24448 g188 = log(g106*g18*g49/g80);
24450 g190 = -g132*g187*(g67 + 1) - g132*g189*(pow(alpha, g33*g5) - 1) - g133*g187*(g76 + 1) - g133*g189*(pow(alpha, g14*g33) - 1) - g134*g187*(g75 + 1) - g134*g189*(pow(alpha, g13*g33) - 1) - g135*g187*g52 - g135*g189*g81 - g136*g187*(g66 + 1) - g136*g189*(pow(alpha, g33*g4) - 1) - g137*g187*(g70 + 1) - g137*g189*(pow(alpha, g33*g8) - 1) - g138*g187*(g74 + 1) - g138*g189*(pow(alpha, g12*g33) - 1) - g139*g187*(g71 + 1) - g139*g189*(pow(alpha, g33*g9) - 1) - g140*g187*(g68 + 1) - g140*g189*(pow(alpha, g33*g6) - 1) - g141*g187*(g73 + 1) - g141*g189*(pow(alpha, g11*g33) - 1) - g142*g187*(g72 + 1) - g142*g189*(pow(alpha, g10*g33) - 1) - g143*g187*(g69 + 1) - g143*g189*(pow(alpha, g33*g7) - 1) - g144*g187*(g65 + 1) - g144*g189*(pow(alpha, g1*g33) - 1) - g77*xF[0] - g77*xF[10] - g77*xF[11] - g77*xF[12] - g77*xF[1] - g77*xF[2] - g77*xF[3] - g77*xF[4] - g77*xF[5] - g77*xF[6] - g77*xF[7] - g77*xF[8] - g77*xF[9];
24451 LpF = xF[0]*(g19 + 1.0)*(g162*g185 + g172*g188 + g48)/(g37*(g19 - 1.0)) + xF[10]*(g20 + 1.0)*(g169*g185 + g182*g188 + g48)/(g37*(g20 - 1.0)) + xF[11]*(g21 + 1.0)*(g167*g185 + g173*g188 + g48)/(g37*(g21 - 1.0)) + xF[12]*(g22 + 1.0)*(g164*g185 + g180*g188 + g48)/(g37*(g22 - 1.0)) + xF[1]*(g23 + 1.0)*(g166*g185 + g171*g188 + g48)/(g37*(g23 - 1.0)) + xF[2]*(g24 + 1.0)*(g168*g185 + g174*g188 + g48)/(g37*(g24 - 1.0)) + xF[3]*(g25 + 1.0)*(g165*g185 + g175*g188 + g48)/(g37*(g25 - 1.0)) + xF[4]*(g26 + 1.0)*(g160*g185 + g176*g188 + g48)/(g37*(g26 - 1.0)) + xF[5]*(g27 + 1.0)*(g163*g185 + g183*g188 + g48)/(g37*(g27 - 1.0)) + xF[6]*(g28 + 1.0)*(g158*g185 + g179*g188 + g48)/(g37*(g28 - 1.0)) + xF[7]*(g29 + 1.0)*(g161*g185 + g181*g188 + g48)/(g37*(g29 - 1.0)) + xF[8]*(g30 + 1.0)*(g170*g185 + g177*g188 + g48)/(g37*(g30 - 1.0)) + xF[9]*(g31 + 1.0)*(g159*g185 + g178*g188 + g48)/(g37*(g31 - 1.0));
24456 xP[0] = g146*g50*g82;
24457 xP[1] = g145*g50*g80;
24458 xP[2] = g149*g50*g83;
24459 xP[3] = g151*g50*g84;
24460 xP[4] = g147*g50*g85;
24461 xP[5] = g157*g50*g86;
24462 xP[6] = g152*g50*g87;
24463 xP[7] = g148*g50*g88;
24464 xP[8] = g153*g50*g89;
24465 xP[9] = g156*g50*g90;
24466 xP[10] = g155*g50*g91;
24467 xP[11] = g150*g50*g92;
24468 xP[12] = g154*g50*g93;
24469 xT[0] = g146*g53*g78;
24470 xT[1] = g145*g51*g78;
24471 xT[2] = g149*g54*g78;
24472 xT[3] = g151*g55*g78;
24473 xT[4] = g147*g56*g78;
24474 xT[5] = g157*g57*g78;
24475 xT[6] = g152*g58*g78;
24476 xT[7] = g148*g59*g78;
24477 xT[8] = g153*g60*g78;
24478 xT[9] = g156*g61*g78;
24479 xT[10] = g155*g62*g78;
24480 xT[11] = g150*g63*g78;
24481 xT[12] = g154*g64*g78;
24484 n0 = -0.500000000000000;
24485 n1 = MW[0] - Mstar;
24489 n5 = MW[10] - Mstar;
24490 n6 = MW[11] - Mstar;
24491 n7 = MW[12] - Mstar;
24492 n8 = MW[13] - Mstar;
24493 n9 = MW[1] - Mstar;
24494 n10 = MW[2] - Mstar;
24495 n11 = MW[3] - Mstar;
24496 n12 = MW[4] - Mstar;
24497 n13 = MW[5] - Mstar;
24498 n14 = MW[6] - Mstar;
24499 n15 = MW[7] - Mstar;
24500 n16 = MW[8] - Mstar;
24501 n17 = MW[9] - Mstar;
24511 n27 = pow(n1, -n20);
24512 n28 = pow(n2, -n20);
24513 n29 = pow(n5, -n20);
24514 n30 = pow(n6, -n20);
24515 n31 = pow(n7, -n20);
24516 n32 = pow(n8, -n20);
24517 n33 = pow(n9, -n20);
24518 n34 = pow(n10, -n20);
24519 n35 = pow(n11, -n20);
24520 n36 = pow(n12, -n20);
24521 n37 = pow(n13, -n20);
24522 n38 = pow(n14, -n20);
24523 n39 = pow(n15, -n20);
24524 n40 = pow(n16, -n20);
24525 n41 = pow(n17, -n20);
24528 n44 = pow(alpha, NP0*n1);
24529 n45 = n21 + n23*xF[0];
24530 n46 = n21 + n23*xPj;
24531 n47 = pow(alpha, NP0*n5);
24532 n48 = pow(alpha, NP0*n6);
24533 n49 = pow(alpha, NP0*n7);
24534 n50 = pow(alpha, NP0*n8);
24535 n51 = pow(alpha, NP0*n9);
24536 n52 = pow(alpha, NP0*n10);
24537 n53 = pow(alpha, NP0*n11);
24538 n54 = pow(alpha, NP0*n12);
24539 n55 = pow(alpha, NP0*n13);
24540 n56 = pow(alpha, NP0*n14);
24541 n57 = pow(alpha, NP0*n15);
24542 n58 = pow(alpha, NP0*n16);
24543 n59 = pow(alpha, NP0*n17);
24555 n71 = pow(alpha, n1*n24);
24556 n72 = pow(n45, -n20);
24557 n73 = pow(n46, -n20);
24600 n116 = log((-1.0 + xPj/xF[0])/n3);
24601 n117 = -n75*xF[12];
24604 n120 = -n76*xF[13];
24608 n124 = n28*n71*xF[0];
24609 n125 = n28*n32*n50;
24610 n126 = n28*n40*n58;
24611 n127 = n28*n30*n48;
24612 n128 = n28*n29*n47;
24613 n129 = n28*n35*n53;
24614 n130 = n123*n90 + 1;
24615 n131 = pow(n130, -n20);
24616 n132 = n116 + n18 + n42 + n60;
24618 n134 = n133*n2*n44;
24619 n135 = n28*n71*n73/(n131*n72);
24620 n136 = n97*(n132 - log(n130)) + 1;
24621 n137 = pow(alpha, n1*n136);
24622 n138 = pow(alpha, n136*n5);
24623 n139 = pow(alpha, n136*n6);
24624 n140 = pow(alpha, n136*n7);
24625 n141 = pow(alpha, n136*n8);
24626 n142 = pow(alpha, n136*n9);
24627 n143 = pow(alpha, n10*n136);
24628 n144 = pow(alpha, n11*n136);
24629 n145 = pow(alpha, n12*n136);
24630 n146 = pow(alpha, n13*n136);
24631 n147 = pow(alpha, n136*n14);
24632 n148 = pow(alpha, n136*n15);
24633 n149 = pow(alpha, n136*n16);
24634 n150 = pow(alpha, n136*n17);
24650 n166 = pow(alpha, n136*n19) + n69 - 1;
24651 n167 = n70 - 1 + 1.0/n138;
24652 n168 = n74 - 1 + 1.0/n139;
24653 n169 = n75 - 1 + 1.0/n140;
24654 n170 = n76 - 1 + 1.0/n141;
24655 n171 = n77 - 1 + 1.0/n142;
24656 n172 = n78 - 1 + 1.0/n143;
24657 n173 = n79 - 1 + 1.0/n144;
24658 n174 = n80 - 1 + 1.0/n145;
24659 n175 = n81 - 1 + 1.0/n146;
24660 n176 = n82 - 1 + 1.0/n147;
24661 n177 = n83 - 1 + 1.0/n148;
24662 n178 = n84 - 1 + 1.0/n149;
24663 n179 = n85 - 1 + 1.0/n150;
24664 n180 = pow(n166, -n20);
24665 n181 = pow(n167, -n20);
24666 n182 = pow(n168, -n20);
24667 n183 = pow(n169, -n20);
24668 n184 = pow(n170, -n20);
24669 n185 = pow(n171, -n20);
24670 n186 = pow(n172, -n20);
24671 n187 = pow(n173, -n20);
24672 n188 = pow(n174, -n20);
24673 n189 = pow(n175, -n20);
24674 n190 = pow(n176, -n20);
24675 n191 = pow(n177, -n20);
24676 n192 = pow(n178, -n20);
24677 n193 = pow(n179, -n20);
24678 n194 = pow(n166, 3);
24679 n195 = pow(n167, 3);
24680 n196 = pow(n168, 3);
24681 n197 = pow(n169, 3);
24682 n198 = pow(n170, 3);
24683 n199 = pow(n171, 3);
24684 n200 = pow(n172, 3);
24685 n201 = pow(n173, 3);
24686 n202 = pow(n174, 3);
24687 n203 = pow(n175, 3);
24688 n204 = pow(n176, 3);
24689 n205 = pow(n177, 3);
24690 n206 = pow(n178, 3);
24691 n207 = pow(n179, 3);
24692 n208 = xF[11]/n168;
24693 n209 = xF[12]/n169;
24695 n211 = xF[10]/n167;
24696 n212 = xF[13]/n170;
24702 n218 = xF[10]/n181;
24703 n219 = n2*xF[4]/n174;
24706 n222 = n2*xF[6]/n176;
24707 n223 = n55*xF[5]/n175;
24708 n224 = n51*xF[1]/n171;
24709 n225 = n57*xF[7]/n177;
24710 n226 = n52*xF[2]/n172;
24714 n230 = n80*xF[4]/n188;
24715 n231 = n80*xF[4]/n202;
24717 n233 = -n83*xF[7]/n205;
24718 n234 = -n77*xF[1]/n185;
24719 n235 = -n83*xF[7]/n191;
24720 n236 = -n84*xF[8]/n192;
24721 n237 = n213*n28*n41*n59;
24722 n238 = n28*n36*n54*xF[4]/n174;
24723 n239 = n28*n38*n56*xF[6]/n176;
24724 n240 = n19*n2*n210*n44*n61;
24725 n241 = n118*n210*n27*n61;
24726 n242 = n128*n211*n61;
24727 n243 = n127*n208*n61;
24728 n244 = n111*n209*n49*n61;
24729 n245 = n125*n212*n61;
24730 n246 = n113*n224*n61;
24731 n247 = n110*n226*n61;
24732 n248 = n129*n215*n61;
24734 n250 = n102*n223*n61;
24736 n252 = n106*n225*n61;
24737 n253 = n126*n214*n61;
24739 n255 = n118*n210*n61*n64;
24740 n256 = n133/n137 + 1;
24741 n257 = n100*n133*n2/n137 + n100*n2;
24742 n258 = n104*n2 + n134*n163;
24743 n259 = n121 + n134*n159;
24744 n260 = n122 + n134*n151;
24745 n261 = n107*n2 + n134*n155;
24746 n262 = n133*n44*n63/n142 + n51*n63;
24747 n263 = n133*n44*n65/n143 + n52*n65;
24748 n264 = n134*n156 + n2*n99;
24749 n265 = n103*n2 + n134*n152;
24750 n266 = n133*n165*n62 + n55*n62;
24751 n267 = n134*n157 + n2*n98;
24752 n268 = n133*n44*n68/n148 + n57*n68;
24753 n269 = n101*n2 + n134*n158;
24754 n270 = n109*n2 + n134*n154;
24755 n271 = pow(n257, -n20);
24756 n272 = pow(n258, -n20);
24757 n273 = pow(n259, -n20);
24758 n274 = pow(n260, -n20);
24759 n275 = pow(n261, -n20);
24760 n276 = pow(n262, -n20);
24761 n277 = pow(n263, -n20);
24762 n278 = pow(n264, -n20);
24763 n279 = pow(n265, -n20);
24764 n280 = pow(n266, -n20);
24765 n281 = pow(n267, -n20);
24766 n282 = pow(n268, -n20);
24767 n283 = pow(n269, -n20);
24768 n284 = pow(n270, -n20);
24770 n286 = n259*xF[11];
24773 n289 = n100*n133*n43/n137 + n100*n43;
24776 n292 = n118*n133*n66/n137 + n118*n66;
24781 n297 = n267*xF[6]/n190;
24784 n300 = n283*n84*xF[8]/n206;
24785 n301 = n273*n74*xF[11]/n196;
24786 n302 = n228*n285*n61;
24787 n303 = n100*n43*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n2 + n100*n2)/n180;
24788 n304 = n104*n218*n43*n61*(pow(alpha, NP0*n1 - n136*n5)*n133*n2*n5 + n104*n2);
24789 n305 = n43*n48*n6*n61*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n133*n2*n6 + n121)/n182;
24790 n306 = n122*n26*n61*(pow(alpha, NP0*n1 - n136*n7)*n133*n2*n7 + n122)/n183;
24791 n307 = n107*n43*n61*xF[13]*(pow(alpha, NP0*n1 - n136*n8)*n133*n2*n8 + n107*n2)/n184;
24792 n308 = n114*n43*n61*xF[1]*(pow(alpha, NP0*n1 - n136*n9)*n133*n63 + n51*n63)/n185;
24793 n309 = n10*n43*n52*n61*xF[2]*(pow(alpha, NP0*n1 - n10*n136)*n133*n65 + n52*n65)/n186;
24794 n310 = n216*n43*n61*n99*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n2 + n2*n99);
24795 n311 = n103*n43*n61*xF[4]*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n2 + n103*n2)/n188;
24796 n312 = n13*n43*n55*n61*xF[5]*(pow(alpha, NP0*n1 - n13*n136)*n133*n62 + n55*n62)/n189;
24797 n313 = n43*n61*n98*xF[6]*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n2 + n2*n98)/n190;
24798 n314 = n115*n43*n61*xF[7]*(pow(alpha, NP0*n1 - n136*n15)*n133*n68 + n57*n68)/n191;
24799 n315 = n101*n43*n61*xF[8]*(pow(alpha, NP0*n1 - n136*n16)*n133*n16*n2 + n101*n2)/n192;
24800 n316 = n109*n43*n61*xF[9]*(pow(alpha, NP0*n1 - n136*n17)*n133*n17*n2 + n109*n2)/n193;
24801 n317 = 1.0*n100*n221*n285*n61;
24802 n318 = n228*n293*n61;
24804 n320 = n1*n135*n159 + n100*n133*n159*n28 + n127 - n135*n30/n139;
24805 n321 = n111*n91 + n111*n71*n73/(n131*n140*n72) + n118*n133*n151*n19 + n135*n151*n19;
24806 n322 = n118*n133*n155*n19 + n135*n155*n19 + n135*n32/n141 + n28*n32*n92;
24807 n323 = n110*n93 + n110*n71*n73/(n131*n143*n72) + n118*n133*n161*n19 + n135*n161*n19;
24808 n324 = n118*n133*n157*n19 + n135*n157*n19 + n135*n38/n147 + n28*n38*n96;
24809 n325 = n1*n135*n154 + n100*n133*n154*n28 - n135*n41/n150 + n28*n41*n59;
24810 n326 = n61*n75*xF[12]*(pow(alpha, n1*n24 - n136*n7)*n111*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n7)*n19*n28*n7*n73/(n131*n72) + n111*n91 + n118*n133*n151*n19)/n183;
24811 n327 = n61*n76*xF[13]*(pow(alpha, n1*n24 - n136*n8)*n19*n28*n73*n8/(n131*n72) + pow(alpha, n1*n24 - n136*n8)*n28*n32*n73/(n131*n72) + n118*n133*n155*n19 + n28*n32*n92)/n184;
24812 n328 = n108*n61*(pow(alpha, n1*n24 - n10*n136)*n10*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n10*n136)*n110*n73/(n131*n72) + n110*n93 + n118*n133*n161*n19)/n186;
24813 n329 = n230*n61*(pow(alpha, n1*n24 - n12*n136)*n12*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n12*n136)*n28*n36*n73/(n131*n72) + n118*n133*n152*n19 + n28*n36*n94);
24814 n330 = n105*n61*(pow(alpha, n1*n24 - n136*n14)*n14*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n14)*n28*n38*n73/(n131*n72) + n118*n133*n157*n19 + n28*n38*n96)/n190;
24815 n331 = n218*n61*n88*(pow(alpha, n1*n24 - n136*n5)*n1*n28*n5*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n5)*n28*n29*n73/(n131*n72) + n100*n133*n163*n28 + n128);
24816 n332 = n61*n89*xF[11]*(pow(alpha, n1*n24 - n136*n6)*n1*n28*n6*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n6)*n28*n30*n73/(n131*n72) + n100*n133*n159*n28 + n127)/n182;
24817 n333 = n234*n61*(pow(alpha, n1*n24 - n136*n9)*n1*n28*n73*n9/(n131*n72) - pow(alpha, n1*n24 - n136*n9)*n113*n73/(n131*n72) + n100*n133*n160*n28 + n113*n51);
24818 n334 = n232*n61*(pow(alpha, n1*n24 - n13*n136)*n1*n13*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n13*n136)*n102*n73/(n131*n72) + n100*n133*n164*n28 + n102*n55);
24819 n335 = n235*n61*(pow(alpha, n1*n24 - n136*n15)*n1*n15*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n15)*n106*n73/(n131*n72) + n100*n133*n153*n28 + n106*n57);
24820 n336 = n236*n61*(pow(alpha, n1*n24 - n136*n16)*n1*n16*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n16)*n28*n40*n73/(n131*n72) + n100*n133*n158*n28 + n126);
24821 n337 = n119*n61*(pow(alpha, n1*n24 - n136*n17)*n1*n17*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n17)*n28*n41*n73/(n131*n72) + n100*n133*n154*n28 + n28*n41*n59)/n193;
24822 n338 = xTj*(n100*n2*n210*n61 + n101*n2*n214*n61 + n103*n219*n61 + n104*n2*n211*n61 + n107*n2*n212*n61 - n108*n263*n61/n186 + n109*n2*n213*n61 + n117*n294*n61 + n119*n295*n61 + n120*n296*n61 + n121*n208*n61 + n122*n209*n61 + n216*n264*n61*n86 + n218*n258*n61*n88 + n220*n61*n99 + n222*n61*n98 + n223*n61*n62 + n224*n61*n63 + n225*n61*n68 + n226*n61*n65 - n230*n265*n61 + n232*n266*n61 + n234*n262*n61 + n235*n268*n61 + n236*n269*n61 + n297*n61*n87 - n302 + n286*n61*n89/n182);
24823 n339 = n240 + n302 + n338;
24824 n340 = n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n318 + n326 + n327 + n328 + n329 + n330 + n331 + n332 + n333 + n334 + n335 + n336 + n337;
24825 n341 = -n108*n263*n61*(n10*n43*n52 + n133*n161*n43*n44)/n200 - n112*n266*n61*(n13*n43*n55 + n133*n164*n43*n44)/n203 + n117*n260*n61*(n133*n151*n43*n44 + n43*n49*n7)/n197 + n119*n270*n61*(n109*n43 + n133*n154*n43*n44)/n207 + n120*n261*n61*(n107*n43 + n133*n155*n43*n44)/n198 + n216*n61*n86*(pow(alpha, n1*n24 - n11*n136)*n1*n11*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n11*n136)*n28*n67*n73/(n131*n72) + n100*n133*n156*n28 + n129) + n217*n267*n61*n87*(n133*n157*n43*n44 + n43*n98) - n227*n285*n289*n61 - n229*n287*n61*(n114*n43 + n133*n160*n43*n44) - n231*n265*n61*(n103*n43 + n133*n152*n43*n44) + n233*n268*n61*(n115*n43 + n133*n153*n43*n44) + n340 - n288*n61*n84*(n101*n43 + n133*n158*n43*n44)/n206 + n264*n61*n86*xF[3]*(n133*n156*n43*n44 + n43*n99)/n201 + n286*n61*n89*(n133*n159*n43*n44 + n43*n48*n6)/n196 + n258*n61*n88*xF[10]*(n104*n43 + n133*n163*n43*n44)/n195;
24826 NP_b = -n100*n221*n256*n61*n69*xF[0] - n24*(-n0*n228*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n133*n28*n66 + n118*n66) + n0*xTj*(n105*n20*n281*n61/n204 + n105*n61*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n19*n28 + pow(alpha, n1*n24 - n136*n14)*n14*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n14)*n28*n38*n73/(n131*n72) + n28*n38*n96)/n190 + n108*n20*n298*n61 + n108*n61*(pow(alpha, NP0*n1 - n10*n136)*n10*n133*n19*n28 + pow(alpha, n1*n24 - n10*n136)*n10*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n10*n136)*n110*n73/(n131*n72) + n110*n93)/n186 + n112*n20*n299*n61 + n119*n61*(pow(alpha, NP0*n1 - n136*n17)*n1*n133*n17*n28 + pow(alpha, n1*n24 - n136*n17)*n1*n17*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n17)*n28*n41*n73/(n131*n72) + n28*n41*n59)/n193 + n20*n227*n290*n61 + n20*n229*n291*n61 + n20*n231*n279*n61 + n20*n300*n61 + n20*n301*n61 + n20*n284*n61*n85*xF[9]/n207 + n20*n282*n61*n83*xF[7]/n205 + n20*n278*n61*n79*xF[3]/n201 + n216*n61*n79*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n19*n28 + pow(alpha, n1*n24 - n11*n136)*n11*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n11*n136)*n28*n35*n73/(n131*n72) + n28*n53*n67) + n218*n61*n88*(pow(alpha, NP0*n1 - n136*n5)*n1*n133*n28*n5 + pow(alpha, n1*n24 - n136*n5)*n1*n28*n5*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n5)*n28*n29*n73/(n131*n72) + n128) + n228*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n133*n28*n66 + n118*n66) + n230*n61*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n19*n28 + pow(alpha, n1*n24 - n12*n136)*n12*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n12*n136)*n28*n36*n73/(n131*n72) + n28*n36*n94) + n232*n61*(pow(alpha, NP0*n1 - n13*n136)*n1*n13*n133*n28 + pow(alpha, n1*n24 - n13*n136)*n1*n13*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n13*n136)*n102*n73/(n131*n72) + n102*n55) + n234*n61*(pow(alpha, NP0*n1 - n136*n9)*n1*n133*n28*n9 + pow(alpha, n1*n24 - n136*n9)*n1*n28*n73*n9/(n131*n72) - pow(alpha, n1*n24 - n136*n9)*n113*n73/(n131*n72) + n113*n51) + n235*n61*(pow(alpha, NP0*n1 - n136*n15)*n1*n133*n15*n28 + pow(alpha, n1*n24 - n136*n15)*n1*n15*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n15)*n106*n73/(n131*n72) + n106*n57) + n236*n61*(pow(alpha, NP0*n1 - n136*n16)*n1*n133*n16*n28 + pow(alpha, n1*n24 - n136*n16)*n1*n16*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n16)*n28*n40*n73/(n131*n72) + n126) + n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n20*n275*n61*n76*xF[13]/n198 + n20*n274*n61*n75*xF[12]/n197 + n20*n272*n61*n70*xF[10]/n195 + n61*n76*xF[13]*(pow(alpha, NP0*n1 - n136*n8)*n133*n19*n28*n8 + pow(alpha, n1*n24 - n136*n8)*n19*n28*n73*n8/(n131*n72) + pow(alpha, n1*n24 - n136*n8)*n28*n32*n73/(n131*n72) + n28*n32*n92)/n184 + n61*n75*xF[12]*(pow(alpha, NP0*n1 - n136*n7)*n133*n19*n28*n7 + pow(alpha, n1*n24 - n136*n7)*n111*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n7)*n19*n28*n7*n73/(n131*n72) + n111*n91)/n183 + n61*n89*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n1*n133*n28*n6 + pow(alpha, n1*n24 - n136*n6)*n1*n28*n6*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n6)*n28*n30*n73/(n131*n72) + n127)/n182) + 1.0*n100*n221*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n2 + n100*n2) - 1.0*n227*n290*n61 + n255) - n240 - n61*xTj*(n100*n2*n210 + n101*n2*n214 + n103*n219 + n104*n2*n211 + n107*n2*n212 - n108*n263/n186 + n109*n2*n213 + n117*n294 + n119*n295 + n120*n296 + n121*n208 + n122*n209 + n216*n264*n86 + n218*n258*n88 + n220*n99 + n222*n98 + n223*n62 + n224*n63 + n225*n68 + n226*n65 - n228*n285 - n230*n265 + n232*n266 + n234*n262 + n235*n268 + n236*n269 + n297*n87 + n286*n89/n182);
24827 NP_2a = -n61*(-1.0*n118*n210*n27 + n118*n228*n66*xF[0]*(-1 + (-n21 + xPj*xTj)/(n130*n137*n45)) - n124*n20*n227*pow(n256, -n20)*n27 - 2.0*n124*n256*n27/n180 + 1.0*xTj*(n10*n43*n52*xF[2]*(pow(alpha, NP0*n1 - n10*n136)*n133*n65 + n52*n65)/n186 + n100*n43*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n2 + n100*n2)/n180 + n101*n43*xF[8]*(pow(alpha, NP0*n1 - n136*n16)*n133*n16*n2 + n101*n2)/n192 + n102*n223 + n103*n43*xF[4]*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n2 + n103*n2)/n188 + n104*n218*n43*(pow(alpha, NP0*n1 - n136*n5)*n133*n2*n5 + n104*n2) + n105*n20*n281/n204 + n105*(pow(alpha, n1*n24 - n136*n14)*n14*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n14)*n28*n38*n73/(n131*n72) + n118*n133*n157*n19 + n28*n38*n96)/n190 + n106*n225 + n107*n43*xF[13]*(pow(alpha, NP0*n1 - n136*n8)*n133*n2*n8 + n107*n2)/n184 + n108*n20*n298 + n108*(pow(alpha, n1*n24 - n10*n136)*n10*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n10*n136)*n110*n73/(n131*n72) + n110*n93 + n118*n133*n161*n19)/n186 + n109*n43*xF[9]*(pow(alpha, NP0*n1 - n136*n17)*n133*n17*n2 + n109*n2)/n193 + n110*n226 + n111*n209*n49 + n112*n20*n299 + n113*n224 + n114*n43*xF[1]*(pow(alpha, NP0*n1 - n136*n9)*n133*n63 + n51*n63)/n185 + n115*n43*xF[7]*(pow(alpha, NP0*n1 - n136*n15)*n133*n68 + n57*n68)/n191 + n118*n210*n27 + n119*(pow(alpha, n1*n24 - n136*n17)*n1*n17*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n17)*n28*n41*n73/(n131*n72) + n100*n133*n154*n28 + n28*n41*n59)/n193 + n122*n26*(pow(alpha, NP0*n1 - n136*n7)*n133*n2*n7 + n122)/n183 + n125*n212 + n126*n214 + n127*n208 + n128*n211 + n129*n215 + n13*n43*n55*xF[5]*(pow(alpha, NP0*n1 - n13*n136)*n133*n62 + n55*n62)/n189 + n20*n227*n290 + n20*n229*n291 + n20*n231*n279 + n20*n300 + n20*n301 + n20*n284*n85*xF[9]/n207 + n20*n282*n83*xF[7]/n205 + n20*n278*n79*xF[3]/n201 + n216*n43*n99*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n2 + n2*n99) + n216*n86*(pow(alpha, n1*n24 - n11*n136)*n1*n11*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n11*n136)*n28*n67*n73/(n131*n72) + n100*n133*n156*n28 + n129) + n218*n88*(pow(alpha, n1*n24 - n136*n5)*n1*n28*n5*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n5)*n28*n29*n73/(n131*n72) + n100*n133*n163*n28 + n128) + n228*n293 + n230*(pow(alpha, n1*n24 - n12*n136)*n12*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n12*n136)*n28*n36*n73/(n131*n72) + n118*n133*n152*n19 + n28*n36*n94) + n232*(pow(alpha, n1*n24 - n13*n136)*n1*n13*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n13*n136)*n102*n73/(n131*n72) + n100*n133*n164*n28 + n102*n55) + n234*(pow(alpha, n1*n24 - n136*n9)*n1*n28*n73*n9/(n131*n72) - pow(alpha, n1*n24 - n136*n9)*n113*n73/(n131*n72) + n100*n133*n160*n28 + n113*n51) + n235*(pow(alpha, n1*n24 - n136*n15)*n1*n15*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n15)*n106*n73/(n131*n72) + n100*n133*n153*n28 + n106*n57) + n236*(pow(alpha, n1*n24 - n136*n16)*n1*n16*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n16)*n28*n40*n73/(n131*n72) + n100*n133*n158*n28 + n126) + n237 + n238 + n239 + n20*n275*n76*xF[13]/n198 + n20*n274*n75*xF[12]/n197 + n20*n272*n70*xF[10]/n195 + n43*n98*xF[6]*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n2 + n2*n98)/n190 + n76*xF[13]*(pow(alpha, n1*n24 - n136*n8)*n19*n28*n73*n8/(n131*n72) + pow(alpha, n1*n24 - n136*n8)*n28*n32*n73/(n131*n72) + n118*n133*n155*n19 + n28*n32*n92)/n184 + n75*xF[12]*(pow(alpha, n1*n24 - n136*n7)*n111*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n7)*n19*n28*n7*n73/(n131*n72) + n111*n91 + n118*n133*n151*n19)/n183 + n43*n48*n6*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n133*n2*n6 + n121)/n182 + n89*xF[11]*(pow(alpha, n1*n24 - n136*n6)*n1*n28*n6*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n6)*n28*n30*n73/(n131*n72) + n100*n133*n159*n28 + n127)/n182));
24828 NP_sqrt_base = (-NP0*n339 - n23*(-n105*n61/(n82 - 1 + pow(alpha, -n14*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n108*n61/(n78 - 1 + pow(alpha, -n10*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n112*n61/(n81 - 1 + pow(alpha, -n13*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n69*xF[0]/(pow(alpha, n19*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1)) + n69 - 1) - n61*n70*xF[10]/(n70 - 1 + pow(alpha, -n5*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n74*xF[11]/(n74 - 1 + pow(alpha, -n6*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n75*xF[12]/(n75 - 1 + pow(alpha, -n7*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n76*xF[13]/(n76 - 1 + pow(alpha, -n8*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n77*xF[1]/(n77 - 1 + pow(alpha, -n9*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n79*xF[3]/(n79 - 1 + pow(alpha, -n11*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n80*xF[4]/(n80 - 1 + pow(alpha, -n12*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n83*xF[7]/(n83 - 1 + pow(alpha, -n15*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n84*xF[8]/(n84 - 1 + pow(alpha, -n16*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1))) - n61*n85*xF[9]/(n85 - 1 + pow(alpha, -n17*(n97*(n132 - log(n90*(n21 + n25*xTj)/(n21 - xF[0]*xTj) + 1)) + 1)))) + n61*n69*xF[0]/(-n162 + n69 - 1) - pow(NP0, -n20)*(n0*n227*n285*n289*n61 - n0*n23*(n105*n61*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n19*n28 + pow(alpha, n1*n24 - n136*n14)*n14*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n14)*n28*n38*n73/(n131*n72) + n28*n38*n96)/n190 - n108*n61*(pow(alpha, NP0*n1 - n10*n136)*n133*n65 + n52*n65)*(pow(alpha, NP0*n1 - n10*n136)*n10*n133*n43 + n10*n43*n52)/n200 + n108*n61*(pow(alpha, NP0*n1 - n10*n136)*n10*n133*n19*n28 + pow(alpha, n1*n24 - n10*n136)*n10*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n10*n136)*n110*n73/(n131*n72) + n110*n93)/n186 - n112*n61*(pow(alpha, NP0*n1 - n13*n136)*n133*n62 + n55*n62)*(pow(alpha, NP0*n1 - n13*n136)*n13*n133*n43 + n13*n43*n55)/n203 + n117*n61*(pow(alpha, NP0*n1 - n136*n7)*n133*n2*n7 + n122)*(pow(alpha, NP0*n1 - n136*n7)*n133*n43*n7 + n43*n49*n7)/n197 + n119*n61*(pow(alpha, NP0*n1 - n136*n17)*n133*n17*n2 + n109*n2)*(pow(alpha, NP0*n1 - n136*n17)*n133*n17*n43 + n109*n43)/n207 + n119*n61*(pow(alpha, NP0*n1 - n136*n17)*n1*n133*n17*n28 + pow(alpha, n1*n24 - n136*n17)*n1*n17*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n17)*n28*n41*n73/(n131*n72) + n28*n41*n59)/n193 + n120*n61*(pow(alpha, NP0*n1 - n136*n8)*n133*n2*n8 + n107*n2)*(pow(alpha, NP0*n1 - n136*n8)*n133*n43*n8 + n107*n43)/n198 + n216*n61*n86*(pow(alpha, NP0*n1 - n11*n136)*n1*n11*n133*n28 + pow(alpha, n1*n24 - n11*n136)*n1*n11*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n11*n136)*n28*n67*n73/(n131*n72) + n129) + n217*n61*n87*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n2 + n2*n98)*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n43 + n43*n98) + n218*n61*n88*(pow(alpha, NP0*n1 - n136*n5)*n1*n133*n28*n5 + pow(alpha, n1*n24 - n136*n5)*n1*n28*n5*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n5)*n28*n29*n73/(n131*n72) + n128) - n227*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n2 + n100*n2)*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n43 + n100*n43) + n228*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n133*n28*n66 + n118*n66) - n229*n61*xF[1]*(pow(alpha, NP0*n1 - n136*n9)*n133*n63 + n51*n63)*(pow(alpha, NP0*n1 - n136*n9)*n133*n43*n9 + n114*n43) + n230*n61*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n19*n28 + pow(alpha, n1*n24 - n12*n136)*n12*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n12*n136)*n28*n36*n73/(n131*n72) + n28*n36*n94) - n231*n61*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n2 + n103*n2)*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n43 + n103*n43) + n232*n61*(pow(alpha, NP0*n1 - n13*n136)*n1*n13*n133*n28 + pow(alpha, n1*n24 - n13*n136)*n1*n13*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n13*n136)*n102*n73/(n131*n72) + n102*n55) + n233*n61*(pow(alpha, NP0*n1 - n136*n15)*n133*n68 + n57*n68)*(pow(alpha, NP0*n1 - n136*n15)*n133*n15*n43 + n115*n43) + n234*n61*(pow(alpha, NP0*n1 - n136*n9)*n1*n133*n28*n9 + pow(alpha, n1*n24 - n136*n9)*n1*n28*n73*n9/(n131*n72) - pow(alpha, n1*n24 - n136*n9)*n113*n73/(n131*n72) + n113*n51) + n235*n61*(pow(alpha, NP0*n1 - n136*n15)*n1*n133*n15*n28 + pow(alpha, n1*n24 - n136*n15)*n1*n15*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n15)*n106*n73/(n131*n72) + n106*n57) + n236*n61*(pow(alpha, NP0*n1 - n136*n16)*n1*n133*n16*n28 + pow(alpha, n1*n24 - n136*n16)*n1*n16*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n16)*n28*n40*n73/(n131*n72) + n126) + n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 - n61*n84*xF[8]*(pow(alpha, NP0*n1 - n136*n16)*n133*n16*n2 + n101*n2)*(pow(alpha, NP0*n1 - n136*n16)*n133*n16*n43 + n101*n43)/n206 + n61*n86*xF[3]*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n2 + n2*n99)*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n43 + n43*n99)/n201 + n61*n89*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n133*n2*n6 + n121)*(pow(alpha, NP0*n1 - n136*n6)*n133*n43*n6 + n43*n48*n6)/n196 + n61*n88*xF[10]*(pow(alpha, NP0*n1 - n136*n5)*n133*n2*n5 + n104*n2)*(pow(alpha, NP0*n1 - n136*n5)*n133*n43*n5 + n104*n43)/n195 + n61*n76*xF[13]*(pow(alpha, NP0*n1 - n136*n8)*n133*n19*n28*n8 + pow(alpha, n1*n24 - n136*n8)*n19*n28*n73*n8/(n131*n72) + pow(alpha, n1*n24 - n136*n8)*n28*n32*n73/(n131*n72) + n28*n32*n92)/n184 + n61*n75*xF[12]*(pow(alpha, NP0*n1 - n136*n7)*n133*n19*n28*n7 + pow(alpha, n1*n24 - n136*n7)*n111*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n7)*n19*n28*n7*n73/(n131*n72) + n111*n91)/n183 + n61*n89*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n1*n133*n28*n6 + pow(alpha, n1*n24 - n136*n6)*n1*n28*n6*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n6)*n28*n30*n73/(n131*n72) + n127)/n182) - n0*n241 - n0*n318 + 1.0*n100*n221*n285*n61))*(4.0*n100*n221*n285*n61 - n20*n23*(n105*n61*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n19*n28 + pow(alpha, n1*n24 - n136*n14)*n14*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n14)*n28*n38*n73/(n131*n72) + n28*n38*n96)/n190 - n108*n61*(pow(alpha, NP0*n1 - n10*n136)*n133*n65 + n52*n65)*(pow(alpha, NP0*n1 - n10*n136)*n10*n133*n43 + n10*n43*n52)/n200 + n108*n61*(pow(alpha, NP0*n1 - n10*n136)*n10*n133*n19*n28 + pow(alpha, n1*n24 - n10*n136)*n10*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n10*n136)*n110*n73/(n131*n72) + n110*n93)/n186 - n112*n61*(pow(alpha, NP0*n1 - n13*n136)*n133*n62 + n55*n62)*(pow(alpha, NP0*n1 - n13*n136)*n13*n133*n43 + n13*n43*n55)/n203 + n117*n61*(pow(alpha, NP0*n1 - n136*n7)*n133*n2*n7 + n122)*(pow(alpha, NP0*n1 - n136*n7)*n133*n43*n7 + n43*n49*n7)/n197 + n119*n61*(pow(alpha, NP0*n1 - n136*n17)*n133*n17*n2 + n109*n2)*(pow(alpha, NP0*n1 - n136*n17)*n133*n17*n43 + n109*n43)/n207 + n119*n61*(pow(alpha, NP0*n1 - n136*n17)*n1*n133*n17*n28 + pow(alpha, n1*n24 - n136*n17)*n1*n17*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n17)*n28*n41*n73/(n131*n72) + n28*n41*n59)/n193 + n120*n61*(pow(alpha, NP0*n1 - n136*n8)*n133*n2*n8 + n107*n2)*(pow(alpha, NP0*n1 - n136*n8)*n133*n43*n8 + n107*n43)/n198 + n216*n61*n86*(pow(alpha, NP0*n1 - n11*n136)*n1*n11*n133*n28 + pow(alpha, n1*n24 - n11*n136)*n1*n11*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n11*n136)*n28*n67*n73/(n131*n72) + n129) + n217*n61*n87*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n2 + n2*n98)*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n43 + n43*n98) + n218*n61*n88*(pow(alpha, NP0*n1 - n136*n5)*n1*n133*n28*n5 + pow(alpha, n1*n24 - n136*n5)*n1*n28*n5*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n5)*n28*n29*n73/(n131*n72) + n128) - n227*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n2 + n100*n2)*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n43 + n100*n43) + n228*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n133*n28*n66 + n118*n66) - n229*n61*xF[1]*(pow(alpha, NP0*n1 - n136*n9)*n133*n63 + n51*n63)*(pow(alpha, NP0*n1 - n136*n9)*n133*n43*n9 + n114*n43) + n230*n61*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n19*n28 + pow(alpha, n1*n24 - n12*n136)*n12*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n12*n136)*n28*n36*n73/(n131*n72) + n28*n36*n94) - n231*n61*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n2 + n103*n2)*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n43 + n103*n43) + n232*n61*(pow(alpha, NP0*n1 - n13*n136)*n1*n13*n133*n28 + pow(alpha, n1*n24 - n13*n136)*n1*n13*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n13*n136)*n102*n73/(n131*n72) + n102*n55) + n233*n61*(pow(alpha, NP0*n1 - n136*n15)*n133*n68 + n57*n68)*(pow(alpha, NP0*n1 - n136*n15)*n133*n15*n43 + n115*n43) + n234*n61*(pow(alpha, NP0*n1 - n136*n9)*n1*n133*n28*n9 + pow(alpha, n1*n24 - n136*n9)*n1*n28*n73*n9/(n131*n72) - pow(alpha, n1*n24 - n136*n9)*n113*n73/(n131*n72) + n113*n51) + n235*n61*(pow(alpha, NP0*n1 - n136*n15)*n1*n133*n15*n28 + pow(alpha, n1*n24 - n136*n15)*n1*n15*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n15)*n106*n73/(n131*n72) + n106*n57) + n236*n61*(pow(alpha, NP0*n1 - n136*n16)*n1*n133*n16*n28 + pow(alpha, n1*n24 - n136*n16)*n1*n16*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n16)*n28*n40*n73/(n131*n72) + n126) + n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 - n61*n84*xF[8]*(pow(alpha, NP0*n1 - n136*n16)*n133*n16*n2 + n101*n2)*(pow(alpha, NP0*n1 - n136*n16)*n133*n16*n43 + n101*n43)/n206 + n61*n86*xF[3]*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n2 + n2*n99)*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n43 + n43*n99)/n201 + n61*n89*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n133*n2*n6 + n121)*(pow(alpha, NP0*n1 - n136*n6)*n133*n43*n6 + n43*n48*n6)/n196 + n61*n88*xF[10]*(pow(alpha, NP0*n1 - n136*n5)*n133*n2*n5 + n104*n2)*(pow(alpha, NP0*n1 - n136*n5)*n133*n43*n5 + n104*n43)/n195 + n61*n76*xF[13]*(pow(alpha, NP0*n1 - n136*n8)*n133*n19*n28*n8 + pow(alpha, n1*n24 - n136*n8)*n19*n28*n73*n8/(n131*n72) + pow(alpha, n1*n24 - n136*n8)*n28*n32*n73/(n131*n72) + n28*n32*n92)/n184 + n61*n75*xF[12]*(pow(alpha, NP0*n1 - n136*n7)*n133*n19*n28*n7 + pow(alpha, n1*n24 - n136*n7)*n111*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n7)*n19*n28*n7*n73/(n131*n72) + n111*n91)/n183 + n61*n89*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n1*n133*n28*n6 + pow(alpha, n1*n24 - n136*n6)*n1*n28*n6*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n6)*n28*n30*n73/(n131*n72) + n127)/n182) - 4.0*n227*n290*n61 + 2.0*n241 + 2.0*n318) + pow(-n24*(n0*n227*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n2 + n100*n2)*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n43 + n100*n43) - n0*n228*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n133*n28*n66 + n118*n66) + n0*xTj*(n105*n61*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n19*n28 + pow(alpha, n1*n24 - n136*n14)*n14*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n14)*n28*n38*n73/(n131*n72) + n28*n38*n96)/n190 - n108*n61*(pow(alpha, NP0*n1 - n10*n136)*n133*n65 + n52*n65)*(pow(alpha, NP0*n1 - n10*n136)*n10*n133*n43 + n10*n43*n52)/n200 + n108*n61*(pow(alpha, NP0*n1 - n10*n136)*n10*n133*n19*n28 + pow(alpha, n1*n24 - n10*n136)*n10*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n10*n136)*n110*n73/(n131*n72) + n110*n93)/n186 - n112*n61*(pow(alpha, NP0*n1 - n13*n136)*n133*n62 + n55*n62)*(pow(alpha, NP0*n1 - n13*n136)*n13*n133*n43 + n13*n43*n55)/n203 + n117*n61*(pow(alpha, NP0*n1 - n136*n7)*n133*n2*n7 + n122)*(pow(alpha, NP0*n1 - n136*n7)*n133*n43*n7 + n43*n49*n7)/n197 + n119*n61*(pow(alpha, NP0*n1 - n136*n17)*n133*n17*n2 + n109*n2)*(pow(alpha, NP0*n1 - n136*n17)*n133*n17*n43 + n109*n43)/n207 + n119*n61*(pow(alpha, NP0*n1 - n136*n17)*n1*n133*n17*n28 + pow(alpha, n1*n24 - n136*n17)*n1*n17*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n17)*n28*n41*n73/(n131*n72) + n28*n41*n59)/n193 + n120*n61*(pow(alpha, NP0*n1 - n136*n8)*n133*n2*n8 + n107*n2)*(pow(alpha, NP0*n1 - n136*n8)*n133*n43*n8 + n107*n43)/n198 + n216*n61*n86*(pow(alpha, NP0*n1 - n11*n136)*n1*n11*n133*n28 + pow(alpha, n1*n24 - n11*n136)*n1*n11*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n11*n136)*n28*n67*n73/(n131*n72) + n129) + n217*n61*n87*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n2 + n2*n98)*(pow(alpha, NP0*n1 - n136*n14)*n133*n14*n43 + n43*n98) + n218*n61*n88*(pow(alpha, NP0*n1 - n136*n5)*n1*n133*n28*n5 + pow(alpha, n1*n24 - n136*n5)*n1*n28*n5*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n5)*n28*n29*n73/(n131*n72) + n128) - n227*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n2 + n100*n2)*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n43 + n100*n43) + n228*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n133*n28*n66 + n118*n66) - n229*n61*xF[1]*(pow(alpha, NP0*n1 - n136*n9)*n133*n63 + n51*n63)*(pow(alpha, NP0*n1 - n136*n9)*n133*n43*n9 + n114*n43) + n230*n61*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n19*n28 + pow(alpha, n1*n24 - n12*n136)*n12*n19*n28*n73/(n131*n72) + pow(alpha, n1*n24 - n12*n136)*n28*n36*n73/(n131*n72) + n28*n36*n94) - n231*n61*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n2 + n103*n2)*(pow(alpha, NP0*n1 - n12*n136)*n12*n133*n43 + n103*n43) + n232*n61*(pow(alpha, NP0*n1 - n13*n136)*n1*n13*n133*n28 + pow(alpha, n1*n24 - n13*n136)*n1*n13*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n13*n136)*n102*n73/(n131*n72) + n102*n55) + n233*n61*(pow(alpha, NP0*n1 - n136*n15)*n133*n68 + n57*n68)*(pow(alpha, NP0*n1 - n136*n15)*n133*n15*n43 + n115*n43) + n234*n61*(pow(alpha, NP0*n1 - n136*n9)*n1*n133*n28*n9 + pow(alpha, n1*n24 - n136*n9)*n1*n28*n73*n9/(n131*n72) - pow(alpha, n1*n24 - n136*n9)*n113*n73/(n131*n72) + n113*n51) + n235*n61*(pow(alpha, NP0*n1 - n136*n15)*n1*n133*n15*n28 + pow(alpha, n1*n24 - n136*n15)*n1*n15*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n15)*n106*n73/(n131*n72) + n106*n57) + n236*n61*(pow(alpha, NP0*n1 - n136*n16)*n1*n133*n16*n28 + pow(alpha, n1*n24 - n136*n16)*n1*n16*n28*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n16)*n28*n40*n73/(n131*n72) + n126) + n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n251 + n252 + n253 + n254 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 - n61*n84*xF[8]*(pow(alpha, NP0*n1 - n136*n16)*n133*n16*n2 + n101*n2)*(pow(alpha, NP0*n1 - n136*n16)*n133*n16*n43 + n101*n43)/n206 + n61*n86*xF[3]*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n2 + n2*n99)*(pow(alpha, NP0*n1 - n11*n136)*n11*n133*n43 + n43*n99)/n201 + n61*n89*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n133*n2*n6 + n121)*(pow(alpha, NP0*n1 - n136*n6)*n133*n43*n6 + n43*n48*n6)/n196 + n61*n88*xF[10]*(pow(alpha, NP0*n1 - n136*n5)*n133*n2*n5 + n104*n2)*(pow(alpha, NP0*n1 - n136*n5)*n133*n43*n5 + n104*n43)/n195 + n61*n76*xF[13]*(pow(alpha, NP0*n1 - n136*n8)*n133*n19*n28*n8 + pow(alpha, n1*n24 - n136*n8)*n19*n28*n73*n8/(n131*n72) + pow(alpha, n1*n24 - n136*n8)*n28*n32*n73/(n131*n72) + n28*n32*n92)/n184 + n61*n75*xF[12]*(pow(alpha, NP0*n1 - n136*n7)*n133*n19*n28*n7 + pow(alpha, n1*n24 - n136*n7)*n111*n73/(n131*n72) + pow(alpha, n1*n24 - n136*n7)*n19*n28*n7*n73/(n131*n72) + n111*n91)/n183 + n61*n89*xF[11]*(pow(alpha, NP0*n1 - n136*n6)*n1*n133*n28*n6 + pow(alpha, n1*n24 - n136*n6)*n1*n28*n6*n73/(n131*n72) - pow(alpha, n1*n24 - n136*n6)*n28*n30*n73/(n131*n72) + n127)/n182) + 1.0*n100*n221*n61*xF[0]*(pow(alpha, NP0*n1 - n1*n136)*n1*n133*n2 + n100*n2) + n255) - n339, -n20);
24829 NP_sqrt_base = fabs(NP_sqrt_base);
24830 NP1 = (-NP_b - pow(NP_sqrt_base, -n0))/NP_2a;
24831 NT1 = n97*(n132 - log(-pow(alpha, NP1*n1)*n123 + 1));
24832 g0 = MW[1] - Mstar;
24833 g1 = MW[0] - Mstar;
24836 g4 = MW[10] - Mstar;
24837 g5 = MW[11] - Mstar;
24838 g6 = MW[12] - Mstar;
24839 g7 = MW[13] - Mstar;
24840 g8 = MW[2] - Mstar;
24841 g9 = MW[3] - Mstar;
24842 g10 = MW[4] - Mstar;
24843 g11 = MW[5] - Mstar;
24844 g12 = MW[6] - Mstar;
24845 g13 = MW[7] - Mstar;
24846 g14 = MW[8] - Mstar;
24847 g15 = MW[9] - Mstar;
24852 g20 = pow(alpha, -g1);
24853 g21 = pow(alpha, -g4);
24854 g22 = pow(alpha, -g5);
24855 g23 = pow(alpha, -g6);
24856 g24 = pow(alpha, -g7);
24857 g25 = pow(alpha, -g0);
24858 g26 = pow(alpha, -g8);
24859 g27 = pow(alpha, -g9);
24860 g28 = pow(alpha, -g10);
24861 g29 = pow(alpha, -g11);
24862 g30 = pow(alpha, -g12);
24863 g31 = pow(alpha, -g13);
24864 g32 = pow(alpha, -g14);
24865 g33 = pow(alpha, -g15);
24866 g34 = log(xF[0]/xF[1]);
24868 g36 = pow(alpha, NP1*g0);
24869 g37 = pow(alpha, NP1*g1);
24870 g38 = pow(alpha, NP1*g4);
24872 g40 = pow(alpha, NP1*g5);
24873 g41 = pow(alpha, NP1*g6);
24874 g42 = pow(alpha, NP1*g7);
24875 g43 = pow(alpha, NP1*g8);
24876 g44 = pow(alpha, NP1*g9);
24877 g45 = pow(alpha, NP1*g10);
24878 g46 = pow(alpha, NP1*g11);
24879 g47 = pow(alpha, NP1*g12);
24880 g48 = pow(alpha, NP1*g13);
24881 g49 = pow(alpha, NP1*g14);
24882 g50 = pow(alpha, NP1*g15);
24916 g84 = g17/(g3*xF[1]);
24917 g85 = pow(alpha, g0*g35) - 1;
24918 g86 = pow(alpha, g0*g35) - 1;
24919 g87 = pow(alpha, g1*g35) - 1;
24920 g88 = pow(alpha, g35*g8) - 1;
24921 g89 = pow(alpha, g35*g9) - 1;
24922 g90 = pow(alpha, g10*g35) - 1;
24923 g91 = pow(alpha, g11*g35) - 1;
24924 g92 = pow(alpha, g12*g35) - 1;
24925 g93 = pow(alpha, g13*g35) - 1;
24926 g94 = pow(alpha, g14*g35) - 1;
24927 g95 = pow(alpha, g15*g35) - 1;
24928 g96 = pow(alpha, g35*g4) - 1;
24929 g97 = pow(alpha, g35*g5) - 1;
24930 g98 = pow(alpha, g35*g6) - 1;
24931 g99 = pow(alpha, g35*g7) - 1;
24932 g100 = -pow(alpha, g1*g35);
24933 g101 = -pow(alpha, g35*g4);
24934 g102 = -pow(alpha, g35*g5);
24935 g103 = -pow(alpha, g35*g6);
24936 g104 = -pow(alpha, g35*g7);
24937 g105 = -pow(alpha, g35*g8);
24938 g106 = -pow(alpha, g35*g9);
24939 g107 = -pow(alpha, g10*g35);
24940 g108 = -pow(alpha, g11*g35);
24941 g109 = -pow(alpha, g12*g35);
24942 g110 = -pow(alpha, g13*g35);
24943 g111 = -pow(alpha, g14*g35);
24944 g112 = -pow(alpha, g15*g35);
24946 g114 = -g100 - g37;
24947 g115 = -g101 - g38;
24948 g116 = -g102 - g40;
24949 g117 = -g103 - g41;
24950 g118 = -g104 - g42;
24951 g119 = -g105 - g43;
24952 g120 = -g106 - g44;
24953 g121 = -g107 - g45;
24954 g122 = -g108 - g46;
24955 g123 = -g109 - g47;
24956 g124 = -g110 - g48;
24957 g125 = -g111 - g49;
24958 g126 = -g112 - g50;
24959 g127 = pow(alpha, g1*g35) + g69;
24961 g129 = pow(alpha, g35*g4) + g70;
24962 g130 = pow(alpha, g35*g5) + g71;
24963 g131 = pow(alpha, g35*g6) + g72;
24964 g132 = pow(alpha, g35*g7) + g73;
24965 g133 = pow(alpha, g35*g8) + g74;
24966 g134 = pow(alpha, g35*g9) + g75;
24967 g135 = pow(alpha, g10*g35) + g76;
24968 g136 = pow(alpha, g11*g35) + g77;
24969 g137 = pow(alpha, g12*g35) + g78;
24970 g138 = pow(alpha, g13*g35) + g79;
24971 g139 = pow(alpha, g14*g35) + g80;
24972 g140 = pow(alpha, g15*g35) + g81;
24973 g141 = xF[11]/g130;
24977 g145 = xF[10]/g129;
24981 g149 = xF[12]/g131;
24982 g150 = xF[13]/g132;
24992 g160 = xF[11]/g116;
24993 g161 = xF[13]/g118;
24997 g165 = xF[12]/g117;
24998 g166 = xF[10]/g115;
25029 g197 = log(g128*g18*g84/g55);
25030 g198 = log(g113*g18*g84/g54);
25031 g199 = log(g128*g19*g52/g86);
25033 g201 = log(g113*g19*g52/g85);
25035 g203 = -g141*g200*(g71 + 1) - g141*g202*(pow(alpha, g35*g5) - 1) - g142*g200*(g81 + 1) - g142*g202*(pow(alpha, g15*g35) - 1) - g143*g200*(g80 + 1) - g143*g202*(pow(alpha, g14*g35) - 1) - g144*g200*g55 - g144*g202*g86 - g145*g200*(g70 + 1) - g145*g202*(pow(alpha, g35*g4) - 1) - g146*g200*(g75 + 1) - g146*g202*(pow(alpha, g35*g9) - 1) - g147*g200*(g79 + 1) - g147*g202*(pow(alpha, g13*g35) - 1) - g148*g200*(g76 + 1) - g148*g202*(pow(alpha, g10*g35) - 1) - g149*g200*(g72 + 1) - g149*g202*(pow(alpha, g35*g6) - 1) - g150*g200*(g73 + 1) - g150*g202*(pow(alpha, g35*g7) - 1) - g151*g200*(g78 + 1) - g151*g202*(pow(alpha, g12*g35) - 1) - g152*g200*(g77 + 1) - g152*g202*(pow(alpha, g11*g35) - 1) - g153*g200*(g74 + 1) - g153*g202*(pow(alpha, g35*g8) - 1) - g154*g200*(g69 + 1) - g154*g202*(pow(alpha, g1*g35) - 1) - g82*xF[0] - g82*xF[10] - g82*xF[11] - g82*xF[12] - g82*xF[13] - g82*xF[1] - g82*xF[2] - g82*xF[3] - g82*xF[4] - g82*xF[5] - g82*xF[6] - g82*xF[7] - g82*xF[8] - g82*xF[9];
25036 LpF = xF[0]*(g20 + 1.0)*(g173*g198 + g184*g201 + g51)/(g39*(g20 - 1.0)) + xF[10]*(g21 + 1.0)*(g181*g198 + g195*g201 + g51)/(g39*(g21 - 1.0)) + xF[11]*(g22 + 1.0)*(g179*g198 + g185*g201 + g51)/(g39*(g22 - 1.0)) + xF[12]*(g23 + 1.0)*(g175*g198 + g192*g201 + g51)/(g39*(g23 - 1.0)) + xF[13]*(g24 + 1.0)*(g176*g198 + g193*g201 + g51)/(g39*(g24 - 1.0)) + xF[1]*(g25 + 1.0)*(g178*g198 + g183*g201 + g51)/(g39*(g25 - 1.0)) + xF[2]*(g26 + 1.0)*(g180*g198 + g186*g201 + g51)/(g39*(g26 - 1.0)) + xF[3]*(g27 + 1.0)*(g177*g198 + g187*g201 + g51)/(g39*(g27 - 1.0)) + xF[4]*(g28 + 1.0)*(g171*g198 + g188*g201 + g51)/(g39*(g28 - 1.0)) + xF[5]*(g29 + 1.0)*(g174*g198 + g196*g201 + g51)/(g39*(g29 - 1.0)) + xF[6]*(g30 + 1.0)*(g169*g198 + g191*g201 + g51)/(g39*(g30 - 1.0)) + xF[7]*(g31 + 1.0)*(g172*g198 + g194*g201 + g51)/(g39*(g31 - 1.0)) + xF[8]*(g32 + 1.0)*(g182*g198 + g189*g201 + g51)/(g39*(g32 - 1.0)) + xF[9]*(g33 + 1.0)*(g170*g198 + g190*g201 + g51)/(g39*(g33 - 1.0));
25041 xP[0] = g156*g53*g87;
25042 xP[1] = g155*g53*g85;
25043 xP[2] = g159*g53*g88;
25044 xP[3] = g162*g53*g89;
25045 xP[4] = g157*g53*g90;
25046 xP[5] = g168*g53*g91;
25047 xP[6] = g163*g53*g92;
25048 xP[7] = g158*g53*g93;
25049 xP[8] = g164*g53*g94;
25050 xP[9] = g167*g53*g95;
25051 xP[10] = g166*g53*g96;
25052 xP[11] = g160*g53*g97;
25053 xP[12] = g165*g53*g98;
25054 xP[13] = g161*g53*g99;
25055 xT[0] = g156*g56*g83;
25056 xT[1] = g155*g54*g83;
25057 xT[2] = g159*g57*g83;
25058 xT[3] = g162*g58*g83;
25059 xT[4] = g157*g59*g83;
25060 xT[5] = g168*g60*g83;
25061 xT[6] = g163*g61*g83;
25062 xT[7] = g158*g62*g83;
25063 xT[8] = g164*g63*g83;
25064 xT[9] = g167*g64*g83;
25065 xT[10] = g166*g65*g83;
25066 xT[11] = g160*g66*g83;
25067 xT[12] = g165*g67*g83;
25068 xT[13] = g161*g68*g83;
25071 n0 = -2.00000000000000;
25072 n1 = MW[0] - Mstar;
25076 n5 = MW[10] - Mstar;
25077 n6 = MW[11] - Mstar;
25078 n7 = MW[12] - Mstar;
25079 n8 = MW[13] - Mstar;
25080 n9 = MW[14] - Mstar;
25081 n10 = MW[1] - Mstar;
25082 n11 = MW[2] - Mstar;
25083 n12 = MW[3] - Mstar;
25084 n13 = MW[4] - Mstar;
25085 n14 = MW[5] - Mstar;
25086 n15 = MW[6] - Mstar;
25087 n16 = MW[7] - Mstar;
25088 n17 = MW[8] - Mstar;
25089 n18 = MW[9] - Mstar;
25097 n26 = pow(n1, -n0);
25098 n27 = pow(n2, -n0);
25099 n28 = pow(n5, -n0);
25100 n29 = pow(n6, -n0);
25101 n30 = pow(n7, -n0);
25102 n31 = pow(n8, -n0);
25103 n32 = pow(n9, -n0);
25104 n33 = pow(n10, -n0);
25105 n34 = pow(n11, -n0);
25106 n35 = pow(n12, -n0);
25107 n36 = pow(n13, -n0);
25108 n37 = pow(n14, -n0);
25109 n38 = pow(n15, -n0);
25110 n39 = pow(n16, -n0);
25111 n40 = pow(n17, -n0);
25112 n41 = pow(n18, -n0);
25115 n44 = pow(alpha, NP0*n1);
25116 n45 = n22 + n25*xF[0];
25117 n46 = n22 + n25*xPj;
25118 n47 = pow(alpha, NP0*n5);
25119 n48 = pow(alpha, NP0*n6);
25120 n49 = pow(alpha, NP0*n7);
25121 n50 = pow(alpha, NP0*n8);
25122 n51 = pow(alpha, NP0*n9);
25123 n52 = pow(alpha, NP0*n10);
25124 n53 = pow(alpha, NP0*n11);
25125 n54 = pow(alpha, NP0*n12);
25126 n55 = pow(alpha, NP0*n13);
25127 n56 = pow(alpha, NP0*n14);
25128 n57 = pow(alpha, NP0*n15);
25129 n58 = pow(alpha, NP0*n16);
25130 n59 = pow(alpha, NP0*n17);
25131 n60 = pow(alpha, NP0*n18);
25142 n71 = pow(alpha, NP0*n0*n20);
25143 n72 = pow(n46, -n0);
25194 n123 = log((-1.0 + xPj/xF[0])/n3);
25195 n124 = -n74*xF[12];
25197 n126 = n116*xF[10];
25198 n127 = -n70*xF[10];
25199 n128 = -n75*xF[13];
25205 n134 = n120*n2*xF[12];
25206 n135 = n27*n31*n50;
25207 n136 = n27*n29*n48;
25208 n137 = n27*n40*n59;
25209 n138 = n27*n36*n55;
25210 n139 = n27*n28*n47;
25211 n140 = n27*n38*n57;
25212 n141 = n27*n35*n54;
25213 n142 = n133*n90 + 1;
25214 n143 = n123 + n19 + n42 + n61;
25217 n146 = n144*n2*n44;
25218 n147 = n100*(n143 - log(n142)) + 1;
25219 n148 = pow(alpha, n1*n147);
25220 n149 = pow(alpha, n147*n5);
25221 n150 = pow(alpha, n147*n6);
25222 n151 = pow(alpha, n147*n7);
25223 n152 = pow(alpha, n147*n8);
25224 n153 = pow(alpha, n147*n9);
25225 n154 = pow(alpha, n10*n147);
25226 n155 = pow(alpha, n11*n147);
25227 n156 = pow(alpha, n12*n147);
25228 n157 = pow(alpha, n13*n147);
25229 n158 = pow(alpha, n14*n147);
25230 n159 = pow(alpha, n147*n15);
25231 n160 = pow(alpha, n147*n16);
25232 n161 = pow(alpha, n147*n17);
25233 n162 = pow(alpha, n147*n18);
25249 n178 = pow(alpha, n147*n20) + n69 - 1;
25250 n179 = n70 - 1 + 1.0/n149;
25251 n180 = n73 - 1 + 1.0/n150;
25252 n181 = n74 - 1 + 1.0/n151;
25253 n182 = n75 - 1 + 1.0/n152;
25254 n183 = n76 - 1 + 1.0/n153;
25255 n184 = n77 - 1 + 1.0/n154;
25256 n185 = n78 - 1 + 1.0/n155;
25257 n186 = n79 - 1 + 1.0/n156;
25258 n187 = n80 - 1 + 1.0/n157;
25259 n188 = n81 - 1 + 1.0/n158;
25260 n189 = n82 - 1 + 1.0/n159;
25261 n190 = n83 - 1 + 1.0/n160;
25262 n191 = n84 - 1 + 1.0/n161;
25263 n192 = n85 - 1 + 1.0/n162;
25264 n193 = pow(n178, 3);
25265 n194 = pow(n179, 3);
25266 n195 = pow(n180, 3);
25267 n196 = pow(n181, 3);
25268 n197 = pow(n182, 3);
25269 n198 = pow(n183, 3);
25270 n199 = pow(n184, 3);
25271 n200 = pow(n185, 3);
25272 n201 = pow(n186, 3);
25273 n202 = pow(n187, 3);
25274 n203 = pow(n188, 3);
25275 n204 = pow(n189, 3);
25276 n205 = pow(n190, 3);
25277 n206 = pow(n191, 3);
25278 n207 = pow(n192, 3);
25279 n208 = xF[11]/n180;
25280 n209 = xF[13]/n182;
25285 n214 = xF[10]/n179;
25286 n215 = pow(n186, n21)*xF[3];
25289 n218 = pow(n187, n21)*xF[4];
25292 n221 = n2*xF[14]/n183;
25293 n222 = n56*xF[5]/n188;
25294 n223 = n52*xF[1]/n184;
25295 n224 = n58*xF[7]/n190;
25296 n225 = n53*xF[2]/n185;
25297 n226 = n49*xF[12]/n181;
25298 n227 = n51*xF[14]/n183;
25299 n228 = n27*n41/n192;
25301 n230 = pow(n178, n21)*n69;
25302 n231 = -n119*pow(n188, n21);
25304 n233 = -pow(n184, n21)*n77*xF[1];
25305 n234 = n62*n98/(n100*n178);
25306 n235 = n2*n20*n62*n98/n178;
25307 n236 = n106*n62*n98/n178;
25308 n237 = n139*n214*n62;
25309 n238 = n136*n208*n62;
25310 n239 = n114*n226*n62;
25311 n240 = n135*n209*n62;
25312 n241 = n122*n227*n62;
25313 n242 = n115*n223*n62;
25314 n243 = n113*n225*n62;
25315 n244 = n141*n211*n62;
25316 n245 = n138*n210*n62;
25317 n246 = n103*n222*n62;
25318 n247 = n140*n213*n62;
25319 n248 = n108*n224*n62;
25320 n249 = n137*n212*n62;
25321 n250 = n228*n62*n99;
25323 n252 = n144/n148 + 1;
25324 n253 = n144*n44/(n100*n148) + n44/n100;
25325 n254 = n116*n2 + n146*n175;
25326 n255 = n131 + n146*n172;
25327 n256 = n120*n2 + n146*n163;
25328 n257 = n109*n2 + n146*n168;
25329 n258 = n112*n2 + n146*n166;
25330 n259 = n144*n44*n64/n154 + n52*n64;
25331 n260 = n144*n44*n65/n155 + n53*n65;
25332 n261 = n102*n2 + n146*n169;
25333 n262 = n104*n2 + n146*n164;
25334 n263 = n144*n177*n63 + n56*n63;
25335 n264 = n101*n2 + n146*n170;
25336 n265 = n144*n44*n68/n160 + n58*n68;
25337 n266 = n132 + n146*n171;
25338 n267 = n144*n44*n66/n162 + n60*n66;
25339 n268 = pow(n253, -n0);
25340 n269 = pow(n254, -n0);
25341 n270 = pow(n255, -n0);
25342 n271 = pow(n256, -n0);
25343 n272 = pow(n257, -n0);
25344 n273 = pow(n258, -n0);
25345 n274 = pow(n259, -n0);
25346 n275 = pow(n260, -n0);
25347 n276 = pow(n261, -n0);
25348 n277 = pow(n262, -n0);
25349 n278 = pow(n263, -n0);
25350 n279 = pow(n264, -n0);
25351 n280 = pow(n265, -n0);
25352 n281 = pow(n266, -n0);
25353 n282 = pow(n267, -n0);
25354 n283 = n255*xF[11];
25356 n285 = n0*n146*n20/n148 + n0*n2*n20*n44;
25358 n287 = n106*n144*n90/n148 + n106*n90;
25359 n288 = pow(n181, n21)*n256;
25360 n289 = pow(n178, n21)*n253;
25361 n290 = pow(n192, n21)*n267;
25362 n291 = pow(n179, n21)*n254;
25363 n292 = pow(n182, n21)*n257;
25364 n293 = pow(n183, n21)*n258;
25365 n294 = pow(n190, n21)*n265;
25366 n295 = pow(n191, n21)*n266;
25367 n296 = pow(n189, n21)*n264*xF[6];
25372 n301 = pow(n178, n21)*n287;
25373 n302 = -n111*n289*n62;
25374 n303 = n0*pow(n178, n21)*n2*n20*n62*n98*(pow(alpha, NP0*n1 + n147*n20)*n144/n100 + n44/n100);
25375 n304 = n126*pow(n179, n21)*n43*n62*(pow(alpha, NP0*n1 - n147*n5)*n144*n2*n5 + n116*n2);
25376 n305 = pow(n180, n21)*n43*n48*n6*n62*xF[11]*(pow(alpha, NP0*n1 - n147*n6)*n144*n2*n6 + n131);
25377 n306 = n120*pow(n181, n21)*n43*n62*xF[12]*(pow(alpha, NP0*n1 - n147*n7)*n144*n2*n7 + n120*n2);
25378 n307 = n109*pow(n182, n21)*n43*n62*xF[13]*(pow(alpha, NP0*n1 - n147*n8)*n144*n2*n8 + n109*n2);
25379 n308 = n112*pow(n183, n21)*n43*n62*xF[14]*(pow(alpha, NP0*n1 - n147*n9)*n144*n2*n9 + n112*n2);
25380 n309 = n118*pow(n184, n21)*n43*n62*xF[1]*(pow(alpha, NP0*n1 - n10*n147)*n144*n64 + n52*n64);
25381 n310 = n11*pow(n185, n21)*n43*n53*n62*xF[2]*(pow(alpha, NP0*n1 - n11*n147)*n144*n65 + n53*n65);
25382 n311 = n102*n215*n43*n62*(pow(alpha, NP0*n1 - n12*n147)*n12*n144*n2 + n102*n2);
25383 n312 = n104*n218*n43*n62*(pow(alpha, NP0*n1 - n13*n147)*n13*n144*n2 + n104*n2);
25384 n313 = n14*pow(n188, n21)*n43*n56*n62*xF[5]*(pow(alpha, NP0*n1 - n14*n147)*n144*n63 + n56*n63);
25385 n314 = n101*pow(n189, n21)*n43*n62*xF[6]*(pow(alpha, NP0*n1 - n147*n15)*n144*n15*n2 + n101*n2);
25386 n315 = n121*pow(n190, n21)*n43*n62*xF[7]*(pow(alpha, NP0*n1 - n147*n16)*n144*n68 + n58*n68);
25387 n316 = n117*pow(n191, n21)*n43*n62*xF[8]*(pow(alpha, NP0*n1 - n147*n17)*n144*n17*n2 + n132);
25388 n317 = n18*pow(n192, n21)*n43*n62*n99*(pow(alpha, NP0*n1 - n147*n18)*n144*n66 + n60*n66);
25389 n318 = 1.0*n289*n62*n98/n100;
25390 n319 = n111*n301*n62;
25392 n321 = n234 + n302;
25393 n322 = -n253*n285/n193;
25394 n323 = pow(alpha, n1*n24)*n1*pow(n142, n21)*n175*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24)*pow(n142, n21)*n27*n28*pow(n45, n21)*n72/n149 + n107*n145*n175 + n139;
25395 n324 = pow(alpha, n1*n24)*n1*pow(n142, n21)*n172*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24)*pow(n142, n21)*n27*n29*pow(n45, n21)*n72/n150 + n107*n145*n172 + n136;
25396 n325 = pow(alpha, n1*n24)*n114*pow(n142, n21)*pow(n45, n21)*n72/n151 + pow(alpha, n1*n24)*pow(n142, n21)*n163*n20*n27*pow(n45, n21)*n72 + n114*n91 + n145*n163*n20*n44;
25397 n326 = pow(alpha, n1*n24)*pow(n142, n21)*n168*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24)*pow(n142, n21)*n27*n31*pow(n45, n21)*n72/n152 + n145*n168*n20*n44 + n27*n31*n92;
25398 n327 = pow(alpha, n1*n24)*n122*pow(n142, n21)*pow(n45, n21)*n72/n153 + pow(alpha, n1*n24)*pow(n142, n21)*n166*n20*n27*pow(n45, n21)*n72 + n122*n93 + n145*n166*n20*n44;
25399 n328 = pow(alpha, n1*n24)*n113*pow(n142, n21)*pow(n45, n21)*n72/n155 + pow(alpha, n1*n24)*pow(n142, n21)*n174*n20*n27*pow(n45, n21)*n72 + n113*n94 + n145*n174*n20*n44;
25400 n329 = pow(alpha, n1*n24)*pow(n142, n21)*n164*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24)*pow(n142, n21)*n27*n36*pow(n45, n21)*n72/n157 + n145*n164*n20*n44 + n27*n36*n95;
25401 n330 = pow(alpha, n1*n24)*pow(n142, n21)*n170*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24)*pow(n142, n21)*n27*n38*pow(n45, n21)*n72/n159 + n145*n170*n20*n44 + n27*n38*n97;
25402 n331 = pow(alpha, n1*n24)*n1*pow(n142, n21)*n165*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24)*n108*pow(n142, n21)*pow(n45, n21)*n72/n160 + n107*n145*n165 + n108*n58;
25403 n332 = pow(alpha, n1*n24)*n1*pow(n142, n21)*n171*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24)*pow(n142, n21)*n27*n40*pow(n45, n21)*n72/n161 + n107*n145*n171 + n137;
25404 n333 = pow(alpha, n1*n24)*n1*pow(n142, n21)*n167*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24)*pow(n142, n21)*n27*n41*pow(n45, n21)*n72/n162 + n107*n145*n167 + n27*n41*n60;
25405 n334 = pow(n181, n21)*n62*n74*xF[12]*(pow(alpha, n1*n24 - n147*n7)*n114*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n7)*pow(n142, n21)*n20*n27*pow(n45, n21)*n7*n72 + n114*n91 + n145*n163*n20*n44);
25406 n335 = pow(n182, n21)*n62*n75*xF[13]*(pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n8 + pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n27*n31*pow(n45, n21)*n72 + n145*n168*n20*n44 + n27*n31*n92);
25407 n336 = n105*pow(n183, n21)*n62*(pow(alpha, n1*n24 - n147*n9)*n122*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n9)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n9 + n122*n93 + n145*n166*n20*n44);
25408 n337 = n110*pow(n185, n21)*n62*(pow(alpha, n1*n24 - n11*n147)*n11*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n11*n147)*n113*pow(n142, n21)*pow(n45, n21)*n72 + n113*n94 + n145*n174*n20*n44);
25409 n338 = n218*n62*n80*(pow(alpha, n1*n24 - n13*n147)*n13*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n13*n147)*pow(n142, n21)*n27*n36*pow(n45, n21)*n72 + n145*n164*n20*n44 + n27*n36*n95);
25410 n339 = pow(n189, n21)*n62*n82*xF[6]*(pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n15*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n27*n38*pow(n45, n21)*n72 + n145*n170*n20*n44 + n27*n38*n97);
25411 n340 = n127*pow(n179, n21)*n62*(pow(alpha, n1*n24 - n147*n5)*n1*pow(n142, n21)*n27*pow(n45, n21)*n5*n72 - pow(alpha, n1*n24 - n147*n5)*pow(n142, n21)*n27*n28*pow(n45, n21)*n72 + n107*n145*n175 + n139);
25412 n341 = pow(n180, n21)*n62*n87*xF[11]*(pow(alpha, n1*n24 - n147*n6)*n1*pow(n142, n21)*n27*pow(n45, n21)*n6*n72 - pow(alpha, n1*n24 - n147*n6)*pow(n142, n21)*n27*n29*pow(n45, n21)*n72 + n107*n145*n172 + n136);
25413 n342 = n233*n62*(pow(alpha, n1*n24 - n10*n147)*n1*n10*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n10*n147)*n115*pow(n142, n21)*pow(n45, n21)*n72 + n107*n145*n173 + n115*n52);
25414 n343 = n215*n62*n86*(pow(alpha, n1*n24 - n12*n147)*n1*n12*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n12*n147)*pow(n142, n21)*n27*n35*pow(n45, n21)*n72 + n107*n145*n169 + n141);
25415 n344 = n231*n62*(pow(alpha, n1*n24 - n14*n147)*n1*n14*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n14*n147)*n103*pow(n142, n21)*pow(n45, n21)*n72 + n103*n56 + n107*n145*n176);
25416 n345 = n130*pow(n190, n21)*n62*(pow(alpha, n1*n24 - n147*n16)*n1*pow(n142, n21)*n16*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n16)*n108*pow(n142, n21)*pow(n45, n21)*n72 + n107*n145*n165 + n108*n58);
25417 n346 = n129*pow(n191, n21)*n62*(pow(alpha, n1*n24 - n147*n17)*n1*pow(n142, n21)*n17*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n17)*pow(n142, n21)*n27*n40*pow(n45, n21)*n72 + n107*n145*n171 + n137);
25418 n347 = n125*pow(n192, n21)*n62*(pow(alpha, n1*n24 - n147*n18)*n1*pow(n142, n21)*n18*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n18)*pow(n142, n21)*n27*n41*pow(n45, n21)*n72 + n107*n145*n167 + n27*n41*n60);
25419 n348 = n251 + n318 + n320;
25420 n349 = n101*n2*n213*n62 + n102*n2*n211*n62 + n104*n2*n210*n62 - n105*n293*n62 + n109*n2*n209*n62 - n110*pow(n185, n21)*n260*n62 + n112*n221*n62 + n124*n288*n62 + n125*n290*n62 + n126*n217*n62 + n127*n291*n62 + n128*n292*n62 + n129*n295*n62 + n130*n294*n62 + n131*n208*n62 + n132*n212*n62 + n134*n62/n181 + pow(n180, n21)*n283*n62*n87 + n215*n261*n62*n86 + n218*n262*n62*n89 + n222*n62*n63 + n223*n62*n64 + n224*n62*n68 + n225*n62*n65 + n231*n263*n62 + n233*n259*n62 + n296*n62*n88 + n321 + n62*n66*n99/n192;
25422 n351 = n236 + n237 + n238 + n239 + n240 + n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n317 + n319 + n334 + n335 + n336 + n337 + n338 + n339 + n340 + n341 + n342 + n343 + n344 + n345 + n346 + n347;
25423 n352 = -n105*n258*n62*(n112*n43 + n144*n166*n43*n44)/n198 - n110*n260*n62*(n11*n43*n53 + n144*n174*n43*n44)/n200 + n111*n322*n62 - n119*n263*n62*(n14*n43*n56 + n144*n176*n43*n44)/n203 + n124*n256*n62*(n120*n43 + n144*n163*n43*n44)/n196 + n125*n267*n62*(n144*n167*n43*n44 + n18*n43*n60)/n207 + n127*n254*n62*(n116*n43 + n144*n175*n43*n44)/n194 + n128*n257*n62*(n109*n43 + n144*n168*n43*n44)/n197 + n129*n266*n62*(n117*n43 + n144*n171*n43*n44)/n206 + n216*n264*n62*n88*(n101*n43 + n144*n170*n43*n44) + n220*n262*n62*n89*(n104*n43 + n144*n164*n43*n44) - n229*n284*n62*(n118*n43 + n144*n173*n43*n44) + n232*n265*n62*(n121*n43 + n144*n165*n43*n44) + n351 + n261*n62*n86*xF[3]*(n102*n43 + n144*n169*n43*n44)/n201 + n283*n62*n87*(n144*n172*n43*n44 + n43*n48*n6)/n195;
25424 NP_b = -n235 - n24*(0.5*n111*pow(n178, n21)*n62*(pow(alpha, NP0*n1 - n1*n147)*n106*(-n22 + xPj*xTj)/(n142*n45) + n106*n90) - 1.0*n111*n298*n62 + n251 - 0.5*xTj*(n105*pow(n183, n21)*n62*(pow(alpha, NP0*n1 - n147*n9)*n145*n20*n9 + pow(alpha, n1*n24 - n147*n9)*n122*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n9)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n9 + n122*n93) + n105*n21*n297*n62 + n110*pow(n185, n21)*n62*(pow(alpha, NP0*n1 - n11*n147)*n11*n145*n20 + pow(alpha, n1*n24 - n11*n147)*n11*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n11*n147)*n113*pow(n142, n21)*pow(n45, n21)*n72 + n113*n94) + n110*n21*n299*n62 + n111*pow(n178, n21)*n62*(pow(alpha, NP0*n1 - n1*n147)*n106*(-n22 + xPj*xTj)/(n142*n45) + n106*n90) + n111*n21*n298*n62 + n119*n21*n300*n62 + n125*pow(n192, n21)*n62*(pow(alpha, NP0*n1 - n147*n18)*n1*n145*n18 + pow(alpha, n1*n24 - n147*n18)*n1*pow(n142, n21)*n18*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n18)*pow(n142, n21)*n27*n41*pow(n45, n21)*n72 + n27*n41*n60) + n127*pow(n179, n21)*n62*(pow(alpha, NP0*n1 - n147*n5)*n1*n145*n5 + pow(alpha, n1*n24 - n147*n5)*n1*pow(n142, n21)*n27*pow(n45, n21)*n5*n72 - pow(alpha, n1*n24 - n147*n5)*pow(n142, n21)*n27*n28*pow(n45, n21)*n72 + n139) + n129*pow(n191, n21)*n62*(pow(alpha, NP0*n1 - n147*n17)*n1*n145*n17 + pow(alpha, n1*n24 - n147*n17)*n1*pow(n142, n21)*n17*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n17)*pow(n142, n21)*n27*n40*pow(n45, n21)*n72 + n137) + n130*pow(n190, n21)*n62*(pow(alpha, NP0*n1 - n147*n16)*n1*n145*n16 + pow(alpha, n1*n24 - n147*n16)*n1*pow(n142, n21)*n16*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n16)*n108*pow(n142, n21)*pow(n45, n21)*n72 + n108*n58) + pow(n180, n21)*n62*n87*xF[11]*(pow(alpha, NP0*n1 - n147*n6)*n1*n145*n6 + pow(alpha, n1*n24 - n147*n6)*n1*pow(n142, n21)*n27*pow(n45, n21)*n6*n72 - pow(alpha, n1*n24 - n147*n6)*pow(n142, n21)*n27*n29*pow(n45, n21)*n72 + n136) + pow(n181, n21)*n62*n74*xF[12]*(pow(alpha, NP0*n1 - n147*n7)*n145*n20*n7 + pow(alpha, n1*n24 - n147*n7)*n114*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n7)*pow(n142, n21)*n20*n27*pow(n45, n21)*n7*n72 + n114*n91) + pow(n182, n21)*n62*n75*xF[13]*(pow(alpha, NP0*n1 - n147*n8)*n145*n20*n8 + pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n8 + pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n27*n31*pow(n45, n21)*n72 + n27*n31*n92) + pow(n189, n21)*n62*n82*xF[6]*(pow(alpha, NP0*n1 - n147*n15)*n145*n15*n20 + pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n15*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n27*n38*pow(n45, n21)*n72 + n27*n38*n97) + n21*n216*n279*n62*n82 + n21*n220*n277*n62*n80 + n21*n229*n286*n62 + n215*n62*n86*(pow(alpha, NP0*n1 - n12*n147)*n1*n12*n145 + pow(alpha, n1*n24 - n12*n147)*n1*n12*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n12*n147)*pow(n142, n21)*n27*n35*pow(n45, n21)*n72 + n141) + n218*n62*n80*(pow(alpha, NP0*n1 - n13*n147)*n13*n145*n20 + pow(alpha, n1*n24 - n13*n147)*n13*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n13*n147)*pow(n142, n21)*n27*n36*pow(n45, n21)*n72 + n27*n36*n95) + n231*n62*(pow(alpha, NP0*n1 - n14*n147)*n1*n14*n145 + pow(alpha, n1*n24 - n14*n147)*n1*n14*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n14*n147)*n103*pow(n142, n21)*pow(n45, n21)*n72 + n103*n56) + n233*n62*(pow(alpha, NP0*n1 - n10*n147)*n1*n10*n145 + pow(alpha, n1*n24 - n10*n147)*n1*n10*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n10*n147)*n115*pow(n142, n21)*pow(n45, n21)*n72 + n115*n52) + n236 + n237 + n238 + n239 + n240 + n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n317 + n21*n282*n62*n85*xF[9]/n207 + n21*n281*n62*n84*xF[8]/n206 + n21*n280*n62*n83*xF[7]/n205 + n21*n276*n62*n79*xF[3]/n201 + n21*n272*n62*n75*xF[13]/n197 + n21*n271*n62*n74*xF[12]/n196 + n21*n270*n62*n73*xF[11]/n195 + n21*n269*n62*n70*xF[10]/n194) + 1.0*pow(n178, n21)*n62*n98*(pow(alpha, NP0*n1 - n1*n147)*n144/n100 + n44/n100)/n100) - n62*xTj*(n101*n2*n213 + n102*n2*n211 + n104*n2*n210 - n105*n293 + n109*n2*n209 - n110*pow(n185, n21)*n260 - n111*n289 + n112*n221 + n124*n288 + n125*n290 + n126*n217 + n127*n291 + n128*n292 + n129*n295 + n130*n294 + n131*n208 + n132*n212 + n134/n181 + pow(n180, n21)*n283*n87 + n215*n261*n86 + n218*n262*n89 + n222*n63 + n223*n64 + n224*n68 + n225*n65 + n231*n263 + n233*n259 + n296*n88 + n66*n99/n192 + n98/(n100*n178)) - n230*n252*n62*n98/n100;
25425 NP_2a = -n62*(-pow(alpha, n1*n24)*n0*n106*n111*pow(n252, -n0)/n193 + pow(alpha, n1*n24)*n0*n106*pow(n178, n21)*n252*xF[0] + n106*n111*pow(n178, n21)*n90*(-1 + (-n22 + xPj*xTj)/(n142*n148*n45)) - 1.0*n106*n98/n178 + 1.0*xTj*(n0*pow(n178, n21)*n2*n20*n98*(pow(alpha, NP0*n1 + n147*n20)*n144/n100 + n44/n100) + n101*pow(n189, n21)*n43*xF[6]*(pow(alpha, NP0*n1 - n147*n15)*n144*n15*n2 + n101*n2) + n102*n215*n43*(pow(alpha, NP0*n1 - n12*n147)*n12*n144*n2 + n102*n2) + n103*n222 + n104*n218*n43*(pow(alpha, NP0*n1 - n13*n147)*n13*n144*n2 + n104*n2) + n105*pow(n183, n21)*(pow(alpha, n1*n24 - n147*n9)*n122*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n9)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n9 + n122*n93 + n145*n166*n20*n44) + n105*n21*n297 + n106*n98/n178 + n108*n224 + n109*pow(n182, n21)*n43*xF[13]*(pow(alpha, NP0*n1 - n147*n8)*n144*n2*n8 + n109*n2) + n11*pow(n185, n21)*n43*n53*xF[2]*(pow(alpha, NP0*n1 - n11*n147)*n144*n65 + n53*n65) + n110*pow(n185, n21)*(pow(alpha, n1*n24 - n11*n147)*n11*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n11*n147)*n113*pow(n142, n21)*pow(n45, n21)*n72 + n113*n94 + n145*n174*n20*n44) + n110*n21*n299 + n111*n21*n298 + n111*n301 + n112*pow(n183, n21)*n43*xF[14]*(pow(alpha, NP0*n1 - n147*n9)*n144*n2*n9 + n112*n2) + n113*n225 + n114*n226 + n115*n223 + n117*pow(n191, n21)*n43*xF[8]*(pow(alpha, NP0*n1 - n147*n17)*n144*n17*n2 + n132) + n118*pow(n184, n21)*n43*xF[1]*(pow(alpha, NP0*n1 - n10*n147)*n144*n64 + n52*n64) + n119*n21*n300 + n120*pow(n181, n21)*n43*xF[12]*(pow(alpha, NP0*n1 - n147*n7)*n144*n2*n7 + n120*n2) + n121*pow(n190, n21)*n43*xF[7]*(pow(alpha, NP0*n1 - n147*n16)*n144*n68 + n58*n68) + n122*n227 + n125*pow(n192, n21)*(pow(alpha, n1*n24 - n147*n18)*n1*pow(n142, n21)*n18*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n18)*pow(n142, n21)*n27*n41*pow(n45, n21)*n72 + n107*n145*n167 + n27*n41*n60) + n126*pow(n179, n21)*n43*(pow(alpha, NP0*n1 - n147*n5)*n144*n2*n5 + n116*n2) + n127*pow(n179, n21)*(pow(alpha, n1*n24 - n147*n5)*n1*pow(n142, n21)*n27*pow(n45, n21)*n5*n72 - pow(alpha, n1*n24 - n147*n5)*pow(n142, n21)*n27*n28*pow(n45, n21)*n72 + n107*n145*n175 + n139) + n129*pow(n191, n21)*(pow(alpha, n1*n24 - n147*n17)*n1*pow(n142, n21)*n17*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n17)*pow(n142, n21)*n27*n40*pow(n45, n21)*n72 + n107*n145*n171 + n137) + n130*pow(n190, n21)*(pow(alpha, n1*n24 - n147*n16)*n1*pow(n142, n21)*n16*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n16)*n108*pow(n142, n21)*pow(n45, n21)*n72 + n107*n145*n165 + n108*n58) + n135*n209 + n136*n208 + n137*n212 + n138*n210 + n139*n214 + n14*pow(n188, n21)*n43*n56*xF[5]*(pow(alpha, NP0*n1 - n14*n147)*n144*n63 + n56*n63) + n140*n213 + n141*n211 + n18*pow(n192, n21)*n43*n99*(pow(alpha, NP0*n1 - n147*n18)*n144*n66 + n60*n66) + pow(n180, n21)*n43*n48*n6*xF[11]*(pow(alpha, NP0*n1 - n147*n6)*n144*n2*n6 + n131) + pow(n180, n21)*n87*xF[11]*(pow(alpha, n1*n24 - n147*n6)*n1*pow(n142, n21)*n27*pow(n45, n21)*n6*n72 - pow(alpha, n1*n24 - n147*n6)*pow(n142, n21)*n27*n29*pow(n45, n21)*n72 + n107*n145*n172 + n136) + pow(n181, n21)*n74*xF[12]*(pow(alpha, n1*n24 - n147*n7)*n114*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n7)*pow(n142, n21)*n20*n27*pow(n45, n21)*n7*n72 + n114*n91 + n145*n163*n20*n44) + pow(n182, n21)*n75*xF[13]*(pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n8 + pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n27*n31*pow(n45, n21)*n72 + n145*n168*n20*n44 + n27*n31*n92) + pow(n189, n21)*n82*xF[6]*(pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n15*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n27*n38*pow(n45, n21)*n72 + n145*n170*n20*n44 + n27*n38*n97) + n21*n216*n279*n82 + n21*n220*n277*n80 + n21*n229*n286 + n215*n86*(pow(alpha, n1*n24 - n12*n147)*n1*n12*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n12*n147)*pow(n142, n21)*n27*n35*pow(n45, n21)*n72 + n107*n145*n169 + n141) + n218*n80*(pow(alpha, n1*n24 - n13*n147)*n13*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n13*n147)*pow(n142, n21)*n27*n36*pow(n45, n21)*n72 + n145*n164*n20*n44 + n27*n36*n95) + n228*n99 + n231*(pow(alpha, n1*n24 - n14*n147)*n1*n14*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n14*n147)*n103*pow(n142, n21)*pow(n45, n21)*n72 + n103*n56 + n107*n145*n176) + n233*(pow(alpha, n1*n24 - n10*n147)*n1*n10*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n10*n147)*n115*pow(n142, n21)*pow(n45, n21)*n72 + n107*n145*n173 + n115*n52) + n21*n282*n85*xF[9]/n207 + n21*n281*n84*xF[8]/n206 + n21*n280*n83*xF[7]/n205 + n21*n276*n79*xF[3]/n201 + n21*n272*n75*xF[13]/n197 + n21*n271*n74*xF[12]/n196 + n21*n270*n73*xF[11]/n195 + n21*n269*n70*xF[10]/n194));
25426 NP_sqrt_base = (NP0*(n25*(n101*n2*n213*n62 + n102*n2*n211*n62 + n104*n2*n210*n62 - n105*pow(n183, n21)*n62*(pow(alpha, NP0*n1 - n147*n9)*n144*n2*n9 + n112*n2) + n109*n2*n209*n62 - n110*pow(n185, n21)*n62*(pow(alpha, NP0*n1 - n11*n147)*n144*n65 + n53*n65) - n111*pow(n178, n21)*n62*(pow(alpha, NP0*n1 - n1*n147)*n144/n100 + n44/n100) + n112*n221*n62 + n124*pow(n181, n21)*n62*(pow(alpha, NP0*n1 - n147*n7)*n144*n2*n7 + n120*n2) + n125*pow(n192, n21)*n62*(pow(alpha, NP0*n1 - n147*n18)*n144*n66 + n60*n66) + n126*n217*n62 + n127*pow(n179, n21)*n62*(pow(alpha, NP0*n1 - n147*n5)*n144*n2*n5 + n116*n2) + n128*pow(n182, n21)*n62*(pow(alpha, NP0*n1 - n147*n8)*n144*n2*n8 + n109*n2) + n129*pow(n191, n21)*n62*(pow(alpha, NP0*n1 - n147*n17)*n144*n17*n2 + n132) + n130*pow(n190, n21)*n62*(pow(alpha, NP0*n1 - n147*n16)*n144*n68 + n58*n68) + n131*n208*n62 + n132*n212*n62 + n134*n62/n181 + pow(n180, n21)*n62*n87*xF[11]*(pow(alpha, NP0*n1 - n147*n6)*n144*n2*n6 + n131) + pow(n189, n21)*n62*n88*xF[6]*(pow(alpha, NP0*n1 - n147*n15)*n144*n15*n2 + n101*n2) + n215*n62*n86*(pow(alpha, NP0*n1 - n12*n147)*n12*n144*n2 + n102*n2) + n218*n62*n89*(pow(alpha, NP0*n1 - n13*n147)*n13*n144*n2 + n104*n2) + n222*n62*n63 + n223*n62*n64 + n224*n62*n68 + n225*n62*n65 + n231*n62*(pow(alpha, NP0*n1 - n14*n147)*n144*n63 + n56*n63) + n233*n62*(pow(alpha, NP0*n1 - n10*n147)*n144*n64 + n52*n64) + n234 + n62*n66*n99/n192) + n321) + n111*n62/n178 + xTj*(-n105*n62/n183 - n110*n62/n185 + n111*n219*n62 - n119*n62/n188 + n124*n62/n181 + n125*n62/n192 + n127*n62/n179 + n128*n62/n182 + n129*n62/n191 + n130*n62/n190 + n208*n62*n87 + n210*n62*n89 + n211*n62*n86 + n213*n62*n88 - n62*n77*xF[1]/n184) + pow(NP0, -n0)*(0.5*n111*n253*n285*n62/n193 - 0.5*n236 - 0.5*n319 + 0.5*n352*xTj - 1.0*n289*n62*n98/n100))*(-n0*n236 - n0*n25*(n105*pow(n183, n21)*n62*(pow(alpha, NP0*n1 - n147*n9)*n145*n20*n9 + pow(alpha, n1*n24 - n147*n9)*n122*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n9)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n9 + n122*n93) - n105*n62*(pow(alpha, NP0*n1 - n147*n9)*n144*n2*n9 + n112*n2)*(pow(alpha, NP0*n1 - n147*n9)*n144*n43*n9 + n112*n43)/n198 + n110*pow(n185, n21)*n62*(pow(alpha, NP0*n1 - n11*n147)*n11*n145*n20 + pow(alpha, n1*n24 - n11*n147)*n11*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n11*n147)*n113*pow(n142, n21)*pow(n45, n21)*n72 + n113*n94) - n110*n62*(pow(alpha, NP0*n1 - n11*n147)*n144*n65 + n53*n65)*(pow(alpha, NP0*n1 - n11*n147)*n11*n144*n43 + n11*n43*n53)/n200 + n111*pow(n178, n21)*n62*(pow(alpha, NP0*n1 - n1*n147)*n106*(-n22 + xPj*xTj)/(n142*n45) + n106*n90) - n111*n62*(pow(alpha, NP0*n1 - n1*n147)*n144/n100 + n44/n100)*(pow(alpha, NP0*n1 - n1*n147)*n0*n144*n2*n20 + n0*n2*n20*n44)/n193 - n119*n62*(pow(alpha, NP0*n1 - n14*n147)*n144*n63 + n56*n63)*(pow(alpha, NP0*n1 - n14*n147)*n14*n144*n43 + n14*n43*n56)/n203 + n124*n62*(pow(alpha, NP0*n1 - n147*n7)*n144*n2*n7 + n120*n2)*(pow(alpha, NP0*n1 - n147*n7)*n144*n43*n7 + n120*n43)/n196 + n125*pow(n192, n21)*n62*(pow(alpha, NP0*n1 - n147*n18)*n1*n145*n18 + pow(alpha, n1*n24 - n147*n18)*n1*pow(n142, n21)*n18*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n18)*pow(n142, n21)*n27*n41*pow(n45, n21)*n72 + n27*n41*n60) + n125*n62*(pow(alpha, NP0*n1 - n147*n18)*n144*n66 + n60*n66)*(pow(alpha, NP0*n1 - n147*n18)*n144*n18*n43 + n18*n43*n60)/n207 + n127*pow(n179, n21)*n62*(pow(alpha, NP0*n1 - n147*n5)*n1*n145*n5 + pow(alpha, n1*n24 - n147*n5)*n1*pow(n142, n21)*n27*pow(n45, n21)*n5*n72 - pow(alpha, n1*n24 - n147*n5)*pow(n142, n21)*n27*n28*pow(n45, n21)*n72 + n139) + n127*n62*(pow(alpha, NP0*n1 - n147*n5)*n144*n2*n5 + n116*n2)*(pow(alpha, NP0*n1 - n147*n5)*n144*n43*n5 + n116*n43)/n194 + n128*n62*(pow(alpha, NP0*n1 - n147*n8)*n144*n2*n8 + n109*n2)*(pow(alpha, NP0*n1 - n147*n8)*n144*n43*n8 + n109*n43)/n197 + n129*pow(n191, n21)*n62*(pow(alpha, NP0*n1 - n147*n17)*n1*n145*n17 + pow(alpha, n1*n24 - n147*n17)*n1*pow(n142, n21)*n17*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n17)*pow(n142, n21)*n27*n40*pow(n45, n21)*n72 + n137) + n129*n62*(pow(alpha, NP0*n1 - n147*n17)*n144*n17*n2 + n132)*(pow(alpha, NP0*n1 - n147*n17)*n144*n17*n43 + n117*n43)/n206 + n130*pow(n190, n21)*n62*(pow(alpha, NP0*n1 - n147*n16)*n1*n145*n16 + pow(alpha, n1*n24 - n147*n16)*n1*pow(n142, n21)*n16*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n16)*n108*pow(n142, n21)*pow(n45, n21)*n72 + n108*n58) + pow(n180, n21)*n62*n87*xF[11]*(pow(alpha, NP0*n1 - n147*n6)*n1*n145*n6 + pow(alpha, n1*n24 - n147*n6)*n1*pow(n142, n21)*n27*pow(n45, n21)*n6*n72 - pow(alpha, n1*n24 - n147*n6)*pow(n142, n21)*n27*n29*pow(n45, n21)*n72 + n136) + pow(n181, n21)*n62*n74*xF[12]*(pow(alpha, NP0*n1 - n147*n7)*n145*n20*n7 + pow(alpha, n1*n24 - n147*n7)*n114*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n7)*pow(n142, n21)*n20*n27*pow(n45, n21)*n7*n72 + n114*n91) + pow(n182, n21)*n62*n75*xF[13]*(pow(alpha, NP0*n1 - n147*n8)*n145*n20*n8 + pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n8 + pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n27*n31*pow(n45, n21)*n72 + n27*n31*n92) + pow(n189, n21)*n62*n82*xF[6]*(pow(alpha, NP0*n1 - n147*n15)*n145*n15*n20 + pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n15*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n27*n38*pow(n45, n21)*n72 + n27*n38*n97) + n215*n62*n86*(pow(alpha, NP0*n1 - n12*n147)*n1*n12*n145 + pow(alpha, n1*n24 - n12*n147)*n1*n12*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n12*n147)*pow(n142, n21)*n27*n35*pow(n45, n21)*n72 + n141) + n216*n62*n88*(pow(alpha, NP0*n1 - n147*n15)*n144*n15*n2 + n101*n2)*(pow(alpha, NP0*n1 - n147*n15)*n144*n15*n43 + n101*n43) + n218*n62*n80*(pow(alpha, NP0*n1 - n13*n147)*n13*n145*n20 + pow(alpha, n1*n24 - n13*n147)*n13*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n13*n147)*pow(n142, n21)*n27*n36*pow(n45, n21)*n72 + n27*n36*n95) + n220*n62*n89*(pow(alpha, NP0*n1 - n13*n147)*n13*n144*n2 + n104*n2)*(pow(alpha, NP0*n1 - n13*n147)*n13*n144*n43 + n104*n43) - n229*n62*xF[1]*(pow(alpha, NP0*n1 - n10*n147)*n144*n64 + n52*n64)*(pow(alpha, NP0*n1 - n10*n147)*n10*n144*n43 + n118*n43) + n231*n62*(pow(alpha, NP0*n1 - n14*n147)*n1*n14*n145 + pow(alpha, n1*n24 - n14*n147)*n1*n14*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n14*n147)*n103*pow(n142, n21)*pow(n45, n21)*n72 + n103*n56) + n232*n62*(pow(alpha, NP0*n1 - n147*n16)*n144*n68 + n58*n68)*(pow(alpha, NP0*n1 - n147*n16)*n144*n16*n43 + n121*n43) + n233*n62*(pow(alpha, NP0*n1 - n10*n147)*n1*n10*n145 + pow(alpha, n1*n24 - n10*n147)*n1*n10*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n10*n147)*n115*pow(n142, n21)*pow(n45, n21)*n72 + n115*n52) + n236 + n237 + n238 + n239 + n240 + n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n317 + n62*n86*xF[3]*(pow(alpha, NP0*n1 - n12*n147)*n12*n144*n2 + n102*n2)*(pow(alpha, NP0*n1 - n12*n147)*n12*n144*n43 + n102*n43)/n201 + n62*n87*xF[11]*(pow(alpha, NP0*n1 - n147*n6)*n144*n2*n6 + n131)*(pow(alpha, NP0*n1 - n147*n6)*n144*n43*n6 + n43*n48*n6)/n195) - n0*n319 - 4.0*n111*n298*n62 + 4.0*n289*n62*n98/n100) + pow(-n111*n289*n62 - n235 - n24*(0.5*n111*pow(n178, n21)*n62*(pow(alpha, NP0*n1 - n1*n147)*n106*(-n22 + xPj*xTj)/(n142*n45) + n106*n90) - 0.5*n111*n62*(pow(alpha, NP0*n1 - n1*n147)*n144/n100 + n44/n100)*(pow(alpha, NP0*n1 - n1*n147)*n0*n144*n2*n20 + n0*n2*n20*n44)/n193 + n251 - 0.5*xTj*(n105*pow(n183, n21)*n62*(pow(alpha, NP0*n1 - n147*n9)*n145*n20*n9 + pow(alpha, n1*n24 - n147*n9)*n122*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n9)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n9 + n122*n93) - n105*n62*(pow(alpha, NP0*n1 - n147*n9)*n144*n2*n9 + n112*n2)*(pow(alpha, NP0*n1 - n147*n9)*n144*n43*n9 + n112*n43)/n198 + n110*pow(n185, n21)*n62*(pow(alpha, NP0*n1 - n11*n147)*n11*n145*n20 + pow(alpha, n1*n24 - n11*n147)*n11*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n11*n147)*n113*pow(n142, n21)*pow(n45, n21)*n72 + n113*n94) - n110*n62*(pow(alpha, NP0*n1 - n11*n147)*n144*n65 + n53*n65)*(pow(alpha, NP0*n1 - n11*n147)*n11*n144*n43 + n11*n43*n53)/n200 + n111*pow(n178, n21)*n62*(pow(alpha, NP0*n1 - n1*n147)*n106*(-n22 + xPj*xTj)/(n142*n45) + n106*n90) - n111*n62*(pow(alpha, NP0*n1 - n1*n147)*n144/n100 + n44/n100)*(pow(alpha, NP0*n1 - n1*n147)*n0*n144*n2*n20 + n0*n2*n20*n44)/n193 - n119*n62*(pow(alpha, NP0*n1 - n14*n147)*n144*n63 + n56*n63)*(pow(alpha, NP0*n1 - n14*n147)*n14*n144*n43 + n14*n43*n56)/n203 + n124*n62*(pow(alpha, NP0*n1 - n147*n7)*n144*n2*n7 + n120*n2)*(pow(alpha, NP0*n1 - n147*n7)*n144*n43*n7 + n120*n43)/n196 + n125*pow(n192, n21)*n62*(pow(alpha, NP0*n1 - n147*n18)*n1*n145*n18 + pow(alpha, n1*n24 - n147*n18)*n1*pow(n142, n21)*n18*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n18)*pow(n142, n21)*n27*n41*pow(n45, n21)*n72 + n27*n41*n60) + n125*n62*(pow(alpha, NP0*n1 - n147*n18)*n144*n66 + n60*n66)*(pow(alpha, NP0*n1 - n147*n18)*n144*n18*n43 + n18*n43*n60)/n207 + n127*pow(n179, n21)*n62*(pow(alpha, NP0*n1 - n147*n5)*n1*n145*n5 + pow(alpha, n1*n24 - n147*n5)*n1*pow(n142, n21)*n27*pow(n45, n21)*n5*n72 - pow(alpha, n1*n24 - n147*n5)*pow(n142, n21)*n27*n28*pow(n45, n21)*n72 + n139) + n127*n62*(pow(alpha, NP0*n1 - n147*n5)*n144*n2*n5 + n116*n2)*(pow(alpha, NP0*n1 - n147*n5)*n144*n43*n5 + n116*n43)/n194 + n128*n62*(pow(alpha, NP0*n1 - n147*n8)*n144*n2*n8 + n109*n2)*(pow(alpha, NP0*n1 - n147*n8)*n144*n43*n8 + n109*n43)/n197 + n129*pow(n191, n21)*n62*(pow(alpha, NP0*n1 - n147*n17)*n1*n145*n17 + pow(alpha, n1*n24 - n147*n17)*n1*pow(n142, n21)*n17*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n17)*pow(n142, n21)*n27*n40*pow(n45, n21)*n72 + n137) + n129*n62*(pow(alpha, NP0*n1 - n147*n17)*n144*n17*n2 + n132)*(pow(alpha, NP0*n1 - n147*n17)*n144*n17*n43 + n117*n43)/n206 + n130*pow(n190, n21)*n62*(pow(alpha, NP0*n1 - n147*n16)*n1*n145*n16 + pow(alpha, n1*n24 - n147*n16)*n1*pow(n142, n21)*n16*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n147*n16)*n108*pow(n142, n21)*pow(n45, n21)*n72 + n108*n58) + pow(n180, n21)*n62*n87*xF[11]*(pow(alpha, NP0*n1 - n147*n6)*n1*n145*n6 + pow(alpha, n1*n24 - n147*n6)*n1*pow(n142, n21)*n27*pow(n45, n21)*n6*n72 - pow(alpha, n1*n24 - n147*n6)*pow(n142, n21)*n27*n29*pow(n45, n21)*n72 + n136) + pow(n181, n21)*n62*n74*xF[12]*(pow(alpha, NP0*n1 - n147*n7)*n145*n20*n7 + pow(alpha, n1*n24 - n147*n7)*n114*pow(n142, n21)*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n7)*pow(n142, n21)*n20*n27*pow(n45, n21)*n7*n72 + n114*n91) + pow(n182, n21)*n62*n75*xF[13]*(pow(alpha, NP0*n1 - n147*n8)*n145*n20*n8 + pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n20*n27*pow(n45, n21)*n72*n8 + pow(alpha, n1*n24 - n147*n8)*pow(n142, n21)*n27*n31*pow(n45, n21)*n72 + n27*n31*n92) + pow(n189, n21)*n62*n82*xF[6]*(pow(alpha, NP0*n1 - n147*n15)*n145*n15*n20 + pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n15*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n147*n15)*pow(n142, n21)*n27*n38*pow(n45, n21)*n72 + n27*n38*n97) + n215*n62*n86*(pow(alpha, NP0*n1 - n12*n147)*n1*n12*n145 + pow(alpha, n1*n24 - n12*n147)*n1*n12*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n12*n147)*pow(n142, n21)*n27*n35*pow(n45, n21)*n72 + n141) + n216*n62*n88*(pow(alpha, NP0*n1 - n147*n15)*n144*n15*n2 + n101*n2)*(pow(alpha, NP0*n1 - n147*n15)*n144*n15*n43 + n101*n43) + n218*n62*n80*(pow(alpha, NP0*n1 - n13*n147)*n13*n145*n20 + pow(alpha, n1*n24 - n13*n147)*n13*pow(n142, n21)*n20*n27*pow(n45, n21)*n72 + pow(alpha, n1*n24 - n13*n147)*pow(n142, n21)*n27*n36*pow(n45, n21)*n72 + n27*n36*n95) + n220*n62*n89*(pow(alpha, NP0*n1 - n13*n147)*n13*n144*n2 + n104*n2)*(pow(alpha, NP0*n1 - n13*n147)*n13*n144*n43 + n104*n43) - n229*n62*xF[1]*(pow(alpha, NP0*n1 - n10*n147)*n144*n64 + n52*n64)*(pow(alpha, NP0*n1 - n10*n147)*n10*n144*n43 + n118*n43) + n231*n62*(pow(alpha, NP0*n1 - n14*n147)*n1*n14*n145 + pow(alpha, n1*n24 - n14*n147)*n1*n14*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n14*n147)*n103*pow(n142, n21)*pow(n45, n21)*n72 + n103*n56) + n232*n62*(pow(alpha, NP0*n1 - n147*n16)*n144*n68 + n58*n68)*(pow(alpha, NP0*n1 - n147*n16)*n144*n16*n43 + n121*n43) + n233*n62*(pow(alpha, NP0*n1 - n10*n147)*n1*n10*n145 + pow(alpha, n1*n24 - n10*n147)*n1*n10*pow(n142, n21)*n27*pow(n45, n21)*n72 - pow(alpha, n1*n24 - n10*n147)*n115*pow(n142, n21)*pow(n45, n21)*n72 + n115*n52) + n236 + n237 + n238 + n239 + n240 + n241 + n242 + n243 + n244 + n245 + n246 + n247 + n248 + n249 + n250 + n303 + n304 + n305 + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n317 + n62*n86*xF[3]*(pow(alpha, NP0*n1 - n12*n147)*n12*n144*n2 + n102*n2)*(pow(alpha, NP0*n1 - n12*n147)*n12*n144*n43 + n102*n43)/n201 + n62*n87*xF[11]*(pow(alpha, NP0*n1 - n147*n6)*n144*n2*n6 + n131)*(pow(alpha, NP0*n1 - n147*n6)*n144*n43*n6 + n43*n48*n6)/n195) + 1.0*pow(n178, n21)*n62*n98*(pow(alpha, NP0*n1 - n1*n147)*n144/n100 + n44/n100)/n100) - n350, -n0);
25427 NP_sqrt_base = fabs(NP_sqrt_base);
25428 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
25429 NT1 = n100*(n143 - log(-pow(alpha, NP1*n1)*n133 + 1));
25430 g0 = MW[1] - Mstar;
25431 g1 = MW[0] - Mstar;
25434 g4 = MW[10] - Mstar;
25435 g5 = MW[11] - Mstar;
25436 g6 = MW[12] - Mstar;
25437 g7 = MW[13] - Mstar;
25438 g8 = MW[14] - Mstar;
25439 g9 = MW[2] - Mstar;
25440 g10 = MW[3] - Mstar;
25441 g11 = MW[4] - Mstar;
25442 g12 = MW[5] - Mstar;
25443 g13 = MW[6] - Mstar;
25444 g14 = MW[7] - Mstar;
25445 g15 = MW[8] - Mstar;
25446 g16 = MW[9] - Mstar;
25451 g21 = pow(alpha, -g1);
25452 g22 = pow(alpha, -g4);
25453 g23 = pow(alpha, -g5);
25454 g24 = pow(alpha, -g6);
25455 g25 = pow(alpha, -g7);
25456 g26 = pow(alpha, -g8);
25457 g27 = pow(alpha, -g0);
25458 g28 = pow(alpha, -g9);
25459 g29 = pow(alpha, -g10);
25460 g30 = pow(alpha, -g11);
25461 g31 = pow(alpha, -g12);
25462 g32 = pow(alpha, -g13);
25463 g33 = pow(alpha, -g14);
25464 g34 = pow(alpha, -g15);
25465 g35 = pow(alpha, -g16);
25466 g36 = log(xF[0]/xF[1]);
25468 g38 = pow(alpha, NP1*g0);
25469 g39 = pow(alpha, NP1*g1);
25470 g40 = pow(alpha, NP1*g4);
25472 g42 = pow(alpha, NP1*g5);
25473 g43 = pow(alpha, NP1*g6);
25474 g44 = pow(alpha, NP1*g7);
25475 g45 = pow(alpha, NP1*g8);
25476 g46 = pow(alpha, NP1*g9);
25477 g47 = pow(alpha, NP1*g10);
25478 g48 = pow(alpha, NP1*g11);
25479 g49 = pow(alpha, NP1*g12);
25480 g50 = pow(alpha, NP1*g13);
25481 g51 = pow(alpha, NP1*g14);
25482 g52 = pow(alpha, NP1*g15);
25483 g53 = pow(alpha, NP1*g16);
25519 g89 = g18/(g3*xF[1]);
25520 g90 = pow(alpha, g0*g37) - 1;
25521 g91 = pow(alpha, g0*g37) - 1;
25522 g92 = pow(alpha, g1*g37) - 1;
25523 g93 = pow(alpha, g37*g9) - 1;
25524 g94 = pow(alpha, g10*g37) - 1;
25525 g95 = pow(alpha, g11*g37) - 1;
25526 g96 = pow(alpha, g12*g37) - 1;
25527 g97 = pow(alpha, g13*g37) - 1;
25528 g98 = pow(alpha, g14*g37) - 1;
25529 g99 = pow(alpha, g15*g37) - 1;
25530 g100 = pow(alpha, g16*g37) - 1;
25531 g101 = pow(alpha, g37*g4) - 1;
25532 g102 = pow(alpha, g37*g5) - 1;
25533 g103 = pow(alpha, g37*g6) - 1;
25534 g104 = pow(alpha, g37*g7) - 1;
25535 g105 = pow(alpha, g37*g8) - 1;
25536 g106 = -pow(alpha, g1*g37);
25537 g107 = -pow(alpha, g37*g4);
25538 g108 = -pow(alpha, g37*g5);
25539 g109 = -pow(alpha, g37*g6);
25540 g110 = -pow(alpha, g37*g7);
25541 g111 = -pow(alpha, g37*g8);
25542 g112 = -pow(alpha, g37*g9);
25543 g113 = -pow(alpha, g10*g37);
25544 g114 = -pow(alpha, g11*g37);
25545 g115 = -pow(alpha, g12*g37);
25546 g116 = -pow(alpha, g13*g37);
25547 g117 = -pow(alpha, g14*g37);
25548 g118 = -pow(alpha, g15*g37);
25549 g119 = -pow(alpha, g16*g37);
25551 g121 = -g106 - g39;
25552 g122 = -g107 - g40;
25553 g123 = -g108 - g42;
25554 g124 = -g109 - g43;
25555 g125 = -g110 - g44;
25556 g126 = -g111 - g45;
25557 g127 = -g112 - g46;
25558 g128 = -g113 - g47;
25559 g129 = -g114 - g48;
25560 g130 = -g115 - g49;
25561 g131 = -g116 - g50;
25562 g132 = -g117 - g51;
25563 g133 = -g118 - g52;
25564 g134 = -g119 - g53;
25565 g135 = pow(alpha, g1*g37) + g73;
25567 g137 = pow(alpha, g37*g4) + g74;
25568 g138 = pow(alpha, g37*g5) + g75;
25569 g139 = pow(alpha, g37*g6) + g76;
25570 g140 = pow(alpha, g37*g7) + g77;
25571 g141 = pow(alpha, g37*g8) + g78;
25572 g142 = pow(alpha, g37*g9) + g79;
25573 g143 = pow(alpha, g10*g37) + g80;
25574 g144 = pow(alpha, g11*g37) + g81;
25575 g145 = pow(alpha, g12*g37) + g82;
25576 g146 = pow(alpha, g13*g37) + g83;
25577 g147 = pow(alpha, g14*g37) + g84;
25578 g148 = pow(alpha, g15*g37) + g85;
25579 g149 = pow(alpha, g16*g37) + g86;
25580 g150 = xF[11]/g138;
25584 g154 = xF[10]/g137;
25588 g158 = xF[12]/g139;
25589 g159 = xF[13]/g140;
25591 g161 = xF[14]/g141;
25600 g170 = xF[11]/g123;
25601 g171 = xF[13]/g125;
25604 g174 = xF[14]/g126;
25606 g176 = xF[12]/g124;
25607 g177 = xF[10]/g122;
25640 g210 = log(g136*g19*g89/g58);
25641 g211 = log(g120*g19*g89/g57);
25642 g212 = log(g136*g20*g55/g91);
25644 g214 = log(g120*g20*g55/g90);
25646 g216 = -g150*g213*(g75 + 1) - g150*g215*(pow(alpha, g37*g5) - 1) - g151*g213*(g86 + 1) - g151*g215*(pow(alpha, g16*g37) - 1) - g152*g213*(g85 + 1) - g152*g215*(pow(alpha, g15*g37) - 1) - g153*g213*g58 - g153*g215*g91 - g154*g213*(g74 + 1) - g154*g215*(pow(alpha, g37*g4) - 1) - g155*g213*(g80 + 1) - g155*g215*(pow(alpha, g10*g37) - 1) - g156*g213*(g84 + 1) - g156*g215*(pow(alpha, g14*g37) - 1) - g157*g213*(g81 + 1) - g157*g215*(pow(alpha, g11*g37) - 1) - g158*g213*(g76 + 1) - g158*g215*(pow(alpha, g37*g6) - 1) - g159*g213*(g77 + 1) - g159*g215*(pow(alpha, g37*g7) - 1) - g160*g213*(g83 + 1) - g160*g215*(pow(alpha, g13*g37) - 1) - g161*g213*(g78 + 1) - g161*g215*(pow(alpha, g37*g8) - 1) - g162*g213*(g82 + 1) - g162*g215*(pow(alpha, g12*g37) - 1) - g163*g213*(g79 + 1) - g163*g215*(pow(alpha, g37*g9) - 1) - g164*g213*(g73 + 1) - g164*g215*(pow(alpha, g1*g37) - 1) - g87*xF[0] - g87*xF[10] - g87*xF[11] - g87*xF[12] - g87*xF[13] - g87*xF[14] - g87*xF[1] - g87*xF[2] - g87*xF[3] - g87*xF[4] - g87*xF[5] - g87*xF[6] - g87*xF[7] - g87*xF[8] - g87*xF[9];
25647 LpF = xF[0]*(g21 + 1.0)*(g184*g211 + g196*g214 + g54)/(g41*(g21 - 1.0)) + xF[10]*(g22 + 1.0)*(g193*g211 + g208*g214 + g54)/(g41*(g22 - 1.0)) + xF[11]*(g23 + 1.0)*(g190*g211 + g197*g214 + g54)/(g41*(g23 - 1.0)) + xF[12]*(g24 + 1.0)*(g186*g211 + g205*g214 + g54)/(g41*(g24 - 1.0)) + xF[13]*(g25 + 1.0)*(g187*g211 + g206*g214 + g54)/(g41*(g25 - 1.0)) + xF[14]*(g26 + 1.0)*(g192*g211 + g204*g214 + g54)/(g41*(g26 - 1.0)) + xF[1]*(g27 + 1.0)*(g189*g211 + g195*g214 + g54)/(g41*(g27 - 1.0)) + xF[2]*(g28 + 1.0)*(g191*g211 + g198*g214 + g54)/(g41*(g28 - 1.0)) + xF[3]*(g29 + 1.0)*(g188*g211 + g199*g214 + g54)/(g41*(g29 - 1.0)) + xF[4]*(g30 + 1.0)*(g182*g211 + g200*g214 + g54)/(g41*(g30 - 1.0)) + xF[5]*(g31 + 1.0)*(g185*g211 + g209*g214 + g54)/(g41*(g31 - 1.0)) + xF[6]*(g32 + 1.0)*(g180*g211 + g203*g214 + g54)/(g41*(g32 - 1.0)) + xF[7]*(g33 + 1.0)*(g183*g211 + g207*g214 + g54)/(g41*(g33 - 1.0)) + xF[8]*(g34 + 1.0)*(g194*g211 + g201*g214 + g54)/(g41*(g34 - 1.0)) + xF[9]*(g35 + 1.0)*(g181*g211 + g202*g214 + g54)/(g41*(g35 - 1.0));
25652 xP[0] = g166*g56*g92;
25653 xP[1] = g165*g56*g90;
25654 xP[2] = g169*g56*g93;
25655 xP[3] = g172*g56*g94;
25656 xP[4] = g167*g56*g95;
25657 xP[5] = g179*g56*g96;
25658 xP[6] = g173*g56*g97;
25659 xP[7] = g168*g56*g98;
25660 xP[8] = g175*g56*g99;
25661 xP[9] = g100*g178*g56;
25662 xP[10] = g101*g177*g56;
25663 xP[11] = g102*g170*g56;
25664 xP[12] = g103*g176*g56;
25665 xP[13] = g104*g171*g56;
25666 xP[14] = g105*g174*g56;
25667 xT[0] = g166*g59*g88;
25668 xT[1] = g165*g57*g88;
25669 xT[2] = g169*g60*g88;
25670 xT[3] = g172*g61*g88;
25671 xT[4] = g167*g62*g88;
25672 xT[5] = g179*g63*g88;
25673 xT[6] = g173*g64*g88;
25674 xT[7] = g168*g65*g88;
25675 xT[8] = g175*g66*g88;
25676 xT[9] = g178*g67*g88;
25677 xT[10] = g177*g68*g88;
25678 xT[11] = g170*g69*g88;
25679 xT[12] = g176*g70*g88;
25680 xT[13] = g171*g71*g88;
25681 xT[14] = g174*g72*g88;
25684 n0 = -2.00000000000000;
25685 n1 = MW[0] - Mstar;
25689 n5 = MW[10] - Mstar;
25690 n6 = MW[11] - Mstar;
25691 n7 = MW[12] - Mstar;
25692 n8 = MW[13] - Mstar;
25693 n9 = MW[14] - Mstar;
25694 n10 = MW[15] - Mstar;
25695 n11 = MW[1] - Mstar;
25696 n12 = MW[2] - Mstar;
25697 n13 = MW[3] - Mstar;
25698 n14 = MW[4] - Mstar;
25699 n15 = MW[5] - Mstar;
25700 n16 = MW[6] - Mstar;
25701 n17 = MW[7] - Mstar;
25702 n18 = MW[8] - Mstar;
25703 n19 = MW[9] - Mstar;
25712 n28 = pow(n1, -n0);
25713 n29 = pow(n2, -n0);
25714 n30 = pow(n5, -n0);
25715 n31 = pow(n6, -n0);
25716 n32 = pow(n7, -n0);
25717 n33 = pow(n8, -n0);
25718 n34 = pow(n9, -n0);
25719 n35 = pow(n10, -n0);
25720 n36 = pow(n11, -n0);
25721 n37 = pow(n12, -n0);
25722 n38 = pow(n13, -n0);
25723 n39 = pow(n14, -n0);
25724 n40 = pow(n15, -n0);
25725 n41 = pow(n16, -n0);
25726 n42 = pow(n17, -n0);
25727 n43 = pow(n18, -n0);
25728 n44 = pow(n19, -n0);
25733 n49 = pow(alpha, n47);
25734 n50 = n23 + n25*xF[0];
25735 n51 = n23 + n25*xPj;
25736 n52 = pow(alpha, NP0*n5);
25737 n53 = pow(alpha, NP0*n6);
25738 n54 = pow(alpha, NP0*n7);
25739 n55 = pow(alpha, NP0*n8);
25740 n56 = pow(alpha, NP0*n9);
25741 n57 = pow(alpha, NP0*n10);
25742 n58 = pow(alpha, NP0*n11);
25743 n59 = pow(alpha, NP0*n12);
25744 n60 = pow(alpha, NP0*n13);
25745 n61 = pow(alpha, NP0*n14);
25746 n62 = pow(alpha, NP0*n15);
25747 n63 = pow(alpha, NP0*n16);
25748 n64 = pow(alpha, NP0*n17);
25749 n65 = pow(alpha, NP0*n18);
25750 n66 = pow(alpha, NP0*n19);
25762 n78 = pow(alpha, NP0*n0*n21);
25763 n79 = pow(n51, -n0);
25813 n129 = log((-1.0 + xPj/xF[0])/n3);
25814 n130 = -n84*xF[15];
25815 n131 = -n81*xF[12];
25817 n133 = n19*n66*xF[9];
25818 n134 = -n82*xF[13];
25822 n138 = n29*n33*n55;
25823 n139 = n29*n31*n53;
25824 n140 = n29*n43*n65;
25825 n141 = n29*n32*n54;
25826 n142 = n29*n30*n52;
25827 n143 = n29*n38*n60;
25828 n144 = n121*n49*xF[0];
25829 n145 = n137*n98 + 1;
25830 n146 = n129 + n20 + n45 + n67;
25831 n147 = n137*n49/n145;
25832 n148 = n107*(n146 - log(n145)) + 1;
25833 n149 = pow(alpha, n1*n148);
25834 n150 = pow(alpha, n148*n5);
25835 n151 = pow(alpha, n148*n6);
25836 n152 = pow(alpha, n148*n7);
25837 n153 = pow(alpha, n148*n8);
25838 n154 = pow(alpha, n148*n9);
25839 n155 = pow(alpha, n10*n148);
25840 n156 = pow(alpha, n11*n148);
25841 n157 = pow(alpha, n12*n148);
25842 n158 = pow(alpha, n13*n148);
25843 n159 = pow(alpha, n14*n148);
25844 n160 = pow(alpha, n148*n15);
25845 n161 = pow(alpha, n148*n16);
25846 n162 = pow(alpha, n148*n17);
25847 n163 = pow(alpha, n148*n18);
25848 n164 = pow(alpha, n148*n19);
25865 n181 = pow(alpha, n148*n21) + n76 - 1;
25866 n182 = n77 - 1 + 1.0/n150;
25867 n183 = n80 - 1 + 1.0/n151;
25868 n184 = n81 - 1 + 1.0/n152;
25869 n185 = n82 - 1 + 1.0/n153;
25870 n186 = n83 - 1 + 1.0/n154;
25871 n187 = n84 - 1 + 1.0/n155;
25872 n188 = n85 - 1 + 1.0/n156;
25873 n189 = n86 - 1 + 1.0/n157;
25874 n190 = n87 - 1 + 1.0/n158;
25875 n191 = n88 - 1 + 1.0/n159;
25876 n192 = n89 - 1 + 1.0/n160;
25877 n193 = n90 - 1 + 1.0/n161;
25878 n194 = n91 - 1 + 1.0/n162;
25879 n195 = n92 - 1 + 1.0/n163;
25880 n196 = n93 - 1 + 1.0/n164;
25881 n197 = pow(n181, 3);
25882 n198 = pow(n182, 3);
25883 n199 = pow(n183, 3);
25884 n200 = pow(n184, 3);
25885 n201 = pow(n185, 3);
25886 n202 = pow(n186, 3);
25887 n203 = pow(n187, 3);
25888 n204 = pow(n188, 3);
25889 n205 = pow(n189, 3);
25890 n206 = pow(n190, 3);
25891 n207 = pow(n191, 3);
25892 n208 = pow(n192, 3);
25893 n209 = pow(n193, 3);
25894 n210 = pow(n194, 3);
25895 n211 = pow(n195, 3);
25896 n212 = pow(n196, 3);
25897 n213 = xF[11]/n183;
25898 n214 = xF[12]/n184;
25900 n216 = xF[10]/n182;
25901 n217 = xF[13]/n185;
25906 n222 = pow(n190, n22)*xF[3];
25908 n224 = pow(n182, n22)*xF[10];
25909 n225 = xF[10]/n198;
25910 n226 = n2*xF[14]/n186;
25911 n227 = n2*xF[4]/n191;
25913 n229 = pow(n181, n22)*n2;
25914 n230 = n2*xF[6]/n193;
25915 n231 = n62*xF[5]/n192;
25916 n232 = n58*xF[1]/n188;
25917 n233 = n64*xF[7]/n194;
25918 n234 = n59*xF[2]/n189;
25919 n235 = n57*xF[15]/n187;
25920 n236 = n56*xF[14]/n186;
25922 n238 = -pow(n181, n22)*n76;
25923 n239 = n76*xF[0]/n197;
25924 n240 = pow(n191, n22)*n88*xF[4];
25925 n241 = n88*xF[4]/n207;
25926 n242 = -n122*pow(n192, n22);
25927 n243 = -n91*xF[7]/n210;
25928 n244 = -pow(n188, n22)*n85*xF[1];
25929 n245 = -pow(n194, n22)*n91*xF[7];
25930 n246 = -pow(n195, n22)*n92*xF[8];
25931 n247 = n218*n29*n44*n66;
25932 n248 = n29*n39*n61*xF[4]/n191;
25933 n249 = n29*n41*n63*xF[6]/n193;
25934 n250 = n2*n21*n220*n49*n68;
25935 n251 = n144*n68/n181;
25936 n252 = n142*n216*n68;
25937 n253 = n139*n213*n68;
25938 n254 = n141*n214*n68;
25939 n255 = n138*n217*n68;
25940 n256 = n126*n236*n68;
25941 n257 = n119*n235*n68;
25942 n258 = n123*n232*n68;
25943 n259 = n120*n234*n68;
25944 n260 = n143*n221*n68;
25946 n262 = n111*n231*n68;
25948 n264 = n115*n233*n68;
25949 n265 = n140*n219*n68;
25951 n267 = n144*n215*n68;
25952 n268 = n137/(n145*n149);
25955 n271 = n110*n2*n268 + n110*n2;
25956 n272 = n114*n2 + n147*n179*n2;
25957 n273 = n135 + n147*n172*n2;
25958 n274 = n147*n70/n152 + n54*n70;
25959 n275 = n116*n2 + n147*n167*n2;
25960 n276 = n113*n2 + n147*n170*n2;
25961 n277 = n147*n74/n155 + n57*n74;
25962 n278 = n147*n71/n156 + n58*n71;
25963 n279 = n147*n73/n157 + n59*n73;
25964 n280 = n109*n2 + n147*n168*n2;
25965 n281 = n112*n2 + n147*n165*n2;
25966 n282 = n147*n69/n160 + n62*n69;
25967 n283 = n108*n2 + n147*n169*n2;
25968 n284 = n147*n75/n162 + n64*n75;
25969 n285 = n136 + n147*n171*n2;
25970 n286 = n147*n72/n164 + n66*n72;
25971 n287 = pow(n271, -n0);
25972 n288 = pow(n272, -n0);
25973 n289 = pow(n273, -n0);
25974 n290 = pow(n274, -n0);
25975 n291 = pow(n275, -n0);
25976 n292 = pow(n276, -n0);
25977 n293 = pow(n277, -n0);
25978 n294 = pow(n278, -n0);
25979 n295 = pow(n279, -n0);
25980 n296 = pow(n280, -n0);
25981 n297 = pow(n281, -n0);
25982 n298 = pow(n282, -n0);
25983 n299 = pow(n283, -n0);
25984 n300 = pow(n284, -n0);
25985 n301 = pow(n285, -n0);
25986 n302 = pow(n286, -n0);
25988 n304 = n273*xF[11];
25991 n307 = n0*n147*n2*n21/n149 + n0*n2*n21*n49;
25993 n309 = n121*n268*n98 + n121*n98;
25994 n310 = pow(n184, n22)*n274;
25995 n311 = pow(n196, n22)*n286;
25996 n312 = pow(n185, n22)*n275;
25997 n313 = pow(n186, n22)*n276;
25998 n314 = pow(n187, n22)*n277;
25999 n315 = pow(n193, n22)*n283*xF[6];
26003 n319 = pow(n181, n22)*n309*xF[0];
26004 n320 = n301*n92*xF[8]/n211;
26005 n321 = n289*n80*xF[11]/n199;
26006 n322 = pow(n181, n22)*n303*n68*n76;
26007 n323 = n0*n21*n229*n49*n68*xF[0]*(pow(alpha, n148*n21 + n47)*n1*n137*n2/n145 + n110*n2);
26008 n324 = n114*n224*n46*n68*(pow(alpha, -n148*n5 + n47)*n137*n2*n5/n145 + n114*n2);
26009 n325 = pow(n183, n22)*n46*n53*n6*n68*xF[11]*(pow(alpha, -n148*n6 + n47)*n137*n2*n6/n145 + n135);
26010 n326 = pow(n184, n22)*n46*n54*n68*n7*xF[12]*(pow(alpha, -n148*n7 + n47)*n137*n70/n145 + n54*n70);
26011 n327 = n116*pow(n185, n22)*n46*n68*xF[13]*(pow(alpha, -n148*n8 + n47)*n137*n2*n8/n145 + n116*n2);
26012 n328 = n113*pow(n186, n22)*n46*n68*xF[14]*(pow(alpha, -n148*n9 + n47)*n137*n2*n9/n145 + n113*n2);
26013 n329 = n127*pow(n187, n22)*n46*n68*xF[15]*(pow(alpha, -n10*n148 + n47)*n137*n74/n145 + n57*n74);
26014 n330 = n124*pow(n188, n22)*n46*n68*xF[1]*(pow(alpha, -n11*n148 + n47)*n137*n71/n145 + n58*n71);
26015 n331 = n12*pow(n189, n22)*n46*n59*n68*xF[2]*(pow(alpha, -n12*n148 + n47)*n137*n73/n145 + n59*n73);
26016 n332 = n109*n222*n46*n68*(pow(alpha, -n13*n148 + n47)*n13*n137*n2/n145 + n109*n2);
26017 n333 = n112*pow(n191, n22)*n46*n68*xF[4]*(pow(alpha, -n14*n148 + n47)*n137*n14*n2/n145 + n112*n2);
26018 n334 = n15*pow(n192, n22)*n46*n62*n68*xF[5]*(pow(alpha, -n148*n15 + n47)*n137*n69/n145 + n62*n69);
26019 n335 = n108*pow(n193, n22)*n46*n68*xF[6]*(pow(alpha, -n148*n16 + n47)*n137*n16*n2/n145 + n108*n2);
26020 n336 = n125*pow(n194, n22)*n46*n68*xF[7]*(pow(alpha, -n148*n17 + n47)*n137*n75/n145 + n64*n75);
26021 n337 = n128*pow(n195, n22)*n46*n68*xF[8]*(pow(alpha, -n148*n18 + n47)*n137*n18*n2/n145 + n136);
26022 n338 = n133*pow(n196, n22)*n46*n68*(pow(alpha, -n148*n19 + n47)*n137*n72/n145 + n66*n72);
26023 n339 = 1.0*n110*n229*n303*n68;
26024 n340 = n319*n68*n76;
26026 n342 = pow(alpha, n1*n27)*n106*pow(n145, n22)*n172*pow(n50, n22)*n79 - pow(alpha, n1*n27)*pow(n145, n22)*n29*n31*pow(n50, n22)*n79/n151 + n106*n147*n172 + n139;
26027 n343 = pow(alpha, n1*n27)*n106*pow(n145, n22)*n177*pow(n50, n22)*n79 - pow(alpha, n1*n27)*pow(n145, n22)*n29*n32*pow(n50, n22)*n79/n152 + n106*n147*n177 + n141;
26028 n344 = pow(alpha, n1*n27)*pow(n145, n22)*n167*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27)*pow(n145, n22)*n29*n33*pow(n50, n22)*n79/n153 + n100*n29*n33 + n147*n167*n21*n29;
26029 n345 = pow(alpha, n1*n27)*n126*pow(n145, n22)*pow(n50, n22)*n79/n154 + pow(alpha, n1*n27)*pow(n145, n22)*n170*n21*n29*pow(n50, n22)*n79 + n101*n126 + n147*n170*n21*n29;
26030 n346 = pow(alpha, n1*n27)*n106*pow(n145, n22)*n176*pow(n50, n22)*n79 - pow(alpha, n1*n27)*n119*pow(n145, n22)*pow(n50, n22)*n79/n155 + n106*n147*n176 + n119*n57;
26031 n347 = pow(alpha, n1*n27)*n120*pow(n145, n22)*pow(n50, n22)*n79/n157 + pow(alpha, n1*n27)*pow(n145, n22)*n174*n21*n29*pow(n50, n22)*n79 + n102*n120 + n147*n174*n21*n29;
26032 n348 = pow(alpha, n1*n27)*pow(n145, n22)*n169*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27)*pow(n145, n22)*n29*n41*pow(n50, n22)*n79/n161 + n105*n29*n41 + n147*n169*n21*n29;
26033 n349 = pow(alpha, n1*n27)*n106*pow(n145, n22)*n178*pow(n50, n22)*n79 - pow(alpha, n1*n27)*pow(n145, n22)*n29*n44*pow(n50, n22)*n79/n164 + n106*n147*n178 + n29*n44*n66;
26034 n350 = pow(n185, n22)*n68*n82*xF[13]*(pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n8 + pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n29*n33*pow(n50, n22)*n79 + n100*n29*n33 + n147*n167*n21*n29);
26035 n351 = n117*pow(n186, n22)*n68*(pow(alpha, n1*n27 - n148*n9)*n126*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n9)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n9 + n101*n126 + n147*n170*n21*n29);
26036 n352 = n118*pow(n189, n22)*n68*(pow(alpha, n1*n27 - n12*n148)*n12*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n12*n148)*n120*pow(n145, n22)*pow(n50, n22)*n79 + n102*n120 + n147*n174*n21*n29);
26037 n353 = n240*n68*(pow(alpha, n1*n27 - n14*n148)*n14*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n14*n148)*pow(n145, n22)*n29*n39*pow(n50, n22)*n79 + n103*n29*n39 + n147*n165*n21*n29);
26038 n354 = pow(n193, n22)*n68*n90*xF[6]*(pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n16*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n29*n41*pow(n50, n22)*n79 + n105*n29*n41 + n147*n169*n21*n29);
26039 n355 = n224*n68*n96*(pow(alpha, n1*n27 - n148*n5)*n106*pow(n145, n22)*n5*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n5)*pow(n145, n22)*n29*n30*pow(n50, n22)*n79 + n106*n147*n179 + n142);
26040 n356 = pow(n183, n22)*n68*n97*xF[11]*(pow(alpha, n1*n27 - n148*n6)*n106*pow(n145, n22)*pow(n50, n22)*n6*n79 - pow(alpha, n1*n27 - n148*n6)*pow(n145, n22)*n29*n31*pow(n50, n22)*n79 + n106*n147*n172 + n139);
26041 n357 = n131*pow(n184, n22)*n68*(pow(alpha, n1*n27 - n148*n7)*n106*pow(n145, n22)*pow(n50, n22)*n7*n79 - pow(alpha, n1*n27 - n148*n7)*pow(n145, n22)*n29*n32*pow(n50, n22)*n79 + n106*n147*n177 + n141);
26042 n358 = n130*pow(n187, n22)*n68*(pow(alpha, n1*n27 - n10*n148)*n10*n106*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n10*n148)*n119*pow(n145, n22)*pow(n50, n22)*n79 + n106*n147*n176 + n119*n57);
26043 n359 = n244*n68*(pow(alpha, n1*n27 - n11*n148)*n106*n11*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n11*n148)*n123*pow(n145, n22)*pow(n50, n22)*n79 + n106*n147*n173 + n123*n58);
26044 n360 = n222*n68*n94*(pow(alpha, n1*n27 - n13*n148)*n106*n13*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n13*n148)*pow(n145, n22)*n29*n38*pow(n50, n22)*n79 + n106*n147*n168 + n143);
26045 n361 = n242*n68*(pow(alpha, n1*n27 - n148*n15)*n106*pow(n145, n22)*n15*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n15)*n111*pow(n145, n22)*pow(n50, n22)*n79 + n106*n147*n180 + n111*n62);
26046 n362 = n245*n68*(pow(alpha, n1*n27 - n148*n17)*n106*pow(n145, n22)*n17*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n17)*n115*pow(n145, n22)*pow(n50, n22)*n79 + n106*n147*n166 + n115*n64);
26047 n363 = n246*n68*(pow(alpha, n1*n27 - n148*n18)*n106*pow(n145, n22)*n18*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n18)*pow(n145, n22)*n29*n43*pow(n50, n22)*n79 + n106*n147*n171 + n140);
26048 n364 = n132*pow(n196, n22)*n68*(pow(alpha, n1*n27 - n148*n19)*n106*pow(n145, n22)*n19*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n19)*pow(n145, n22)*n29*n44*pow(n50, n22)*n79 + n106*n147*n178 + n29*n44*n66);
26049 n365 = xTj*(n108*n230*n68 + n109*n228*n68 + n110*n2*n220*n68 + n112*n227*n68 + n113*n226*n68 + n114*n2*n216*n68 + n116*n2*n217*n68 - n117*n313*n68 - n118*pow(n189, n22)*n279*n68 + n130*n314*n68 + n131*n310*n68 + n132*n311*n68 + n134*n312*n68 + n135*n213*n68 + n136*n219*n68 + pow(n183, n22)*n304*n68*n97 + n214*n54*n68*n70 + n218*n66*n68*n72 + n222*n280*n68*n94 + n224*n272*n68*n96 + n231*n68*n69 + n232*n68*n71 + n233*n68*n75 + n234*n68*n73 + n235*n68*n74 + n238*n303*n68 - n240*n281*n68 + n242*n282*n68 + n244*n278*n68 + n245*n284*n68 + n246*n285*n68 + n315*n68*n95);
26050 n366 = n250 + n322 + n365;
26051 n367 = n251 + n252 + n253 + n254 + n255 + n256 + n257 + n258 + n259 + n260 + n261 + n262 + n263 + n264 + n265 + n266 + n323 + n324 + n325 + n326 + n327 + n328 + n329 + n330 + n331 + n332 + n333 + n334 + n335 + n336 + n337 + n338 + n340 + n350 + n351 + n352 + n353 + n354 + n355 + n356 + n357 + n358 + n359 + n360 + n361 + n362 + n363 + n364;
26052 n368 = -n117*n276*n68*(n113*n46 + n147*n170*n46)/n202 - n118*n279*n68*(n12*n46*n59 + n147*n174*n46)/n205 - n122*n282*n68*(n147*n180*n46 + n15*n46*n62)/n208 + n130*n277*n68*(n127*n46 + n147*n176*n46)/n203 + n131*n274*n68*(n147*n177*n46 + n46*n54*n7)/n200 + n132*n286*n68*(n147*n178*n46 + n19*n46*n66)/n212 + n134*n275*n68*(n116*n46 + n147*n167*n46)/n201 + n223*n283*n68*n95*(n108*n46 + n147*n169*n46) + n225*n272*n68*n96*(n114*n46 + n147*n179*n46) - n237*n305*n68*(n124*n46 + n147*n173*n46) - n239*n271*n307*n68 - n241*n281*n68*(n112*n46 + n147*n165*n46) + n243*n284*n68*(n125*n46 + n147*n166*n46) + n367 - n306*n68*n92*(n128*n46 + n147*n171*n46)/n211 + n280*n68*n94*xF[3]*(n109*n46 + n147*n168*n46)/n206 + n304*n68*n97*(n147*n172*n46 + n46*n53*n6)/n199;
26054 NP_b = -n110*n229*n270*n68*n76 - n250 - n27*(1.0*n110*n229*n68*xF[0]*(pow(alpha, -n1*n148 + n47)*n1*n137*n2/n145 + n110*n2) + 0.5*pow(n181, n22)*n68*n76*xF[0]*(-pow(alpha, -n1*n148 + n47)*n121*n137/n145 + n121*n98) - 1.0*n239*n287*n68 + n267 - 0.5*xTj*(n117*pow(n186, n22)*n68*(pow(alpha, n1*n27 - n148*n9)*n126*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n9)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n9 + pow(alpha, -n148*n9 + n47)*n137*n21*n29*n9/n145 + n101*n126) + n117*n22*n316*n68 + n118*pow(n189, n22)*n68*(pow(alpha, n1*n27 - n12*n148)*n12*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n12*n148)*n120*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n12*n148 + n47)*n12*n137*n21*n29/n145 + n102*n120) + n118*n22*n317*n68 + n122*n22*n318*n68 + n130*pow(n187, n22)*n68*(pow(alpha, n1*n27 - n10*n148)*n10*n106*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n10*n148)*n119*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n10*n148 + n47)*n10*n106*n137/n145 + n119*n57) + n131*pow(n184, n22)*n68*(pow(alpha, n1*n27 - n148*n7)*n106*pow(n145, n22)*pow(n50, n22)*n7*n79 - pow(alpha, n1*n27 - n148*n7)*pow(n145, n22)*n29*n32*pow(n50, n22)*n79 + pow(alpha, -n148*n7 + n47)*n106*n137*n7/n145 + n141) + n132*pow(n196, n22)*n68*(pow(alpha, n1*n27 - n148*n19)*n106*pow(n145, n22)*n19*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n19)*pow(n145, n22)*n29*n44*pow(n50, n22)*n79 + pow(alpha, -n148*n19 + n47)*n106*n137*n19/n145 + n29*n44*n66) + pow(n181, n22)*n68*n76*xF[0]*(-pow(alpha, -n1*n148 + n47)*n121*n137/n145 + n121*n98) + pow(n183, n22)*n68*n97*xF[11]*(pow(alpha, n1*n27 - n148*n6)*n106*pow(n145, n22)*pow(n50, n22)*n6*n79 - pow(alpha, n1*n27 - n148*n6)*pow(n145, n22)*n29*n31*pow(n50, n22)*n79 + pow(alpha, -n148*n6 + n47)*n106*n137*n6/n145 + n139) + pow(n185, n22)*n68*n82*xF[13]*(pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n8 + pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n29*n33*pow(n50, n22)*n79 + pow(alpha, -n148*n8 + n47)*n137*n21*n29*n8/n145 + n100*n29*n33) + pow(n193, n22)*n68*n90*xF[6]*(pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n16*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n29*n41*pow(n50, n22)*n79 + pow(alpha, -n148*n16 + n47)*n137*n16*n21*n29/n145 + n105*n29*n41) + n22*n223*n299*n68*n90 + n22*n225*n288*n68*n77 + n22*n237*n308*n68 + n22*n239*n287*n68 + n22*n241*n297*n68 + n22*n320*n68 + n22*n321*n68 + n222*n68*n94*(pow(alpha, n1*n27 - n13*n148)*n106*n13*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n13*n148)*pow(n145, n22)*n29*n38*pow(n50, n22)*n79 + pow(alpha, -n13*n148 + n47)*n106*n13*n137/n145 + n143) + n224*n68*n96*(pow(alpha, n1*n27 - n148*n5)*n106*pow(n145, n22)*n5*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n5)*pow(n145, n22)*n29*n30*pow(n50, n22)*n79 + pow(alpha, -n148*n5 + n47)*n106*n137*n5/n145 + n142) + n240*n68*(pow(alpha, n1*n27 - n14*n148)*n14*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n14*n148)*pow(n145, n22)*n29*n39*pow(n50, n22)*n79 + pow(alpha, -n14*n148 + n47)*n137*n14*n21*n29/n145 + n103*n29*n39) + n242*n68*(pow(alpha, n1*n27 - n148*n15)*n106*pow(n145, n22)*n15*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n15)*n111*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n148*n15 + n47)*n106*n137*n15/n145 + n111*n62) + n244*n68*(pow(alpha, n1*n27 - n11*n148)*n106*n11*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n11*n148)*n123*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n11*n148 + n47)*n106*n11*n137/n145 + n123*n58) + n245*n68*(pow(alpha, n1*n27 - n148*n17)*n106*pow(n145, n22)*n17*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n17)*n115*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n148*n17 + n47)*n106*n137*n17/n145 + n115*n64) + n246*n68*(pow(alpha, n1*n27 - n148*n18)*n106*pow(n145, n22)*n18*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n18)*pow(n145, n22)*n29*n43*pow(n50, n22)*n79 + pow(alpha, -n148*n18 + n47)*n106*n137*n18/n145 + n140) + n251 + n252 + n253 + n254 + n255 + n256 + n257 + n258 + n259 + n260 + n261 + n262 + n263 + n264 + n265 + n266 + n323 + n324 + n325 + n326 + n327 + n328 + n329 + n330 + n331 + n332 + n333 + n334 + n335 + n336 + n337 + n338 + n22*n302*n68*n93*xF[9]/n212 + n22*n300*n68*n91*xF[7]/n210 + n22*n296*n68*n87*xF[3]/n206 + n22*n293*n68*n84*xF[15]/n203 + n22*n291*n68*n82*xF[13]/n201 + n22*n290*n68*n81*xF[12]/n200)) - n68*xTj*(n108*n230 + n109*n228 + n110*n2*n220 + n112*n227 + n113*n226 + n114*n2*n216 + n116*n2*n217 - n117*n313 - n118*pow(n189, n22)*n279 + n130*n314 + n131*n310 + n132*n311 + n134*n312 + n135*n213 + n136*n219 + pow(n183, n22)*n304*n97 + n214*n54*n70 + n218*n66*n72 + n222*n280*n94 + n224*n272*n96 + n231*n69 + n232*n71 + n233*n75 + n234*n73 + n235*n74 + n238*n303 - n240*n281 + n242*n282 + n244*n278 + n245*n284 + n246*n285 + n315*n95);
26055 NP_2a = -n68*(pow(alpha, n1*n27)*n0*n121*pow(n181, n22)*n270 - pow(alpha, n1*n27)*n0*n121*n239*pow(n269, -n0) + n121*pow(n181, n22)*n76*n98*xF[0]*(-1 + (-n23 + xPj*xTj)/(n145*n149*n50)) - 1.0*n144/n181 + 1.0*xTj*(n0*n21*n229*n49*xF[0]*(pow(alpha, n148*n21 + n47)*n1*n137*n2/n145 + n110*n2) + n108*pow(n193, n22)*n46*xF[6]*(pow(alpha, -n148*n16 + n47)*n137*n16*n2/n145 + n108*n2) + n109*n222*n46*(pow(alpha, -n13*n148 + n47)*n13*n137*n2/n145 + n109*n2) + n111*n231 + n112*pow(n191, n22)*n46*xF[4]*(pow(alpha, -n14*n148 + n47)*n137*n14*n2/n145 + n112*n2) + n113*pow(n186, n22)*n46*xF[14]*(pow(alpha, -n148*n9 + n47)*n137*n2*n9/n145 + n113*n2) + n114*n224*n46*(pow(alpha, -n148*n5 + n47)*n137*n2*n5/n145 + n114*n2) + n115*n233 + n116*pow(n185, n22)*n46*xF[13]*(pow(alpha, -n148*n8 + n47)*n137*n2*n8/n145 + n116*n2) + n117*pow(n186, n22)*(pow(alpha, n1*n27 - n148*n9)*n126*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n9)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n9 + n101*n126 + n147*n170*n21*n29) + n117*n22*n316 + n118*pow(n189, n22)*(pow(alpha, n1*n27 - n12*n148)*n12*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n12*n148)*n120*pow(n145, n22)*pow(n50, n22)*n79 + n102*n120 + n147*n174*n21*n29) + n118*n22*n317 + n119*n235 + n12*pow(n189, n22)*n46*n59*xF[2]*(pow(alpha, -n12*n148 + n47)*n137*n73/n145 + n59*n73) + n120*n234 + n122*n22*n318 + n123*n232 + n124*pow(n188, n22)*n46*xF[1]*(pow(alpha, -n11*n148 + n47)*n137*n71/n145 + n58*n71) + n125*pow(n194, n22)*n46*xF[7]*(pow(alpha, -n148*n17 + n47)*n137*n75/n145 + n64*n75) + n126*n236 + n127*pow(n187, n22)*n46*xF[15]*(pow(alpha, -n10*n148 + n47)*n137*n74/n145 + n57*n74) + n128*pow(n195, n22)*n46*xF[8]*(pow(alpha, -n148*n18 + n47)*n137*n18*n2/n145 + n136) + n130*pow(n187, n22)*(pow(alpha, n1*n27 - n10*n148)*n10*n106*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n10*n148)*n119*pow(n145, n22)*pow(n50, n22)*n79 + n106*n147*n176 + n119*n57) + n131*pow(n184, n22)*(pow(alpha, n1*n27 - n148*n7)*n106*pow(n145, n22)*pow(n50, n22)*n7*n79 - pow(alpha, n1*n27 - n148*n7)*pow(n145, n22)*n29*n32*pow(n50, n22)*n79 + n106*n147*n177 + n141) + n132*pow(n196, n22)*(pow(alpha, n1*n27 - n148*n19)*n106*pow(n145, n22)*n19*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n19)*pow(n145, n22)*n29*n44*pow(n50, n22)*n79 + n106*n147*n178 + n29*n44*n66) + n133*pow(n196, n22)*n46*(pow(alpha, -n148*n19 + n47)*n137*n72/n145 + n66*n72) + n138*n217 + n139*n213 + n140*n219 + n141*n214 + n142*n216 + n143*n221 + n144/n181 + n15*pow(n192, n22)*n46*n62*xF[5]*(pow(alpha, -n148*n15 + n47)*n137*n69/n145 + n62*n69) + pow(n183, n22)*n46*n53*n6*xF[11]*(pow(alpha, -n148*n6 + n47)*n137*n2*n6/n145 + n135) + pow(n183, n22)*n97*xF[11]*(pow(alpha, n1*n27 - n148*n6)*n106*pow(n145, n22)*pow(n50, n22)*n6*n79 - pow(alpha, n1*n27 - n148*n6)*pow(n145, n22)*n29*n31*pow(n50, n22)*n79 + n106*n147*n172 + n139) + pow(n184, n22)*n46*n54*n7*xF[12]*(pow(alpha, -n148*n7 + n47)*n137*n70/n145 + n54*n70) + pow(n185, n22)*n82*xF[13]*(pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n8 + pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n29*n33*pow(n50, n22)*n79 + n100*n29*n33 + n147*n167*n21*n29) + pow(n193, n22)*n90*xF[6]*(pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n16*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n29*n41*pow(n50, n22)*n79 + n105*n29*n41 + n147*n169*n21*n29) + n22*n223*n299*n90 + n22*n225*n288*n77 + n22*n237*n308 + n22*n239*n287 + n22*n241*n297 + n22*n320 + n22*n321 + n222*n94*(pow(alpha, n1*n27 - n13*n148)*n106*n13*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n13*n148)*pow(n145, n22)*n29*n38*pow(n50, n22)*n79 + n106*n147*n168 + n143) + n224*n96*(pow(alpha, n1*n27 - n148*n5)*n106*pow(n145, n22)*n5*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n5)*pow(n145, n22)*n29*n30*pow(n50, n22)*n79 + n106*n147*n179 + n142) + n240*(pow(alpha, n1*n27 - n14*n148)*n14*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n14*n148)*pow(n145, n22)*n29*n39*pow(n50, n22)*n79 + n103*n29*n39 + n147*n165*n21*n29) + n242*(pow(alpha, n1*n27 - n148*n15)*n106*pow(n145, n22)*n15*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n15)*n111*pow(n145, n22)*pow(n50, n22)*n79 + n106*n147*n180 + n111*n62) + n244*(pow(alpha, n1*n27 - n11*n148)*n106*n11*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n11*n148)*n123*pow(n145, n22)*pow(n50, n22)*n79 + n106*n147*n173 + n123*n58) + n245*(pow(alpha, n1*n27 - n148*n17)*n106*pow(n145, n22)*n17*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n17)*n115*pow(n145, n22)*pow(n50, n22)*n79 + n106*n147*n166 + n115*n64) + n246*(pow(alpha, n1*n27 - n148*n18)*n106*pow(n145, n22)*n18*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n18)*pow(n145, n22)*n29*n43*pow(n50, n22)*n79 + n106*n147*n171 + n140) + n247 + n248 + n249 + n319*n76 + n22*n302*n93*xF[9]/n212 + n22*n300*n91*xF[7]/n210 + n22*n296*n87*xF[3]/n206 + n22*n293*n84*xF[15]/n203 + n22*n291*n82*xF[13]/n201 + n22*n290*n81*xF[12]/n200));
26056 NP_sqrt_base = (-NP0*n366 - n25*(-n117*n68/(n83 - 1 + pow(alpha, -n9*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n118*n68/(n86 - 1 + pow(alpha, -n12*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n122*n68/(n89 - 1 + pow(alpha, -n15*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n76*xF[0]/(pow(alpha, n21*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1)) + n76 - 1) - n68*n77*xF[10]/(n77 - 1 + pow(alpha, -n5*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n80*xF[11]/(n80 - 1 + pow(alpha, -n6*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n81*xF[12]/(n81 - 1 + pow(alpha, -n7*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n82*xF[13]/(n82 - 1 + pow(alpha, -n8*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n84*xF[15]/(n84 - 1 + pow(alpha, -n10*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n85*xF[1]/(n85 - 1 + pow(alpha, -n11*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n87*xF[3]/(n87 - 1 + pow(alpha, -n13*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n88*xF[4]/(n88 - 1 + pow(alpha, -n14*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n90*xF[6]/(n90 - 1 + pow(alpha, -n16*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n91*xF[7]/(n91 - 1 + pow(alpha, -n17*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n92*xF[8]/(n92 - 1 + pow(alpha, -n18*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n68*n93*xF[9]/(n93 - 1 + pow(alpha, -n19*(n107*(n146 - log(n98*(n23 + n26*xTj)/(n23 - xF[0]*xTj) + 1)) + 1)))) + n68*n76*xF[0]/(-n175 + n76 - 1) - pow(NP0, -n0)*(1.0*n110*n229*n303*n68 - 0.5*n239*n271*n307*n68 + 0.5*n251 + 0.5*n340 - 0.5*n369))*(-n0*n25*(n117*pow(n186, n22)*n68*(pow(alpha, n1*n27 - n148*n9)*n126*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n9)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n9 + pow(alpha, -n148*n9 + n47)*n137*n21*n29*n9/n145 + n101*n126) - n117*n68*(pow(alpha, -n148*n9 + n47)*n137*n2*n9/n145 + n113*n2)*(pow(alpha, -n148*n9 + n47)*n137*n46*n9/n145 + n113*n46)/n202 + n118*pow(n189, n22)*n68*(pow(alpha, n1*n27 - n12*n148)*n12*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n12*n148)*n120*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n12*n148 + n47)*n12*n137*n21*n29/n145 + n102*n120) - n118*n68*(pow(alpha, -n12*n148 + n47)*n137*n73/n145 + n59*n73)*(pow(alpha, -n12*n148 + n47)*n12*n137*n46/n145 + n12*n46*n59)/n205 - n122*n68*(pow(alpha, -n148*n15 + n47)*n137*n69/n145 + n62*n69)*(pow(alpha, -n148*n15 + n47)*n137*n15*n46/n145 + n15*n46*n62)/n208 + n130*pow(n187, n22)*n68*(pow(alpha, n1*n27 - n10*n148)*n10*n106*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n10*n148)*n119*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n10*n148 + n47)*n10*n106*n137/n145 + n119*n57) + n130*n68*(pow(alpha, -n10*n148 + n47)*n137*n74/n145 + n57*n74)*(pow(alpha, -n10*n148 + n47)*n10*n137*n46/n145 + n127*n46)/n203 + n131*pow(n184, n22)*n68*(pow(alpha, n1*n27 - n148*n7)*n106*pow(n145, n22)*pow(n50, n22)*n7*n79 - pow(alpha, n1*n27 - n148*n7)*pow(n145, n22)*n29*n32*pow(n50, n22)*n79 + pow(alpha, -n148*n7 + n47)*n106*n137*n7/n145 + n141) + n131*n68*(pow(alpha, -n148*n7 + n47)*n137*n70/n145 + n54*n70)*(pow(alpha, -n148*n7 + n47)*n137*n46*n7/n145 + n46*n54*n7)/n200 + n132*pow(n196, n22)*n68*(pow(alpha, n1*n27 - n148*n19)*n106*pow(n145, n22)*n19*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n19)*pow(n145, n22)*n29*n44*pow(n50, n22)*n79 + pow(alpha, -n148*n19 + n47)*n106*n137*n19/n145 + n29*n44*n66) + n132*n68*(pow(alpha, -n148*n19 + n47)*n137*n72/n145 + n66*n72)*(pow(alpha, -n148*n19 + n47)*n137*n19*n46/n145 + n19*n46*n66)/n212 + n134*n68*(pow(alpha, -n148*n8 + n47)*n137*n2*n8/n145 + n116*n2)*(pow(alpha, -n148*n8 + n47)*n137*n46*n8/n145 + n116*n46)/n201 + pow(n181, n22)*n68*n76*xF[0]*(pow(alpha, -n1*n148 + n47)*n121*(-n23 + xPj*xTj)/(n145*n50) + n121*n98) + pow(n183, n22)*n68*n97*xF[11]*(pow(alpha, n1*n27 - n148*n6)*n106*pow(n145, n22)*pow(n50, n22)*n6*n79 - pow(alpha, n1*n27 - n148*n6)*pow(n145, n22)*n29*n31*pow(n50, n22)*n79 + pow(alpha, -n148*n6 + n47)*n106*n137*n6/n145 + n139) + pow(n185, n22)*n68*n82*xF[13]*(pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n8 + pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n29*n33*pow(n50, n22)*n79 + pow(alpha, -n148*n8 + n47)*n137*n21*n29*n8/n145 + n100*n29*n33) + pow(n193, n22)*n68*n90*xF[6]*(pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n16*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n29*n41*pow(n50, n22)*n79 + pow(alpha, -n148*n16 + n47)*n137*n16*n21*n29/n145 + n105*n29*n41) + n222*n68*n94*(pow(alpha, n1*n27 - n13*n148)*n106*n13*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n13*n148)*pow(n145, n22)*n29*n38*pow(n50, n22)*n79 + pow(alpha, -n13*n148 + n47)*n106*n13*n137/n145 + n143) + n223*n68*n95*(pow(alpha, -n148*n16 + n47)*n137*n16*n2/n145 + n108*n2)*(pow(alpha, -n148*n16 + n47)*n137*n16*n46/n145 + n108*n46) + n224*n68*n96*(pow(alpha, n1*n27 - n148*n5)*n106*pow(n145, n22)*n5*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n5)*pow(n145, n22)*n29*n30*pow(n50, n22)*n79 + pow(alpha, -n148*n5 + n47)*n106*n137*n5/n145 + n142) + n225*n68*n96*(pow(alpha, -n148*n5 + n47)*n137*n2*n5/n145 + n114*n2)*(pow(alpha, -n148*n5 + n47)*n137*n46*n5/n145 + n114*n46) - n237*n68*xF[1]*(pow(alpha, -n11*n148 + n47)*n137*n71/n145 + n58*n71)*(pow(alpha, -n11*n148 + n47)*n11*n137*n46/n145 + n124*n46) - n239*n68*(pow(alpha, -n1*n148 + n47)*n1*n137*n2/n145 + n110*n2)*(pow(alpha, -n1*n148 + n47)*n0*n137*n2*n21/n145 + n0*n2*n21*n49) + n240*n68*(pow(alpha, n1*n27 - n14*n148)*n14*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n14*n148)*pow(n145, n22)*n29*n39*pow(n50, n22)*n79 + pow(alpha, -n14*n148 + n47)*n137*n14*n21*n29/n145 + n103*n29*n39) - n241*n68*(pow(alpha, -n14*n148 + n47)*n137*n14*n2/n145 + n112*n2)*(pow(alpha, -n14*n148 + n47)*n137*n14*n46/n145 + n112*n46) + n242*n68*(pow(alpha, n1*n27 - n148*n15)*n106*pow(n145, n22)*n15*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n15)*n111*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n148*n15 + n47)*n106*n137*n15/n145 + n111*n62) + n243*n68*(pow(alpha, -n148*n17 + n47)*n137*n75/n145 + n64*n75)*(pow(alpha, -n148*n17 + n47)*n137*n17*n46/n145 + n125*n46) + n244*n68*(pow(alpha, n1*n27 - n11*n148)*n106*n11*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n11*n148)*n123*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n11*n148 + n47)*n106*n11*n137/n145 + n123*n58) + n245*n68*(pow(alpha, n1*n27 - n148*n17)*n106*pow(n145, n22)*n17*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n17)*n115*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n148*n17 + n47)*n106*n137*n17/n145 + n115*n64) + n246*n68*(pow(alpha, n1*n27 - n148*n18)*n106*pow(n145, n22)*n18*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n18)*pow(n145, n22)*n29*n43*pow(n50, n22)*n79 + pow(alpha, -n148*n18 + n47)*n106*n137*n18/n145 + n140) + n251 + n252 + n253 + n254 + n255 + n256 + n257 + n258 + n259 + n260 + n261 + n262 + n263 + n264 + n265 + n266 + n323 + n324 + n325 + n326 + n327 + n328 + n329 + n330 + n331 + n332 + n333 + n334 + n335 + n336 + n337 + n338 - n68*n92*xF[8]*(pow(alpha, -n148*n18 + n47)*n137*n18*n2/n145 + n136)*(pow(alpha, -n148*n18 + n47)*n137*n18*n46/n145 + n128*n46)/n211 + n68*n94*xF[3]*(pow(alpha, -n13*n148 + n47)*n13*n137*n2/n145 + n109*n2)*(pow(alpha, -n13*n148 + n47)*n13*n137*n46/n145 + n109*n46)/n206 + n68*n97*xF[11]*(pow(alpha, -n148*n6 + n47)*n137*n2*n6/n145 + n135)*(pow(alpha, -n148*n6 + n47)*n137*n46*n6/n145 + n46*n53*n6)/n199) - n0*n251 - n0*n340 + 4.0*n110*n229*n303*n68 - 4.0*n239*n287*n68) + pow(-n27*(1.0*n110*n229*n68*xF[0]*(pow(alpha, -n1*n148 + n47)*n1*n137*n2/n145 + n110*n2) + 0.5*pow(n181, n22)*n68*n76*xF[0]*(-pow(alpha, -n1*n148 + n47)*n121*n137/n145 + n121*n98) - 0.5*n239*n68*(pow(alpha, -n1*n148 + n47)*n1*n137*n2/n145 + n110*n2)*(pow(alpha, -n1*n148 + n47)*n0*n137*n2*n21/n145 + n0*n2*n21*n49) + n267 - 0.5*xTj*(n117*pow(n186, n22)*n68*(pow(alpha, n1*n27 - n148*n9)*n126*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n9)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n9 + pow(alpha, -n148*n9 + n47)*n137*n21*n29*n9/n145 + n101*n126) - n117*n68*(pow(alpha, -n148*n9 + n47)*n137*n2*n9/n145 + n113*n2)*(pow(alpha, -n148*n9 + n47)*n137*n46*n9/n145 + n113*n46)/n202 + n118*pow(n189, n22)*n68*(pow(alpha, n1*n27 - n12*n148)*n12*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n12*n148)*n120*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n12*n148 + n47)*n12*n137*n21*n29/n145 + n102*n120) - n118*n68*(pow(alpha, -n12*n148 + n47)*n137*n73/n145 + n59*n73)*(pow(alpha, -n12*n148 + n47)*n12*n137*n46/n145 + n12*n46*n59)/n205 - n122*n68*(pow(alpha, -n148*n15 + n47)*n137*n69/n145 + n62*n69)*(pow(alpha, -n148*n15 + n47)*n137*n15*n46/n145 + n15*n46*n62)/n208 + n130*pow(n187, n22)*n68*(pow(alpha, n1*n27 - n10*n148)*n10*n106*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n10*n148)*n119*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n10*n148 + n47)*n10*n106*n137/n145 + n119*n57) + n130*n68*(pow(alpha, -n10*n148 + n47)*n137*n74/n145 + n57*n74)*(pow(alpha, -n10*n148 + n47)*n10*n137*n46/n145 + n127*n46)/n203 + n131*pow(n184, n22)*n68*(pow(alpha, n1*n27 - n148*n7)*n106*pow(n145, n22)*pow(n50, n22)*n7*n79 - pow(alpha, n1*n27 - n148*n7)*pow(n145, n22)*n29*n32*pow(n50, n22)*n79 + pow(alpha, -n148*n7 + n47)*n106*n137*n7/n145 + n141) + n131*n68*(pow(alpha, -n148*n7 + n47)*n137*n70/n145 + n54*n70)*(pow(alpha, -n148*n7 + n47)*n137*n46*n7/n145 + n46*n54*n7)/n200 + n132*pow(n196, n22)*n68*(pow(alpha, n1*n27 - n148*n19)*n106*pow(n145, n22)*n19*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n19)*pow(n145, n22)*n29*n44*pow(n50, n22)*n79 + pow(alpha, -n148*n19 + n47)*n106*n137*n19/n145 + n29*n44*n66) + n132*n68*(pow(alpha, -n148*n19 + n47)*n137*n72/n145 + n66*n72)*(pow(alpha, -n148*n19 + n47)*n137*n19*n46/n145 + n19*n46*n66)/n212 + n134*n68*(pow(alpha, -n148*n8 + n47)*n137*n2*n8/n145 + n116*n2)*(pow(alpha, -n148*n8 + n47)*n137*n46*n8/n145 + n116*n46)/n201 + pow(n181, n22)*n68*n76*xF[0]*(-pow(alpha, -n1*n148 + n47)*n121*n137/n145 + n121*n98) + pow(n183, n22)*n68*n97*xF[11]*(pow(alpha, n1*n27 - n148*n6)*n106*pow(n145, n22)*pow(n50, n22)*n6*n79 - pow(alpha, n1*n27 - n148*n6)*pow(n145, n22)*n29*n31*pow(n50, n22)*n79 + pow(alpha, -n148*n6 + n47)*n106*n137*n6/n145 + n139) + pow(n185, n22)*n68*n82*xF[13]*(pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n21*n29*pow(n50, n22)*n79*n8 + pow(alpha, n1*n27 - n148*n8)*pow(n145, n22)*n29*n33*pow(n50, n22)*n79 + pow(alpha, -n148*n8 + n47)*n137*n21*n29*n8/n145 + n100*n29*n33) + pow(n193, n22)*n68*n90*xF[6]*(pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n16*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n148*n16)*pow(n145, n22)*n29*n41*pow(n50, n22)*n79 + pow(alpha, -n148*n16 + n47)*n137*n16*n21*n29/n145 + n105*n29*n41) + n222*n68*n94*(pow(alpha, n1*n27 - n13*n148)*n106*n13*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n13*n148)*pow(n145, n22)*n29*n38*pow(n50, n22)*n79 + pow(alpha, -n13*n148 + n47)*n106*n13*n137/n145 + n143) + n223*n68*n95*(pow(alpha, -n148*n16 + n47)*n137*n16*n2/n145 + n108*n2)*(pow(alpha, -n148*n16 + n47)*n137*n16*n46/n145 + n108*n46) + n224*n68*n96*(pow(alpha, n1*n27 - n148*n5)*n106*pow(n145, n22)*n5*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n5)*pow(n145, n22)*n29*n30*pow(n50, n22)*n79 + pow(alpha, -n148*n5 + n47)*n106*n137*n5/n145 + n142) + n225*n68*n96*(pow(alpha, -n148*n5 + n47)*n137*n2*n5/n145 + n114*n2)*(pow(alpha, -n148*n5 + n47)*n137*n46*n5/n145 + n114*n46) - n237*n68*xF[1]*(pow(alpha, -n11*n148 + n47)*n137*n71/n145 + n58*n71)*(pow(alpha, -n11*n148 + n47)*n11*n137*n46/n145 + n124*n46) - n239*n68*(pow(alpha, -n1*n148 + n47)*n1*n137*n2/n145 + n110*n2)*(pow(alpha, -n1*n148 + n47)*n0*n137*n2*n21/n145 + n0*n2*n21*n49) + n240*n68*(pow(alpha, n1*n27 - n14*n148)*n14*pow(n145, n22)*n21*n29*pow(n50, n22)*n79 + pow(alpha, n1*n27 - n14*n148)*pow(n145, n22)*n29*n39*pow(n50, n22)*n79 + pow(alpha, -n14*n148 + n47)*n137*n14*n21*n29/n145 + n103*n29*n39) - n241*n68*(pow(alpha, -n14*n148 + n47)*n137*n14*n2/n145 + n112*n2)*(pow(alpha, -n14*n148 + n47)*n137*n14*n46/n145 + n112*n46) + n242*n68*(pow(alpha, n1*n27 - n148*n15)*n106*pow(n145, n22)*n15*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n15)*n111*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n148*n15 + n47)*n106*n137*n15/n145 + n111*n62) + n243*n68*(pow(alpha, -n148*n17 + n47)*n137*n75/n145 + n64*n75)*(pow(alpha, -n148*n17 + n47)*n137*n17*n46/n145 + n125*n46) + n244*n68*(pow(alpha, n1*n27 - n11*n148)*n106*n11*pow(n145, n22)*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n11*n148)*n123*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n11*n148 + n47)*n106*n11*n137/n145 + n123*n58) + n245*n68*(pow(alpha, n1*n27 - n148*n17)*n106*pow(n145, n22)*n17*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n17)*n115*pow(n145, n22)*pow(n50, n22)*n79 + pow(alpha, -n148*n17 + n47)*n106*n137*n17/n145 + n115*n64) + n246*n68*(pow(alpha, n1*n27 - n148*n18)*n106*pow(n145, n22)*n18*pow(n50, n22)*n79 - pow(alpha, n1*n27 - n148*n18)*pow(n145, n22)*n29*n43*pow(n50, n22)*n79 + pow(alpha, -n148*n18 + n47)*n106*n137*n18/n145 + n140) + n251 + n252 + n253 + n254 + n255 + n256 + n257 + n258 + n259 + n260 + n261 + n262 + n263 + n264 + n265 + n266 + n323 + n324 + n325 + n326 + n327 + n328 + n329 + n330 + n331 + n332 + n333 + n334 + n335 + n336 + n337 + n338 - n68*n92*xF[8]*(pow(alpha, -n148*n18 + n47)*n137*n18*n2/n145 + n136)*(pow(alpha, -n148*n18 + n47)*n137*n18*n46/n145 + n128*n46)/n211 + n68*n94*xF[3]*(pow(alpha, -n13*n148 + n47)*n13*n137*n2/n145 + n109*n2)*(pow(alpha, -n13*n148 + n47)*n13*n137*n46/n145 + n109*n46)/n206 + n68*n97*xF[11]*(pow(alpha, -n148*n6 + n47)*n137*n2*n6/n145 + n135)*(pow(alpha, -n148*n6 + n47)*n137*n46*n6/n145 + n46*n53*n6)/n199)) - n366, -n0);
26057 NP_sqrt_base = fabs(NP_sqrt_base);
26058 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
26059 NT1 = n107*(n146 - log(-pow(alpha, NP1*n1)*n137 + 1));
26060 g0 = MW[1] - Mstar;
26061 g1 = MW[0] - Mstar;
26064 g4 = MW[10] - Mstar;
26065 g5 = MW[11] - Mstar;
26066 g6 = MW[12] - Mstar;
26067 g7 = MW[13] - Mstar;
26068 g8 = MW[14] - Mstar;
26069 g9 = MW[15] - Mstar;
26070 g10 = MW[2] - Mstar;
26071 g11 = MW[3] - Mstar;
26072 g12 = MW[4] - Mstar;
26073 g13 = MW[5] - Mstar;
26074 g14 = MW[6] - Mstar;
26075 g15 = MW[7] - Mstar;
26076 g16 = MW[8] - Mstar;
26077 g17 = MW[9] - Mstar;
26082 g22 = pow(alpha, -g1);
26083 g23 = pow(alpha, -g4);
26084 g24 = pow(alpha, -g5);
26085 g25 = pow(alpha, -g6);
26086 g26 = pow(alpha, -g7);
26087 g27 = pow(alpha, -g8);
26088 g28 = pow(alpha, -g9);
26089 g29 = pow(alpha, -g0);
26090 g30 = pow(alpha, -g10);
26091 g31 = pow(alpha, -g11);
26092 g32 = pow(alpha, -g12);
26093 g33 = pow(alpha, -g13);
26094 g34 = pow(alpha, -g14);
26095 g35 = pow(alpha, -g15);
26096 g36 = pow(alpha, -g16);
26097 g37 = pow(alpha, -g17);
26098 g38 = log(xF[0]/xF[1]);
26100 g40 = pow(alpha, NP1*g0);
26101 g41 = pow(alpha, NP1*g1);
26102 g42 = pow(alpha, NP1*g4);
26104 g44 = pow(alpha, NP1*g5);
26105 g45 = pow(alpha, NP1*g6);
26106 g46 = pow(alpha, NP1*g7);
26107 g47 = pow(alpha, NP1*g8);
26108 g48 = pow(alpha, NP1*g9);
26109 g49 = pow(alpha, NP1*g10);
26110 g50 = pow(alpha, NP1*g11);
26111 g51 = pow(alpha, NP1*g12);
26112 g52 = pow(alpha, NP1*g13);
26113 g53 = pow(alpha, NP1*g14);
26114 g54 = pow(alpha, NP1*g15);
26115 g55 = pow(alpha, NP1*g16);
26116 g56 = pow(alpha, NP1*g17);
26154 g94 = g19/(g3*xF[1]);
26155 g95 = pow(alpha, g0*g39) - 1;
26156 g96 = pow(alpha, g0*g39) - 1;
26157 g97 = pow(alpha, g1*g39) - 1;
26158 g98 = pow(alpha, g10*g39) - 1;
26159 g99 = pow(alpha, g11*g39) - 1;
26160 g100 = pow(alpha, g12*g39) - 1;
26161 g101 = pow(alpha, g13*g39) - 1;
26162 g102 = pow(alpha, g14*g39) - 1;
26163 g103 = pow(alpha, g15*g39) - 1;
26164 g104 = pow(alpha, g16*g39) - 1;
26165 g105 = pow(alpha, g17*g39) - 1;
26166 g106 = pow(alpha, g39*g4) - 1;
26167 g107 = pow(alpha, g39*g5) - 1;
26168 g108 = pow(alpha, g39*g6) - 1;
26169 g109 = pow(alpha, g39*g7) - 1;
26170 g110 = pow(alpha, g39*g8) - 1;
26171 g111 = pow(alpha, g39*g9) - 1;
26172 g112 = -pow(alpha, g1*g39);
26173 g113 = -pow(alpha, g39*g4);
26174 g114 = -pow(alpha, g39*g5);
26175 g115 = -pow(alpha, g39*g6);
26176 g116 = -pow(alpha, g39*g7);
26177 g117 = -pow(alpha, g39*g8);
26178 g118 = -pow(alpha, g39*g9);
26179 g119 = -pow(alpha, g10*g39);
26180 g120 = -pow(alpha, g11*g39);
26181 g121 = -pow(alpha, g12*g39);
26182 g122 = -pow(alpha, g13*g39);
26183 g123 = -pow(alpha, g14*g39);
26184 g124 = -pow(alpha, g15*g39);
26185 g125 = -pow(alpha, g16*g39);
26186 g126 = -pow(alpha, g17*g39);
26188 g128 = -g112 - g41;
26189 g129 = -g113 - g42;
26190 g130 = -g114 - g44;
26191 g131 = -g115 - g45;
26192 g132 = -g116 - g46;
26193 g133 = -g117 - g47;
26194 g134 = -g118 - g48;
26195 g135 = -g119 - g49;
26196 g136 = -g120 - g50;
26197 g137 = -g121 - g51;
26198 g138 = -g122 - g52;
26199 g139 = -g123 - g53;
26200 g140 = -g124 - g54;
26201 g141 = -g125 - g55;
26202 g142 = -g126 - g56;
26203 g143 = pow(alpha, g1*g39) + g77;
26205 g145 = pow(alpha, g39*g4) + g78;
26206 g146 = pow(alpha, g39*g5) + g79;
26207 g147 = pow(alpha, g39*g6) + g80;
26208 g148 = pow(alpha, g39*g7) + g81;
26209 g149 = pow(alpha, g39*g8) + g82;
26210 g150 = pow(alpha, g39*g9) + g83;
26211 g151 = pow(alpha, g10*g39) + g84;
26212 g152 = pow(alpha, g11*g39) + g85;
26213 g153 = pow(alpha, g12*g39) + g86;
26214 g154 = pow(alpha, g13*g39) + g87;
26215 g155 = pow(alpha, g14*g39) + g88;
26216 g156 = pow(alpha, g15*g39) + g89;
26217 g157 = pow(alpha, g16*g39) + g90;
26218 g158 = pow(alpha, g17*g39) + g91;
26219 g159 = xF[11]/g146;
26223 g163 = xF[10]/g145;
26224 g164 = xF[15]/g150;
26228 g168 = xF[12]/g147;
26229 g169 = xF[13]/g148;
26231 g171 = xF[14]/g149;
26236 g176 = xF[15]/g134;
26240 g180 = xF[11]/g130;
26242 g182 = xF[13]/g132;
26245 g185 = xF[14]/g133;
26247 g187 = xF[12]/g131;
26248 g188 = xF[10]/g129;
26283 g223 = log(g144*g20*g94/g61);
26284 g224 = log(g127*g20*g94/g60);
26285 g225 = log(g144*g21*g58/g96);
26287 g227 = log(g127*g21*g58/g95);
26289 g229 = -g159*g226*(g79 + 1) - g159*g228*(pow(alpha, g39*g5) - 1) - g160*g226*(g91 + 1) - g160*g228*(pow(alpha, g17*g39) - 1) - g161*g226*(g90 + 1) - g161*g228*(pow(alpha, g16*g39) - 1) - g162*g226*g61 - g162*g228*g96 - g163*g226*(g78 + 1) - g163*g228*(pow(alpha, g39*g4) - 1) - g164*g226*(g83 + 1) - g164*g228*(pow(alpha, g39*g9) - 1) - g165*g226*(g85 + 1) - g165*g228*(pow(alpha, g11*g39) - 1) - g166*g226*(g89 + 1) - g166*g228*(pow(alpha, g15*g39) - 1) - g167*g226*(g86 + 1) - g167*g228*(pow(alpha, g12*g39) - 1) - g168*g226*(g80 + 1) - g168*g228*(pow(alpha, g39*g6) - 1) - g169*g226*(g81 + 1) - g169*g228*(pow(alpha, g39*g7) - 1) - g170*g226*(g88 + 1) - g170*g228*(pow(alpha, g14*g39) - 1) - g171*g226*(g82 + 1) - g171*g228*(pow(alpha, g39*g8) - 1) - g172*g226*(g87 + 1) - g172*g228*(pow(alpha, g13*g39) - 1) - g173*g226*(g84 + 1) - g173*g228*(pow(alpha, g10*g39) - 1) - g174*g226*(g77 + 1) - g174*g228*(pow(alpha, g1*g39) - 1) - g92*xF[0] - g92*xF[10] - g92*xF[11] - g92*xF[12] - g92*xF[13] - g92*xF[14] - g92*xF[15] - g92*xF[1] - g92*xF[2] - g92*xF[3] - g92*xF[4] - g92*xF[5] - g92*xF[6] - g92*xF[7] - g92*xF[8] - g92*xF[9];
26290 LpF = xF[0]*(g22 + 1.0)*(g196*g224 + g207*g227 + g57)/(g43*(g22 - 1.0)) + xF[10]*(g23 + 1.0)*(g205*g224 + g221*g227 + g57)/(g43*(g23 - 1.0)) + xF[11]*(g24 + 1.0)*(g202*g224 + g209*g227 + g57)/(g43*(g24 - 1.0)) + xF[12]*(g25 + 1.0)*(g191*g224 + g218*g227 + g57)/(g43*(g25 - 1.0)) + xF[13]*(g26 + 1.0)*(g199*g224 + g219*g227 + g57)/(g43*(g26 - 1.0)) + xF[14]*(g27 + 1.0)*(g204*g224 + g217*g227 + g57)/(g43*(g27 - 1.0)) + xF[15]*(g28 + 1.0)*(g193*g224 + g208*g227 + g57)/(g43*(g28 - 1.0)) + xF[1]*(g29 + 1.0)*(g201*g224 + g213*g227 + g57)/(g43*(g29 - 1.0)) + xF[2]*(g30 + 1.0)*(g203*g224 + g210*g227 + g57)/(g43*(g30 - 1.0)) + xF[3]*(g31 + 1.0)*(g200*g224 + g211*g227 + g57)/(g43*(g31 - 1.0)) + xF[4]*(g32 + 1.0)*(g194*g224 + g212*g227 + g57)/(g43*(g32 - 1.0)) + xF[5]*(g33 + 1.0)*(g197*g224 + g222*g227 + g57)/(g43*(g33 - 1.0)) + xF[6]*(g34 + 1.0)*(g198*g224 + g216*g227 + g57)/(g43*(g34 - 1.0)) + xF[7]*(g35 + 1.0)*(g195*g224 + g220*g227 + g57)/(g43*(g35 - 1.0)) + xF[8]*(g36 + 1.0)*(g206*g224 + g214*g227 + g57)/(g43*(g36 - 1.0)) + xF[9]*(g37 + 1.0)*(g192*g224 + g215*g227 + g57)/(g43*(g37 - 1.0));
26295 xP[0] = g175*g59*g97;
26296 xP[1] = g181*g59*g95;
26297 xP[2] = g179*g59*g98;
26298 xP[3] = g183*g59*g99;
26299 xP[4] = g100*g177*g59;
26300 xP[5] = g101*g190*g59;
26301 xP[6] = g102*g184*g59;
26302 xP[7] = g103*g178*g59;
26303 xP[8] = g104*g186*g59;
26304 xP[9] = g105*g189*g59;
26305 xP[10] = g106*g188*g59;
26306 xP[11] = g107*g180*g59;
26307 xP[12] = g108*g187*g59;
26308 xP[13] = g109*g182*g59;
26309 xP[14] = g110*g185*g59;
26310 xP[15] = g111*g176*g59;
26311 xT[0] = g175*g62*g93;
26312 xT[1] = g181*g60*g93;
26313 xT[2] = g179*g63*g93;
26314 xT[3] = g183*g64*g93;
26315 xT[4] = g177*g65*g93;
26316 xT[5] = g190*g66*g93;
26317 xT[6] = g184*g67*g93;
26318 xT[7] = g178*g68*g93;
26319 xT[8] = g186*g69*g93;
26320 xT[9] = g189*g70*g93;
26321 xT[10] = g188*g71*g93;
26322 xT[11] = g180*g72*g93;
26323 xT[12] = g187*g73*g93;
26324 xT[13] = g182*g74*g93;
26325 xT[14] = g185*g75*g93;
26326 xT[15] = g176*g76*g93;
26329 n0 = MW[0] - Mstar;
26333 n4 = MW[10] - Mstar;
26334 n5 = MW[11] - Mstar;
26335 n6 = MW[12] - Mstar;
26336 n7 = MW[13] - Mstar;
26337 n8 = MW[14] - Mstar;
26338 n9 = MW[15] - Mstar;
26339 n10 = MW[16] - Mstar;
26340 n11 = MW[1] - Mstar;
26341 n12 = MW[2] - Mstar;
26342 n13 = MW[3] - Mstar;
26343 n14 = MW[4] - Mstar;
26344 n15 = MW[5] - Mstar;
26345 n16 = MW[6] - Mstar;
26346 n17 = MW[7] - Mstar;
26347 n18 = MW[8] - Mstar;
26348 n19 = MW[9] - Mstar;
26358 n29 = pow(n0, -n21);
26359 n30 = pow(n1, -n21);
26360 n31 = pow(n4, -n21);
26361 n32 = pow(n5, -n21);
26362 n33 = pow(n6, -n21);
26363 n34 = pow(n7, -n21);
26364 n35 = pow(n8, -n21);
26365 n36 = pow(n9, -n21);
26366 n37 = pow(n10, -n21);
26367 n38 = pow(n11, -n21);
26368 n39 = pow(n12, -n21);
26369 n40 = pow(n13, -n21);
26370 n41 = pow(n14, -n21);
26371 n42 = pow(n15, -n21);
26372 n43 = pow(n16, -n21);
26373 n44 = pow(n17, -n21);
26374 n45 = pow(n18, -n21);
26375 n46 = pow(n19, -n21);
26379 n50 = pow(alpha, NP0*n0);
26380 n51 = n23 + n26*xF[0];
26381 n52 = n23 + n26*xPj;
26382 n53 = pow(alpha, NP0*n4);
26383 n54 = pow(alpha, NP0*n5);
26384 n55 = pow(alpha, NP0*n6);
26385 n56 = pow(alpha, NP0*n7);
26386 n57 = pow(alpha, NP0*n8);
26387 n58 = pow(alpha, NP0*n9);
26388 n59 = pow(alpha, NP0*n10);
26389 n60 = pow(alpha, NP0*n11);
26390 n61 = pow(alpha, NP0*n12);
26391 n62 = pow(alpha, NP0*n13);
26392 n63 = pow(alpha, NP0*n14);
26393 n64 = pow(alpha, NP0*n15);
26394 n65 = pow(alpha, NP0*n16);
26395 n66 = pow(alpha, NP0*n17);
26396 n67 = pow(alpha, NP0*n18);
26397 n68 = pow(alpha, NP0*n19);
26412 n83 = pow(alpha, NP0*n21*n22);
26413 n84 = pow(n51, -n21);
26414 n85 = pow(n52, -n21);
26477 n148 = log((-1.0 + xPj/xF[0])/n2);
26496 n167 = n1*n11*n117;
26497 n168 = n153*xF[13];
26499 n170 = n30*n34*n56;
26500 n171 = n30*n32*n54;
26501 n172 = n30*n45*n67;
26502 n173 = n30*n37*n59;
26503 n174 = n30*n31*n53;
26504 n175 = n30*n43*n65;
26505 n176 = n30*n40*n62;
26506 n177 = n102*n166 + 1;
26507 n178 = -n166*n50 + 1;
26508 n179 = pow(n177, -n21);
26509 n180 = n148 + n20 + n47 + n69;
26514 n185 = n166*n50/n177;
26516 n187 = n116*(n180 - log(n177)) + 1;
26517 n188 = n116*(n180 - log(n178)) + 1;
26518 n189 = pow(alpha, n0*n187);
26519 n190 = pow(alpha, n187*n4);
26520 n191 = pow(alpha, n187*n5);
26521 n192 = pow(alpha, n187*n6);
26522 n193 = pow(alpha, n187*n7);
26523 n194 = pow(alpha, n187*n8);
26524 n195 = pow(alpha, n187*n9);
26525 n196 = pow(alpha, n10*n187);
26526 n197 = pow(alpha, n11*n187);
26527 n198 = pow(alpha, n12*n187);
26528 n199 = pow(alpha, n13*n187);
26529 n200 = pow(alpha, n14*n187);
26530 n201 = pow(alpha, n15*n187);
26531 n202 = pow(alpha, n16*n187);
26532 n203 = pow(alpha, n17*n187);
26533 n204 = pow(alpha, n18*n187);
26534 n205 = pow(alpha, n187*n19);
26563 n234 = pow(alpha, n187*n22) + n81 - 1;
26564 n235 = n82 - 1 + 1.0/n190;
26565 n236 = n86 - 1 + 1.0/n191;
26566 n237 = n87 - 1 + 1.0/n192;
26567 n238 = n88 - 1 + 1.0/n193;
26568 n239 = n89 - 1 + 1.0/n194;
26569 n240 = n90 - 1 + 1.0/n195;
26570 n241 = n91 - 1 + 1.0/n196;
26571 n242 = n92 - 1 + 1.0/n197;
26572 n243 = n93 - 1 + 1.0/n198;
26573 n244 = n94 - 1 + 1.0/n199;
26574 n245 = n95 - 1 + 1.0/n200;
26575 n246 = n96 - 1 + 1.0/n201;
26576 n247 = n97 - 1 + 1.0/n202;
26577 n248 = n98 - 1 + 1.0/n203;
26578 n249 = n99 - 1 + 1.0/n204;
26579 n250 = n100 - 1 + 1.0/n205;
26580 n251 = -n224 + n81 - 1;
26581 n252 = -n210 + n82 - 1;
26582 n253 = -n216 + n86 - 1;
26583 n254 = -n208 + n87 - 1;
26584 n255 = -n206 + n88 - 1;
26586 n257 = -n213 + n90 - 1;
26587 n258 = -n215 + n91 - 1;
26588 n259 = -n229 + n92 - 1;
26590 n261 = -n223 + n94 - 1;
26592 n263 = -n219 + n96 - 1;
26593 n264 = -n209 + n97 - 1;
26594 n265 = -n232 + n98 - 1;
26595 n266 = -n227 + n99 - 1;
26596 n267 = n100 - n221 - 1;
26597 n268 = pow(n234, -n21);
26598 n269 = pow(n235, -n21);
26599 n270 = pow(n236, -n21);
26600 n271 = pow(n237, -n21);
26601 n272 = pow(n238, -n21);
26602 n273 = pow(n239, -n21);
26603 n274 = pow(n240, -n21);
26604 n275 = pow(n241, -n21);
26605 n276 = pow(n242, -n21);
26606 n277 = pow(n243, -n21);
26607 n278 = pow(n244, -n21);
26608 n279 = pow(n245, -n21);
26609 n280 = pow(n246, -n21);
26610 n281 = pow(n247, -n21);
26611 n282 = pow(n248, -n21);
26612 n283 = pow(n249, -n21);
26613 n284 = pow(n250, -n21);
26614 n285 = pow(n234, 3);
26615 n286 = pow(n235, 3);
26616 n287 = pow(n236, 3);
26617 n288 = pow(n237, 3);
26618 n289 = pow(n238, 3);
26619 n290 = pow(n239, 3);
26620 n291 = pow(n240, 3);
26621 n292 = pow(n241, 3);
26622 n293 = pow(n242, 3);
26623 n294 = pow(n243, 3);
26624 n295 = pow(n244, 3);
26625 n296 = pow(n245, 3);
26626 n297 = pow(n246, 3);
26627 n298 = pow(n247, 3);
26628 n299 = pow(n248, 3);
26629 n300 = pow(n249, 3);
26630 n301 = pow(n250, 3);
26631 n302 = pow(n251, -n21);
26632 n303 = xF[11]/n236;
26634 n305 = xF[10]/n235;
26635 n306 = xF[13]/n238;
26637 n308 = xF[16]/n241;
26641 n312 = xF[10]/n269;
26645 n316 = n64*xF[5]/n246;
26648 n319 = n57*xF[14]/n239;
26649 n320 = n30*n44/n248;
26655 n326 = n98*xF[7]/n299;
26657 n328 = n95*xF[4]/n279;
26658 n329 = n98*xF[7]/n282;
26659 n330 = n99*xF[8]/n283;
26660 n331 = 1/(n177*n189);
26661 n332 = n115*n30*n46/n250;
26662 n333 = n30*n41*n63*xF[4]/n245;
26663 n334 = n1*n22*n304*n50*n70;
26664 n335 = n169*n304*n70;
26665 n336 = n174*n305*n70;
26666 n337 = n171*n303*n70;
26667 n338 = n112*n142*n70/n237;
26668 n339 = n170*n306*n70;
26669 n340 = n145*n319*n70;
26670 n341 = n136*n318*n70;
26671 n342 = n173*n308*n70;
26672 n343 = n117*n139*n70/n242;
26673 n344 = n137*n317*n70;
26674 n345 = n176*n310*n70;
26676 n347 = n125*n316*n70;
26677 n348 = n175*n309*n70;
26678 n349 = n113*n320*n70;
26679 n350 = n172*n307*n70;
26682 n353 = n166*n331 + 1;
26683 n354 = n149*n166*n331 + n149;
26684 n355 = n1*n185*n228 + n150;
26685 n356 = n151 + n185*n73/n191;
26686 n357 = n152 + n185*n71/n192;
26687 n358 = n153 + n185*n79/n193;
26688 n359 = n1*n185*n212 + n154;
26689 n360 = n155 + n185*n78/n195;
26690 n361 = n1*n185*n233 + n156;
26691 n362 = n1*n185*n220 + n157;
26692 n363 = n158 + n185*n76/n198;
26693 n364 = n1*n185*n211 + n159;
26694 n365 = n160 + n185*n75/n200;
26695 n366 = n161 + n185*n72/n201;
26696 n367 = n162 + n185*n77/n202;
26697 n368 = n163 + n185*n80/n203;
26698 n369 = n1*n185*n214 + n164;
26699 n370 = n165 + n185*n74/n205;
26700 n371 = pow(n354, -n21);
26701 n372 = pow(n355, -n21);
26702 n373 = pow(n356, -n21);
26703 n374 = pow(n357, -n21);
26704 n375 = pow(n358, -n21);
26705 n376 = pow(n359, -n21);
26706 n377 = pow(n360, -n21);
26707 n378 = pow(n361, -n21);
26708 n379 = pow(n362, -n21);
26709 n380 = pow(n363, -n21);
26710 n381 = pow(n364, -n21);
26711 n382 = pow(n365, -n21);
26712 n383 = pow(n366, -n21);
26713 n384 = pow(n367, -n21);
26714 n385 = pow(n368, -n21);
26715 n386 = pow(n369, -n21);
26716 n387 = pow(n370, -n21);
26717 n388 = pow(alpha, n188*n22)*n149*n184 + n149;
26719 n390 = n356*xF[11];
26722 n393 = n1*n185*n21*n22/n189 + n1*n21*n22*n50;
26723 n394 = n373*xF[11];
26725 n396 = n102*n144*n166*n331 + n102*n144;
26746 n417 = n381*n94*xF[3]/n295;
26747 n418 = n386*n99*xF[8]/n300;
26748 n419 = n147*n371/n285;
26749 n420 = n372*n82*xF[10]/n286;
26750 n421 = n135*n388/n302;
26751 n422 = n21*n22*n314*n50*n70*xF[0]*(pow(alpha, NP0*n0 + n187*n22)*n0*n1*n166/n177 + n149);
26752 n423 = n129*n312*n48*n70*(pow(alpha, NP0*n0 - n187*n4)*n1*n166*n4/n177 + n150);
26753 n424 = n48*n5*n54*n70*xF[11]*(pow(alpha, NP0*n0 - n187*n5)*n166*n73/n177 + n151)/n270;
26754 n425 = n112*n48*n6*n70*(pow(alpha, NP0*n0 - n187*n6)*n166*n71/n177 + n152)/n271;
26755 n426 = n143*n48*n70*xF[13]*(pow(alpha, NP0*n0 - n187*n7)*n166*n79/n177 + n153)/n272;
26756 n427 = n128*n48*n70*xF[14]*(pow(alpha, NP0*n0 - n187*n8)*n1*n166*n8/n177 + n154)/n273;
26757 n428 = n118*n48*n70*n9*(pow(alpha, NP0*n0 - n187*n9)*n166*n78/n177 + n155)/n274;
26758 n429 = n138*n48*n70*xF[16]*(pow(alpha, NP0*n0 - n10*n187)*n1*n10*n166/n177 + n156)/n275;
26759 n430 = n11*n117*n48*n70*(pow(alpha, NP0*n0 - n11*n187)*n1*n11*n166/n177 + n157)/n276;
26760 n431 = n119*n12*n48*n70*(pow(alpha, NP0*n0 - n12*n187)*n166*n76/n177 + n158)/n277;
26761 n432 = n121*n311*n48*n70*(pow(alpha, NP0*n0 - n13*n187)*n1*n13*n166/n177 + n159);
26762 n433 = n126*n48*n70*xF[4]*(pow(alpha, NP0*n0 - n14*n187)*n166*n75/n177 + n160)/n279;
26763 n434 = n15*n48*n64*n70*xF[5]*(pow(alpha, NP0*n0 - n15*n187)*n166*n72/n177 + n161)/n280;
26764 n435 = n16*n48*n65*n70*xF[6]*(pow(alpha, NP0*n0 - n16*n187)*n166*n77/n177 + n162)/n281;
26765 n436 = n113*n17*n48*n70*(pow(alpha, NP0*n0 - n17*n187)*n166*n80/n177 + n163)/n282;
26766 n437 = n146*n48*n70*xF[8]*(pow(alpha, NP0*n0 - n18*n187)*n1*n166*n18/n177 + n164)/n283;
26767 n438 = n115*n19*n48*n70*(pow(alpha, NP0*n0 - n187*n19)*n166*n74/n177 + n165)/n284;
26768 n439 = 1.0*n149*n389*n70/n268;
26769 n440 = n147*n396*n70/n268;
26771 n442 = pow(alpha, n0*n25)*n114*n228*n85/(n179*n84) + pow(alpha, n0*n25)*n210*n30*n31*n85/(n179*n84) + n114*n185*n228 + n174;
26772 n443 = pow(alpha, n0*n25)*n114*n217*n85/(n179*n84) + pow(alpha, n0*n25)*n216*n30*n32*n85/(n179*n84) + n114*n185*n217 + n171;
26773 n444 = pow(alpha, n0*n25)*n114*n226*n85/(n179*n84) + pow(alpha, n0*n25)*n142*n208*n85/(n179*n84) + n114*n185*n226 + n142*n55;
26774 n445 = pow(alpha, n0*n25)*n22*n30*n7*n85/(n179*n193*n84) + pow(alpha, n0*n25)*n30*n34*n85/(n179*n193*n84) + n104*n30*n34 + n185*n22*n30*n7/n193;
26775 n446 = pow(alpha, n0*n25)*n145*n85/(n179*n194*n84) + pow(alpha, n0*n25)*n212*n22*n30*n85/(n179*n84) + n105*n145 + n185*n212*n22*n30;
26776 n447 = pow(alpha, n0*n25)*n114*n225*n85/(n179*n84) + pow(alpha, n0*n25)*n136*n213*n85/(n179*n84) + n114*n185*n225 + n136*n58;
26777 n448 = pow(alpha, n0*n25)*n22*n233*n30*n85/(n179*n84) + pow(alpha, n0*n25)*n30*n37*n85/(n179*n196*n84) + n106*n30*n37 + n185*n22*n233*n30;
26778 n449 = pow(alpha, n0*n25)*n137*n85/(n179*n198*n84) + pow(alpha, n0*n25)*n22*n222*n30*n85/(n179*n84) + n107*n137 + n185*n22*n222*n30;
26779 n450 = pow(alpha, n0*n25)*n114*n211*n85/(n179*n84) + pow(alpha, n0*n25)*n223*n30*n40*n85/(n179*n84) + n114*n185*n211 + n176;
26780 n451 = pow(alpha, n0*n25)*n16*n22*n30*n85/(n179*n202*n84) + pow(alpha, n0*n25)*n30*n43*n85/(n179*n202*n84) + n110*n30*n43 + n16*n185*n22*n30/n202;
26781 n452 = pow(alpha, n0*n25)*n114*n231*n85/(n179*n84) + pow(alpha, n0*n25)*n221*n30*n46*n85/(n179*n84) + n114*n185*n231 + n30*n46*n68;
26782 n453 = n134*n70*(pow(alpha, n0*n25 - n187*n7)*n22*n30*n7*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n7)*n30*n34*n85/(n179*n84) + n104*n30*n34 + n185*n22*n30*n7/n193)/n272;
26783 n454 = n131*n70*(pow(alpha, n0*n25 - n187*n8)*n145*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n8)*n22*n30*n8*n85/(n179*n84) + n105*n145 + n185*n212*n22*n30)/n273;
26784 n455 = n120*n70*(pow(alpha, n0*n25 - n10*n187)*n10*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n10*n187)*n30*n37*n85/(n179*n84) + n106*n30*n37 + n185*n22*n233*n30)/n275;
26785 n456 = n132*n70*(pow(alpha, n0*n25 - n12*n187)*n12*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n12*n187)*n137*n85/(n179*n84) + n107*n137 + n185*n22*n222*n30)/n277;
26786 n457 = n328*n70*(pow(alpha, n0*n25 - n14*n187)*n14*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n14*n187)*n30*n41*n85/(n179*n84) + n108*n30*n41 + n185*n218*n22*n30);
26787 n458 = n130*n70*(pow(alpha, n0*n25 - n16*n187)*n16*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n16*n187)*n30*n43*n85/(n179*n84) + n110*n30*n43 + n16*n185*n22*n30/n202)/n281;
26788 n459 = n111*n312*n82*(pow(alpha, n0*n25 - n187*n4)*n114*n4*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n4)*n30*n31*n85/(n179*n84) + n114*n185*n228 + n174);
26789 n460 = n111*n322*xF[11]*(pow(alpha, n0*n25 - n187*n5)*n114*n5*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n5)*n30*n32*n85/(n179*n84) + n114*n185*n217 + n171);
26790 n461 = n111*n123*(pow(alpha, n0*n25 - n187*n6)*n114*n6*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n6)*n142*n85/(n179*n84) + n114*n185*n226 + n142*n55)/n271;
26791 n462 = n111*n122*(pow(alpha, n0*n25 - n187*n9)*n114*n85*n9/(n179*n84) - pow(alpha, n0*n25 - n187*n9)*n136*n85/(n179*n84) + n114*n185*n225 + n136*n58)/n274;
26792 n463 = n111*n327*(pow(alpha, n0*n25 - n11*n187)*n11*n114*n85/(n179*n84) - pow(alpha, n0*n25 - n11*n187)*n139*n85/(n179*n84) + n114*n185*n220 + n139*n60);
26793 n464 = n111*n311*n94*(pow(alpha, n0*n25 - n13*n187)*n114*n13*n85/(n179*n84) - pow(alpha, n0*n25 - n13*n187)*n30*n40*n85/(n179*n84) + n114*n185*n211 + n176);
26794 n465 = n111*n325*(pow(alpha, n0*n25 - n15*n187)*n114*n15*n85/(n179*n84) - pow(alpha, n0*n25 - n15*n187)*n125*n85/(n179*n84) + n114*n185*n230 + n125*n64);
26795 n466 = n111*n329*(pow(alpha, n0*n25 - n17*n187)*n114*n17*n85/(n179*n84) - pow(alpha, n0*n25 - n17*n187)*n30*n44*n85/(n179*n84) + n114*n185*n207 + n30*n44*n66);
26796 n467 = n111*n330*(pow(alpha, n0*n25 - n18*n187)*n114*n18*n85/(n179*n84) - pow(alpha, n0*n25 - n18*n187)*n30*n45*n85/(n179*n84) + n114*n185*n214 + n172);
26797 n468 = n111*n127*(pow(alpha, n0*n25 - n187*n19)*n114*n19*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n19)*n30*n46*n85/(n179*n84) + n114*n185*n231 + n30*n46*n68)/n284;
26798 n469 = n335 + n336 + n337 + n338 + n339 + n340 + n341 + n342 + n343 + n344 + n345 + n346 + n347 + n348 + n349 + n350 + n351 + n422 + n423 + n424 + n425 + n426 + n427 + n428 + n429 + n430 + n431 + n432 + n433 + n434 + n435 + n436 + n437 + n438 + n440 + n453 + n454 + n455 + n456 + n457 + n458 + n459 + n460 + n461 + n462 + n463 + n464 + n465 + n466 + n467 + n468;
26799 n470 = n111*n120*n361*(n138*n48 + n185*n233*n48)/n292 + n111*n122*n360*(n185*n225*n48 + n48*n58*n9)/n291 + n111*n123*n357*(n185*n226*n48 + n48*n55*n6)/n288 + n111*n127*n370*(n185*n231*n48 + n19*n48*n68)/n301 + n111*n130*n367*(n16*n185*n48/n202 + n16*n48*n65)/n298 + n111*n131*n359*(n128*n48 + n185*n212*n48)/n290 + n111*n132*n363*(n12*n48*n61 + n185*n222*n48)/n294 + n111*n133*n366*(n15*n48*n64 + n185*n230*n48)/n297 + n111*n134*n358*(n143*n48 + n185*n48*n7/n193)/n289 + n111*n140*n362*(n141*n48 + n185*n220*n48)/n293 + n111*n147*n354*n416 + n111*n321*n390*(n185*n217*n48 + n48*n5*n54) + n111*n323*n391*(n126*n48 + n185*n218*n48) + n111*n326*n368*(n17*n48*n66 + n185*n207*n48) + n111*n392*n99*(n146*n48 + n185*n214*n48)/n300 + n111*n397*xF[3]*(n121*n48 + n185*n211*n48)/n295 + n111*n398*xF[10]*(n129*n48 + n185*n228*n48)/n286 + n469;
26801 NP_b = -n147*n149*n353*n70/n268 - n25*(0.5*n147*n70*(pow(alpha, NP0*n0 - n0*n187)*n144*(-n23 + xPj*xTj)/(n177*n51) + n102*n144)/n268 + 1.0*n149*n70*xF[0]*(pow(alpha, NP0*n0 - n0*n187)*n0*n1*n166/n177 + n149)/n268 + n352 - 1.0*n419*n70 - 0.5*xTj*(n111*n122*(pow(alpha, NP0*n0 - n187*n9)*n114*n166*n9/n177 + pow(alpha, n0*n25 - n187*n9)*n114*n85*n9/(n179*n84) - pow(alpha, n0*n25 - n187*n9)*n136*n85/(n179*n84) + n136*n58)/n274 + n111*n123*(pow(alpha, NP0*n0 - n187*n6)*n114*n166*n6/n177 + pow(alpha, n0*n25 - n187*n6)*n114*n6*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n6)*n142*n85/(n179*n84) + n142*n55)/n271 + n111*n127*(pow(alpha, NP0*n0 - n187*n19)*n114*n166*n19/n177 + pow(alpha, n0*n25 - n187*n19)*n114*n19*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n19)*n30*n46*n85/(n179*n84) + n30*n46*n68)/n284 + n111*n311*n94*(pow(alpha, NP0*n0 - n13*n187)*n114*n13*n166/n177 + pow(alpha, n0*n25 - n13*n187)*n114*n13*n85/(n179*n84) - pow(alpha, n0*n25 - n13*n187)*n30*n40*n85/(n179*n84) + n176) + n111*n312*n82*(pow(alpha, NP0*n0 - n187*n4)*n114*n166*n4/n177 + pow(alpha, n0*n25 - n187*n4)*n114*n4*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n4)*n30*n31*n85/(n179*n84) + n174) + n111*n322*xF[11]*(pow(alpha, NP0*n0 - n187*n5)*n114*n166*n5/n177 + pow(alpha, n0*n25 - n187*n5)*n114*n5*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n5)*n30*n32*n85/(n179*n84) + n171) + n111*n325*(pow(alpha, NP0*n0 - n15*n187)*n114*n15*n166/n177 + pow(alpha, n0*n25 - n15*n187)*n114*n15*n85/(n179*n84) - pow(alpha, n0*n25 - n15*n187)*n125*n85/(n179*n84) + n125*n64) + n111*n327*(pow(alpha, NP0*n0 - n11*n187)*n11*n114*n166/n177 + pow(alpha, n0*n25 - n11*n187)*n11*n114*n85/(n179*n84) - pow(alpha, n0*n25 - n11*n187)*n139*n85/(n179*n84) + n139*n60) + n111*n329*(pow(alpha, NP0*n0 - n17*n187)*n114*n166*n17/n177 + pow(alpha, n0*n25 - n17*n187)*n114*n17*n85/(n179*n84) - pow(alpha, n0*n25 - n17*n187)*n30*n44*n85/(n179*n84) + n30*n44*n66) + n111*n330*(pow(alpha, NP0*n0 - n18*n187)*n114*n166*n18/n177 + pow(alpha, n0*n25 - n18*n187)*n114*n18*n85/(n179*n84) - pow(alpha, n0*n25 - n18*n187)*n30*n45*n85/(n179*n84) + n172) + n120*n21*n414*n70 + n120*n70*(pow(alpha, NP0*n0 - n10*n187)*n10*n166*n22*n30/n177 + pow(alpha, n0*n25 - n10*n187)*n10*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n10*n187)*n30*n37*n85/(n179*n84) + n106*n30*n37)/n275 + n122*n21*n408*n70 + n123*n21*n412*n70 + n127*n21*n406*n70 + n130*n21*n407*n70 + n130*n70*(pow(alpha, NP0*n0 - n16*n187)*n16*n166*n22*n30/n177 + pow(alpha, n0*n25 - n16*n187)*n16*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n16*n187)*n30*n43*n85/(n179*n84) + n110*n30*n43)/n281 + n131*n21*n410*n70 + n131*n70*(pow(alpha, NP0*n0 - n187*n8)*n166*n22*n30*n8/n177 + pow(alpha, n0*n25 - n187*n8)*n145*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n8)*n22*n30*n8*n85/(n179*n84) + n105*n145)/n273 + n132*n21*n411*n70 + n132*n70*(pow(alpha, NP0*n0 - n12*n187)*n12*n166*n22*n30/n177 + pow(alpha, n0*n25 - n12*n187)*n12*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n12*n187)*n137*n85/(n179*n84) + n107*n137)/n277 + n133*n21*n413*n70 + n134*n21*n409*n70 + n134*n70*(pow(alpha, NP0*n0 - n187*n7)*n166*n22*n30*n7/n177 + pow(alpha, n0*n25 - n187*n7)*n22*n30*n7*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n7)*n30*n34*n85/(n179*n84) + n104*n30*n34)/n272 + n140*n21*n415*n70 + n147*n70*(pow(alpha, NP0*n0 - n0*n187)*n144*(-n23 + xPj*xTj)/(n177*n51) + n102*n144)/n268 + n21*n321*n394*n70 + n21*n323*n395*n70 + n21*n326*n385*n70 + n21*n417*n70 + n21*n418*n70 + n21*n419*n70 + n21*n420*n70 + n328*n70*(pow(alpha, NP0*n0 - n14*n187)*n14*n166*n22*n30/n177 + pow(alpha, n0*n25 - n14*n187)*n14*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n14*n187)*n30*n41*n85/(n179*n84) + n108*n30*n41) + n335 + n336 + n337 + n338 + n339 + n340 + n341 + n342 + n343 + n344 + n345 + n346 + n347 + n348 + n349 + n350 + n351 + n422 + n423 + n424 + n425 + n426 + n427 + n428 + n429 + n430 + n431 + n432 + n433 + n434 + n435 + n436 + n437 + n438)) - n334 - n70*xTj*(n112*n71/n237 + n113*n80/n248 + n115*n74/n250 - n120*n405 - n122*n404 - n123*n399 + n126*n49/n245 - n127*n401 - n130*n367/n281 - n131*n403 - n132*n400 - n134*n402 - n147*n354/n268 + n149*n304 + n150*n305 + n151*n303 + n154*xF[14]/n239 + n156*n308 + n159*n310 + n161*xF[5]/n246 + n162*n309 + n164*n307 + n167/n242 + n168/n238 - n311*n397 - n312*n398 + n317*n76 + n318*n78 - n322*n390 - n325*n366 - n327*n362 - n328*n365 - n329*n368 - n330*n369);
26802 NP_2a = -n70*(-pow(alpha, n0*n25)*n144*n147*n21*pow(n353, -n21)/n285 - 2.0*pow(alpha, n0*n25)*n144*n353*xF[0]/n268 + n102*n144*n147*(n331*(-n23 + xPj*xTj)/n51 - 1)/n268 - 1.0*n169*n304 + 1.0*xTj*(n11*n117*n48*(pow(alpha, NP0*n0 - n11*n187)*n1*n11*n166/n177 + n157)/n276 + n112*n142/n237 + n112*n48*n6*(pow(alpha, NP0*n0 - n187*n6)*n166*n71/n177 + n152)/n271 + n113*n17*n48*(pow(alpha, NP0*n0 - n17*n187)*n166*n80/n177 + n163)/n282 + n113*n320 + n115*n19*n48*(pow(alpha, NP0*n0 - n187*n19)*n166*n74/n177 + n165)/n284 + n117*n139/n242 + n118*n48*n9*(pow(alpha, NP0*n0 - n187*n9)*n166*n78/n177 + n155)/n274 + n119*n12*n48*(pow(alpha, NP0*n0 - n12*n187)*n166*n76/n177 + n158)/n277 + n120*n21*n414 + n120*(pow(alpha, n0*n25 - n10*n187)*n10*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n10*n187)*n30*n37*n85/(n179*n84) + n106*n30*n37 + n185*n22*n233*n30)/n275 + n121*n311*n48*(pow(alpha, NP0*n0 - n13*n187)*n1*n13*n166/n177 + n159) + n122*n21*n408 - n122*(pow(alpha, n0*n25 - n187*n9)*n114*n85*n9/(n179*n84) - pow(alpha, n0*n25 - n187*n9)*n136*n85/(n179*n84) + n114*n185*n225 + n136*n58)/n274 + n123*n21*n412 - n123*(pow(alpha, n0*n25 - n187*n6)*n114*n6*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n6)*n142*n85/(n179*n84) + n114*n185*n226 + n142*n55)/n271 + n125*n316 + n126*n48*xF[4]*(pow(alpha, NP0*n0 - n14*n187)*n166*n75/n177 + n160)/n279 + n127*n21*n406 - n127*(pow(alpha, n0*n25 - n187*n19)*n114*n19*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n19)*n30*n46*n85/(n179*n84) + n114*n185*n231 + n30*n46*n68)/n284 + n128*n48*xF[14]*(pow(alpha, NP0*n0 - n187*n8)*n1*n166*n8/n177 + n154)/n273 + n129*n312*n48*(pow(alpha, NP0*n0 - n187*n4)*n1*n166*n4/n177 + n150) + n130*n21*n407 + n130*(pow(alpha, n0*n25 - n16*n187)*n16*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n16*n187)*n30*n43*n85/(n179*n84) + n110*n30*n43 + n16*n185*n22*n30/n202)/n281 + n131*n21*n410 + n131*(pow(alpha, n0*n25 - n187*n8)*n145*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n8)*n22*n30*n8*n85/(n179*n84) + n105*n145 + n185*n212*n22*n30)/n273 + n132*n21*n411 + n132*(pow(alpha, n0*n25 - n12*n187)*n12*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n12*n187)*n137*n85/(n179*n84) + n107*n137 + n185*n22*n222*n30)/n277 + n133*n21*n413 + n134*n21*n409 + n134*(pow(alpha, n0*n25 - n187*n7)*n22*n30*n7*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n7)*n30*n34*n85/(n179*n84) + n104*n30*n34 + n185*n22*n30*n7/n193)/n272 + n136*n318 + n137*n317 + n138*n48*xF[16]*(pow(alpha, NP0*n0 - n10*n187)*n1*n10*n166/n177 + n156)/n275 + n140*n21*n415 + n143*n48*xF[13]*(pow(alpha, NP0*n0 - n187*n7)*n166*n79/n177 + n153)/n272 + n145*n319 + n146*n48*xF[8]*(pow(alpha, NP0*n0 - n18*n187)*n1*n166*n18/n177 + n164)/n283 + n147*n396/n268 + n15*n48*n64*xF[5]*(pow(alpha, NP0*n0 - n15*n187)*n166*n72/n177 + n161)/n280 + n16*n48*n65*xF[6]*(pow(alpha, NP0*n0 - n16*n187)*n166*n77/n177 + n162)/n281 + n169*n304 + n170*n306 + n171*n303 + n172*n307 + n173*n308 + n174*n305 + n175*n309 + n176*n310 + n21*n22*n314*n50*xF[0]*(pow(alpha, NP0*n0 + n187*n22)*n0*n1*n166/n177 + n149) + n21*n321*n394 + n21*n323*n395 + n21*n326*n385 + n21*n417 + n21*n418 + n21*n419 + n21*n420 - n311*n94*(pow(alpha, n0*n25 - n13*n187)*n114*n13*n85/(n179*n84) - pow(alpha, n0*n25 - n13*n187)*n30*n40*n85/(n179*n84) + n114*n185*n211 + n176) - n312*n82*(pow(alpha, n0*n25 - n187*n4)*n114*n4*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n4)*n30*n31*n85/(n179*n84) + n114*n185*n228 + n174) - n322*xF[11]*(pow(alpha, n0*n25 - n187*n5)*n114*n5*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n5)*n30*n32*n85/(n179*n84) + n114*n185*n217 + n171) - n325*(pow(alpha, n0*n25 - n15*n187)*n114*n15*n85/(n179*n84) - pow(alpha, n0*n25 - n15*n187)*n125*n85/(n179*n84) + n114*n185*n230 + n125*n64) - n327*(pow(alpha, n0*n25 - n11*n187)*n11*n114*n85/(n179*n84) - pow(alpha, n0*n25 - n11*n187)*n139*n85/(n179*n84) + n114*n185*n220 + n139*n60) + n328*(pow(alpha, n0*n25 - n14*n187)*n14*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n14*n187)*n30*n41*n85/(n179*n84) + n108*n30*n41 + n185*n218*n22*n30) - n329*(pow(alpha, n0*n25 - n17*n187)*n114*n17*n85/(n179*n84) - pow(alpha, n0*n25 - n17*n187)*n30*n44*n85/(n179*n84) + n114*n185*n207 + n30*n44*n66) - n330*(pow(alpha, n0*n25 - n18*n187)*n114*n18*n85/(n179*n84) - pow(alpha, n0*n25 - n18*n187)*n30*n45*n85/(n179*n84) + n114*n185*n214 + n172) + n332 + n333 + n48*n5*n54*xF[11]*(pow(alpha, NP0*n0 - n187*n5)*n166*n73/n177 + n151)/n270));
26803 NP_sqrt_base = (-NP0*(n22*n315*n50*n70 + n421*n70 + xTj*(n100*n111*pow(n267, n21)*xF[9]*(n165 + pow(alpha, -n188*n19)*n186*n74) + n111*pow(n252, n21)*n82*xF[10]*(n150 + pow(alpha, -n188*n4)*n166*n183*n4) + n111*pow(n253, n21)*n86*xF[11]*(n151 + pow(alpha, -n188*n5)*n186*n73) + n111*pow(n254, n21)*n87*xF[12]*(n152 + pow(alpha, -n188*n6)*n186*n71) + n111*pow(n255, n21)*n88*xF[13]*(n153 + pow(alpha, -n188*n7)*n186*n79) + n111*pow(n256, n21)*n89*xF[14]*(n154 + pow(alpha, -n188*n8)*n166*n183*n8) + n111*pow(n257, n21)*n90*xF[15]*(n155 + pow(alpha, -n188*n9)*n186*n78) + n111*pow(n258, n21)*n91*xF[16]*(n156 + pow(alpha, -n10*n188)*n10*n166*n183) + n111*pow(n259, n21)*n92*xF[1]*(n157 + pow(alpha, -n11*n188)*n11*n166*n183) + n111*pow(n260, n21)*n93*xF[2]*(n158 + pow(alpha, -n12*n188)*n186*n76) + n111*pow(n261, n21)*n94*xF[3]*(n159 + pow(alpha, -n13*n188)*n13*n166*n183) + n111*pow(n262, n21)*n95*xF[4]*(n160 + pow(alpha, -n14*n188)*n186*n75) + n111*pow(n263, n21)*n96*xF[5]*(n161 + pow(alpha, -n15*n188)*n186*n72) + n111*pow(n264, n21)*n97*xF[6]*(n162 + pow(alpha, -n16*n188)*n186*n77) + n111*pow(n265, n21)*n98*xF[7]*(n163 + pow(alpha, -n17*n188)*n186*n80) + n111*pow(n266, n21)*n99*xF[8]*(n164 + pow(alpha, -n18*n188)*n166*n18*n183) + n111*n421 + n112*n70*n71/n254 + n113*n70*n80/n265 + n115*n70*n74/n267 + n118*n70*n78/n257 + n119*n70*n76/n260 + n126*n49*n70/n262 + n149*n313*n70 + n150*n70*xF[10]/n252 + n151*n70*xF[11]/n253 + n154*n70*xF[14]/n256 + n156*n70*xF[16]/n258 + n159*n70*xF[3]/n261 + n161*n70*xF[5]/n263 + n162*n70*xF[6]/n264 + n164*n70*xF[8]/n266 + n167*n70/n259 + n168*n70/n255)) - n111*n135/n251 - n26*(-n120*n70/(n91 - 1 + pow(alpha, -n10*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n122*n70/(n90 - 1 + pow(alpha, -n9*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n123*n70/(n87 - 1 + pow(alpha, -n6*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n127*n70/(n100 - 1 + pow(alpha, -n19*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n130*n70/(n97 - 1 + pow(alpha, -n16*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n131*n70/(n89 - 1 + pow(alpha, -n8*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n132*n70/(n93 - 1 + pow(alpha, -n12*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n133*n70/(n96 - 1 + pow(alpha, -n15*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n134*n70/(n88 - 1 + pow(alpha, -n7*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n140*n70/(n92 - 1 + pow(alpha, -n11*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n147*n70/(pow(alpha, n22*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1)) + n81 - 1) - n70*n82*xF[10]/(n82 - 1 + pow(alpha, -n4*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n70*n86*xF[11]/(n86 - 1 + pow(alpha, -n5*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n70*n94*xF[3]/(n94 - 1 + pow(alpha, -n13*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n70*n95*xF[4]/(n95 - 1 + pow(alpha, -n14*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n70*n98*xF[7]/(n98 - 1 + pow(alpha, -n17*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1))) - n70*n99*xF[8]/(n99 - 1 + pow(alpha, -n18*(n116*(n180 - log(n102*(n23 + n27*xTj)/(n23 - xF[0]*xTj) + 1)) + 1)))) - pow(NP0, -n21)*(-0.5*n147*n354*n416*n70 + 1.0*n149*n389*n70/n268 + 0.5*n335 + 0.5*n440 - 0.5*n471))*(4.0*n149*n389*n70/n268 - n21*n26*(n111*n120*(pow(alpha, NP0*n0 - n10*n187)*n1*n10*n166/n177 + n156)*(pow(alpha, NP0*n0 - n10*n187)*n10*n166*n48/n177 + n138*n48)/n292 + n111*n122*(pow(alpha, NP0*n0 - n187*n9)*n166*n78/n177 + n155)*(pow(alpha, NP0*n0 - n187*n9)*n166*n48*n9/n177 + n48*n58*n9)/n291 + n111*n122*(pow(alpha, NP0*n0 - n187*n9)*n114*n166*n9/n177 + pow(alpha, n0*n25 - n187*n9)*n114*n85*n9/(n179*n84) - pow(alpha, n0*n25 - n187*n9)*n136*n85/(n179*n84) + n136*n58)/n274 + n111*n123*(pow(alpha, NP0*n0 - n187*n6)*n166*n71/n177 + n152)*(pow(alpha, NP0*n0 - n187*n6)*n166*n48*n6/n177 + n48*n55*n6)/n288 + n111*n123*(pow(alpha, NP0*n0 - n187*n6)*n114*n166*n6/n177 + pow(alpha, n0*n25 - n187*n6)*n114*n6*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n6)*n142*n85/(n179*n84) + n142*n55)/n271 + n111*n127*(pow(alpha, NP0*n0 - n187*n19)*n166*n74/n177 + n165)*(pow(alpha, NP0*n0 - n187*n19)*n166*n19*n48/n177 + n19*n48*n68)/n301 + n111*n127*(pow(alpha, NP0*n0 - n187*n19)*n114*n166*n19/n177 + pow(alpha, n0*n25 - n187*n19)*n114*n19*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n19)*n30*n46*n85/(n179*n84) + n30*n46*n68)/n284 + n111*n130*(pow(alpha, NP0*n0 - n16*n187)*n166*n77/n177 + n162)*(pow(alpha, NP0*n0 - n16*n187)*n16*n166*n48/n177 + n16*n48*n65)/n298 + n111*n131*(pow(alpha, NP0*n0 - n187*n8)*n1*n166*n8/n177 + n154)*(pow(alpha, NP0*n0 - n187*n8)*n166*n48*n8/n177 + n128*n48)/n290 + n111*n132*(pow(alpha, NP0*n0 - n12*n187)*n166*n76/n177 + n158)*(pow(alpha, NP0*n0 - n12*n187)*n12*n166*n48/n177 + n12*n48*n61)/n294 + n111*n133*(pow(alpha, NP0*n0 - n15*n187)*n166*n72/n177 + n161)*(pow(alpha, NP0*n0 - n15*n187)*n15*n166*n48/n177 + n15*n48*n64)/n297 + n111*n134*(pow(alpha, NP0*n0 - n187*n7)*n166*n79/n177 + n153)*(pow(alpha, NP0*n0 - n187*n7)*n166*n48*n7/n177 + n143*n48)/n289 + n111*n140*(pow(alpha, NP0*n0 - n11*n187)*n1*n11*n166/n177 + n157)*(pow(alpha, NP0*n0 - n11*n187)*n11*n166*n48/n177 + n141*n48)/n293 + n111*n147*(pow(alpha, NP0*n0 - n0*n187)*n0*n1*n166/n177 + n149)*(pow(alpha, NP0*n0 - n0*n187)*n1*n166*n21*n22/n177 + n1*n21*n22*n50)/n285 + n111*n311*n94*(pow(alpha, NP0*n0 - n13*n187)*n114*n13*n166/n177 + pow(alpha, n0*n25 - n13*n187)*n114*n13*n85/(n179*n84) - pow(alpha, n0*n25 - n13*n187)*n30*n40*n85/(n179*n84) + n176) + n111*n312*n82*(pow(alpha, NP0*n0 - n187*n4)*n114*n166*n4/n177 + pow(alpha, n0*n25 - n187*n4)*n114*n4*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n4)*n30*n31*n85/(n179*n84) + n174) + n111*n321*xF[11]*(pow(alpha, NP0*n0 - n187*n5)*n166*n73/n177 + n151)*(pow(alpha, NP0*n0 - n187*n5)*n166*n48*n5/n177 + n48*n5*n54) + n111*n322*xF[11]*(pow(alpha, NP0*n0 - n187*n5)*n114*n166*n5/n177 + pow(alpha, n0*n25 - n187*n5)*n114*n5*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n5)*n30*n32*n85/(n179*n84) + n171) + n111*n323*xF[4]*(pow(alpha, NP0*n0 - n14*n187)*n166*n75/n177 + n160)*(pow(alpha, NP0*n0 - n14*n187)*n14*n166*n48/n177 + n126*n48) + n111*n325*(pow(alpha, NP0*n0 - n15*n187)*n114*n15*n166/n177 + pow(alpha, n0*n25 - n15*n187)*n114*n15*n85/(n179*n84) - pow(alpha, n0*n25 - n15*n187)*n125*n85/(n179*n84) + n125*n64) + n111*n326*(pow(alpha, NP0*n0 - n17*n187)*n166*n80/n177 + n163)*(pow(alpha, NP0*n0 - n17*n187)*n166*n17*n48/n177 + n17*n48*n66) + n111*n327*(pow(alpha, NP0*n0 - n11*n187)*n11*n114*n166/n177 + pow(alpha, n0*n25 - n11*n187)*n11*n114*n85/(n179*n84) - pow(alpha, n0*n25 - n11*n187)*n139*n85/(n179*n84) + n139*n60) + n111*n329*(pow(alpha, NP0*n0 - n17*n187)*n114*n166*n17/n177 + pow(alpha, n0*n25 - n17*n187)*n114*n17*n85/(n179*n84) - pow(alpha, n0*n25 - n17*n187)*n30*n44*n85/(n179*n84) + n30*n44*n66) + n111*n330*(pow(alpha, NP0*n0 - n18*n187)*n114*n166*n18/n177 + pow(alpha, n0*n25 - n18*n187)*n114*n18*n85/(n179*n84) - pow(alpha, n0*n25 - n18*n187)*n30*n45*n85/(n179*n84) + n172) + n111*n99*xF[8]*(pow(alpha, NP0*n0 - n18*n187)*n1*n166*n18/n177 + n164)*(pow(alpha, NP0*n0 - n18*n187)*n166*n18*n48/n177 + n146*n48)/n300 + n111*n94*xF[3]*(pow(alpha, NP0*n0 - n13*n187)*n1*n13*n166/n177 + n159)*(pow(alpha, NP0*n0 - n13*n187)*n13*n166*n48/n177 + n121*n48)/n295 + n111*n82*xF[10]*(pow(alpha, NP0*n0 - n187*n4)*n1*n166*n4/n177 + n150)*(pow(alpha, NP0*n0 - n187*n4)*n166*n4*n48/n177 + n129*n48)/n286 + n120*n70*(pow(alpha, NP0*n0 - n10*n187)*n10*n166*n22*n30/n177 + pow(alpha, n0*n25 - n10*n187)*n10*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n10*n187)*n30*n37*n85/(n179*n84) + n106*n30*n37)/n275 + n130*n70*(pow(alpha, NP0*n0 - n16*n187)*n16*n166*n22*n30/n177 + pow(alpha, n0*n25 - n16*n187)*n16*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n16*n187)*n30*n43*n85/(n179*n84) + n110*n30*n43)/n281 + n131*n70*(pow(alpha, NP0*n0 - n187*n8)*n166*n22*n30*n8/n177 + pow(alpha, n0*n25 - n187*n8)*n145*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n8)*n22*n30*n8*n85/(n179*n84) + n105*n145)/n273 + n132*n70*(pow(alpha, NP0*n0 - n12*n187)*n12*n166*n22*n30/n177 + pow(alpha, n0*n25 - n12*n187)*n12*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n12*n187)*n137*n85/(n179*n84) + n107*n137)/n277 + n134*n70*(pow(alpha, NP0*n0 - n187*n7)*n166*n22*n30*n7/n177 + pow(alpha, n0*n25 - n187*n7)*n22*n30*n7*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n7)*n30*n34*n85/(n179*n84) + n104*n30*n34)/n272 + n147*n70*(pow(alpha, NP0*n0 - n0*n187)*n144*(-n23 + xPj*xTj)/(n177*n51) + n102*n144)/n268 + n328*n70*(pow(alpha, NP0*n0 - n14*n187)*n14*n166*n22*n30/n177 + pow(alpha, n0*n25 - n14*n187)*n14*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n14*n187)*n30*n41*n85/(n179*n84) + n108*n30*n41) + n335 + n336 + n337 + n338 + n339 + n340 + n341 + n342 + n343 + n344 + n345 + n346 + n347 + n348 + n349 + n350 + n351 + n422 + n423 + n424 + n425 + n426 + n427 + n428 + n429 + n430 + n431 + n432 + n433 + n434 + n435 + n436 + n437 + n438) + 2.0*n335 - 4.0*n419*n70 + 2.0*n440) + pow(-n147*n354*n70/n268 - n25*(-0.5*n147*n70*(pow(alpha, NP0*n0 - n0*n187)*n0*n1*n166/n177 + n149)*(pow(alpha, NP0*n0 - n0*n187)*n1*n166*n21*n22/n177 + n1*n21*n22*n50)/n285 + 0.5*n147*n70*(pow(alpha, NP0*n0 - n0*n187)*n144*(-n23 + xPj*xTj)/(n177*n51) + n102*n144)/n268 + 1.0*n149*n70*xF[0]*(pow(alpha, NP0*n0 - n0*n187)*n0*n1*n166/n177 + n149)/n268 + n352 - 0.5*xTj*(n111*n120*(pow(alpha, NP0*n0 - n10*n187)*n1*n10*n166/n177 + n156)*(pow(alpha, NP0*n0 - n10*n187)*n10*n166*n48/n177 + n138*n48)/n292 + n111*n122*(pow(alpha, NP0*n0 - n187*n9)*n166*n78/n177 + n155)*(pow(alpha, NP0*n0 - n187*n9)*n166*n48*n9/n177 + n48*n58*n9)/n291 + n111*n122*(pow(alpha, NP0*n0 - n187*n9)*n114*n166*n9/n177 + pow(alpha, n0*n25 - n187*n9)*n114*n85*n9/(n179*n84) - pow(alpha, n0*n25 - n187*n9)*n136*n85/(n179*n84) + n136*n58)/n274 + n111*n123*(pow(alpha, NP0*n0 - n187*n6)*n166*n71/n177 + n152)*(pow(alpha, NP0*n0 - n187*n6)*n166*n48*n6/n177 + n48*n55*n6)/n288 + n111*n123*(pow(alpha, NP0*n0 - n187*n6)*n114*n166*n6/n177 + pow(alpha, n0*n25 - n187*n6)*n114*n6*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n6)*n142*n85/(n179*n84) + n142*n55)/n271 + n111*n127*(pow(alpha, NP0*n0 - n187*n19)*n166*n74/n177 + n165)*(pow(alpha, NP0*n0 - n187*n19)*n166*n19*n48/n177 + n19*n48*n68)/n301 + n111*n127*(pow(alpha, NP0*n0 - n187*n19)*n114*n166*n19/n177 + pow(alpha, n0*n25 - n187*n19)*n114*n19*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n19)*n30*n46*n85/(n179*n84) + n30*n46*n68)/n284 + n111*n130*(pow(alpha, NP0*n0 - n16*n187)*n166*n77/n177 + n162)*(pow(alpha, NP0*n0 - n16*n187)*n16*n166*n48/n177 + n16*n48*n65)/n298 + n111*n131*(pow(alpha, NP0*n0 - n187*n8)*n1*n166*n8/n177 + n154)*(pow(alpha, NP0*n0 - n187*n8)*n166*n48*n8/n177 + n128*n48)/n290 + n111*n132*(pow(alpha, NP0*n0 - n12*n187)*n166*n76/n177 + n158)*(pow(alpha, NP0*n0 - n12*n187)*n12*n166*n48/n177 + n12*n48*n61)/n294 + n111*n133*(pow(alpha, NP0*n0 - n15*n187)*n166*n72/n177 + n161)*(pow(alpha, NP0*n0 - n15*n187)*n15*n166*n48/n177 + n15*n48*n64)/n297 + n111*n134*(pow(alpha, NP0*n0 - n187*n7)*n166*n79/n177 + n153)*(pow(alpha, NP0*n0 - n187*n7)*n166*n48*n7/n177 + n143*n48)/n289 + n111*n140*(pow(alpha, NP0*n0 - n11*n187)*n1*n11*n166/n177 + n157)*(pow(alpha, NP0*n0 - n11*n187)*n11*n166*n48/n177 + n141*n48)/n293 + n111*n147*(pow(alpha, NP0*n0 - n0*n187)*n0*n1*n166/n177 + n149)*(pow(alpha, NP0*n0 - n0*n187)*n1*n166*n21*n22/n177 + n1*n21*n22*n50)/n285 + n111*n311*n94*(pow(alpha, NP0*n0 - n13*n187)*n114*n13*n166/n177 + pow(alpha, n0*n25 - n13*n187)*n114*n13*n85/(n179*n84) - pow(alpha, n0*n25 - n13*n187)*n30*n40*n85/(n179*n84) + n176) + n111*n312*n82*(pow(alpha, NP0*n0 - n187*n4)*n114*n166*n4/n177 + pow(alpha, n0*n25 - n187*n4)*n114*n4*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n4)*n30*n31*n85/(n179*n84) + n174) + n111*n321*xF[11]*(pow(alpha, NP0*n0 - n187*n5)*n166*n73/n177 + n151)*(pow(alpha, NP0*n0 - n187*n5)*n166*n48*n5/n177 + n48*n5*n54) + n111*n322*xF[11]*(pow(alpha, NP0*n0 - n187*n5)*n114*n166*n5/n177 + pow(alpha, n0*n25 - n187*n5)*n114*n5*n85/(n179*n84) - pow(alpha, n0*n25 - n187*n5)*n30*n32*n85/(n179*n84) + n171) + n111*n323*xF[4]*(pow(alpha, NP0*n0 - n14*n187)*n166*n75/n177 + n160)*(pow(alpha, NP0*n0 - n14*n187)*n14*n166*n48/n177 + n126*n48) + n111*n325*(pow(alpha, NP0*n0 - n15*n187)*n114*n15*n166/n177 + pow(alpha, n0*n25 - n15*n187)*n114*n15*n85/(n179*n84) - pow(alpha, n0*n25 - n15*n187)*n125*n85/(n179*n84) + n125*n64) + n111*n326*(pow(alpha, NP0*n0 - n17*n187)*n166*n80/n177 + n163)*(pow(alpha, NP0*n0 - n17*n187)*n166*n17*n48/n177 + n17*n48*n66) + n111*n327*(pow(alpha, NP0*n0 - n11*n187)*n11*n114*n166/n177 + pow(alpha, n0*n25 - n11*n187)*n11*n114*n85/(n179*n84) - pow(alpha, n0*n25 - n11*n187)*n139*n85/(n179*n84) + n139*n60) + n111*n329*(pow(alpha, NP0*n0 - n17*n187)*n114*n166*n17/n177 + pow(alpha, n0*n25 - n17*n187)*n114*n17*n85/(n179*n84) - pow(alpha, n0*n25 - n17*n187)*n30*n44*n85/(n179*n84) + n30*n44*n66) + n111*n330*(pow(alpha, NP0*n0 - n18*n187)*n114*n166*n18/n177 + pow(alpha, n0*n25 - n18*n187)*n114*n18*n85/(n179*n84) - pow(alpha, n0*n25 - n18*n187)*n30*n45*n85/(n179*n84) + n172) + n111*n99*xF[8]*(pow(alpha, NP0*n0 - n18*n187)*n1*n166*n18/n177 + n164)*(pow(alpha, NP0*n0 - n18*n187)*n166*n18*n48/n177 + n146*n48)/n300 + n111*n94*xF[3]*(pow(alpha, NP0*n0 - n13*n187)*n1*n13*n166/n177 + n159)*(pow(alpha, NP0*n0 - n13*n187)*n13*n166*n48/n177 + n121*n48)/n295 + n111*n82*xF[10]*(pow(alpha, NP0*n0 - n187*n4)*n1*n166*n4/n177 + n150)*(pow(alpha, NP0*n0 - n187*n4)*n166*n4*n48/n177 + n129*n48)/n286 + n120*n70*(pow(alpha, NP0*n0 - n10*n187)*n10*n166*n22*n30/n177 + pow(alpha, n0*n25 - n10*n187)*n10*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n10*n187)*n30*n37*n85/(n179*n84) + n106*n30*n37)/n275 + n130*n70*(pow(alpha, NP0*n0 - n16*n187)*n16*n166*n22*n30/n177 + pow(alpha, n0*n25 - n16*n187)*n16*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n16*n187)*n30*n43*n85/(n179*n84) + n110*n30*n43)/n281 + n131*n70*(pow(alpha, NP0*n0 - n187*n8)*n166*n22*n30*n8/n177 + pow(alpha, n0*n25 - n187*n8)*n145*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n8)*n22*n30*n8*n85/(n179*n84) + n105*n145)/n273 + n132*n70*(pow(alpha, NP0*n0 - n12*n187)*n12*n166*n22*n30/n177 + pow(alpha, n0*n25 - n12*n187)*n12*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n12*n187)*n137*n85/(n179*n84) + n107*n137)/n277 + n134*n70*(pow(alpha, NP0*n0 - n187*n7)*n166*n22*n30*n7/n177 + pow(alpha, n0*n25 - n187*n7)*n22*n30*n7*n85/(n179*n84) + pow(alpha, n0*n25 - n187*n7)*n30*n34*n85/(n179*n84) + n104*n30*n34)/n272 + n147*n70*(pow(alpha, NP0*n0 - n0*n187)*n144*(-n23 + xPj*xTj)/(n177*n51) + n102*n144)/n268 + n328*n70*(pow(alpha, NP0*n0 - n14*n187)*n14*n166*n22*n30/n177 + pow(alpha, n0*n25 - n14*n187)*n14*n22*n30*n85/(n179*n84) + pow(alpha, n0*n25 - n14*n187)*n30*n41*n85/(n179*n84) + n108*n30*n41) + n335 + n336 + n337 + n338 + n339 + n340 + n341 + n342 + n343 + n344 + n345 + n346 + n347 + n348 + n349 + n350 + n351 + n422 + n423 + n424 + n425 + n426 + n427 + n428 + n429 + n430 + n431 + n432 + n433 + n434 + n435 + n436 + n437 + n438)) - n334 - xTj*(n111*n120*n405 + n111*n122*n404 + n111*n123*n399 + n111*n127*n401 + n111*n130*n367/n281 + n111*n131*n403 + n111*n132*n400 + n111*n134*n402 + n111*n147*n354/n268 + n111*n311*n397 + n111*n312*n398 + n111*n322*n390 + n111*n325*n366 + n111*n327*n362 + n111*n328*n365 + n111*n329*n368 + n111*n330*n369 + n112*n70*n71/n237 + n113*n70*n80/n248 + n115*n70*n74/n250 + n126*n49*n70/n245 + n149*n304*n70 + n150*n305*n70 + n151*n303*n70 + n154*n70*xF[14]/n239 + n156*n308*n70 + n159*n310*n70 + n161*n70*xF[5]/n246 + n162*n309*n70 + n164*n307*n70 + n167*n70/n242 + n168*n70/n238 + n317*n70*n76 + n318*n70*n78), -n21);
26804 NP_sqrt_base = fabs(NP_sqrt_base);
26805 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
26806 NT1 = n116*(n180 - log(-pow(alpha, NP1*n0)*n166 + 1));
26807 g0 = MW[1] - Mstar;
26808 g1 = MW[0] - Mstar;
26811 g4 = MW[10] - Mstar;
26812 g5 = MW[11] - Mstar;
26813 g6 = MW[12] - Mstar;
26814 g7 = MW[13] - Mstar;
26815 g8 = MW[14] - Mstar;
26816 g9 = MW[15] - Mstar;
26817 g10 = MW[16] - Mstar;
26818 g11 = MW[2] - Mstar;
26819 g12 = MW[3] - Mstar;
26820 g13 = MW[4] - Mstar;
26821 g14 = MW[5] - Mstar;
26822 g15 = MW[6] - Mstar;
26823 g16 = MW[7] - Mstar;
26824 g17 = MW[8] - Mstar;
26825 g18 = MW[9] - Mstar;
26830 g23 = pow(alpha, -g1);
26831 g24 = pow(alpha, -g4);
26832 g25 = pow(alpha, -g5);
26833 g26 = pow(alpha, -g6);
26834 g27 = pow(alpha, -g7);
26835 g28 = pow(alpha, -g8);
26836 g29 = pow(alpha, -g9);
26837 g30 = pow(alpha, -g10);
26838 g31 = pow(alpha, -g0);
26839 g32 = pow(alpha, -g11);
26840 g33 = pow(alpha, -g12);
26841 g34 = pow(alpha, -g13);
26842 g35 = pow(alpha, -g14);
26843 g36 = pow(alpha, -g15);
26844 g37 = pow(alpha, -g16);
26845 g38 = pow(alpha, -g17);
26846 g39 = pow(alpha, -g18);
26847 g40 = log(xF[0]/xF[1]);
26849 g42 = pow(alpha, NP1*g0);
26850 g43 = pow(alpha, NP1*g1);
26851 g44 = pow(alpha, NP1*g4);
26853 g46 = pow(alpha, NP1*g5);
26854 g47 = pow(alpha, NP1*g6);
26855 g48 = pow(alpha, NP1*g7);
26856 g49 = pow(alpha, NP1*g8);
26857 g50 = pow(alpha, NP1*g9);
26858 g51 = pow(alpha, NP1*g10);
26859 g52 = pow(alpha, NP1*g11);
26860 g53 = pow(alpha, NP1*g12);
26861 g54 = pow(alpha, NP1*g13);
26862 g55 = pow(alpha, NP1*g14);
26863 g56 = pow(alpha, NP1*g15);
26864 g57 = pow(alpha, NP1*g16);
26865 g58 = pow(alpha, NP1*g17);
26866 g59 = pow(alpha, NP1*g18);
26906 g99 = g20/(g3*xF[1]);
26907 g100 = pow(alpha, g0*g41) - 1;
26908 g101 = pow(alpha, g0*g41) - 1;
26909 g102 = pow(alpha, g1*g41) - 1;
26910 g103 = pow(alpha, g11*g41) - 1;
26911 g104 = pow(alpha, g12*g41) - 1;
26912 g105 = pow(alpha, g13*g41) - 1;
26913 g106 = pow(alpha, g14*g41) - 1;
26914 g107 = pow(alpha, g15*g41) - 1;
26915 g108 = pow(alpha, g16*g41) - 1;
26916 g109 = pow(alpha, g17*g41) - 1;
26917 g110 = pow(alpha, g18*g41) - 1;
26918 g111 = pow(alpha, g4*g41) - 1;
26919 g112 = pow(alpha, g41*g5) - 1;
26920 g113 = pow(alpha, g41*g6) - 1;
26921 g114 = pow(alpha, g41*g7) - 1;
26922 g115 = pow(alpha, g41*g8) - 1;
26923 g116 = pow(alpha, g41*g9) - 1;
26924 g117 = pow(alpha, g10*g41) - 1;
26925 g118 = -pow(alpha, g1*g41);
26926 g119 = -pow(alpha, g4*g41);
26927 g120 = -pow(alpha, g41*g5);
26928 g121 = -pow(alpha, g41*g6);
26929 g122 = -pow(alpha, g41*g7);
26930 g123 = -pow(alpha, g41*g8);
26931 g124 = -pow(alpha, g41*g9);
26932 g125 = -pow(alpha, g10*g41);
26933 g126 = -pow(alpha, g11*g41);
26934 g127 = -pow(alpha, g12*g41);
26935 g128 = -pow(alpha, g13*g41);
26936 g129 = -pow(alpha, g14*g41);
26937 g130 = -pow(alpha, g15*g41);
26938 g131 = -pow(alpha, g16*g41);
26939 g132 = -pow(alpha, g17*g41);
26940 g133 = -pow(alpha, g18*g41);
26942 g135 = -g118 - g43;
26943 g136 = -g119 - g44;
26944 g137 = -g120 - g46;
26945 g138 = -g121 - g47;
26946 g139 = -g122 - g48;
26947 g140 = -g123 - g49;
26948 g141 = -g124 - g50;
26949 g142 = -g125 - g51;
26950 g143 = -g126 - g52;
26951 g144 = -g127 - g53;
26952 g145 = -g128 - g54;
26953 g146 = -g129 - g55;
26954 g147 = -g130 - g56;
26955 g148 = -g131 - g57;
26956 g149 = -g132 - g58;
26957 g150 = -g133 - g59;
26958 g151 = pow(alpha, g1*g41) + g81;
26960 g153 = pow(alpha, g4*g41) + g82;
26961 g154 = pow(alpha, g41*g5) + g83;
26962 g155 = pow(alpha, g41*g6) + g84;
26963 g156 = pow(alpha, g41*g7) + g85;
26964 g157 = pow(alpha, g41*g8) + g86;
26965 g158 = pow(alpha, g41*g9) + g87;
26966 g159 = pow(alpha, g10*g41) + g88;
26967 g160 = pow(alpha, g11*g41) + g89;
26968 g161 = pow(alpha, g12*g41) + g90;
26969 g162 = pow(alpha, g13*g41) + g91;
26970 g163 = pow(alpha, g14*g41) + g92;
26971 g164 = pow(alpha, g15*g41) + g93;
26972 g165 = pow(alpha, g16*g41) + g94;
26973 g166 = pow(alpha, g17*g41) + g95;
26974 g167 = pow(alpha, g18*g41) + g96;
26978 g171 = xF[10]/g153;
26979 g172 = xF[15]/g158;
26981 g174 = xF[16]/g159;
26984 g177 = xF[12]/g155;
26985 g178 = xF[13]/g156;
26986 g179 = xF[11]/g154;
26988 g181 = xF[14]/g157;
26993 g186 = xF[15]/g141;
26997 g190 = xF[11]/g137;
26999 g192 = xF[13]/g139;
27000 g193 = xF[16]/g142;
27003 g196 = xF[14]/g140;
27005 g198 = xF[12]/g138;
27006 g199 = xF[10]/g136;
27043 g236 = log(g152*g21*g99/g64);
27044 g237 = log(g134*g21*g99/g63);
27045 g238 = log(g152*g22*g61/g101);
27047 g240 = log(g134*g22*g61/g100);
27049 g242 = -g101*g170*g241 - g168*g239*(g96 + 1) - g168*g241*(pow(alpha, g18*g41) - 1) - g169*g239*(g95 + 1) - g169*g241*(pow(alpha, g17*g41) - 1) - g170*g239*g64 - g171*g239*(g82 + 1) - g171*g241*(pow(alpha, g4*g41) - 1) - g172*g239*(g87 + 1) - g172*g241*(pow(alpha, g41*g9) - 1) - g173*g239*(g90 + 1) - g173*g241*(pow(alpha, g12*g41) - 1) - g174*g239*(g88 + 1) - g174*g241*(pow(alpha, g10*g41) - 1) - g175*g239*(g94 + 1) - g175*g241*(pow(alpha, g16*g41) - 1) - g176*g239*(g91 + 1) - g176*g241*(pow(alpha, g13*g41) - 1) - g177*g239*(g84 + 1) - g177*g241*(pow(alpha, g41*g6) - 1) - g178*g239*(g85 + 1) - g178*g241*(pow(alpha, g41*g7) - 1) - g179*g239*(g83 + 1) - g179*g241*(pow(alpha, g41*g5) - 1) - g180*g239*(g93 + 1) - g180*g241*(pow(alpha, g15*g41) - 1) - g181*g239*(g86 + 1) - g181*g241*(pow(alpha, g41*g8) - 1) - g182*g239*(g92 + 1) - g182*g241*(pow(alpha, g14*g41) - 1) - g183*g239*(g89 + 1) - g183*g241*(pow(alpha, g11*g41) - 1) - g184*g239*(g81 + 1) - g184*g241*(pow(alpha, g1*g41) - 1) - g97*xF[0] - g97*xF[10] - g97*xF[11] - g97*xF[12] - g97*xF[13] - g97*xF[14] - g97*xF[15] - g97*xF[16] - g97*xF[1] - g97*xF[2] - g97*xF[3] - g97*xF[4] - g97*xF[5] - g97*xF[6] - g97*xF[7] - g97*xF[8] - g97*xF[9];
27050 LpF = xF[0]*(g23 + 1.0)*(g208*g237 + g219*g240 + g60)/(g45*(g23 - 1.0)) + xF[10]*(g24 + 1.0)*(g216*g237 + g234*g240 + g60)/(g45*(g24 - 1.0)) + xF[11]*(g25 + 1.0)*(g214*g237 + g221*g240 + g60)/(g45*(g25 - 1.0)) + xF[12]*(g26 + 1.0)*(g202*g237 + g231*g240 + g60)/(g45*(g26 - 1.0)) + xF[13]*(g27 + 1.0)*(g211*g237 + g232*g240 + g60)/(g45*(g27 - 1.0)) + xF[14]*(g28 + 1.0)*(g215*g237 + g230*g240 + g60)/(g45*(g28 - 1.0)) + xF[15]*(g29 + 1.0)*(g204*g237 + g220*g240 + g60)/(g45*(g29 - 1.0)) + xF[16]*(g30 + 1.0)*(g213*g237 + g228*g240 + g60)/(g45*(g30 - 1.0)) + xF[1]*(g31 + 1.0)*(g218*g237 + g225*g240 + g60)/(g45*(g31 - 1.0)) + xF[2]*(g32 + 1.0)*(g207*g237 + g222*g240 + g60)/(g45*(g32 - 1.0)) + xF[3]*(g33 + 1.0)*(g212*g237 + g223*g240 + g60)/(g45*(g33 - 1.0)) + xF[4]*(g34 + 1.0)*(g205*g237 + g224*g240 + g60)/(g45*(g34 - 1.0)) + xF[5]*(g35 + 1.0)*(g209*g237 + g235*g240 + g60)/(g45*(g35 - 1.0)) + xF[6]*(g36 + 1.0)*(g210*g237 + g229*g240 + g60)/(g45*(g36 - 1.0)) + xF[7]*(g37 + 1.0)*(g206*g237 + g233*g240 + g60)/(g45*(g37 - 1.0)) + xF[8]*(g38 + 1.0)*(g217*g237 + g226*g240 + g60)/(g45*(g38 - 1.0)) + xF[9]*(g39 + 1.0)*(g203*g237 + g227*g240 + g60)/(g45*(g39 - 1.0));
27055 xP[0] = g102*g185*g62;
27056 xP[1] = g100*g191*g62;
27057 xP[2] = g103*g189*g62;
27058 xP[3] = g104*g194*g62;
27059 xP[4] = g105*g187*g62;
27060 xP[5] = g106*g201*g62;
27061 xP[6] = g107*g195*g62;
27062 xP[7] = g108*g188*g62;
27063 xP[8] = g109*g197*g62;
27064 xP[9] = g110*g200*g62;
27065 xP[10] = g111*g199*g62;
27066 xP[11] = g112*g190*g62;
27067 xP[12] = g113*g198*g62;
27068 xP[13] = g114*g192*g62;
27069 xP[14] = g115*g196*g62;
27070 xP[15] = g116*g186*g62;
27071 xP[16] = g117*g193*g62;
27072 xT[0] = g185*g65*g98;
27073 xT[1] = g191*g63*g98;
27074 xT[2] = g189*g66*g98;
27075 xT[3] = g194*g67*g98;
27076 xT[4] = g187*g68*g98;
27077 xT[5] = g201*g69*g98;
27078 xT[6] = g195*g70*g98;
27079 xT[7] = g188*g71*g98;
27080 xT[8] = g197*g72*g98;
27081 xT[9] = g200*g73*g98;
27082 xT[10] = g199*g74*g98;
27083 xT[11] = g190*g75*g98;
27084 xT[12] = g198*g76*g98;
27085 xT[13] = g192*g77*g98;
27086 xT[14] = g196*g78*g98;
27087 xT[15] = g186*g79*g98;
27088 xT[16] = g193*g80*g98;
27091 n0 = -2.00000000000000;
27092 n1 = MW[0] - Mstar;
27096 n5 = MW[10] - Mstar;
27097 n6 = MW[11] - Mstar;
27098 n7 = MW[12] - Mstar;
27099 n8 = MW[13] - Mstar;
27100 n9 = MW[14] - Mstar;
27101 n10 = MW[15] - Mstar;
27102 n11 = MW[16] - Mstar;
27103 n12 = MW[17] - Mstar;
27104 n13 = MW[1] - Mstar;
27105 n14 = MW[2] - Mstar;
27106 n15 = MW[3] - Mstar;
27107 n16 = MW[4] - Mstar;
27108 n17 = MW[5] - Mstar;
27109 n18 = MW[6] - Mstar;
27110 n19 = MW[7] - Mstar;
27111 n20 = MW[8] - Mstar;
27112 n21 = MW[9] - Mstar;
27121 n30 = pow(n1, -n0);
27122 n31 = pow(n2, -n0);
27123 n32 = pow(n5, -n0);
27124 n33 = pow(n6, -n0);
27125 n34 = pow(n7, -n0);
27126 n35 = pow(n8, -n0);
27127 n36 = pow(n9, -n0);
27128 n37 = pow(n10, -n0);
27129 n38 = pow(n11, -n0);
27130 n39 = pow(n12, -n0);
27131 n40 = pow(n13, -n0);
27132 n41 = pow(n14, -n0);
27133 n42 = pow(n15, -n0);
27134 n43 = pow(n16, -n0);
27135 n44 = pow(n17, -n0);
27136 n45 = pow(n18, -n0);
27137 n46 = pow(n19, -n0);
27138 n47 = pow(n20, -n0);
27139 n48 = pow(n21, -n0);
27144 n53 = pow(alpha, n51);
27145 n54 = n25 + n27*xF[0];
27146 n55 = n25 + n27*xPj;
27147 n56 = pow(alpha, NP0*n5);
27148 n57 = pow(alpha, NP0*n6);
27149 n58 = pow(alpha, NP0*n7);
27150 n59 = pow(alpha, NP0*n8);
27151 n60 = pow(alpha, NP0*n9);
27152 n61 = pow(alpha, NP0*n10);
27153 n62 = pow(alpha, NP0*n11);
27154 n63 = pow(alpha, NP0*n12);
27155 n64 = pow(alpha, NP0*n13);
27156 n65 = pow(alpha, NP0*n14);
27157 n66 = pow(alpha, NP0*n15);
27158 n67 = pow(alpha, NP0*n16);
27159 n68 = pow(alpha, NP0*n17);
27160 n69 = pow(alpha, NP0*n18);
27161 n70 = pow(alpha, NP0*n19);
27162 n71 = pow(alpha, NP0*n20);
27163 n72 = pow(alpha, NP0*n21);
27176 n85 = pow(alpha, NP0*n0*n23);
27177 n86 = pow(n55, -n0);
27238 n147 = log((-1.0 + xPj/xF[0])/n3);
27239 n148 = -n91*xF[15];
27240 n149 = -n102*xF[9];
27241 n150 = n21*n72*xF[9];
27242 n151 = -n89*xF[13];
27246 n155 = n31*n39*n63;
27248 n157 = n31*n33*n57;
27249 n158 = n31*n47*n71;
27250 n159 = n31*n38*n62;
27251 n160 = n31*n34*n58;
27252 n161 = n31*n32*n56;
27253 n162 = n31*n42*n66;
27254 n163 = n110*n154 + 1;
27255 n164 = n147 + n22 + n49 + n73;
27256 n165 = n154*n53/n163;
27257 n166 = n120*(n164 - log(n163)) + 1;
27258 n167 = pow(alpha, n1*n166);
27259 n168 = pow(alpha, n166*n5);
27260 n169 = pow(alpha, n166*n6);
27261 n170 = pow(alpha, n166*n7);
27262 n171 = pow(alpha, n166*n8);
27263 n172 = pow(alpha, n166*n9);
27264 n173 = pow(alpha, n10*n166);
27265 n174 = pow(alpha, n11*n166);
27266 n175 = pow(alpha, n12*n166);
27267 n176 = pow(alpha, n13*n166);
27268 n177 = pow(alpha, n14*n166);
27269 n178 = pow(alpha, n15*n166);
27270 n179 = pow(alpha, n16*n166);
27271 n180 = pow(alpha, n166*n17);
27272 n181 = pow(alpha, n166*n18);
27273 n182 = pow(alpha, n166*n19);
27274 n183 = pow(alpha, n166*n20);
27275 n184 = pow(alpha, n166*n21);
27294 n203 = pow(alpha, n166*n23) + n83 - 1;
27295 n204 = n84 - 1 + 1.0/n168;
27296 n205 = n87 - 1 + 1.0/n169;
27297 n206 = n88 - 1 + 1.0/n170;
27298 n207 = n89 - 1 + 1.0/n171;
27299 n208 = n90 - 1 + 1.0/n172;
27300 n209 = n91 - 1 + 1.0/n173;
27301 n210 = n92 - 1 + 1.0/n174;
27302 n211 = n93 - 1 + 1.0/n175;
27303 n212 = n94 - 1 + 1.0/n176;
27304 n213 = n95 - 1 + 1.0/n177;
27305 n214 = n96 - 1 + 1.0/n178;
27306 n215 = n97 - 1 + 1.0/n179;
27307 n216 = n98 - 1 + 1.0/n180;
27308 n217 = n99 - 1 + 1.0/n181;
27309 n218 = n100 - 1 + 1.0/n182;
27310 n219 = n101 - 1 + 1.0/n183;
27311 n220 = n102 - 1 + 1.0/n184;
27312 n221 = pow(n203, 3);
27313 n222 = pow(n204, 3);
27314 n223 = pow(n205, 3);
27315 n224 = pow(n206, 3);
27316 n225 = pow(n207, 3);
27317 n226 = pow(n208, 3);
27318 n227 = pow(n209, 3);
27319 n228 = pow(n210, 3);
27320 n229 = pow(n211, 3);
27321 n230 = pow(n212, 3);
27322 n231 = pow(n213, 3);
27323 n232 = pow(n214, 3);
27324 n233 = pow(n215, 3);
27325 n234 = pow(n216, 3);
27326 n235 = pow(n217, 3);
27327 n236 = pow(n218, 3);
27328 n237 = pow(n219, 3);
27329 n238 = pow(n220, 3);
27330 n239 = xF[11]/n205;
27331 n240 = xF[12]/n206;
27332 n241 = xF[17]/n211;
27334 n243 = xF[10]/n204;
27337 n246 = xF[16]/n210;
27339 n248 = pow(n214, n24)*xF[3];
27341 n250 = pow(n211, n24)*xF[17];
27342 n251 = pow(n204, n24)*xF[10];
27343 n252 = xF[17]/n229;
27344 n253 = pow(n203, n24)*xF[0];
27345 n254 = xF[12]/n224;
27346 n255 = xF[10]/n222;
27347 n256 = n2*xF[14]/n208;
27348 n257 = n2*xF[4]/n215;
27350 n259 = n2*pow(n203, n24);
27351 n260 = n2*xF[6]/n217;
27352 n261 = n64*xF[1]/n212;
27353 n262 = n68*xF[5]/n216;
27354 n263 = n70*xF[7]/n218;
27355 n264 = n59*xF[13]/n207;
27356 n265 = n65*xF[2]/n213;
27357 n266 = n61*xF[15]/n209;
27358 n267 = n60*xF[14]/n208;
27360 n269 = pow(n215, n24)*n97*xF[4];
27361 n270 = n97*xF[4]/n233;
27362 n271 = -n138*pow(n216, n24);
27363 n272 = -n100*xF[7]/n236;
27364 n273 = -pow(n212, n24)*n94*xF[1];
27365 n274 = -n100*pow(n218, n24)*xF[7];
27366 n275 = -n101*pow(n219, n24)*xF[8];
27367 n276 = n244*n31*n48*n72;
27368 n277 = n31*n43*n67*xF[4]/n215;
27369 n278 = n31*n45*n69*xF[6]/n217;
27370 n279 = n2*n23*n242*n53*n74;
27371 n280 = n156*n242*n74;
27372 n281 = n161*n243*n74;
27373 n282 = n157*n239*n74;
27374 n283 = n160*n240*n74;
27375 n284 = n134*n264*n74;
27376 n285 = n143*n267*n74;
27377 n286 = n135*n266*n74;
27378 n287 = n159*n246*n74;
27379 n288 = n155*n241*n74;
27380 n289 = n122*n261*n74;
27381 n290 = n136*n265*n74;
27382 n291 = n162*n247*n74;
27384 n293 = n126*n262*n74;
27386 n295 = n131*n263*n74;
27387 n296 = n158*n245*n74;
27390 n299 = n154/(n163*n167);
27392 n301 = n125*n2*n299 + n125*n2;
27393 n302 = n130*n2 + n165*n2*n200;
27394 n303 = n152 + n165*n193*n2;
27395 n304 = n165*n76/n170 + n58*n76;
27396 n305 = n165*n79/n171 + n59*n79;
27397 n306 = n129*n2 + n165*n191*n2;
27398 n307 = n165*n81/n173 + n61*n81;
27399 n308 = n137*n2 + n165*n2*n201;
27400 n309 = n128*n2 + n165*n188*n2;
27401 n310 = n165*n77/n176 + n64*n77;
27402 n311 = n165*n80/n177 + n65*n80;
27403 n312 = n124*n2 + n165*n189*n2;
27404 n313 = n127*n2 + n165*n185*n2;
27405 n314 = n165*n75/n180 + n68*n75;
27406 n315 = n123*n2 + n165*n190*n2;
27407 n316 = n165*n82/n182 + n70*n82;
27408 n317 = n153 + n165*n192*n2;
27409 n318 = n165*n78/n184 + n72*n78;
27410 n319 = pow(n301, -n0);
27411 n320 = pow(n302, -n0);
27412 n321 = pow(n303, -n0);
27413 n322 = pow(n304, -n0);
27414 n323 = pow(n305, -n0);
27415 n324 = pow(n306, -n0);
27416 n325 = pow(n307, -n0);
27417 n326 = pow(n308, -n0);
27418 n327 = pow(n309, -n0);
27419 n328 = pow(n310, -n0);
27420 n329 = pow(n311, -n0);
27421 n330 = pow(n312, -n0);
27422 n331 = pow(n313, -n0);
27423 n332 = pow(n314, -n0);
27424 n333 = pow(n315, -n0);
27425 n334 = pow(n316, -n0);
27426 n335 = pow(n317, -n0);
27427 n336 = pow(n318, -n0);
27429 n338 = n303*xF[11];
27432 n341 = n0*n165*n2*n23/n167 + n0*n2*n23*n53;
27434 n343 = n110*n142*n299 + n110*n142;
27435 n344 = pow(n220, n24)*n318;
27436 n345 = pow(n207, n24)*n305;
27437 n346 = pow(n208, n24)*n306;
27438 n347 = pow(n209, n24)*n307;
27439 n348 = pow(n206, n24)*n304*xF[12];
27440 n349 = pow(n217, n24)*n315*xF[6];
27446 n355 = n101*n335*xF[8]/n237;
27447 n356 = n321*n87*xF[11]/n223;
27448 n357 = n146*pow(n203, n24)*n301*n74;
27449 n358 = n0*n2*n23*n253*n53*n74*(pow(alpha, n166*n23 + n51)*n1*n154*n2/n163 + n125*n2);
27450 n359 = n130*n251*n50*n74*(pow(alpha, -n166*n5 + n51)*n154*n2*n5/n163 + n130*n2);
27451 n360 = pow(n205, n24)*n50*n57*n6*n74*xF[11]*(pow(alpha, -n166*n6 + n51)*n154*n2*n6/n163 + n152);
27452 n361 = pow(n206, n24)*n50*n58*n7*n74*xF[12]*(pow(alpha, -n166*n7 + n51)*n154*n76/n163 + n58*n76);
27453 n362 = n140*pow(n207, n24)*n50*n74*xF[13]*(pow(alpha, -n166*n8 + n51)*n154*n79/n163 + n59*n79);
27454 n363 = n129*pow(n208, n24)*n50*n74*xF[14]*(pow(alpha, -n166*n9 + n51)*n154*n2*n9/n163 + n129*n2);
27455 n364 = n144*pow(n209, n24)*n50*n74*xF[15]*(pow(alpha, -n10*n166 + n51)*n154*n81/n163 + n61*n81);
27456 n365 = n137*pow(n210, n24)*n50*n74*xF[16]*(pow(alpha, -n11*n166 + n51)*n11*n154*n2/n163 + n137*n2);
27457 n366 = n128*n250*n50*n74*(pow(alpha, -n12*n166 + n51)*n12*n154*n2/n163 + n128*n2);
27458 n367 = n139*pow(n212, n24)*n50*n74*xF[1]*(pow(alpha, -n13*n166 + n51)*n154*n77/n163 + n64*n77);
27459 n368 = n14*pow(n213, n24)*n50*n65*n74*xF[2]*(pow(alpha, -n14*n166 + n51)*n154*n80/n163 + n65*n80);
27460 n369 = n124*n248*n50*n74*(pow(alpha, -n15*n166 + n51)*n15*n154*n2/n163 + n124*n2);
27461 n370 = n127*pow(n215, n24)*n50*n74*xF[4]*(pow(alpha, -n16*n166 + n51)*n154*n16*n2/n163 + n127*n2);
27462 n371 = n17*pow(n216, n24)*n50*n68*n74*xF[5]*(pow(alpha, -n166*n17 + n51)*n154*n75/n163 + n68*n75);
27463 n372 = n123*pow(n217, n24)*n50*n74*xF[6]*(pow(alpha, -n166*n18 + n51)*n154*n18*n2/n163 + n123*n2);
27464 n373 = n141*pow(n218, n24)*n50*n74*xF[7]*(pow(alpha, -n166*n19 + n51)*n154*n82/n163 + n70*n82);
27465 n374 = n145*pow(n219, n24)*n50*n74*xF[8]*(pow(alpha, -n166*n20 + n51)*n154*n2*n20/n163 + n153);
27466 n375 = n150*pow(n220, n24)*n50*n74*(pow(alpha, -n166*n21 + n51)*n154*n78/n163 + n72*n78);
27467 n376 = 1.0*n125*n2*n253*n301*n74;
27468 n377 = n146*pow(n203, n24)*n343*n74;
27470 n379 = pow(alpha, n1*n29)*n119*pow(n163, n24)*n193*pow(n54, n24)*n86 - pow(alpha, n1*n29)*pow(n163, n24)*n31*n33*pow(n54, n24)*n86/n169 + n119*n165*n193 + n157;
27471 n380 = pow(alpha, n1*n29)*n119*pow(n163, n24)*n198*pow(n54, n24)*n86 - pow(alpha, n1*n29)*pow(n163, n24)*n31*n34*pow(n54, n24)*n86/n170 + n119*n165*n198 + n160;
27472 n381 = pow(alpha, n1*n29)*n134*pow(n163, n24)*pow(n54, n24)*n86/n171 + pow(alpha, n1*n29)*pow(n163, n24)*n187*n23*n31*pow(n54, n24)*n86 + n112*n134 + n165*n187*n23*n31;
27473 n382 = pow(alpha, n1*n29)*n143*pow(n163, n24)*pow(n54, n24)*n86/n172 + pow(alpha, n1*n29)*pow(n163, n24)*n191*n23*n31*pow(n54, n24)*n86 + n113*n143 + n165*n191*n23*n31;
27474 n383 = pow(alpha, n1*n29)*n119*pow(n163, n24)*n197*pow(n54, n24)*n86 - pow(alpha, n1*n29)*n135*pow(n163, n24)*pow(n54, n24)*n86/n173 + n119*n165*n197 + n135*n61;
27475 n384 = pow(alpha, n1*n29)*pow(n163, n24)*n201*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29)*pow(n163, n24)*n31*n38*pow(n54, n24)*n86/n174 + n114*n31*n38 + n165*n201*n23*n31;
27476 n385 = pow(alpha, n1*n29)*n136*pow(n163, n24)*pow(n54, n24)*n86/n177 + pow(alpha, n1*n29)*pow(n163, n24)*n195*n23*n31*pow(n54, n24)*n86 + n115*n136 + n165*n195*n23*n31;
27477 n386 = pow(alpha, n1*n29)*pow(n163, n24)*n190*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29)*pow(n163, n24)*n31*n45*pow(n54, n24)*n86/n181 + n118*n31*n45 + n165*n190*n23*n31;
27478 n387 = pow(alpha, n1*n29)*n119*pow(n163, n24)*n199*pow(n54, n24)*n86 - pow(alpha, n1*n29)*pow(n163, n24)*n31*n48*pow(n54, n24)*n86/n184 + n119*n165*n199 + n31*n48*n72;
27479 n388 = pow(n207, n24)*n74*n89*xF[13]*(pow(alpha, n1*n29 - n166*n8)*n134*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n8)*pow(n163, n24)*n23*n31*pow(n54, n24)*n8*n86 + n112*n134 + n165*n187*n23*n31);
27480 n389 = n132*pow(n208, n24)*n74*(pow(alpha, n1*n29 - n166*n9)*n143*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n9)*pow(n163, n24)*n23*n31*pow(n54, n24)*n86*n9 + n113*n143 + n165*n191*n23*n31);
27481 n390 = n121*pow(n210, n24)*n74*(pow(alpha, n1*n29 - n11*n166)*n11*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n11*n166)*pow(n163, n24)*n31*n38*pow(n54, n24)*n86 + n114*n31*n38 + n165*n201*n23*n31);
27482 n391 = n133*pow(n213, n24)*n74*(pow(alpha, n1*n29 - n14*n166)*n136*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n14*n166)*n14*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + n115*n136 + n165*n195*n23*n31);
27483 n392 = n269*n74*(pow(alpha, n1*n29 - n16*n166)*n16*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n16*n166)*pow(n163, n24)*n31*n43*pow(n54, n24)*n86 + n116*n31*n43 + n165*n185*n23*n31);
27484 n393 = pow(n217, n24)*n74*n99*xF[6]*(pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n18*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n31*n45*pow(n54, n24)*n86 + n118*n31*n45 + n165*n190*n23*n31);
27485 n394 = n107*n251*n74*(pow(alpha, n1*n29 - n166*n5)*n119*pow(n163, n24)*n5*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n5)*pow(n163, n24)*n31*n32*pow(n54, n24)*n86 + n119*n165*n200 + n161);
27486 n395 = n109*pow(n205, n24)*n74*xF[11]*(pow(alpha, n1*n29 - n166*n6)*n119*pow(n163, n24)*pow(n54, n24)*n6*n86 - pow(alpha, n1*n29 - n166*n6)*pow(n163, n24)*n31*n33*pow(n54, n24)*n86 + n119*n165*n193 + n157);
27487 n396 = n104*pow(n206, n24)*n74*xF[12]*(pow(alpha, n1*n29 - n166*n7)*n119*pow(n163, n24)*pow(n54, n24)*n7*n86 - pow(alpha, n1*n29 - n166*n7)*pow(n163, n24)*n31*n34*pow(n54, n24)*n86 + n119*n165*n198 + n160);
27488 n397 = n148*pow(n209, n24)*n74*(pow(alpha, n1*n29 - n10*n166)*n10*n119*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n10*n166)*n135*pow(n163, n24)*pow(n54, n24)*n86 + n119*n165*n197 + n135*n61);
27489 n398 = n106*n250*n74*(pow(alpha, n1*n29 - n12*n166)*n119*n12*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n12*n166)*pow(n163, n24)*n31*n39*pow(n54, n24)*n86 + n119*n165*n188 + n155);
27490 n399 = n273*n74*(pow(alpha, n1*n29 - n13*n166)*n119*n13*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n13*n166)*n122*pow(n163, n24)*pow(n54, n24)*n86 + n119*n165*n194 + n122*n64);
27491 n400 = n103*n248*n74*(pow(alpha, n1*n29 - n15*n166)*n119*n15*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n15*n166)*pow(n163, n24)*n31*n42*pow(n54, n24)*n86 + n119*n165*n189 + n162);
27492 n401 = n271*n74*(pow(alpha, n1*n29 - n166*n17)*n119*pow(n163, n24)*n17*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n17)*n126*pow(n163, n24)*pow(n54, n24)*n86 + n119*n165*n202 + n126*n68);
27493 n402 = n274*n74*(pow(alpha, n1*n29 - n166*n19)*n119*pow(n163, n24)*n19*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n19)*n131*pow(n163, n24)*pow(n54, n24)*n86 + n119*n165*n186 + n131*n70);
27494 n403 = n275*n74*(pow(alpha, n1*n29 - n166*n20)*n119*pow(n163, n24)*n20*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n20)*pow(n163, n24)*n31*n47*pow(n54, n24)*n86 + n119*n165*n192 + n158);
27495 n404 = n149*pow(n220, n24)*n74*(pow(alpha, n1*n29 - n166*n21)*n119*pow(n163, n24)*n21*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n21)*pow(n163, n24)*n31*n48*pow(n54, n24)*n86 + n119*n165*n199 + n31*n48*n72);
27496 n405 = xTj*(n103*n248*n312*n74 + n104*n348*n74 + n105*n349*n74 + n106*n250*n309*n74 + n107*n251*n302*n74 + n108*n253*n301*n74 + n109*pow(n205, n24)*n338*n74 - n121*pow(n210, n24)*n308*n74 + n123*n260*n74 + n124*n258*n74 + n125*n2*n242*n74 + n127*n257*n74 + n128*n2*n241*n74 + n129*n256*n74 + n130*n2*n243*n74 - n132*n346*n74 - n133*pow(n213, n24)*n311*n74 + n137*n2*n246*n74 + n148*n347*n74 + n149*n344*n74 + n151*n345*n74 + n152*n239*n74 + n153*n245*n74 + n240*n58*n74*n76 + n244*n72*n74*n78 + n261*n74*n77 + n262*n74*n75 + n263*n74*n82 + n264*n74*n79 + n265*n74*n80 + n266*n74*n81 - n269*n313*n74 + n271*n314*n74 + n273*n310*n74 + n274*n316*n74 + n275*n317*n74);
27497 n406 = n279 + n357 + n405;
27498 n407 = n280 + n281 + n282 + n283 + n284 + n285 + n286 + n287 + n288 + n289 + n290 + n291 + n292 + n293 + n294 + n295 + n296 + n297 + n358 + n359 + n360 + n361 + n362 + n363 + n364 + n365 + n366 + n367 + n368 + n369 + n370 + n371 + n372 + n373 + n374 + n375 + n377 + n388 + n389 + n390 + n391 + n392 + n393 + n394 + n395 + n396 + n397 + n398 + n399 + n400 + n401 + n402 + n403 + n404;
27499 n408 = -n101*n340*n74*(n145*n50 + n165*n192*n50)/n237 + n103*n312*n74*xF[3]*(n124*n50 + n165*n189*n50)/n232 + n104*n254*n304*n74*(n165*n198*n50 + n50*n58*n7) + n105*n249*n315*n74*(n123*n50 + n165*n190*n50) + n106*n252*n309*n74*(n128*n50 + n165*n188*n50) + n107*n255*n302*n74*(n130*n50 + n165*n200*n50) + n108*n337*n354*n74 + n109*n338*n74*(n165*n193*n50 + n50*n57*n6)/n223 - n121*n308*n74*(n137*n50 + n165*n201*n50)/n228 - n132*n306*n74*(n129*n50 + n165*n191*n50)/n226 - n133*n311*n74*(n14*n50*n65 + n165*n195*n50)/n231 - n138*n314*n74*(n165*n202*n50 + n17*n50*n68)/n234 + n148*n307*n74*(n144*n50 + n165*n197*n50)/n227 + n149*n318*n74*(n165*n199*n50 + n21*n50*n72)/n238 + n151*n305*n74*(n140*n50 + n165*n187*n50)/n225 - n268*n339*n74*(n139*n50 + n165*n194*n50) - n270*n313*n74*(n127*n50 + n165*n185*n50) + n272*n316*n74*(n141*n50 + n165*n186*n50) + n407;
27501 NP_b = -n125*n146*n259*n300*n74 - n279 - n29*(1.0*n125*n2*n253*n74*(pow(alpha, -n1*n166 + n51)*n1*n154*n2/n163 + n125*n2) + 0.5*n146*pow(n203, n24)*n74*(-pow(alpha, -n1*n166 + n51)*n142*n154/n163 + n110*n142) - 1.0*n146*n319*n74/n221 + n298 - 0.5*xTj*(n100*n24*n334*n74*xF[7]/n236 + n102*n24*n336*n74*xF[9]/n238 + n103*n248*n74*(pow(alpha, n1*n29 - n15*n166)*n119*n15*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n15*n166)*pow(n163, n24)*n31*n42*pow(n54, n24)*n86 + pow(alpha, -n15*n166 + n51)*n119*n15*n154/n163 + n162) + n104*pow(n206, n24)*n74*xF[12]*(pow(alpha, n1*n29 - n166*n7)*n119*pow(n163, n24)*pow(n54, n24)*n7*n86 - pow(alpha, n1*n29 - n166*n7)*pow(n163, n24)*n31*n34*pow(n54, n24)*n86 + pow(alpha, -n166*n7 + n51)*n119*n154*n7/n163 + n160) + n106*n250*n74*(pow(alpha, n1*n29 - n12*n166)*n119*n12*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n12*n166)*pow(n163, n24)*n31*n39*pow(n54, n24)*n86 + pow(alpha, -n12*n166 + n51)*n119*n12*n154/n163 + n155) + n107*n251*n74*(pow(alpha, n1*n29 - n166*n5)*n119*pow(n163, n24)*n5*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n5)*pow(n163, n24)*n31*n32*pow(n54, n24)*n86 + pow(alpha, -n166*n5 + n51)*n119*n154*n5/n163 + n161) + n109*pow(n205, n24)*n74*xF[11]*(pow(alpha, n1*n29 - n166*n6)*n119*pow(n163, n24)*pow(n54, n24)*n6*n86 - pow(alpha, n1*n29 - n166*n6)*pow(n163, n24)*n31*n33*pow(n54, n24)*n86 + pow(alpha, -n166*n6 + n51)*n119*n154*n6/n163 + n157) + n121*pow(n210, n24)*n74*(pow(alpha, n1*n29 - n11*n166)*n11*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n11*n166)*pow(n163, n24)*n31*n38*pow(n54, n24)*n86 + pow(alpha, -n11*n166 + n51)*n11*n154*n23*n31/n163 + n114*n31*n38) + n121*n24*n353*n74 + n132*pow(n208, n24)*n74*(pow(alpha, n1*n29 - n166*n9)*n143*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n9)*pow(n163, n24)*n23*n31*pow(n54, n24)*n86*n9 + pow(alpha, -n166*n9 + n51)*n154*n23*n31*n9/n163 + n113*n143) + n132*n24*n350*n74 + n133*pow(n213, n24)*n74*(pow(alpha, n1*n29 - n14*n166)*n136*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n14*n166)*n14*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, -n14*n166 + n51)*n14*n154*n23*n31/n163 + n115*n136) + n133*n24*n351*n74 + n138*n24*n352*n74 + n146*pow(n203, n24)*n74*(-pow(alpha, -n1*n166 + n51)*n142*n154/n163 + n110*n142) + n146*n24*n319*n74/n221 + n148*pow(n209, n24)*n74*(pow(alpha, n1*n29 - n10*n166)*n10*n119*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n10*n166)*n135*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n10*n166 + n51)*n10*n119*n154/n163 + n135*n61) + n149*pow(n220, n24)*n74*(pow(alpha, n1*n29 - n166*n21)*n119*pow(n163, n24)*n21*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n21)*pow(n163, n24)*n31*n48*pow(n54, n24)*n86 + pow(alpha, -n166*n21 + n51)*n119*n154*n21/n163 + n31*n48*n72) + pow(n207, n24)*n74*n89*xF[13]*(pow(alpha, n1*n29 - n166*n8)*n134*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n8)*pow(n163, n24)*n23*n31*pow(n54, n24)*n8*n86 + pow(alpha, -n166*n8 + n51)*n154*n23*n31*n8/n163 + n112*n134) + pow(n217, n24)*n74*n99*xF[6]*(pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n18*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n31*n45*pow(n54, n24)*n86 + pow(alpha, -n166*n18 + n51)*n154*n18*n23*n31/n163 + n118*n31*n45) + n24*n249*n333*n74*n99 + n24*n252*n327*n74*n93 + n24*n254*n322*n74*n88 + n24*n255*n320*n74*n84 + n24*n268*n342*n74 + n24*n270*n331*n74 + n24*n355*n74 + n24*n356*n74 + n269*n74*(pow(alpha, n1*n29 - n16*n166)*n16*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n16*n166)*pow(n163, n24)*n31*n43*pow(n54, n24)*n86 + pow(alpha, -n16*n166 + n51)*n154*n16*n23*n31/n163 + n116*n31*n43) + n271*n74*(pow(alpha, n1*n29 - n166*n17)*n119*pow(n163, n24)*n17*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n17)*n126*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n166*n17 + n51)*n119*n154*n17/n163 + n126*n68) + n273*n74*(pow(alpha, n1*n29 - n13*n166)*n119*n13*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n13*n166)*n122*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n13*n166 + n51)*n119*n13*n154/n163 + n122*n64) + n274*n74*(pow(alpha, n1*n29 - n166*n19)*n119*pow(n163, n24)*n19*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n19)*n131*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n166*n19 + n51)*n119*n154*n19/n163 + n131*n70) + n275*n74*(pow(alpha, n1*n29 - n166*n20)*n119*pow(n163, n24)*n20*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n20)*pow(n163, n24)*n31*n47*pow(n54, n24)*n86 + pow(alpha, -n166*n20 + n51)*n119*n154*n20/n163 + n158) + n280 + n281 + n282 + n283 + n284 + n285 + n286 + n287 + n288 + n289 + n290 + n291 + n292 + n293 + n294 + n295 + n296 + n297 + n358 + n359 + n360 + n361 + n362 + n363 + n364 + n365 + n366 + n367 + n368 + n369 + n370 + n371 + n372 + n373 + n374 + n375 + n24*n330*n74*n96*xF[3]/n232 + n24*n325*n74*n91*xF[15]/n227 + n24*n323*n74*n89*xF[13]/n225)) - n74*xTj*(n103*n248*n312 + n104*n348 + n105*n349 + n106*n250*n309 + n107*n251*n302 + n108*n253*n301 + n109*pow(n205, n24)*n338 - n121*pow(n210, n24)*n308 + n123*n260 + n124*n258 + n125*n2*n242 + n127*n257 + n128*n2*n241 + n129*n256 + n130*n2*n243 - n132*n346 - n133*pow(n213, n24)*n311 + n137*n2*n246 + n148*n347 + n149*n344 + n151*n345 + n152*n239 + n153*n245 + n240*n58*n76 + n244*n72*n78 + n261*n77 + n262*n75 + n263*n82 + n264*n79 + n265*n80 + n266*n81 - n269*n313 + n271*n314 + n273*n310 + n274*n316 + n275*n317);
27502 NP_2a = -n74*(pow(alpha, n1*n29)*n0*n108*n142*pow(n300, -n0)*xF[0]/n221 + pow(alpha, n1*n29)*n0*n142*n253*n300 + n108*n156*n253*(-1 + (-n25 + xPj*xTj)/(n163*n167*n54)) - 1.0*n156*n242 + 1.0*xTj*(n0*n2*n23*n253*n53*(pow(alpha, n166*n23 + n51)*n1*n154*n2/n163 + n125*n2) + n100*n24*n334*xF[7]/n236 + n102*n24*n336*xF[9]/n238 + n103*n248*(pow(alpha, n1*n29 - n15*n166)*n119*n15*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n15*n166)*pow(n163, n24)*n31*n42*pow(n54, n24)*n86 + n119*n165*n189 + n162) + n104*pow(n206, n24)*xF[12]*(pow(alpha, n1*n29 - n166*n7)*n119*pow(n163, n24)*pow(n54, n24)*n7*n86 - pow(alpha, n1*n29 - n166*n7)*pow(n163, n24)*n31*n34*pow(n54, n24)*n86 + n119*n165*n198 + n160) + n106*n250*(pow(alpha, n1*n29 - n12*n166)*n119*n12*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n12*n166)*pow(n163, n24)*n31*n39*pow(n54, n24)*n86 + n119*n165*n188 + n155) + n107*n251*(pow(alpha, n1*n29 - n166*n5)*n119*pow(n163, n24)*n5*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n5)*pow(n163, n24)*n31*n32*pow(n54, n24)*n86 + n119*n165*n200 + n161) + n109*pow(n205, n24)*xF[11]*(pow(alpha, n1*n29 - n166*n6)*n119*pow(n163, n24)*pow(n54, n24)*n6*n86 - pow(alpha, n1*n29 - n166*n6)*pow(n163, n24)*n31*n33*pow(n54, n24)*n86 + n119*n165*n193 + n157) + n121*pow(n210, n24)*(pow(alpha, n1*n29 - n11*n166)*n11*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n11*n166)*pow(n163, n24)*n31*n38*pow(n54, n24)*n86 + n114*n31*n38 + n165*n201*n23*n31) + n121*n24*n353 + n122*n261 + n123*pow(n217, n24)*n50*xF[6]*(pow(alpha, -n166*n18 + n51)*n154*n18*n2/n163 + n123*n2) + n124*n248*n50*(pow(alpha, -n15*n166 + n51)*n15*n154*n2/n163 + n124*n2) + n126*n262 + n127*pow(n215, n24)*n50*xF[4]*(pow(alpha, -n16*n166 + n51)*n154*n16*n2/n163 + n127*n2) + n128*n250*n50*(pow(alpha, -n12*n166 + n51)*n12*n154*n2/n163 + n128*n2) + n129*pow(n208, n24)*n50*xF[14]*(pow(alpha, -n166*n9 + n51)*n154*n2*n9/n163 + n129*n2) + n130*n251*n50*(pow(alpha, -n166*n5 + n51)*n154*n2*n5/n163 + n130*n2) + n131*n263 + n132*pow(n208, n24)*(pow(alpha, n1*n29 - n166*n9)*n143*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n9)*pow(n163, n24)*n23*n31*pow(n54, n24)*n86*n9 + n113*n143 + n165*n191*n23*n31) + n132*n24*n350 + n133*pow(n213, n24)*(pow(alpha, n1*n29 - n14*n166)*n136*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n14*n166)*n14*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + n115*n136 + n165*n195*n23*n31) + n133*n24*n351 + n134*n264 + n135*n266 + n136*n265 + n137*pow(n210, n24)*n50*xF[16]*(pow(alpha, -n11*n166 + n51)*n11*n154*n2/n163 + n137*n2) + n138*n24*n352 + n139*pow(n212, n24)*n50*xF[1]*(pow(alpha, -n13*n166 + n51)*n154*n77/n163 + n64*n77) + n14*pow(n213, n24)*n50*n65*xF[2]*(pow(alpha, -n14*n166 + n51)*n154*n80/n163 + n65*n80) + n140*pow(n207, n24)*n50*xF[13]*(pow(alpha, -n166*n8 + n51)*n154*n79/n163 + n59*n79) + n141*pow(n218, n24)*n50*xF[7]*(pow(alpha, -n166*n19 + n51)*n154*n82/n163 + n70*n82) + n143*n267 + n144*pow(n209, n24)*n50*xF[15]*(pow(alpha, -n10*n166 + n51)*n154*n81/n163 + n61*n81) + n145*pow(n219, n24)*n50*xF[8]*(pow(alpha, -n166*n20 + n51)*n154*n2*n20/n163 + n153) + n146*pow(n203, n24)*n343 + n146*n24*n319/n221 + n148*pow(n209, n24)*(pow(alpha, n1*n29 - n10*n166)*n10*n119*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n10*n166)*n135*pow(n163, n24)*pow(n54, n24)*n86 + n119*n165*n197 + n135*n61) + n149*pow(n220, n24)*(pow(alpha, n1*n29 - n166*n21)*n119*pow(n163, n24)*n21*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n21)*pow(n163, n24)*n31*n48*pow(n54, n24)*n86 + n119*n165*n199 + n31*n48*n72) + n150*pow(n220, n24)*n50*(pow(alpha, -n166*n21 + n51)*n154*n78/n163 + n72*n78) + n155*n241 + n156*n242 + n157*n239 + n158*n245 + n159*n246 + n160*n240 + n161*n243 + n162*n247 + n17*pow(n216, n24)*n50*n68*xF[5]*(pow(alpha, -n166*n17 + n51)*n154*n75/n163 + n68*n75) + pow(n205, n24)*n50*n57*n6*xF[11]*(pow(alpha, -n166*n6 + n51)*n154*n2*n6/n163 + n152) + pow(n206, n24)*n50*n58*n7*xF[12]*(pow(alpha, -n166*n7 + n51)*n154*n76/n163 + n58*n76) + pow(n207, n24)*n89*xF[13]*(pow(alpha, n1*n29 - n166*n8)*n134*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n8)*pow(n163, n24)*n23*n31*pow(n54, n24)*n8*n86 + n112*n134 + n165*n187*n23*n31) + pow(n217, n24)*n99*xF[6]*(pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n18*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n31*n45*pow(n54, n24)*n86 + n118*n31*n45 + n165*n190*n23*n31) + n24*n249*n333*n99 + n24*n252*n327*n93 + n24*n254*n322*n88 + n24*n255*n320*n84 + n24*n268*n342 + n24*n270*n331 + n24*n355 + n24*n356 + n269*(pow(alpha, n1*n29 - n16*n166)*n16*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n16*n166)*pow(n163, n24)*n31*n43*pow(n54, n24)*n86 + n116*n31*n43 + n165*n185*n23*n31) + n271*(pow(alpha, n1*n29 - n166*n17)*n119*pow(n163, n24)*n17*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n17)*n126*pow(n163, n24)*pow(n54, n24)*n86 + n119*n165*n202 + n126*n68) + n273*(pow(alpha, n1*n29 - n13*n166)*n119*n13*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n13*n166)*n122*pow(n163, n24)*pow(n54, n24)*n86 + n119*n165*n194 + n122*n64) + n274*(pow(alpha, n1*n29 - n166*n19)*n119*pow(n163, n24)*n19*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n19)*n131*pow(n163, n24)*pow(n54, n24)*n86 + n119*n165*n186 + n131*n70) + n275*(pow(alpha, n1*n29 - n166*n20)*n119*pow(n163, n24)*n20*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n20)*pow(n163, n24)*n31*n47*pow(n54, n24)*n86 + n119*n165*n192 + n158) + n276 + n277 + n278 + n24*n330*n96*xF[3]/n232 + n24*n325*n91*xF[15]/n227 + n24*n323*n89*xF[13]/n225));
27503 NP_sqrt_base = (-NP0*n406 - n108*n74*xF[0]/(-n108 - n196 - 1) - n27*(-n100*n74*xF[7]/(n100 - 1 + pow(alpha, -n19*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n101*n74*xF[8]/(n101 - 1 + pow(alpha, -n20*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n102*n74*xF[9]/(n102 - 1 + pow(alpha, -n21*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n121*n74/(n92 - 1 + pow(alpha, -n11*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n132*n74/(n90 - 1 + pow(alpha, -n9*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n133*n74/(n95 - 1 + pow(alpha, -n14*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n138*n74/(n98 - 1 + pow(alpha, -n17*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n146*n74/(pow(alpha, n23*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1)) + n83 - 1) - n74*n84*xF[10]/(n84 - 1 + pow(alpha, -n5*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n87*xF[11]/(n87 - 1 + pow(alpha, -n6*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n88*xF[12]/(n88 - 1 + pow(alpha, -n7*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n89*xF[13]/(n89 - 1 + pow(alpha, -n8*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n91*xF[15]/(n91 - 1 + pow(alpha, -n10*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n93*xF[17]/(n93 - 1 + pow(alpha, -n12*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n94*xF[1]/(n94 - 1 + pow(alpha, -n13*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n96*xF[3]/(n96 - 1 + pow(alpha, -n15*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n97*xF[4]/(n97 - 1 + pow(alpha, -n16*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1))) - n74*n99*xF[6]/(n99 - 1 + pow(alpha, -n18*(n120*(n164 - log(n110*(n25 + n28*xTj)/(n25 - xF[0]*xTj) + 1)) + 1)))) - pow(NP0, -n0)*(1.0*n125*n2*n253*n301*n74 - 0.5*n146*n301*n354*n74 + 0.5*n280 + 0.5*n377 - 0.5*n409))*(-n0*n27*(-n101*n74*xF[8]*(pow(alpha, -n166*n20 + n51)*n154*n2*n20/n163 + n153)*(pow(alpha, -n166*n20 + n51)*n154*n20*n50/n163 + n145*n50)/n237 + n103*n248*n74*(pow(alpha, n1*n29 - n15*n166)*n119*n15*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n15*n166)*pow(n163, n24)*n31*n42*pow(n54, n24)*n86 + pow(alpha, -n15*n166 + n51)*n119*n15*n154/n163 + n162) + n103*n74*xF[3]*(pow(alpha, -n15*n166 + n51)*n15*n154*n2/n163 + n124*n2)*(pow(alpha, -n15*n166 + n51)*n15*n154*n50/n163 + n124*n50)/n232 + n104*pow(n206, n24)*n74*xF[12]*(pow(alpha, n1*n29 - n166*n7)*n119*pow(n163, n24)*pow(n54, n24)*n7*n86 - pow(alpha, n1*n29 - n166*n7)*pow(n163, n24)*n31*n34*pow(n54, n24)*n86 + pow(alpha, -n166*n7 + n51)*n119*n154*n7/n163 + n160) + n104*n254*n74*(pow(alpha, -n166*n7 + n51)*n154*n76/n163 + n58*n76)*(pow(alpha, -n166*n7 + n51)*n154*n50*n7/n163 + n50*n58*n7) + n105*n249*n74*(pow(alpha, -n166*n18 + n51)*n154*n18*n2/n163 + n123*n2)*(pow(alpha, -n166*n18 + n51)*n154*n18*n50/n163 + n123*n50) + n106*n250*n74*(pow(alpha, n1*n29 - n12*n166)*n119*n12*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n12*n166)*pow(n163, n24)*n31*n39*pow(n54, n24)*n86 + pow(alpha, -n12*n166 + n51)*n119*n12*n154/n163 + n155) + n106*n252*n74*(pow(alpha, -n12*n166 + n51)*n12*n154*n2/n163 + n128*n2)*(pow(alpha, -n12*n166 + n51)*n12*n154*n50/n163 + n128*n50) + n107*n251*n74*(pow(alpha, n1*n29 - n166*n5)*n119*pow(n163, n24)*n5*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n5)*pow(n163, n24)*n31*n32*pow(n54, n24)*n86 + pow(alpha, -n166*n5 + n51)*n119*n154*n5/n163 + n161) + n107*n255*n74*(pow(alpha, -n166*n5 + n51)*n154*n2*n5/n163 + n130*n2)*(pow(alpha, -n166*n5 + n51)*n154*n5*n50/n163 + n130*n50) + n108*n74*xF[0]*(pow(alpha, -n1*n166 + n51)*n1*n154*n2/n163 + n125*n2)*(pow(alpha, -n1*n166 + n51)*n0*n154*n2*n23/n163 + n0*n2*n23*n53)/n221 + n109*pow(n205, n24)*n74*xF[11]*(pow(alpha, n1*n29 - n166*n6)*n119*pow(n163, n24)*pow(n54, n24)*n6*n86 - pow(alpha, n1*n29 - n166*n6)*pow(n163, n24)*n31*n33*pow(n54, n24)*n86 + pow(alpha, -n166*n6 + n51)*n119*n154*n6/n163 + n157) + n109*n74*xF[11]*(pow(alpha, -n166*n6 + n51)*n154*n2*n6/n163 + n152)*(pow(alpha, -n166*n6 + n51)*n154*n50*n6/n163 + n50*n57*n6)/n223 + n121*pow(n210, n24)*n74*(pow(alpha, n1*n29 - n11*n166)*n11*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n11*n166)*pow(n163, n24)*n31*n38*pow(n54, n24)*n86 + pow(alpha, -n11*n166 + n51)*n11*n154*n23*n31/n163 + n114*n31*n38) - n121*n74*(pow(alpha, -n11*n166 + n51)*n11*n154*n2/n163 + n137*n2)*(pow(alpha, -n11*n166 + n51)*n11*n154*n50/n163 + n137*n50)/n228 + n132*pow(n208, n24)*n74*(pow(alpha, n1*n29 - n166*n9)*n143*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n9)*pow(n163, n24)*n23*n31*pow(n54, n24)*n86*n9 + pow(alpha, -n166*n9 + n51)*n154*n23*n31*n9/n163 + n113*n143) - n132*n74*(pow(alpha, -n166*n9 + n51)*n154*n2*n9/n163 + n129*n2)*(pow(alpha, -n166*n9 + n51)*n154*n50*n9/n163 + n129*n50)/n226 + n133*pow(n213, n24)*n74*(pow(alpha, n1*n29 - n14*n166)*n136*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n14*n166)*n14*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, -n14*n166 + n51)*n14*n154*n23*n31/n163 + n115*n136) - n133*n74*(pow(alpha, -n14*n166 + n51)*n154*n80/n163 + n65*n80)*(pow(alpha, -n14*n166 + n51)*n14*n154*n50/n163 + n14*n50*n65)/n231 - n138*n74*(pow(alpha, -n166*n17 + n51)*n154*n75/n163 + n68*n75)*(pow(alpha, -n166*n17 + n51)*n154*n17*n50/n163 + n17*n50*n68)/n234 + n146*pow(n203, n24)*n74*(pow(alpha, -n1*n166 + n51)*n142*(-n25 + xPj*xTj)/(n163*n54) + n110*n142) + n148*pow(n209, n24)*n74*(pow(alpha, n1*n29 - n10*n166)*n10*n119*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n10*n166)*n135*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n10*n166 + n51)*n10*n119*n154/n163 + n135*n61) + n148*n74*(pow(alpha, -n10*n166 + n51)*n154*n81/n163 + n61*n81)*(pow(alpha, -n10*n166 + n51)*n10*n154*n50/n163 + n144*n50)/n227 + n149*pow(n220, n24)*n74*(pow(alpha, n1*n29 - n166*n21)*n119*pow(n163, n24)*n21*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n21)*pow(n163, n24)*n31*n48*pow(n54, n24)*n86 + pow(alpha, -n166*n21 + n51)*n119*n154*n21/n163 + n31*n48*n72) + n149*n74*(pow(alpha, -n166*n21 + n51)*n154*n78/n163 + n72*n78)*(pow(alpha, -n166*n21 + n51)*n154*n21*n50/n163 + n21*n50*n72)/n238 + n151*n74*(pow(alpha, -n166*n8 + n51)*n154*n79/n163 + n59*n79)*(pow(alpha, -n166*n8 + n51)*n154*n50*n8/n163 + n140*n50)/n225 + pow(n207, n24)*n74*n89*xF[13]*(pow(alpha, n1*n29 - n166*n8)*n134*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n8)*pow(n163, n24)*n23*n31*pow(n54, n24)*n8*n86 + pow(alpha, -n166*n8 + n51)*n154*n23*n31*n8/n163 + n112*n134) + pow(n217, n24)*n74*n99*xF[6]*(pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n18*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n31*n45*pow(n54, n24)*n86 + pow(alpha, -n166*n18 + n51)*n154*n18*n23*n31/n163 + n118*n31*n45) - n268*n74*xF[1]*(pow(alpha, -n13*n166 + n51)*n154*n77/n163 + n64*n77)*(pow(alpha, -n13*n166 + n51)*n13*n154*n50/n163 + n139*n50) + n269*n74*(pow(alpha, n1*n29 - n16*n166)*n16*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n16*n166)*pow(n163, n24)*n31*n43*pow(n54, n24)*n86 + pow(alpha, -n16*n166 + n51)*n154*n16*n23*n31/n163 + n116*n31*n43) - n270*n74*(pow(alpha, -n16*n166 + n51)*n154*n16*n2/n163 + n127*n2)*(pow(alpha, -n16*n166 + n51)*n154*n16*n50/n163 + n127*n50) + n271*n74*(pow(alpha, n1*n29 - n166*n17)*n119*pow(n163, n24)*n17*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n17)*n126*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n166*n17 + n51)*n119*n154*n17/n163 + n126*n68) + n272*n74*(pow(alpha, -n166*n19 + n51)*n154*n82/n163 + n70*n82)*(pow(alpha, -n166*n19 + n51)*n154*n19*n50/n163 + n141*n50) + n273*n74*(pow(alpha, n1*n29 - n13*n166)*n119*n13*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n13*n166)*n122*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n13*n166 + n51)*n119*n13*n154/n163 + n122*n64) + n274*n74*(pow(alpha, n1*n29 - n166*n19)*n119*pow(n163, n24)*n19*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n19)*n131*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n166*n19 + n51)*n119*n154*n19/n163 + n131*n70) + n275*n74*(pow(alpha, n1*n29 - n166*n20)*n119*pow(n163, n24)*n20*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n20)*pow(n163, n24)*n31*n47*pow(n54, n24)*n86 + pow(alpha, -n166*n20 + n51)*n119*n154*n20/n163 + n158) + n280 + n281 + n282 + n283 + n284 + n285 + n286 + n287 + n288 + n289 + n290 + n291 + n292 + n293 + n294 + n295 + n296 + n297 + n358 + n359 + n360 + n361 + n362 + n363 + n364 + n365 + n366 + n367 + n368 + n369 + n370 + n371 + n372 + n373 + n374 + n375) - n0*n280 - n0*n377 + 4.0*n125*n2*n253*n301*n74 - 4.0*n146*n319*n74/n221) + pow(-n29*(1.0*n125*n2*n253*n74*(pow(alpha, -n1*n166 + n51)*n1*n154*n2/n163 + n125*n2) + 0.5*n146*pow(n203, n24)*n74*(-pow(alpha, -n1*n166 + n51)*n142*n154/n163 + n110*n142) - 0.5*n146*n74*(pow(alpha, -n1*n166 + n51)*n1*n154*n2/n163 + n125*n2)*(pow(alpha, -n1*n166 + n51)*n0*n154*n2*n23/n163 + n0*n2*n23*n53)/n221 + n298 - 0.5*xTj*(-n101*n74*xF[8]*(pow(alpha, -n166*n20 + n51)*n154*n2*n20/n163 + n153)*(pow(alpha, -n166*n20 + n51)*n154*n20*n50/n163 + n145*n50)/n237 + n103*n248*n74*(pow(alpha, n1*n29 - n15*n166)*n119*n15*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n15*n166)*pow(n163, n24)*n31*n42*pow(n54, n24)*n86 + pow(alpha, -n15*n166 + n51)*n119*n15*n154/n163 + n162) + n103*n74*xF[3]*(pow(alpha, -n15*n166 + n51)*n15*n154*n2/n163 + n124*n2)*(pow(alpha, -n15*n166 + n51)*n15*n154*n50/n163 + n124*n50)/n232 + n104*pow(n206, n24)*n74*xF[12]*(pow(alpha, n1*n29 - n166*n7)*n119*pow(n163, n24)*pow(n54, n24)*n7*n86 - pow(alpha, n1*n29 - n166*n7)*pow(n163, n24)*n31*n34*pow(n54, n24)*n86 + pow(alpha, -n166*n7 + n51)*n119*n154*n7/n163 + n160) + n104*n254*n74*(pow(alpha, -n166*n7 + n51)*n154*n76/n163 + n58*n76)*(pow(alpha, -n166*n7 + n51)*n154*n50*n7/n163 + n50*n58*n7) + n105*n249*n74*(pow(alpha, -n166*n18 + n51)*n154*n18*n2/n163 + n123*n2)*(pow(alpha, -n166*n18 + n51)*n154*n18*n50/n163 + n123*n50) + n106*n250*n74*(pow(alpha, n1*n29 - n12*n166)*n119*n12*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n12*n166)*pow(n163, n24)*n31*n39*pow(n54, n24)*n86 + pow(alpha, -n12*n166 + n51)*n119*n12*n154/n163 + n155) + n106*n252*n74*(pow(alpha, -n12*n166 + n51)*n12*n154*n2/n163 + n128*n2)*(pow(alpha, -n12*n166 + n51)*n12*n154*n50/n163 + n128*n50) + n107*n251*n74*(pow(alpha, n1*n29 - n166*n5)*n119*pow(n163, n24)*n5*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n5)*pow(n163, n24)*n31*n32*pow(n54, n24)*n86 + pow(alpha, -n166*n5 + n51)*n119*n154*n5/n163 + n161) + n107*n255*n74*(pow(alpha, -n166*n5 + n51)*n154*n2*n5/n163 + n130*n2)*(pow(alpha, -n166*n5 + n51)*n154*n5*n50/n163 + n130*n50) + n108*n74*xF[0]*(pow(alpha, -n1*n166 + n51)*n1*n154*n2/n163 + n125*n2)*(pow(alpha, -n1*n166 + n51)*n0*n154*n2*n23/n163 + n0*n2*n23*n53)/n221 + n109*pow(n205, n24)*n74*xF[11]*(pow(alpha, n1*n29 - n166*n6)*n119*pow(n163, n24)*pow(n54, n24)*n6*n86 - pow(alpha, n1*n29 - n166*n6)*pow(n163, n24)*n31*n33*pow(n54, n24)*n86 + pow(alpha, -n166*n6 + n51)*n119*n154*n6/n163 + n157) + n109*n74*xF[11]*(pow(alpha, -n166*n6 + n51)*n154*n2*n6/n163 + n152)*(pow(alpha, -n166*n6 + n51)*n154*n50*n6/n163 + n50*n57*n6)/n223 + n121*pow(n210, n24)*n74*(pow(alpha, n1*n29 - n11*n166)*n11*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n11*n166)*pow(n163, n24)*n31*n38*pow(n54, n24)*n86 + pow(alpha, -n11*n166 + n51)*n11*n154*n23*n31/n163 + n114*n31*n38) - n121*n74*(pow(alpha, -n11*n166 + n51)*n11*n154*n2/n163 + n137*n2)*(pow(alpha, -n11*n166 + n51)*n11*n154*n50/n163 + n137*n50)/n228 + n132*pow(n208, n24)*n74*(pow(alpha, n1*n29 - n166*n9)*n143*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n9)*pow(n163, n24)*n23*n31*pow(n54, n24)*n86*n9 + pow(alpha, -n166*n9 + n51)*n154*n23*n31*n9/n163 + n113*n143) - n132*n74*(pow(alpha, -n166*n9 + n51)*n154*n2*n9/n163 + n129*n2)*(pow(alpha, -n166*n9 + n51)*n154*n50*n9/n163 + n129*n50)/n226 + n133*pow(n213, n24)*n74*(pow(alpha, n1*n29 - n14*n166)*n136*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n14*n166)*n14*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, -n14*n166 + n51)*n14*n154*n23*n31/n163 + n115*n136) - n133*n74*(pow(alpha, -n14*n166 + n51)*n154*n80/n163 + n65*n80)*(pow(alpha, -n14*n166 + n51)*n14*n154*n50/n163 + n14*n50*n65)/n231 - n138*n74*(pow(alpha, -n166*n17 + n51)*n154*n75/n163 + n68*n75)*(pow(alpha, -n166*n17 + n51)*n154*n17*n50/n163 + n17*n50*n68)/n234 + n146*pow(n203, n24)*n74*(-pow(alpha, -n1*n166 + n51)*n142*n154/n163 + n110*n142) + n148*pow(n209, n24)*n74*(pow(alpha, n1*n29 - n10*n166)*n10*n119*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n10*n166)*n135*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n10*n166 + n51)*n10*n119*n154/n163 + n135*n61) + n148*n74*(pow(alpha, -n10*n166 + n51)*n154*n81/n163 + n61*n81)*(pow(alpha, -n10*n166 + n51)*n10*n154*n50/n163 + n144*n50)/n227 + n149*pow(n220, n24)*n74*(pow(alpha, n1*n29 - n166*n21)*n119*pow(n163, n24)*n21*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n21)*pow(n163, n24)*n31*n48*pow(n54, n24)*n86 + pow(alpha, -n166*n21 + n51)*n119*n154*n21/n163 + n31*n48*n72) + n149*n74*(pow(alpha, -n166*n21 + n51)*n154*n78/n163 + n72*n78)*(pow(alpha, -n166*n21 + n51)*n154*n21*n50/n163 + n21*n50*n72)/n238 + n151*n74*(pow(alpha, -n166*n8 + n51)*n154*n79/n163 + n59*n79)*(pow(alpha, -n166*n8 + n51)*n154*n50*n8/n163 + n140*n50)/n225 + pow(n207, n24)*n74*n89*xF[13]*(pow(alpha, n1*n29 - n166*n8)*n134*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n8)*pow(n163, n24)*n23*n31*pow(n54, n24)*n8*n86 + pow(alpha, -n166*n8 + n51)*n154*n23*n31*n8/n163 + n112*n134) + pow(n217, n24)*n74*n99*xF[6]*(pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n18*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n166*n18)*pow(n163, n24)*n31*n45*pow(n54, n24)*n86 + pow(alpha, -n166*n18 + n51)*n154*n18*n23*n31/n163 + n118*n31*n45) - n268*n74*xF[1]*(pow(alpha, -n13*n166 + n51)*n154*n77/n163 + n64*n77)*(pow(alpha, -n13*n166 + n51)*n13*n154*n50/n163 + n139*n50) + n269*n74*(pow(alpha, n1*n29 - n16*n166)*n16*pow(n163, n24)*n23*n31*pow(n54, n24)*n86 + pow(alpha, n1*n29 - n16*n166)*pow(n163, n24)*n31*n43*pow(n54, n24)*n86 + pow(alpha, -n16*n166 + n51)*n154*n16*n23*n31/n163 + n116*n31*n43) - n270*n74*(pow(alpha, -n16*n166 + n51)*n154*n16*n2/n163 + n127*n2)*(pow(alpha, -n16*n166 + n51)*n154*n16*n50/n163 + n127*n50) + n271*n74*(pow(alpha, n1*n29 - n166*n17)*n119*pow(n163, n24)*n17*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n17)*n126*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n166*n17 + n51)*n119*n154*n17/n163 + n126*n68) + n272*n74*(pow(alpha, -n166*n19 + n51)*n154*n82/n163 + n70*n82)*(pow(alpha, -n166*n19 + n51)*n154*n19*n50/n163 + n141*n50) + n273*n74*(pow(alpha, n1*n29 - n13*n166)*n119*n13*pow(n163, n24)*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n13*n166)*n122*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n13*n166 + n51)*n119*n13*n154/n163 + n122*n64) + n274*n74*(pow(alpha, n1*n29 - n166*n19)*n119*pow(n163, n24)*n19*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n19)*n131*pow(n163, n24)*pow(n54, n24)*n86 + pow(alpha, -n166*n19 + n51)*n119*n154*n19/n163 + n131*n70) + n275*n74*(pow(alpha, n1*n29 - n166*n20)*n119*pow(n163, n24)*n20*pow(n54, n24)*n86 - pow(alpha, n1*n29 - n166*n20)*pow(n163, n24)*n31*n47*pow(n54, n24)*n86 + pow(alpha, -n166*n20 + n51)*n119*n154*n20/n163 + n158) + n280 + n281 + n282 + n283 + n284 + n285 + n286 + n287 + n288 + n289 + n290 + n291 + n292 + n293 + n294 + n295 + n296 + n297 + n358 + n359 + n360 + n361 + n362 + n363 + n364 + n365 + n366 + n367 + n368 + n369 + n370 + n371 + n372 + n373 + n374 + n375)) - n406, -n0);
27504 NP_sqrt_base = fabs(NP_sqrt_base);
27505 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
27506 NT1 = n120*(n164 - log(-pow(alpha, NP1*n1)*n154 + 1));
27507 g0 = MW[1] - Mstar;
27508 g1 = MW[0] - Mstar;
27511 g4 = MW[10] - Mstar;
27512 g5 = MW[11] - Mstar;
27513 g6 = MW[12] - Mstar;
27514 g7 = MW[13] - Mstar;
27515 g8 = MW[14] - Mstar;
27516 g9 = MW[15] - Mstar;
27517 g10 = MW[16] - Mstar;
27518 g11 = MW[17] - Mstar;
27519 g12 = MW[2] - Mstar;
27520 g13 = MW[3] - Mstar;
27521 g14 = MW[4] - Mstar;
27522 g15 = MW[5] - Mstar;
27523 g16 = MW[6] - Mstar;
27524 g17 = MW[7] - Mstar;
27525 g18 = MW[8] - Mstar;
27526 g19 = MW[9] - Mstar;
27533 g26 = pow(alpha, -g1);
27534 g27 = pow(alpha, -g4);
27535 g28 = pow(alpha, -g5);
27536 g29 = pow(alpha, -g6);
27537 g30 = pow(alpha, -g7);
27538 g31 = pow(alpha, -g8);
27539 g32 = pow(alpha, -g9);
27540 g33 = pow(alpha, -g10);
27541 g34 = pow(alpha, -g11);
27542 g35 = pow(alpha, -g0);
27543 g36 = pow(alpha, -g12);
27544 g37 = pow(alpha, -g13);
27545 g38 = pow(alpha, -g14);
27546 g39 = pow(alpha, -g15);
27547 g40 = pow(alpha, -g16);
27548 g41 = pow(alpha, -g17);
27549 g42 = pow(alpha, -g18);
27550 g43 = pow(alpha, -g19);
27551 g44 = log(xF[0]/xF[1]);
27553 g46 = pow(alpha, NP1*g0);
27554 g47 = pow(alpha, NP1*g1);
27555 g48 = pow(alpha, NP1*g4);
27557 g50 = pow(alpha, NP1*g5);
27558 g51 = pow(alpha, NP1*g6);
27559 g52 = pow(alpha, NP1*g7);
27560 g53 = pow(alpha, NP1*g8);
27561 g54 = pow(alpha, NP1*g9);
27562 g55 = pow(alpha, NP1*g10);
27563 g56 = pow(alpha, NP1*g11);
27564 g57 = pow(alpha, NP1*g12);
27565 g58 = pow(alpha, NP1*g13);
27566 g59 = pow(alpha, NP1*g14);
27567 g60 = pow(alpha, NP1*g15);
27568 g61 = pow(alpha, NP1*g16);
27569 g62 = pow(alpha, NP1*g17);
27570 g63 = pow(alpha, NP1*g18);
27571 g64 = pow(alpha, NP1*g19);
27613 g106 = g21/(g3*xF[1]);
27615 g108 = g104*xF[10];
27616 g109 = g104*xF[11];
27617 g110 = g104*xF[12];
27618 g111 = g104*xF[13];
27619 g112 = g104*xF[14];
27620 g113 = g104*xF[15];
27621 g114 = g104*xF[16];
27622 g115 = g104*xF[17];
27632 g125 = pow(alpha, g0*g45) - 1;
27633 g126 = pow(alpha, g0*g45) - 1;
27634 g127 = pow(alpha, g1*g45) - 1;
27635 g128 = pow(alpha, g4*g45) - 1;
27636 g129 = pow(alpha, g45*g5) - 1;
27637 g130 = pow(alpha, g45*g6) - 1;
27638 g131 = pow(alpha, g45*g7) - 1;
27639 g132 = pow(alpha, g45*g8) - 1;
27640 g133 = pow(alpha, g45*g9) - 1;
27641 g134 = pow(alpha, g10*g45) - 1;
27642 g135 = pow(alpha, g11*g45) - 1;
27643 g136 = pow(alpha, g12*g45) - 1;
27644 g137 = pow(alpha, g13*g45) - 1;
27645 g138 = pow(alpha, g14*g45) - 1;
27646 g139 = pow(alpha, g15*g45) - 1;
27647 g140 = pow(alpha, g16*g45) - 1;
27648 g141 = pow(alpha, g17*g45) - 1;
27649 g142 = pow(alpha, g18*g45) - 1;
27650 g143 = pow(alpha, g19*g45) - 1;
27651 g144 = -pow(alpha, g1*g45);
27652 g145 = -pow(alpha, g4*g45);
27653 g146 = -pow(alpha, g45*g5);
27654 g147 = -pow(alpha, g45*g6);
27655 g148 = -pow(alpha, g45*g7);
27656 g149 = -pow(alpha, g45*g8);
27657 g150 = -pow(alpha, g45*g9);
27658 g151 = -pow(alpha, g10*g45);
27659 g152 = -pow(alpha, g11*g45);
27660 g153 = -pow(alpha, g12*g45);
27661 g154 = -pow(alpha, g13*g45);
27662 g155 = -pow(alpha, g14*g45);
27663 g156 = -pow(alpha, g15*g45);
27664 g157 = -pow(alpha, g16*g45);
27665 g158 = -pow(alpha, g17*g45);
27666 g159 = -pow(alpha, g18*g45);
27667 g160 = -pow(alpha, g19*g45);
27669 g162 = -g144 - g47;
27670 g163 = -g145 - g48;
27671 g164 = -g146 - g50;
27672 g165 = -g147 - g51;
27673 g166 = -g148 - g52;
27674 g167 = -g149 - g53;
27675 g168 = -g150 - g54;
27676 g169 = -g151 - g55;
27677 g170 = -g152 - g56;
27678 g171 = -g153 - g57;
27679 g172 = -g154 - g58;
27680 g173 = -g155 - g59;
27681 g174 = -g156 - g60;
27682 g175 = -g157 - g61;
27683 g176 = -g158 - g62;
27684 g177 = -g159 - g63;
27685 g178 = -g160 - g64;
27686 g179 = pow(alpha, g1*g45) + g87;
27688 g181 = pow(alpha, g4*g45) + g88;
27689 g182 = pow(alpha, g45*g5) + g89;
27690 g183 = pow(alpha, g45*g6) + g90;
27691 g184 = pow(alpha, g45*g7) + g91;
27692 g185 = pow(alpha, g45*g8) + g92;
27693 g186 = pow(alpha, g45*g9) + g93;
27694 g187 = pow(alpha, g10*g45) + g94;
27695 g188 = pow(alpha, g11*g45) + g95;
27696 g189 = pow(alpha, g12*g45) + g96;
27697 g190 = pow(alpha, g13*g45) + g97;
27698 g191 = pow(alpha, g14*g45) + g98;
27699 g192 = pow(alpha, g15*g45) + g99;
27700 g193 = pow(alpha, g16*g45) + g100;
27701 g194 = pow(alpha, g17*g45) + g101;
27702 g195 = pow(alpha, g18*g45) + g102;
27703 g196 = pow(alpha, g19*g45) + g103;
27706 g199 = xF[11]/g182;
27708 g201 = xF[10]/g181;
27709 g202 = xF[17]/g188;
27710 g203 = xF[15]/g186;
27713 g206 = xF[12]/g183;
27714 g207 = xF[13]/g184;
27716 g209 = xF[14]/g185;
27721 g214 = xF[17]/g170;
27723 g216 = xF[16]/g169;
27725 g218 = xF[12]/g165;
27726 g219 = xF[15]/g168;
27729 g222 = xF[13]/g166;
27730 g223 = xF[11]/g164;
27734 g227 = xF[14]/g167;
27736 g229 = xF[10]/g163;
27825 g318 = log(g106*g180*g22/g69);
27826 g319 = log(g106*g161*g22/g68);
27827 g320 = log(g180*g25*g66/g126);
27829 g322 = log(g161*g25*g66/g125);
27867 g360 = g107 + g108 + g109 + g110 + g111 + g112 + g113 + g114 + g115 + g116 + g117 + g118 + g119 + g120 + g121 + g122 + g123 + g124;
27868 LpF = xF[0]*(g26 + 1.0)*(g327 + g349 + g65)/(g49*(g26 - 1.0)) + xF[10]*(g27 + 1.0)*(g337 + g357 + g65)/(g49*(g27 - 1.0)) + xF[11]*(g28 + 1.0)*(g335 + g346 + g65)/(g49*(g28 - 1.0)) + xF[12]*(g29 + 1.0)*(g325 + g343 + g65)/(g49*(g29 - 1.0)) + xF[13]*(g30 + 1.0)*(g333 + g347 + g65)/(g49*(g30 - 1.0)) + xF[14]*(g31 + 1.0)*(g336 + g353 + g65)/(g49*(g31 - 1.0)) + xF[15]*(g32 + 1.0)*(g330 + g344 + g65)/(g49*(g32 - 1.0)) + xF[16]*(g33 + 1.0)*(g334 + g342 + g65)/(g49*(g33 - 1.0)) + xF[17]*(g34 + 1.0)*(g339 + g351 + g65)/(g49*(g34 - 1.0)) + xF[1]*(g35 + 1.0)*(g340 + g356 + g65)/(g49*(g35 - 1.0)) + xF[2]*(g36 + 1.0)*(g331 + g350 + g65)/(g49*(g36 - 1.0)) + xF[3]*(g37 + 1.0)*(g338 + g348 + g65)/(g49*(g37 - 1.0)) + xF[4]*(g38 + 1.0)*(g324 + g359 + g65)/(g49*(g38 - 1.0)) + xF[5]*(g39 + 1.0)*(g328 + g352 + g65)/(g49*(g39 - 1.0)) + xF[6]*(g40 + 1.0)*(g329 + g345 + g65)/(g49*(g40 - 1.0)) + xF[7]*(g41 + 1.0)*(g341 + g358 + g65)/(g49*(g41 - 1.0)) + xF[8]*(g42 + 1.0)*(g332 + g354 + g65)/(g49*(g42 - 1.0)) + xF[9]*(g43 + 1.0)*(g326 + g355 + g65)/(g49*(g43 - 1.0));
27871 SWUpF = -g126*g200*g323 - g197*g321*(g103 + 1) - g197*g323*(pow(alpha, g19*g45) - 1) - g198*g321*(g102 + 1) - g198*g323*(pow(alpha, g18*g45) - 1) - g199*g321*(g89 + 1) - g199*g323*(pow(alpha, g45*g5) - 1) - g200*g321*g69 - g201*g321*(g88 + 1) - g201*g323*(pow(alpha, g4*g45) - 1) - g202*g321*(g95 + 1) - g202*g323*(pow(alpha, g11*g45) - 1) - g203*g321*(g93 + 1) - g203*g323*(pow(alpha, g45*g9) - 1) - g204*g321*(g97 + 1) - g204*g323*(pow(alpha, g13*g45) - 1) - g205*g321*(g101 + 1) - g205*g323*(pow(alpha, g17*g45) - 1) - g206*g321*(g90 + 1) - g206*g323*(pow(alpha, g45*g6) - 1) - g207*g321*(g91 + 1) - g207*g323*(pow(alpha, g45*g7) - 1) - g208*g321*(g100 + 1) - g208*g323*(pow(alpha, g16*g45) - 1) - g209*g321*(g92 + 1) - g209*g323*(pow(alpha, g45*g8) - 1) - g210*g321*(g99 + 1) - g210*g323*(pow(alpha, g15*g45) - 1) - g211*g321*(g96 + 1) - g211*g323*(pow(alpha, g12*g45) - 1) - g212*g321*(g87 + 1) - g212*g323*(pow(alpha, g1*g45) - 1) - g360 - g23*g318*(g98 + 1)/g191 - g23*g320*(pow(alpha, g14*g45) - 1)/g191 - g24*g318*(g94 + 1)/g187 - g24*g320*(pow(alpha, g10*g45) - 1)/g187;
27872 SWUpP = -g67*(g125*g246*g322 + g127*g232*g322 + g128*g243*g322 + g129*g240*g322 + g130*g233*g322 + g131*g236*g322 + g132*g239*g322 + g133*g234*g322 + g134*g231*g322 + g135*g242*g322 + g136*g237*g322 + g137*g245*g322 + g139*g238*g322 + g140*g235*g322 + g141*g247*g322 + g142*g241*g322 + g143*g244*g322 + g23*g324 + g23*g359 + g231*g319*g77 + g232*g319*g70 + g233*g319*g73 + g234*g319*g76 + g235*g319*g83 + g236*g319*g74 + g237*g319*g79 + g238*g319*g82 + g239*g319*g75 + g240*g319*g72 + g241*g319*g85 + g242*g319*g78 + g243*g319*g71 + g244*g319*g86 + g245*g319*g80 + g246*g319*g68 + g247*g319*g84 + g360);
27877 xP[4] = g138*g213*g67;
27895 xT[4] = g105*g213*g81;
27901 xT[10] = g105*g279;
27902 xT[11] = g105*g278;
27903 xT[12] = g105*g272;
27904 xT[13] = g105*g274;
27905 xT[14] = g105*g280;
27906 xT[15] = g105*g269;
27907 xT[16] = g105*g276;
27908 xT[17] = g105*g266;
27911 n0 = MW[0] - Mstar;
27915 n4 = MW[10] - Mstar;
27916 n5 = MW[11] - Mstar;
27917 n6 = MW[12] - Mstar;
27918 n7 = MW[13] - Mstar;
27919 n8 = MW[14] - Mstar;
27920 n9 = MW[15] - Mstar;
27921 n10 = MW[16] - Mstar;
27922 n11 = MW[17] - Mstar;
27923 n12 = MW[18] - Mstar;
27924 n13 = MW[1] - Mstar;
27925 n14 = MW[2] - Mstar;
27926 n15 = MW[3] - Mstar;
27927 n16 = MW[4] - Mstar;
27928 n17 = MW[5] - Mstar;
27929 n18 = MW[6] - Mstar;
27930 n19 = MW[7] - Mstar;
27931 n20 = MW[8] - Mstar;
27932 n21 = MW[9] - Mstar;
27940 n29 = pow(n0, -n23);
27941 n30 = pow(n1, -n23);
27942 n31 = pow(n4, -n23);
27943 n32 = pow(n5, -n23);
27944 n33 = pow(n6, -n23);
27945 n34 = pow(n7, -n23);
27946 n35 = pow(n8, -n23);
27947 n36 = pow(n9, -n23);
27948 n37 = pow(n10, -n23);
27949 n38 = pow(n11, -n23);
27950 n39 = pow(n12, -n23);
27951 n40 = pow(n13, -n23);
27952 n41 = pow(n14, -n23);
27953 n42 = pow(n15, -n23);
27954 n43 = pow(n16, -n23);
27955 n44 = pow(n17, -n23);
27956 n45 = pow(n18, -n23);
27957 n46 = pow(n19, -n23);
27958 n47 = pow(n20, -n23);
27959 n48 = pow(n21, -n23);
27962 n51 = pow(alpha, NP0*n0);
27963 n52 = n25 + n28*xF[0];
27964 n53 = n25 + n28*xPj;
27965 n54 = pow(alpha, NP0*n4);
27966 n55 = pow(alpha, NP0*n5);
27967 n56 = pow(alpha, NP0*n6);
27968 n57 = pow(alpha, NP0*n7);
27969 n58 = pow(alpha, NP0*n8);
27970 n59 = pow(alpha, NP0*n9);
27971 n60 = pow(alpha, NP0*n10);
27972 n61 = pow(alpha, NP0*n11);
27973 n62 = pow(alpha, NP0*n12);
27974 n63 = pow(alpha, NP0*n13);
27975 n64 = pow(alpha, NP0*n14);
27976 n65 = pow(alpha, NP0*n15);
27977 n66 = pow(alpha, NP0*n16);
27978 n67 = pow(alpha, NP0*n17);
27979 n68 = pow(alpha, NP0*n18);
27980 n69 = pow(alpha, NP0*n19);
27981 n70 = pow(alpha, NP0*n20);
27982 n71 = pow(alpha, NP0*n21);
27991 n80 = pow(alpha, NP0*n23*n24);
27992 n81 = pow(n52, -n23);
27993 n82 = pow(n53, -n23);
28062 n151 = log((-1.0 + xPj/xF[0])/n2);
28068 n157 = n1*n142*xF[12];
28070 n159 = n1*n141*xF[10];
28071 n160 = n30*n38*n61;
28072 n161 = n30*n32*n55;
28073 n162 = n30*n47*n70;
28074 n163 = n30*n37*n60;
28075 n164 = n30*n42*n65;
28076 n165 = n30*n33*n56;
28077 n166 = n30*n43*n66;
28078 n167 = n30*n31*n54;
28079 n168 = n30*n45*n68;
28080 n169 = n100*n156 + 1;
28081 n170 = pow(n169, -n23);
28082 n171 = n151 + n22 + n49 + n72;
28083 n172 = n124*n156/n169;
28084 n173 = n0*n156*n30*n51/n169;
28085 n174 = n111*(n171 - log(n169)) + 1;
28086 n175 = pow(alpha, n0*n174);
28087 n176 = pow(alpha, n174*n4);
28088 n177 = pow(alpha, n174*n5);
28089 n178 = pow(alpha, n174*n6);
28090 n179 = pow(alpha, n174*n7);
28091 n180 = pow(alpha, n174*n8);
28092 n181 = pow(alpha, n174*n9);
28093 n182 = pow(alpha, n10*n174);
28094 n183 = pow(alpha, n11*n174);
28095 n184 = pow(alpha, n12*n174);
28096 n185 = pow(alpha, n13*n174);
28097 n186 = pow(alpha, n14*n174);
28098 n187 = pow(alpha, n15*n174);
28099 n188 = pow(alpha, n16*n174);
28100 n189 = pow(alpha, n17*n174);
28101 n190 = pow(alpha, n174*n18);
28102 n191 = pow(alpha, n174*n19);
28103 n192 = pow(alpha, n174*n20);
28104 n193 = pow(alpha, n174*n21);
28123 n212 = pow(alpha, n174*n24) + n78 - 1;
28124 n213 = n79 - 1 + 1.0/n176;
28125 n214 = n83 - 1 + 1.0/n177;
28126 n215 = n84 - 1 + 1.0/n178;
28127 n216 = n85 - 1 + 1.0/n179;
28128 n217 = n86 - 1 + 1.0/n180;
28129 n218 = n87 - 1 + 1.0/n181;
28130 n219 = n88 - 1 + 1.0/n182;
28131 n220 = n89 - 1 + 1.0/n183;
28132 n221 = n90 - 1 + 1.0/n184;
28133 n222 = n91 - 1 + 1.0/n185;
28134 n223 = n92 - 1 + 1.0/n186;
28135 n224 = n93 - 1 + 1.0/n187;
28136 n225 = n94 - 1 + 1.0/n188;
28137 n226 = n95 - 1 + 1.0/n189;
28138 n227 = n96 - 1 + 1.0/n190;
28139 n228 = n97 - 1 + 1.0/n191;
28140 n229 = n98 - 1 + 1.0/n192;
28141 n230 = n99 - 1 + 1.0/n193;
28142 n231 = pow(n212, -n23);
28143 n232 = pow(n213, -n23);
28144 n233 = pow(n214, -n23);
28145 n234 = pow(n215, -n23);
28146 n235 = pow(n216, -n23);
28147 n236 = pow(n217, -n23);
28148 n237 = pow(n218, -n23);
28149 n238 = pow(n219, -n23);
28150 n239 = pow(n220, -n23);
28151 n240 = pow(n221, -n23);
28152 n241 = pow(n222, -n23);
28153 n242 = pow(n223, -n23);
28154 n243 = pow(n224, -n23);
28155 n244 = pow(n225, -n23);
28156 n245 = pow(n226, -n23);
28157 n246 = pow(n227, -n23);
28158 n247 = pow(n228, -n23);
28159 n248 = pow(n229, -n23);
28160 n249 = pow(n230, -n23);
28161 n250 = pow(n212, 3);
28162 n251 = pow(n213, 3);
28163 n252 = pow(n214, 3);
28164 n253 = pow(n215, 3);
28165 n254 = pow(n216, 3);
28166 n255 = pow(n217, 3);
28167 n256 = pow(n218, 3);
28168 n257 = pow(n219, 3);
28169 n258 = pow(n220, 3);
28170 n259 = pow(n221, 3);
28171 n260 = pow(n222, 3);
28172 n261 = pow(n223, 3);
28173 n262 = pow(n224, 3);
28174 n263 = pow(n225, 3);
28175 n264 = pow(n226, 3);
28176 n265 = pow(n227, 3);
28177 n266 = pow(n228, 3);
28178 n267 = pow(n229, 3);
28179 n268 = pow(n230, 3);
28180 n269 = xF[11]/n214;
28181 n270 = xF[17]/n220;
28182 n271 = xF[14]/n217;
28186 n275 = xF[16]/n219;
28188 n277 = xF[12]/n215;
28189 n278 = xF[10]/n213;
28192 n281 = xF[17]/n239;
28195 n284 = n67*xF[5]/n226;
28196 n285 = n63*xF[1]/n222;
28197 n286 = n62*xF[18]/n221;
28198 n287 = n69*xF[7]/n228;
28199 n288 = n57*xF[13]/n216;
28200 n289 = n64*xF[2]/n223;
28201 n290 = n59*xF[15]/n218;
28208 n297 = n90*xF[18]/n240;
28209 n298 = n91*xF[1]/n241;
28210 n299 = n94*xF[4]/n244;
28211 n300 = n89*xF[17]/n258;
28212 n301 = n90*xF[18]/n259;
28213 n302 = n98*xF[8]/n248;
28214 n303 = n276*n30*n48*n71;
28215 n304 = n0*n110*n113/n212;
28216 n305 = n110*n113*n24/n212;
28217 n306 = n110*n119*n73/n212;
28218 n307 = n167*n278*n73;
28219 n308 = n161*n269*n73;
28220 n309 = n165*n277*n73;
28221 n310 = n128*n288*n73;
28222 n311 = n149*n271*n58*n73;
28223 n312 = n134*n290*n73;
28224 n313 = n163*n275*n73;
28225 n314 = n160*n270*n73;
28226 n315 = n140*n286*n73;
28227 n316 = n137*n285*n73;
28228 n317 = n135*n289*n73;
28229 n318 = n164*n274*n73;
28230 n319 = n166*n272*n73;
28231 n320 = n117*n284*n73;
28232 n321 = n168*n279*n73;
28233 n322 = n125*n287*n73;
28234 n323 = n162*n273*n73;
28237 n326 = n156/(n169*n175);
28239 n328 = n0*n124 + n0*n172/n175;
28240 n329 = n1*n141 + n172*n209;
28241 n330 = n153 + n172*n203;
28242 n331 = n1*n142 + n172*n194;
28243 n332 = n156*n51*n75/(n169*n179) + n57*n75;
28244 n333 = n1*n122 + n172*n201;
28245 n334 = n156*n51*n77/(n169*n181) + n59*n77;
28246 n335 = n1*n138 + n172*n210;
28247 n336 = n154 + n172*n198;
28248 n337 = n156*n51*n74/(n169*n184) + n62*n74;
28249 n338 = n1*n139 + n172*n204;
28250 n339 = n156*n51*n76/(n169*n186) + n64*n76;
28251 n340 = n1*n114 + n172*n199;
28252 n341 = n118*n16 + n172*n206;
28253 n342 = n1*n145 + n172*n208;
28254 n343 = n155 + n172*n200;
28255 n344 = n1*n147 + n172*n196;
28256 n345 = n1*n136 + n172*n202;
28257 n346 = n1*n130 + n172*n197;
28258 n347 = pow(n328, -n23);
28259 n348 = pow(n329, -n23);
28260 n349 = pow(n330, -n23);
28261 n350 = pow(n331, -n23);
28262 n351 = pow(n332, -n23);
28263 n352 = pow(n333, -n23);
28264 n353 = pow(n334, -n23);
28265 n354 = pow(n335, -n23);
28266 n355 = pow(n336, -n23);
28267 n356 = pow(n337, -n23);
28268 n357 = pow(n338, -n23);
28269 n358 = pow(n339, -n23);
28270 n359 = pow(n340, -n23);
28271 n360 = pow(n341, -n23);
28272 n361 = pow(n342, -n23);
28273 n362 = pow(n343, -n23);
28274 n363 = pow(n344, -n23);
28275 n364 = pow(n345, -n23);
28276 n365 = pow(n346, -n23);
28277 n366 = n330*xF[11];
28281 n370 = n124*n23*n24 + n172*n23*n24/n175;
28282 n371 = n114*n50 + n156*n199*n50*n51/n169;
28283 n372 = n129*n50 + n156*n198*n50*n51/n169;
28284 n373 = n349*xF[11];
28287 n376 = n100*n119*n326 + n100*n119;
28312 n401 = n364*n98*xF[8]/n267;
28313 n402 = n109*n133*n379;
28314 n403 = n133*n376/n231;
28315 n404 = n110*n113*n23*n24*(pow(alpha, NP0*n0 + n174*n24)*n0*n1*n156/n169 + n0*n124)/n231;
28316 n405 = n141*n50*n73*xF[10]*(pow(alpha, NP0*n0 - n174*n4)*n1*n156*n4/n169 + n1*n141)/n232;
28317 n406 = n148*n50*n73*xF[11]*(pow(alpha, NP0*n0 - n174*n5)*n1*n156*n5/n169 + n153)/n233;
28318 n407 = n142*n50*n73*xF[12]*(pow(alpha, NP0*n0 - n174*n6)*n1*n156*n6/n169 + n1*n142)/n234;
28319 n408 = n50*n57*n7*n73*xF[13]*(pow(alpha, NP0*n0 - n174*n7)*n156*n75/n169 + n57*n75)/n235;
28320 n409 = n122*n50*n73*xF[14]*(pow(alpha, NP0*n0 - n174*n8)*n1*n156*n8/n169 + n1*n122)/n236;
28321 n410 = n150*n50*n73*xF[15]*(pow(alpha, NP0*n0 - n174*n9)*n156*n77/n169 + n59*n77)/n237;
28322 n411 = n138*n50*n73*xF[16]*(pow(alpha, NP0*n0 - n10*n174)*n1*n10*n156/n169 + n1*n138)/n238;
28323 n412 = n129*n281*n50*n73*(pow(alpha, NP0*n0 - n11*n174)*n1*n11*n156/n169 + n154);
28324 n413 = n12*n50*n62*n73*xF[18]*(pow(alpha, NP0*n0 - n12*n174)*n156*n74/n169 + n62*n74)/n240;
28325 n414 = n139*n50*n73*xF[1]*(pow(alpha, NP0*n0 - n13*n174)*n1*n13*n156/n169 + n1*n139)/n241;
28326 n415 = n14*n50*n64*n73*xF[2]*(pow(alpha, NP0*n0 - n14*n174)*n156*n76/n169 + n64*n76)/n242;
28327 n416 = n114*n280*n50*n73*(pow(alpha, NP0*n0 - n15*n174)*n1*n15*n156/n169 + n1*n114);
28328 n417 = n16*n50*n66*n73*xF[4]*(pow(alpha, NP0*n0 - n16*n174)*n1*n156*n16/n169 + n118*n16)/n244;
28329 n418 = n145*n50*n73*xF[5]*(pow(alpha, NP0*n0 - n17*n174)*n1*n156*n17/n169 + n1*n145)/n245;
28330 n419 = n158*n73*xF[6]*(pow(alpha, NP0*n0 - n174*n18)*n1*n156*n18/n169 + n155)/n246;
28331 n420 = n147*n50*n73*xF[7]*(pow(alpha, NP0*n0 - n174*n19)*n1*n156*n19/n169 + n1*n147)/n247;
28332 n421 = n136*n50*n73*xF[8]*(pow(alpha, NP0*n0 - n174*n20)*n1*n156*n20/n169 + n1*n136)/n248;
28333 n422 = n130*n50*n73*xF[9]*(pow(alpha, NP0*n0 - n174*n21)*n1*n156*n21/n169 + n1*n130)/n249;
28334 n423 = 1.0*n0*n110*n113*n379;
28337 n426 = n304 + n402;
28338 n427 = n328*n370/n250;
28339 n428 = pow(alpha, n0*n27)*n0*n209*n30*n82/(n170*n81) - pow(alpha, n0*n27)*n30*n31*n82/(n170*n176*n81) + n167 + n173*n209;
28340 n429 = pow(alpha, n0*n27)*n0*n194*n30*n82/(n170*n81) - pow(alpha, n0*n27)*n30*n33*n82/(n170*n178*n81) + n165 + n173*n194;
28341 n430 = pow(alpha, n0*n27)*n128*n82/(n170*n179*n81) + pow(alpha, n0*n27)*n211*n24*n30*n82/(n170*n81) + n102*n128 + n156*n211*n24*n30*n51/n169;
28342 n431 = pow(alpha, n0*n27)*n149*n82/(n170*n180*n81) + pow(alpha, n0*n27)*n201*n24*n30*n82/(n170*n81) + n103*n149 + n156*n201*n24*n30*n51/n169;
28343 n432 = pow(alpha, n0*n27)*n0*n207*n30*n82/(n170*n81) - pow(alpha, n0*n27)*n134*n82/(n170*n181*n81) + n134*n59 + n173*n207;
28344 n433 = pow(alpha, n0*n27)*n210*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27)*n30*n37*n82/(n170*n182*n81) + n104*n30*n37 + n156*n210*n24*n30*n51/n169;
28345 n434 = pow(alpha, n0*n27)*n0*n198*n30*n82/(n170*n81) - pow(alpha, n0*n27)*n30*n38*n82/(n170*n183*n81) + n160 + n173*n198;
28346 n435 = pow(alpha, n0*n27)*n135*n82/(n170*n186*n81) + pow(alpha, n0*n27)*n205*n24*n30*n82/(n170*n81) + n106*n135 + n156*n205*n24*n30*n51/n169;
28347 n436 = pow(alpha, n0*n27)*n0*n199*n30*n82/(n170*n81) - pow(alpha, n0*n27)*n30*n42*n82/(n170*n187*n81) + n164 + n173*n199;
28348 n437 = pow(alpha, n0*n27)*n200*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27)*n30*n45*n82/(n170*n190*n81) + n108*n30*n45 + n156*n200*n24*n30*n51/n169;
28349 n438 = pow(alpha, n0*n27)*n0*n197*n30*n82/(n170*n81) - pow(alpha, n0*n27)*n30*n48*n82/(n170*n193*n81) + n173*n197 + n30*n48*n71;
28350 n439 = n132*n73*(pow(alpha, n0*n27 - n174*n7)*n128*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n7)*n24*n30*n7*n82/(n170*n81) + n102*n128 + n156*n211*n24*n30*n51/n169)/n235;
28351 n440 = n126*n73*(pow(alpha, n0*n27 - n174*n8)*n149*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n8)*n24*n30*n8*n82/(n170*n81) + n103*n149 + n156*n201*n24*n30*n51/n169)/n236;
28352 n441 = n112*n73*(pow(alpha, n0*n27 - n10*n174)*n10*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n10*n174)*n30*n37*n82/(n170*n81) + n104*n30*n37 + n156*n210*n24*n30*n51/n169)/n238;
28353 n442 = n297*n73*(pow(alpha, n0*n27 - n12*n174)*n12*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n12*n174)*n140*n82/(n170*n81) + n105*n140 + n156*n195*n24*n30*n51/n169);
28354 n443 = n127*n73*(pow(alpha, n0*n27 - n14*n174)*n135*n82/(n170*n81) + pow(alpha, n0*n27 - n14*n174)*n14*n24*n30*n82/(n170*n81) + n106*n135 + n156*n205*n24*n30*n51/n169)/n242;
28355 n444 = n299*n73*(pow(alpha, n0*n27 - n16*n174)*n16*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n16*n174)*n30*n43*n82/(n170*n81) + n107*n30*n43 + n156*n206*n24*n30*n51/n169);
28356 n445 = n121*n73*(pow(alpha, n0*n27 - n174*n18)*n18*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n18)*n30*n45*n82/(n170*n81) + n108*n30*n45 + n156*n200*n24*n30*n51/n169)/n246;
28357 n446 = n109*n131*(pow(alpha, n0*n27 - n174*n4)*n0*n30*n4*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n4)*n30*n31*n82/(n170*n81) + n167 + n173*n209)/n232;
28358 n447 = n109*n294*xF[11]*(pow(alpha, n0*n27 - n174*n5)*n0*n30*n5*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n5)*n30*n32*n82/(n170*n81) + n161 + n173*n203);
28359 n448 = n109*n143*(pow(alpha, n0*n27 - n174*n6)*n0*n30*n6*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n6)*n30*n33*n82/(n170*n81) + n165 + n173*n194)/n234;
28360 n449 = n109*n116*(pow(alpha, n0*n27 - n174*n9)*n0*n30*n82*n9/(n170*n81) - pow(alpha, n0*n27 - n174*n9)*n134*n82/(n170*n81) + n134*n59 + n173*n207)/n237;
28361 n450 = n109*n281*n89*(pow(alpha, n0*n27 - n11*n174)*n0*n11*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n11*n174)*n30*n38*n82/(n170*n81) + n160 + n173*n198);
28362 n451 = n109*n298*(pow(alpha, n0*n27 - n13*n174)*n0*n13*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n13*n174)*n137*n82/(n170*n81) + n137*n63 + n173*n204);
28363 n452 = n109*n115*(pow(alpha, n0*n27 - n15*n174)*n0*n15*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n15*n174)*n30*n42*n82/(n170*n81) + n164 + n173*n199)/n243;
28364 n453 = n109*n296*(pow(alpha, n0*n27 - n17*n174)*n0*n17*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n17*n174)*n117*n82/(n170*n81) + n117*n67 + n173*n208);
28365 n454 = n109*n123*(pow(alpha, n0*n27 - n174*n19)*n0*n19*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n19)*n125*n82/(n170*n81) + n125*n69 + n173*n196)/n247;
28366 n455 = n109*n302*(pow(alpha, n0*n27 - n174*n20)*n0*n20*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n20)*n30*n47*n82/(n170*n81) + n162 + n173*n202);
28367 n456 = n109*n120*(pow(alpha, n0*n27 - n174*n21)*n0*n21*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n21)*n30*n48*n82/(n170*n81) + n173*n197 + n30*n48*n71)/n249;
28368 n457 = n325 + n423 + n425;
28369 n458 = n109*n112*n386 + n109*n115*n340/n243 + n109*n116*n385 + n109*n120*n381 + n109*n121*n343/n246 + n109*n123*n387 + n109*n126*n384 + n109*n127*n380 + n109*n131*n382 + n109*n132*n383 + n109*n143*n378 + n109*n281*n377 + n109*n294*n366 + n109*n296*n342 + n109*n297*n337 + n109*n298*n338 + n109*n299*n341 + n109*n302*n345 + n113*n114*n274 + n113*n122*n271 + n113*n129*n270 + n113*n130*n276 + n113*n136*n273 + n113*n138*n275 + n113*n139*xF[1]/n222 + n113*n141*n278 + n113*n142*n277 + n113*n145*xF[5]/n226 + n113*n146*n279 + n113*n147*xF[7]/n228 + n113*n148*n269 + n113*n16*n272*n66 + n286*n73*n74 + n288*n73*n75 + n289*n73*n76 + n290*n73*n77 + n426;
28370 n459 = n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n317 + n318 + n319 + n320 + n321 + n322 + n323 + n324 + n404 + n405 + n406 + n407 + n408 + n409 + n410 + n411 + n412 + n413 + n414 + n415 + n416 + n417 + n418 + n419 + n420 + n421 + n422 + n424 + n439 + n440 + n441 + n442 + n443 + n444 + n445 + n446 + n447 + n448 + n449 + n450 + n451 + n452 + n453 + n454 + n455 + n456;
28371 n460 = n109*n112*n335*(n138*n50 + n156*n210*n50*n51/n169)/n257 + n109*n115*n340*n371/n262 + n109*n116*n334*(n150*n50 + n156*n207*n50*n51/n169)/n256 + n109*n120*n346*(n130*n50 + n156*n197*n50*n51/n169)/n268 + n109*n121*n343*(n156*n200*n50*n51/n169 + n158)/n265 + n109*n123*n344*(n147*n50 + n156*n196*n50*n51/n169)/n266 + n109*n126*n333*(n122*n50 + n156*n201*n50*n51/n169)/n255 + n109*n127*n339*(n14*n50*n64 + n156*n205*n50*n51/n169)/n261 + n109*n131*n329*(n141*n50 + n156*n209*n50*n51/n169)/n251 + n109*n132*n332*(n156*n211*n50*n51/n169 + n50*n57*n7)/n254 + n109*n133*n427 + n109*n143*n331*(n142*n50 + n156*n194*n50*n51/n169)/n253 + n109*n144*n342*(n145*n50 + n156*n208*n50*n51/n169)/n264 + n109*n291*n366*(n148*n50 + n156*n203*n50*n51/n169) + n109*n292*n367*(n139*n50 + n156*n204*n50*n51/n169) + n109*n295*n368*(n156*n206*n50*n51/n169 + n16*n50*n66) + n109*n300*n336*n372 + n109*n301*n337*(n12*n50*n62 + n156*n195*n50*n51/n169) + n109*n369*n98*(n136*n50 + n156*n202*n50*n51/n169)/n267 + n459;
28372 NP_b = -n0*n110*n113*n293*n327 - n27*(1.0*n0*n110*n113*(pow(alpha, NP0*n0 - n0*n174)*n0*n1*n156/n169 + n0*n124)/n231 - 1.0*n133*n395*n73 + 0.5*n133*n73*(pow(alpha, NP0*n0 - n0*n174)*n119*(-n25 + xPj*xTj)/(n169*n52) + n100*n119)/n231 + n325 - 0.5*xTj*(n109*n115*(pow(alpha, NP0*n0 - n15*n174)*n0*n15*n156*n30/n169 + pow(alpha, n0*n27 - n15*n174)*n0*n15*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n15*n174)*n30*n42*n82/(n170*n81) + n164)/n243 + n109*n116*(pow(alpha, NP0*n0 - n174*n9)*n0*n156*n30*n9/n169 + pow(alpha, n0*n27 - n174*n9)*n0*n30*n82*n9/(n170*n81) - pow(alpha, n0*n27 - n174*n9)*n134*n82/(n170*n81) + n134*n59)/n237 + n109*n120*(pow(alpha, NP0*n0 - n174*n21)*n0*n156*n21*n30/n169 + pow(alpha, n0*n27 - n174*n21)*n0*n21*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n21)*n30*n48*n82/(n170*n81) + n30*n48*n71)/n249 + n109*n123*(pow(alpha, NP0*n0 - n174*n19)*n0*n156*n19*n30/n169 + pow(alpha, n0*n27 - n174*n19)*n0*n19*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n19)*n125*n82/(n170*n81) + n125*n69)/n247 + n109*n131*(pow(alpha, NP0*n0 - n174*n4)*n0*n156*n30*n4/n169 + pow(alpha, n0*n27 - n174*n4)*n0*n30*n4*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n4)*n30*n31*n82/(n170*n81) + n167)/n232 + n109*n143*(pow(alpha, NP0*n0 - n174*n6)*n0*n156*n30*n6/n169 + pow(alpha, n0*n27 - n174*n6)*n0*n30*n6*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n6)*n30*n33*n82/(n170*n81) + n165)/n234 + n109*n281*n89*(pow(alpha, NP0*n0 - n11*n174)*n0*n11*n156*n30/n169 + pow(alpha, n0*n27 - n11*n174)*n0*n11*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n11*n174)*n30*n38*n82/(n170*n81) + n160) + n109*n294*xF[11]*(pow(alpha, NP0*n0 - n174*n5)*n0*n156*n30*n5/n169 + pow(alpha, n0*n27 - n174*n5)*n0*n30*n5*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n5)*n30*n32*n82/(n170*n81) + n161) + n109*n296*(pow(alpha, NP0*n0 - n17*n174)*n0*n156*n17*n30/n169 + pow(alpha, n0*n27 - n17*n174)*n0*n17*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n17*n174)*n117*n82/(n170*n81) + n117*n67) + n109*n298*(pow(alpha, NP0*n0 - n13*n174)*n0*n13*n156*n30/n169 + pow(alpha, n0*n27 - n13*n174)*n0*n13*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n13*n174)*n137*n82/(n170*n81) + n137*n63) + n109*n302*(pow(alpha, NP0*n0 - n174*n20)*n0*n156*n20*n30/n169 + pow(alpha, n0*n27 - n174*n20)*n0*n20*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n20)*n30*n47*n82/(n170*n81) + n162) + n112*n23*n400*n73 + n112*n73*(pow(alpha, NP0*n0 - n10*n174)*n10*n156*n24*n30/n169 + pow(alpha, n0*n27 - n10*n174)*n10*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n10*n174)*n30*n37*n82/(n170*n81) + n104*n30*n37)/n238 + n115*n23*n388*n73 + n116*n23*n391*n73 + n120*n23*n389*n73 + n121*n23*n390*n73 + n121*n73*(pow(alpha, NP0*n0 - n174*n18)*n156*n18*n24*n30/n169 + pow(alpha, n0*n27 - n174*n18)*n18*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n18)*n30*n45*n82/(n170*n81) + n108*n30*n45)/n246 + n123*n23*n394*n73 + n126*n23*n393*n73 + n126*n73*(pow(alpha, NP0*n0 - n174*n8)*n156*n24*n30*n8/n169 + pow(alpha, n0*n27 - n174*n8)*n149*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n8)*n24*n30*n8*n82/(n170*n81) + n103*n149)/n236 + n127*n23*n396*n73 + n127*n73*(pow(alpha, NP0*n0 - n14*n174)*n14*n156*n24*n30/n169 + pow(alpha, n0*n27 - n14*n174)*n135*n82/(n170*n81) + pow(alpha, n0*n27 - n14*n174)*n14*n24*n30*n82/(n170*n81) + n106*n135)/n242 + n131*n23*n399*n73 + n132*n23*n392*n73 + n132*n73*(pow(alpha, NP0*n0 - n174*n7)*n156*n24*n30*n7/n169 + pow(alpha, n0*n27 - n174*n7)*n128*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n7)*n24*n30*n7*n82/(n170*n81) + n102*n128)/n235 + n133*n23*n395*n73 + n133*n73*(pow(alpha, NP0*n0 - n0*n174)*n119*(-n25 + xPj*xTj)/(n169*n52) + n100*n119)/n231 + n143*n23*n397*n73 + n144*n23*n398*n73 + n23*n291*n373*n73 + n23*n292*n374*n73 + n23*n295*n375*n73 + n23*n300*n355*n73 + n23*n301*n356*n73 + n23*n401*n73 + n297*n73*(pow(alpha, NP0*n0 - n12*n174)*n12*n156*n24*n30/n169 + pow(alpha, n0*n27 - n12*n174)*n12*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n12*n174)*n140*n82/(n170*n81) + n105*n140) + n299*n73*(pow(alpha, NP0*n0 - n16*n174)*n156*n16*n24*n30/n169 + pow(alpha, n0*n27 - n16*n174)*n16*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n16*n174)*n30*n43*n82/(n170*n81) + n107*n30*n43) + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n317 + n318 + n319 + n320 + n321 + n322 + n323 + n324 + n404 + n405 + n406 + n407 + n408 + n409 + n410 + n411 + n412 + n413 + n414 + n415 + n416 + n417 + n418 + n419 + n420 + n421 + n422)) - n305 - n73*xTj*(n1*n114*n274 + n1*n122*n271 + n1*n130*n276 + n1*n136*n273 + n1*n138*n275 + n1*n139*xF[1]/n222 + n1*n145*xF[5]/n226 + n1*n147*xF[7]/n228 + n110*n283 - n112*n386 - n115*n340/n243 - n116*n385 + n118*n16*n272 - n120*n381 - n121*n343/n246 + n123*n282*n344 - n126*n384 - n127*n380 - n131*n382 - n132*n383 - n133*n379 + n152*n378 + n153*n269 + n154*n270 + n155*n279 + n157/n215 + n159/n213 - n281*n377 + n286*n74 + n288*n75 + n289*n76 + n290*n77 - n294*n366 - n296*n342 - n297*n337 - n298*n338 - n299*n341 - n302*n345);
28373 NP_2a = -n73*(-pow(alpha, n0*n27)*n119*n133*n23*pow(n327, -n23)/n250 - 2.0*pow(alpha, n0*n27)*n119*n327*xF[0]/n231 + n100*n119*n133*(-1 + (-n25 + xPj*xTj)/(n169*n175*n52))/n231 - 1.0*n110*n119/n212 + 1.0*xTj*(n1*n110*n23*n24*(pow(alpha, NP0*n0 + n174*n24)*n0*n1*n156/n169 + n0*n124)/n231 + n110*n119/n212 + n112*n23*n400 + n112*(pow(alpha, n0*n27 - n10*n174)*n10*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n10*n174)*n30*n37*n82/(n170*n81) + n104*n30*n37 + n156*n210*n24*n30*n51/n169)/n238 + n114*n280*n50*(pow(alpha, NP0*n0 - n15*n174)*n1*n15*n156/n169 + n1*n114) + n115*n23*n388 - n115*(pow(alpha, n0*n27 - n15*n174)*n0*n15*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n15*n174)*n30*n42*n82/(n170*n81) + n164 + n173*n199)/n243 + n116*n23*n391 - n116*(pow(alpha, n0*n27 - n174*n9)*n0*n30*n82*n9/(n170*n81) - pow(alpha, n0*n27 - n174*n9)*n134*n82/(n170*n81) + n134*n59 + n173*n207)/n237 + n117*n284 + n12*n50*n62*xF[18]*(pow(alpha, NP0*n0 - n12*n174)*n156*n74/n169 + n62*n74)/n240 + n120*n23*n389 - n120*(pow(alpha, n0*n27 - n174*n21)*n0*n21*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n21)*n30*n48*n82/(n170*n81) + n173*n197 + n30*n48*n71)/n249 + n121*n23*n390 + n121*(pow(alpha, n0*n27 - n174*n18)*n18*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n18)*n30*n45*n82/(n170*n81) + n108*n30*n45 + n156*n200*n24*n30*n51/n169)/n246 + n122*n50*xF[14]*(pow(alpha, NP0*n0 - n174*n8)*n1*n156*n8/n169 + n1*n122)/n236 + n123*n23*n394 + n123*n282*(pow(alpha, n0*n27 - n174*n19)*n0*n19*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n19)*n125*n82/(n170*n81) + n125*n69 + n173*n196) + n125*n287 + n126*n23*n393 + n126*(pow(alpha, n0*n27 - n174*n8)*n149*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n8)*n24*n30*n8*n82/(n170*n81) + n103*n149 + n156*n201*n24*n30*n51/n169)/n236 + n127*n23*n396 + n127*(pow(alpha, n0*n27 - n14*n174)*n135*n82/(n170*n81) + pow(alpha, n0*n27 - n14*n174)*n14*n24*n30*n82/(n170*n81) + n106*n135 + n156*n205*n24*n30*n51/n169)/n242 + n128*n288 + n129*n281*n50*(pow(alpha, NP0*n0 - n11*n174)*n1*n11*n156/n169 + n154) + n130*n50*xF[9]*(pow(alpha, NP0*n0 - n174*n21)*n1*n156*n21/n169 + n1*n130)/n249 + n131*n23*n399 - n131*(pow(alpha, n0*n27 - n174*n4)*n0*n30*n4*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n4)*n30*n31*n82/(n170*n81) + n167 + n173*n209)/n232 + n132*n23*n392 + n132*(pow(alpha, n0*n27 - n174*n7)*n128*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n7)*n24*n30*n7*n82/(n170*n81) + n102*n128 + n156*n211*n24*n30*n51/n169)/n235 + n133*n23*n395 + n134*n290 + n135*n289 + n136*n50*xF[8]*(pow(alpha, NP0*n0 - n174*n20)*n1*n156*n20/n169 + n1*n136)/n248 + n137*n285 + n138*n50*xF[16]*(pow(alpha, NP0*n0 - n10*n174)*n1*n10*n156/n169 + n1*n138)/n238 + n139*n50*xF[1]*(pow(alpha, NP0*n0 - n13*n174)*n1*n13*n156/n169 + n1*n139)/n241 + n14*n50*n64*xF[2]*(pow(alpha, NP0*n0 - n14*n174)*n156*n76/n169 + n64*n76)/n242 + n140*n286 + n141*n50*xF[10]*(pow(alpha, NP0*n0 - n174*n4)*n1*n156*n4/n169 + n1*n141)/n232 + n142*n50*xF[12]*(pow(alpha, NP0*n0 - n174*n6)*n1*n156*n6/n169 + n1*n142)/n234 + n143*n23*n397 + n144*n23*n398 + n145*n50*xF[5]*(pow(alpha, NP0*n0 - n17*n174)*n1*n156*n17/n169 + n1*n145)/n245 + n147*n50*xF[7]*(pow(alpha, NP0*n0 - n174*n19)*n1*n156*n19/n169 + n1*n147)/n247 + n148*n50*xF[11]*(pow(alpha, NP0*n0 - n174*n5)*n1*n156*n5/n169 + n153)/n233 + n149*n271*n58 + n150*n50*xF[15]*(pow(alpha, NP0*n0 - n174*n9)*n156*n77/n169 + n59*n77)/n237 + n152*(pow(alpha, n0*n27 - n174*n6)*n0*n30*n6*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n6)*n30*n33*n82/(n170*n81) + n165 + n173*n194)/n234 + n158*xF[6]*(pow(alpha, NP0*n0 - n174*n18)*n1*n156*n18/n169 + n155)/n246 + n16*n50*n66*xF[4]*(pow(alpha, NP0*n0 - n16*n174)*n1*n156*n16/n169 + n118*n16)/n244 + n160*n270 + n161*n269 + n162*n273 + n163*n275 + n164*n274 + n165*n277 + n166*n272 + n167*n278 + n168*n279 + n23*n291*n373 + n23*n292*n374 + n23*n295*n375 + n23*n300*n355 + n23*n301*n356 + n23*n401 - n281*n89*(pow(alpha, n0*n27 - n11*n174)*n0*n11*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n11*n174)*n30*n38*n82/(n170*n81) + n160 + n173*n198) + n294*xF[11]*(pow(alpha, n0*n27 - n174*n5)*n24*n30*n5*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n5)*n30*n32*n82/(n170*n81) + n101*n30*n32 + n156*n203*n24*n30*n51/n169) - n296*(pow(alpha, n0*n27 - n17*n174)*n0*n17*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n17*n174)*n117*n82/(n170*n81) + n117*n67 + n173*n208) + n297*(pow(alpha, n0*n27 - n12*n174)*n12*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n12*n174)*n140*n82/(n170*n81) + n105*n140 + n156*n195*n24*n30*n51/n169) - n298*(pow(alpha, n0*n27 - n13*n174)*n0*n13*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n13*n174)*n137*n82/(n170*n81) + n137*n63 + n173*n204) + n299*(pow(alpha, n0*n27 - n16*n174)*n16*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n16*n174)*n30*n43*n82/(n170*n81) + n107*n30*n43 + n156*n206*n24*n30*n51/n169) - n302*(pow(alpha, n0*n27 - n174*n20)*n0*n20*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n20)*n30*n47*n82/(n170*n81) + n162 + n173*n202) + n303 + n403 + n50*n57*n7*xF[13]*(pow(alpha, NP0*n0 - n174*n7)*n156*n75/n169 + n57*n75)/n235));
28374 NP_sqrt_base = (NP0*(n28*(n109*n112*(pow(alpha, NP0*n0 - n10*n174)*n1*n10*n156/n169 + n1*n138)/n238 + n109*n115*(pow(alpha, NP0*n0 - n15*n174)*n1*n15*n156/n169 + n1*n114)/n243 + n109*n116*(pow(alpha, NP0*n0 - n174*n9)*n156*n77/n169 + n59*n77)/n237 + n109*n120*(pow(alpha, NP0*n0 - n174*n21)*n1*n156*n21/n169 + n1*n130)/n249 + n109*n121*(pow(alpha, NP0*n0 - n174*n18)*n1*n156*n18/n169 + n155)/n246 + n109*n123*(pow(alpha, NP0*n0 - n174*n19)*n1*n156*n19/n169 + n1*n147)/n247 + n109*n126*(pow(alpha, NP0*n0 - n174*n8)*n1*n156*n8/n169 + n1*n122)/n236 + n109*n127*(pow(alpha, NP0*n0 - n14*n174)*n156*n76/n169 + n64*n76)/n242 + n109*n131*(pow(alpha, NP0*n0 - n174*n4)*n1*n156*n4/n169 + n1*n141)/n232 + n109*n132*(pow(alpha, NP0*n0 - n174*n7)*n156*n75/n169 + n57*n75)/n235 + n109*n133*(pow(alpha, NP0*n0 - n0*n174)*n0*n1*n156/n169 + n0*n124)/n231 + n109*n143*(pow(alpha, NP0*n0 - n174*n6)*n1*n156*n6/n169 + n1*n142)/n234 + n109*n281*n89*(pow(alpha, NP0*n0 - n11*n174)*n1*n11*n156/n169 + n154) + n109*n294*xF[11]*(pow(alpha, NP0*n0 - n174*n5)*n1*n156*n5/n169 + n153) + n109*n296*(pow(alpha, NP0*n0 - n17*n174)*n1*n156*n17/n169 + n1*n145) + n109*n297*(pow(alpha, NP0*n0 - n12*n174)*n156*n74/n169 + n62*n74) + n109*n298*(pow(alpha, NP0*n0 - n13*n174)*n1*n13*n156/n169 + n1*n139) + n109*n299*(pow(alpha, NP0*n0 - n16*n174)*n1*n156*n16/n169 + n118*n16) + n109*n302*(pow(alpha, NP0*n0 - n174*n20)*n1*n156*n20/n169 + n1*n136) + n113*n114*n274 + n113*n122*n271 + n113*n129*n270 + n113*n130*n276 + n113*n136*n273 + n113*n138*n275 + n113*n139*xF[1]/n222 + n113*n141*n278 + n113*n142*n277 + n113*n145*xF[5]/n226 + n113*n146*n279 + n113*n147*xF[7]/n228 + n113*n148*n269 + n113*n16*n272*n66 + n286*n73*n74 + n288*n73*n75 + n289*n73*n76 + n290*n73*n77 + n304) + n426) + n133*n73/n212 + xTj*(n109*n112/n219 + n109*n115/n224 + n109*n116/n218 + n109*n120/n230 + n109*n121/n227 + n109*n123/n228 + n109*n126/n217 + n109*n127/n223 + n109*n131/n213 + n109*n132/n216 + n109*n133/n212 + n109*n143/n215 + n109*n144/n226 + n109*n269*n83 + n109*n270*n89 + n109*n272*n94 + n109*n273*n98 + n109*n91*xF[1]/n222 + n109*n90*xF[18]/n221) + pow(NP0, -n23)*(-1.0*n0*n110*n113*n379 + 0.5*n133*n427*n73 - 0.5*n306 - 0.5*n424 + 0.5*n460*xTj))*(4.0*n0*n110*n113*n379 - 4.0*n133*n395*n73 - n23*n28*(n109*n112*(pow(alpha, NP0*n0 - n10*n174)*n1*n10*n156/n169 + n1*n138)*(pow(alpha, NP0*n0 - n10*n174)*n10*n156*n50/n169 + n138*n50)/n257 + n109*n115*(pow(alpha, NP0*n0 - n15*n174)*n1*n15*n156/n169 + n1*n114)*(pow(alpha, NP0*n0 - n15*n174)*n15*n156*n50/n169 + n114*n50)/n262 + n109*n115*(pow(alpha, NP0*n0 - n15*n174)*n0*n15*n156*n30/n169 + pow(alpha, n0*n27 - n15*n174)*n0*n15*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n15*n174)*n30*n42*n82/(n170*n81) + n164)/n243 + n109*n116*(pow(alpha, NP0*n0 - n174*n9)*n156*n77/n169 + n59*n77)*(pow(alpha, NP0*n0 - n174*n9)*n156*n50*n9/n169 + n150*n50)/n256 + n109*n116*(pow(alpha, NP0*n0 - n174*n9)*n0*n156*n30*n9/n169 + pow(alpha, n0*n27 - n174*n9)*n0*n30*n82*n9/(n170*n81) - pow(alpha, n0*n27 - n174*n9)*n134*n82/(n170*n81) + n134*n59)/n237 + n109*n120*(pow(alpha, NP0*n0 - n174*n21)*n1*n156*n21/n169 + n1*n130)*(pow(alpha, NP0*n0 - n174*n21)*n156*n21*n50/n169 + n130*n50)/n268 + n109*n120*(pow(alpha, NP0*n0 - n174*n21)*n0*n156*n21*n30/n169 + pow(alpha, n0*n27 - n174*n21)*n0*n21*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n21)*n30*n48*n82/(n170*n81) + n30*n48*n71)/n249 + n109*n121*(pow(alpha, NP0*n0 - n174*n18)*n1*n156*n18/n169 + n155)*(pow(alpha, NP0*n0 - n174*n18)*n156*n18*n50/n169 + n158)/n265 + n109*n123*(pow(alpha, NP0*n0 - n174*n19)*n1*n156*n19/n169 + n1*n147)*(pow(alpha, NP0*n0 - n174*n19)*n156*n19*n50/n169 + n147*n50)/n266 + n109*n123*(pow(alpha, NP0*n0 - n174*n19)*n0*n156*n19*n30/n169 + pow(alpha, n0*n27 - n174*n19)*n0*n19*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n19)*n125*n82/(n170*n81) + n125*n69)/n247 + n109*n126*(pow(alpha, NP0*n0 - n174*n8)*n1*n156*n8/n169 + n1*n122)*(pow(alpha, NP0*n0 - n174*n8)*n156*n50*n8/n169 + n122*n50)/n255 + n109*n127*(pow(alpha, NP0*n0 - n14*n174)*n156*n76/n169 + n64*n76)*(pow(alpha, NP0*n0 - n14*n174)*n14*n156*n50/n169 + n14*n50*n64)/n261 + n109*n131*(pow(alpha, NP0*n0 - n174*n4)*n1*n156*n4/n169 + n1*n141)*(pow(alpha, NP0*n0 - n174*n4)*n156*n4*n50/n169 + n141*n50)/n251 + n109*n131*(pow(alpha, NP0*n0 - n174*n4)*n0*n156*n30*n4/n169 + pow(alpha, n0*n27 - n174*n4)*n0*n30*n4*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n4)*n30*n31*n82/(n170*n81) + n167)/n232 + n109*n132*(pow(alpha, NP0*n0 - n174*n7)*n156*n75/n169 + n57*n75)*(pow(alpha, NP0*n0 - n174*n7)*n156*n50*n7/n169 + n50*n57*n7)/n254 + n109*n133*(pow(alpha, NP0*n0 - n0*n174)*n0*n1*n156/n169 + n0*n124)*(pow(alpha, NP0*n0 - n0*n174)*n1*n156*n23*n24/n169 + n124*n23*n24)/n250 + n109*n143*(pow(alpha, NP0*n0 - n174*n6)*n1*n156*n6/n169 + n1*n142)*(pow(alpha, NP0*n0 - n174*n6)*n156*n50*n6/n169 + n142*n50)/n253 + n109*n143*(pow(alpha, NP0*n0 - n174*n6)*n0*n156*n30*n6/n169 + pow(alpha, n0*n27 - n174*n6)*n0*n30*n6*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n6)*n30*n33*n82/(n170*n81) + n165)/n234 + n109*n144*(pow(alpha, NP0*n0 - n17*n174)*n1*n156*n17/n169 + n1*n145)*(pow(alpha, NP0*n0 - n17*n174)*n156*n17*n50/n169 + n145*n50)/n264 + n109*n281*n89*(pow(alpha, NP0*n0 - n11*n174)*n0*n11*n156*n30/n169 + pow(alpha, n0*n27 - n11*n174)*n0*n11*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n11*n174)*n30*n38*n82/(n170*n81) + n160) + n109*n291*xF[11]*(pow(alpha, NP0*n0 - n174*n5)*n1*n156*n5/n169 + n153)*(pow(alpha, NP0*n0 - n174*n5)*n156*n5*n50/n169 + n148*n50) + n109*n292*xF[1]*(pow(alpha, NP0*n0 - n13*n174)*n1*n13*n156/n169 + n1*n139)*(pow(alpha, NP0*n0 - n13*n174)*n13*n156*n50/n169 + n139*n50) + n109*n294*xF[11]*(pow(alpha, NP0*n0 - n174*n5)*n0*n156*n30*n5/n169 + pow(alpha, n0*n27 - n174*n5)*n0*n30*n5*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n5)*n30*n32*n82/(n170*n81) + n161) + n109*n295*xF[4]*(pow(alpha, NP0*n0 - n16*n174)*n1*n156*n16/n169 + n118*n16)*(pow(alpha, NP0*n0 - n16*n174)*n156*n16*n50/n169 + n16*n50*n66) + n109*n296*(pow(alpha, NP0*n0 - n17*n174)*n0*n156*n17*n30/n169 + pow(alpha, n0*n27 - n17*n174)*n0*n17*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n17*n174)*n117*n82/(n170*n81) + n117*n67) + n109*n298*(pow(alpha, NP0*n0 - n13*n174)*n0*n13*n156*n30/n169 + pow(alpha, n0*n27 - n13*n174)*n0*n13*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n13*n174)*n137*n82/(n170*n81) + n137*n63) + n109*n300*(pow(alpha, NP0*n0 - n11*n174)*n1*n11*n156/n169 + n154)*(pow(alpha, NP0*n0 - n11*n174)*n11*n156*n50/n169 + n129*n50) + n109*n301*(pow(alpha, NP0*n0 - n12*n174)*n156*n74/n169 + n62*n74)*(pow(alpha, NP0*n0 - n12*n174)*n12*n156*n50/n169 + n12*n50*n62) + n109*n302*(pow(alpha, NP0*n0 - n174*n20)*n0*n156*n20*n30/n169 + pow(alpha, n0*n27 - n174*n20)*n0*n20*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n20)*n30*n47*n82/(n170*n81) + n162) + n109*n98*xF[8]*(pow(alpha, NP0*n0 - n174*n20)*n1*n156*n20/n169 + n1*n136)*(pow(alpha, NP0*n0 - n174*n20)*n156*n20*n50/n169 + n136*n50)/n267 + n112*n73*(pow(alpha, NP0*n0 - n10*n174)*n10*n156*n24*n30/n169 + pow(alpha, n0*n27 - n10*n174)*n10*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n10*n174)*n30*n37*n82/(n170*n81) + n104*n30*n37)/n238 + n121*n73*(pow(alpha, NP0*n0 - n174*n18)*n156*n18*n24*n30/n169 + pow(alpha, n0*n27 - n174*n18)*n18*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n18)*n30*n45*n82/(n170*n81) + n108*n30*n45)/n246 + n126*n73*(pow(alpha, NP0*n0 - n174*n8)*n156*n24*n30*n8/n169 + pow(alpha, n0*n27 - n174*n8)*n149*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n8)*n24*n30*n8*n82/(n170*n81) + n103*n149)/n236 + n127*n73*(pow(alpha, NP0*n0 - n14*n174)*n14*n156*n24*n30/n169 + pow(alpha, n0*n27 - n14*n174)*n135*n82/(n170*n81) + pow(alpha, n0*n27 - n14*n174)*n14*n24*n30*n82/(n170*n81) + n106*n135)/n242 + n132*n73*(pow(alpha, NP0*n0 - n174*n7)*n156*n24*n30*n7/n169 + pow(alpha, n0*n27 - n174*n7)*n128*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n7)*n24*n30*n7*n82/(n170*n81) + n102*n128)/n235 + n133*n73*(pow(alpha, NP0*n0 - n0*n174)*n119*(-n25 + xPj*xTj)/(n169*n52) + n100*n119)/n231 + n297*n73*(pow(alpha, NP0*n0 - n12*n174)*n12*n156*n24*n30/n169 + pow(alpha, n0*n27 - n12*n174)*n12*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n12*n174)*n140*n82/(n170*n81) + n105*n140) + n299*n73*(pow(alpha, NP0*n0 - n16*n174)*n156*n16*n24*n30/n169 + pow(alpha, n0*n27 - n16*n174)*n16*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n16*n174)*n30*n43*n82/(n170*n81) + n107*n30*n43) + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n317 + n318 + n319 + n320 + n321 + n322 + n323 + n324 + n404 + n405 + n406 + n407 + n408 + n409 + n410 + n411 + n412 + n413 + n414 + n415 + n416 + n417 + n418 + n419 + n420 + n421 + n422) + 2.0*n306 + 2.0*n424) + pow(-n133*n379*n73 - n27*(1.0*n0*n110*n113*(pow(alpha, NP0*n0 - n0*n174)*n0*n1*n156/n169 + n0*n124)/n231 - 0.5*n133*n73*(pow(alpha, NP0*n0 - n0*n174)*n0*n1*n156/n169 + n0*n124)*(pow(alpha, NP0*n0 - n0*n174)*n1*n156*n23*n24/n169 + n124*n23*n24)/n250 + 0.5*n133*n73*(pow(alpha, NP0*n0 - n0*n174)*n119*(-n25 + xPj*xTj)/(n169*n52) + n100*n119)/n231 + n325 - 0.5*xTj*(n109*n112*(pow(alpha, NP0*n0 - n10*n174)*n1*n10*n156/n169 + n1*n138)*(pow(alpha, NP0*n0 - n10*n174)*n10*n156*n50/n169 + n138*n50)/n257 + n109*n115*(pow(alpha, NP0*n0 - n15*n174)*n1*n15*n156/n169 + n1*n114)*(pow(alpha, NP0*n0 - n15*n174)*n15*n156*n50/n169 + n114*n50)/n262 + n109*n115*(pow(alpha, NP0*n0 - n15*n174)*n0*n15*n156*n30/n169 + pow(alpha, n0*n27 - n15*n174)*n0*n15*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n15*n174)*n30*n42*n82/(n170*n81) + n164)/n243 + n109*n116*(pow(alpha, NP0*n0 - n174*n9)*n156*n77/n169 + n59*n77)*(pow(alpha, NP0*n0 - n174*n9)*n156*n50*n9/n169 + n150*n50)/n256 + n109*n116*(pow(alpha, NP0*n0 - n174*n9)*n0*n156*n30*n9/n169 + pow(alpha, n0*n27 - n174*n9)*n0*n30*n82*n9/(n170*n81) - pow(alpha, n0*n27 - n174*n9)*n134*n82/(n170*n81) + n134*n59)/n237 + n109*n120*(pow(alpha, NP0*n0 - n174*n21)*n1*n156*n21/n169 + n1*n130)*(pow(alpha, NP0*n0 - n174*n21)*n156*n21*n50/n169 + n130*n50)/n268 + n109*n120*(pow(alpha, NP0*n0 - n174*n21)*n0*n156*n21*n30/n169 + pow(alpha, n0*n27 - n174*n21)*n0*n21*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n21)*n30*n48*n82/(n170*n81) + n30*n48*n71)/n249 + n109*n121*(pow(alpha, NP0*n0 - n174*n18)*n1*n156*n18/n169 + n155)*(pow(alpha, NP0*n0 - n174*n18)*n156*n18*n50/n169 + n158)/n265 + n109*n123*(pow(alpha, NP0*n0 - n174*n19)*n1*n156*n19/n169 + n1*n147)*(pow(alpha, NP0*n0 - n174*n19)*n156*n19*n50/n169 + n147*n50)/n266 + n109*n123*(pow(alpha, NP0*n0 - n174*n19)*n0*n156*n19*n30/n169 + pow(alpha, n0*n27 - n174*n19)*n0*n19*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n19)*n125*n82/(n170*n81) + n125*n69)/n247 + n109*n126*(pow(alpha, NP0*n0 - n174*n8)*n1*n156*n8/n169 + n1*n122)*(pow(alpha, NP0*n0 - n174*n8)*n156*n50*n8/n169 + n122*n50)/n255 + n109*n127*(pow(alpha, NP0*n0 - n14*n174)*n156*n76/n169 + n64*n76)*(pow(alpha, NP0*n0 - n14*n174)*n14*n156*n50/n169 + n14*n50*n64)/n261 + n109*n131*(pow(alpha, NP0*n0 - n174*n4)*n1*n156*n4/n169 + n1*n141)*(pow(alpha, NP0*n0 - n174*n4)*n156*n4*n50/n169 + n141*n50)/n251 + n109*n131*(pow(alpha, NP0*n0 - n174*n4)*n0*n156*n30*n4/n169 + pow(alpha, n0*n27 - n174*n4)*n0*n30*n4*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n4)*n30*n31*n82/(n170*n81) + n167)/n232 + n109*n132*(pow(alpha, NP0*n0 - n174*n7)*n156*n75/n169 + n57*n75)*(pow(alpha, NP0*n0 - n174*n7)*n156*n50*n7/n169 + n50*n57*n7)/n254 + n109*n133*(pow(alpha, NP0*n0 - n0*n174)*n0*n1*n156/n169 + n0*n124)*(pow(alpha, NP0*n0 - n0*n174)*n1*n156*n23*n24/n169 + n124*n23*n24)/n250 + n109*n143*(pow(alpha, NP0*n0 - n174*n6)*n1*n156*n6/n169 + n1*n142)*(pow(alpha, NP0*n0 - n174*n6)*n156*n50*n6/n169 + n142*n50)/n253 + n109*n143*(pow(alpha, NP0*n0 - n174*n6)*n0*n156*n30*n6/n169 + pow(alpha, n0*n27 - n174*n6)*n0*n30*n6*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n6)*n30*n33*n82/(n170*n81) + n165)/n234 + n109*n144*(pow(alpha, NP0*n0 - n17*n174)*n1*n156*n17/n169 + n1*n145)*(pow(alpha, NP0*n0 - n17*n174)*n156*n17*n50/n169 + n145*n50)/n264 + n109*n281*n89*(pow(alpha, NP0*n0 - n11*n174)*n0*n11*n156*n30/n169 + pow(alpha, n0*n27 - n11*n174)*n0*n11*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n11*n174)*n30*n38*n82/(n170*n81) + n160) + n109*n291*xF[11]*(pow(alpha, NP0*n0 - n174*n5)*n1*n156*n5/n169 + n153)*(pow(alpha, NP0*n0 - n174*n5)*n156*n5*n50/n169 + n148*n50) + n109*n292*xF[1]*(pow(alpha, NP0*n0 - n13*n174)*n1*n13*n156/n169 + n1*n139)*(pow(alpha, NP0*n0 - n13*n174)*n13*n156*n50/n169 + n139*n50) + n109*n294*xF[11]*(pow(alpha, NP0*n0 - n174*n5)*n0*n156*n30*n5/n169 + pow(alpha, n0*n27 - n174*n5)*n0*n30*n5*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n5)*n30*n32*n82/(n170*n81) + n161) + n109*n295*xF[4]*(pow(alpha, NP0*n0 - n16*n174)*n1*n156*n16/n169 + n118*n16)*(pow(alpha, NP0*n0 - n16*n174)*n156*n16*n50/n169 + n16*n50*n66) + n109*n296*(pow(alpha, NP0*n0 - n17*n174)*n0*n156*n17*n30/n169 + pow(alpha, n0*n27 - n17*n174)*n0*n17*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n17*n174)*n117*n82/(n170*n81) + n117*n67) + n109*n298*(pow(alpha, NP0*n0 - n13*n174)*n0*n13*n156*n30/n169 + pow(alpha, n0*n27 - n13*n174)*n0*n13*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n13*n174)*n137*n82/(n170*n81) + n137*n63) + n109*n300*(pow(alpha, NP0*n0 - n11*n174)*n1*n11*n156/n169 + n154)*(pow(alpha, NP0*n0 - n11*n174)*n11*n156*n50/n169 + n129*n50) + n109*n301*(pow(alpha, NP0*n0 - n12*n174)*n156*n74/n169 + n62*n74)*(pow(alpha, NP0*n0 - n12*n174)*n12*n156*n50/n169 + n12*n50*n62) + n109*n302*(pow(alpha, NP0*n0 - n174*n20)*n0*n156*n20*n30/n169 + pow(alpha, n0*n27 - n174*n20)*n0*n20*n30*n82/(n170*n81) - pow(alpha, n0*n27 - n174*n20)*n30*n47*n82/(n170*n81) + n162) + n109*n98*xF[8]*(pow(alpha, NP0*n0 - n174*n20)*n1*n156*n20/n169 + n1*n136)*(pow(alpha, NP0*n0 - n174*n20)*n156*n20*n50/n169 + n136*n50)/n267 + n112*n73*(pow(alpha, NP0*n0 - n10*n174)*n10*n156*n24*n30/n169 + pow(alpha, n0*n27 - n10*n174)*n10*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n10*n174)*n30*n37*n82/(n170*n81) + n104*n30*n37)/n238 + n121*n73*(pow(alpha, NP0*n0 - n174*n18)*n156*n18*n24*n30/n169 + pow(alpha, n0*n27 - n174*n18)*n18*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n18)*n30*n45*n82/(n170*n81) + n108*n30*n45)/n246 + n126*n73*(pow(alpha, NP0*n0 - n174*n8)*n156*n24*n30*n8/n169 + pow(alpha, n0*n27 - n174*n8)*n149*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n8)*n24*n30*n8*n82/(n170*n81) + n103*n149)/n236 + n127*n73*(pow(alpha, NP0*n0 - n14*n174)*n14*n156*n24*n30/n169 + pow(alpha, n0*n27 - n14*n174)*n135*n82/(n170*n81) + pow(alpha, n0*n27 - n14*n174)*n14*n24*n30*n82/(n170*n81) + n106*n135)/n242 + n132*n73*(pow(alpha, NP0*n0 - n174*n7)*n156*n24*n30*n7/n169 + pow(alpha, n0*n27 - n174*n7)*n128*n82/(n170*n81) + pow(alpha, n0*n27 - n174*n7)*n24*n30*n7*n82/(n170*n81) + n102*n128)/n235 + n133*n73*(pow(alpha, NP0*n0 - n0*n174)*n119*(-n25 + xPj*xTj)/(n169*n52) + n100*n119)/n231 + n297*n73*(pow(alpha, NP0*n0 - n12*n174)*n12*n156*n24*n30/n169 + pow(alpha, n0*n27 - n12*n174)*n12*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n12*n174)*n140*n82/(n170*n81) + n105*n140) + n299*n73*(pow(alpha, NP0*n0 - n16*n174)*n156*n16*n24*n30/n169 + pow(alpha, n0*n27 - n16*n174)*n16*n24*n30*n82/(n170*n81) + pow(alpha, n0*n27 - n16*n174)*n30*n43*n82/(n170*n81) + n107*n30*n43) + n306 + n307 + n308 + n309 + n310 + n311 + n312 + n313 + n314 + n315 + n316 + n317 + n318 + n319 + n320 + n321 + n322 + n323 + n324 + n404 + n405 + n406 + n407 + n408 + n409 + n410 + n411 + n412 + n413 + n414 + n415 + n416 + n417 + n418 + n419 + n420 + n421 + n422)) - n305 - n458*xTj, -n23);
28375 NP_sqrt_base = fabs(NP_sqrt_base);
28376 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
28377 NT1 = n111*(n171 - log(-pow(alpha, NP1*n0)*n156 + 1));
28378 g0 = MW[1] - Mstar;
28379 g1 = MW[0] - Mstar;
28382 g4 = MW[10] - Mstar;
28383 g5 = MW[11] - Mstar;
28384 g6 = MW[12] - Mstar;
28385 g7 = MW[13] - Mstar;
28386 g8 = MW[14] - Mstar;
28387 g9 = MW[15] - Mstar;
28388 g10 = MW[16] - Mstar;
28389 g11 = MW[17] - Mstar;
28390 g12 = MW[18] - Mstar;
28391 g13 = MW[2] - Mstar;
28392 g14 = MW[3] - Mstar;
28393 g15 = MW[4] - Mstar;
28394 g16 = MW[5] - Mstar;
28395 g17 = MW[6] - Mstar;
28396 g18 = MW[7] - Mstar;
28397 g19 = MW[8] - Mstar;
28398 g20 = MW[9] - Mstar;
28403 g25 = pow(alpha, -g1);
28404 g26 = pow(alpha, -g4);
28405 g27 = pow(alpha, -g5);
28406 g28 = pow(alpha, -g6);
28407 g29 = pow(alpha, -g7);
28408 g30 = pow(alpha, -g8);
28409 g31 = pow(alpha, -g9);
28410 g32 = pow(alpha, -g10);
28411 g33 = pow(alpha, -g11);
28412 g34 = pow(alpha, -g12);
28413 g35 = pow(alpha, -g0);
28414 g36 = pow(alpha, -g13);
28415 g37 = pow(alpha, -g14);
28416 g38 = pow(alpha, -g15);
28417 g39 = pow(alpha, -g16);
28418 g40 = pow(alpha, -g17);
28419 g41 = pow(alpha, -g18);
28420 g42 = pow(alpha, -g19);
28421 g43 = pow(alpha, -g20);
28422 g44 = log(xF[0]/xF[1]);
28424 g46 = pow(alpha, NP1*g0);
28425 g47 = pow(alpha, NP1*g1);
28426 g48 = pow(alpha, NP1*g4);
28428 g50 = pow(alpha, NP1*g5);
28429 g51 = pow(alpha, NP1*g6);
28430 g52 = pow(alpha, NP1*g7);
28431 g53 = pow(alpha, NP1*g8);
28432 g54 = pow(alpha, NP1*g9);
28433 g55 = pow(alpha, NP1*g10);
28434 g56 = pow(alpha, NP1*g11);
28435 g57 = pow(alpha, NP1*g12);
28436 g58 = pow(alpha, NP1*g13);
28437 g59 = pow(alpha, NP1*g14);
28438 g60 = pow(alpha, NP1*g15);
28439 g61 = pow(alpha, NP1*g16);
28440 g62 = pow(alpha, NP1*g17);
28441 g63 = pow(alpha, NP1*g18);
28442 g64 = pow(alpha, NP1*g19);
28443 g65 = pow(alpha, NP1*g20);
28487 g109 = g22/(g3*xF[1]);
28488 g110 = pow(alpha, g0*g45) - 1;
28489 g111 = pow(alpha, g0*g45) - 1;
28490 g112 = pow(alpha, g1*g45) - 1;
28491 g113 = pow(alpha, g13*g45) - 1;
28492 g114 = pow(alpha, g14*g45) - 1;
28493 g115 = pow(alpha, g15*g45) - 1;
28494 g116 = pow(alpha, g16*g45) - 1;
28495 g117 = pow(alpha, g17*g45) - 1;
28496 g118 = pow(alpha, g18*g45) - 1;
28497 g119 = pow(alpha, g19*g45) - 1;
28498 g120 = pow(alpha, g20*g45) - 1;
28499 g121 = pow(alpha, g4*g45) - 1;
28500 g122 = pow(alpha, g45*g5) - 1;
28501 g123 = pow(alpha, g45*g6) - 1;
28502 g124 = pow(alpha, g45*g7) - 1;
28503 g125 = pow(alpha, g45*g8) - 1;
28504 g126 = pow(alpha, g45*g9) - 1;
28505 g127 = pow(alpha, g10*g45) - 1;
28506 g128 = pow(alpha, g11*g45) - 1;
28507 g129 = pow(alpha, g12*g45) - 1;
28508 g130 = -pow(alpha, g1*g45);
28509 g131 = -pow(alpha, g4*g45);
28510 g132 = -pow(alpha, g45*g5);
28511 g133 = -pow(alpha, g45*g6);
28512 g134 = -pow(alpha, g45*g7);
28513 g135 = -pow(alpha, g45*g8);
28514 g136 = -pow(alpha, g45*g9);
28515 g137 = -pow(alpha, g10*g45);
28516 g138 = -pow(alpha, g11*g45);
28517 g139 = -pow(alpha, g12*g45);
28518 g140 = -pow(alpha, g13*g45);
28519 g141 = -pow(alpha, g14*g45);
28520 g142 = -pow(alpha, g15*g45);
28521 g143 = -pow(alpha, g16*g45);
28522 g144 = -pow(alpha, g17*g45);
28523 g145 = -pow(alpha, g18*g45);
28524 g146 = -pow(alpha, g19*g45);
28525 g147 = -pow(alpha, g20*g45);
28527 g149 = -g130 - g47;
28528 g150 = -g131 - g48;
28529 g151 = -g132 - g50;
28530 g152 = -g133 - g51;
28531 g153 = -g134 - g52;
28532 g154 = -g135 - g53;
28533 g155 = -g136 - g54;
28534 g156 = -g137 - g55;
28535 g157 = -g138 - g56;
28536 g158 = -g139 - g57;
28537 g159 = -g140 - g58;
28538 g160 = -g141 - g59;
28539 g161 = -g142 - g60;
28540 g162 = -g143 - g61;
28541 g163 = -g144 - g62;
28542 g164 = -g145 - g63;
28543 g165 = -g146 - g64;
28544 g166 = -g147 - g65;
28545 g167 = pow(alpha, g1*g45) + g89;
28547 g169 = pow(alpha, g4*g45) + g90;
28548 g170 = pow(alpha, g45*g5) + g91;
28549 g171 = pow(alpha, g45*g6) + g92;
28550 g172 = pow(alpha, g45*g7) + g93;
28551 g173 = pow(alpha, g45*g8) + g94;
28552 g174 = pow(alpha, g45*g9) + g95;
28553 g175 = pow(alpha, g10*g45) + g96;
28554 g176 = pow(alpha, g11*g45) + g97;
28555 g177 = pow(alpha, g12*g45) + g98;
28556 g178 = pow(alpha, g13*g45) + g99;
28557 g179 = pow(alpha, g14*g45) + g100;
28558 g180 = pow(alpha, g15*g45) + g101;
28559 g181 = pow(alpha, g16*g45) + g102;
28560 g182 = pow(alpha, g17*g45) + g103;
28561 g183 = pow(alpha, g18*g45) + g104;
28562 g184 = pow(alpha, g19*g45) + g105;
28563 g185 = pow(alpha, g20*g45) + g106;
28568 g190 = xF[10]/g169;
28569 g191 = xF[17]/g176;
28570 g192 = xF[15]/g174;
28571 g193 = xF[16]/g175;
28574 g196 = xF[12]/g171;
28575 g197 = xF[13]/g172;
28576 g198 = xF[11]/g170;
28578 g200 = xF[14]/g173;
28581 g203 = xF[18]/g177;
28583 g205 = xF[17]/g157;
28585 g207 = xF[15]/g155;
28588 g210 = xF[11]/g151;
28589 g211 = xF[18]/g158;
28591 g213 = xF[13]/g153;
28592 g214 = xF[16]/g156;
28595 g217 = xF[14]/g154;
28597 g219 = xF[12]/g152;
28598 g220 = xF[10]/g150;
28640 g262 = log(g109*g168*g23/g70);
28641 g263 = log(g109*g148*g23/g69);
28642 g264 = log(g168*g24*g67/g111);
28644 g266 = log(g148*g24*g67/g110);
28646 g268 = -g107*xF[0] - g107*xF[10] - g107*xF[11] - g107*xF[12] - g107*xF[13] - g107*xF[14] - g107*xF[15] - g107*xF[16] - g107*xF[17] - g107*xF[18] - g107*xF[1] - g107*xF[2] - g107*xF[3] - g107*xF[4] - g107*xF[5] - g107*xF[6] - g107*xF[7] - g107*xF[8] - g107*xF[9] - g111*g188*g267 - g186*g265*(g106 + 1) - g186*g267*(pow(alpha, g20*g45) - 1) - g187*g265*(g105 + 1) - g187*g267*(pow(alpha, g19*g45) - 1) - g188*g265*g70 - g189*g265*(g100 + 1) - g189*g267*(pow(alpha, g14*g45) - 1) - g190*g265*(g90 + 1) - g190*g267*(pow(alpha, g4*g45) - 1) - g191*g265*(g97 + 1) - g191*g267*(pow(alpha, g11*g45) - 1) - g192*g265*(g95 + 1) - g192*g267*(pow(alpha, g45*g9) - 1) - g193*g265*(g96 + 1) - g193*g267*(pow(alpha, g10*g45) - 1) - g194*g265*(g104 + 1) - g194*g267*(pow(alpha, g18*g45) - 1) - g195*g265*(g101 + 1) - g195*g267*(pow(alpha, g15*g45) - 1) - g196*g265*(g92 + 1) - g196*g267*(pow(alpha, g45*g6) - 1) - g197*g265*(g93 + 1) - g197*g267*(pow(alpha, g45*g7) - 1) - g198*g265*(g91 + 1) - g198*g267*(pow(alpha, g45*g5) - 1) - g199*g265*(g103 + 1) - g199*g267*(pow(alpha, g17*g45) - 1) - g200*g265*(g94 + 1) - g200*g267*(pow(alpha, g45*g8) - 1) - g201*g265*(g102 + 1) - g201*g267*(pow(alpha, g16*g45) - 1) - g202*g265*(g99 + 1) - g202*g267*(pow(alpha, g13*g45) - 1) - g203*g265*(g98 + 1) - g203*g267*(pow(alpha, g12*g45) - 1) - g204*g265*(g89 + 1) - g204*g267*(pow(alpha, g1*g45) - 1);
28647 LpF = xF[0]*(g25 + 1.0)*(g230*g263 + g243*g266 + g66)/(g49*(g25 - 1.0)) + xF[10]*(g26 + 1.0)*(g239*g263 + g260*g266 + g66)/(g49*(g26 - 1.0)) + xF[11]*(g27 + 1.0)*(g237*g263 + g245*g266 + g66)/(g49*(g27 - 1.0)) + xF[12]*(g28 + 1.0)*(g224*g263 + g256*g266 + g66)/(g49*(g28 - 1.0)) + xF[13]*(g29 + 1.0)*(g234*g263 + g257*g266 + g66)/(g49*(g29 - 1.0)) + xF[14]*(g30 + 1.0)*(g238*g263 + g255*g266 + g66)/(g49*(g30 - 1.0)) + xF[15]*(g31 + 1.0)*(g227*g263 + g244*g266 + g66)/(g49*(g31 - 1.0)) + xF[16]*(g32 + 1.0)*(g236*g263 + g253*g266 + g66)/(g49*(g32 - 1.0)) + xF[17]*(g33 + 1.0)*(g226*g263 + g249*g266 + g66)/(g49*(g33 - 1.0)) + xF[18]*(g34 + 1.0)*(g232*g263 + g258*g266 + g66)/(g49*(g34 - 1.0)) + xF[1]*(g35 + 1.0)*(g241*g263 + g250*g266 + g66)/(g49*(g35 - 1.0)) + xF[2]*(g36 + 1.0)*(g229*g263 + g246*g266 + g66)/(g49*(g36 - 1.0)) + xF[3]*(g37 + 1.0)*(g235*g263 + g247*g266 + g66)/(g49*(g37 - 1.0)) + xF[4]*(g38 + 1.0)*(g228*g263 + g248*g266 + g66)/(g49*(g38 - 1.0)) + xF[5]*(g39 + 1.0)*(g231*g263 + g261*g266 + g66)/(g49*(g39 - 1.0)) + xF[6]*(g40 + 1.0)*(g233*g263 + g254*g266 + g66)/(g49*(g40 - 1.0)) + xF[7]*(g41 + 1.0)*(g242*g263 + g259*g266 + g66)/(g49*(g41 - 1.0)) + xF[8]*(g42 + 1.0)*(g240*g263 + g251*g266 + g66)/(g49*(g42 - 1.0)) + xF[9]*(g43 + 1.0)*(g225*g263 + g252*g266 + g66)/(g49*(g43 - 1.0));
28652 xP[0] = g112*g206*g68;
28653 xP[1] = g110*g212*g68;
28654 xP[2] = g113*g209*g68;
28655 xP[3] = g114*g215*g68;
28656 xP[4] = g115*g208*g68;
28657 xP[5] = g116*g223*g68;
28658 xP[6] = g117*g216*g68;
28659 xP[7] = g118*g221*g68;
28660 xP[8] = g119*g218*g68;
28661 xP[9] = g120*g222*g68;
28662 xP[10] = g121*g220*g68;
28663 xP[11] = g122*g210*g68;
28664 xP[12] = g123*g219*g68;
28665 xP[13] = g124*g213*g68;
28666 xP[14] = g125*g217*g68;
28667 xP[15] = g126*g207*g68;
28668 xP[16] = g127*g214*g68;
28669 xP[17] = g128*g205*g68;
28670 xP[18] = g129*g211*g68;
28671 xT[0] = g108*g206*g71;
28672 xT[1] = g108*g212*g69;
28673 xT[2] = g108*g209*g72;
28674 xT[3] = g108*g215*g73;
28675 xT[4] = g108*g208*g74;
28676 xT[5] = g108*g223*g75;
28677 xT[6] = g108*g216*g76;
28678 xT[7] = g108*g221*g77;
28679 xT[8] = g108*g218*g78;
28680 xT[9] = g108*g222*g79;
28681 xT[10] = g108*g220*g80;
28682 xT[11] = g108*g210*g81;
28683 xT[12] = g108*g219*g82;
28684 xT[13] = g108*g213*g83;
28685 xT[14] = g108*g217*g84;
28686 xT[15] = g108*g207*g85;
28687 xT[16] = g108*g214*g86;
28688 xT[17] = g108*g205*g87;
28689 xT[18] = g108*g211*g88;
28692 n0 = MW[0] - Mstar;
28696 n4 = MW[10] - Mstar;
28697 n5 = MW[11] - Mstar;
28698 n6 = MW[12] - Mstar;
28699 n7 = MW[13] - Mstar;
28700 n8 = MW[14] - Mstar;
28701 n9 = MW[15] - Mstar;
28702 n10 = MW[16] - Mstar;
28703 n11 = MW[17] - Mstar;
28704 n12 = MW[18] - Mstar;
28705 n13 = MW[19] - Mstar;
28706 n14 = MW[1] - Mstar;
28707 n15 = MW[2] - Mstar;
28708 n16 = MW[3] - Mstar;
28709 n17 = MW[4] - Mstar;
28710 n18 = MW[5] - Mstar;
28711 n19 = MW[6] - Mstar;
28712 n20 = MW[7] - Mstar;
28713 n21 = MW[8] - Mstar;
28714 n22 = MW[9] - Mstar;
28731 n39 = pow(n0, -n24);
28732 n40 = pow(n1, -n24);
28733 n41 = pow(n4, -n24);
28734 n42 = pow(n5, -n24);
28735 n43 = pow(n6, -n24);
28736 n44 = pow(n7, -n24);
28737 n45 = pow(n8, -n24);
28738 n46 = pow(n9, -n24);
28739 n47 = pow(n10, -n24);
28740 n48 = pow(n11, -n24);
28741 n49 = pow(n12, -n24);
28742 n50 = pow(n13, -n24);
28743 n51 = pow(n14, -n24);
28744 n52 = pow(n15, -n24);
28745 n53 = pow(n16, -n24);
28746 n54 = pow(n17, -n24);
28747 n55 = pow(n18, -n24);
28748 n56 = pow(n19, -n24);
28749 n57 = pow(n20, -n24);
28750 n58 = pow(n21, -n24);
28751 n59 = pow(n22, -n24);
28755 n63 = pow(alpha, n62);
28756 n64 = n26 + n32*xF[0];
28757 n65 = n26 + n32*xPj;
28758 n66 = pow(alpha, NP0*n4);
28759 n67 = pow(alpha, NP0*n5);
28760 n68 = pow(alpha, NP0*n6);
28761 n69 = pow(alpha, NP0*n7);
28762 n70 = pow(alpha, NP0*n8);
28763 n71 = pow(alpha, NP0*n9);
28764 n72 = pow(alpha, NP0*n10);
28765 n73 = pow(alpha, NP0*n11);
28766 n74 = pow(alpha, NP0*n12);
28767 n75 = pow(alpha, NP0*n13);
28768 n76 = pow(alpha, NP0*n14);
28769 n77 = pow(alpha, NP0*n15);
28770 n78 = pow(alpha, NP0*n16);
28771 n79 = pow(alpha, NP0*n17);
28772 n80 = pow(alpha, NP0*n18);
28773 n81 = pow(alpha, NP0*n19);
28774 n82 = pow(alpha, NP0*n20);
28775 n83 = pow(alpha, NP0*n21);
28776 n84 = pow(alpha, NP0*n22);
28790 n98 = pow(alpha, NP0*n24*n25);
28791 n99 = pow(n64, -n24);
28792 n100 = pow(n65, -n24);
28841 n149 = n106*xF[16];
28842 n150 = n101*xF[11];
28844 n152 = n108*xF[18];
28847 n155 = n126*xF[16];
28848 n156 = n105*xF[15];
28858 n166 = n127*xF[17];
28868 n176 = n103*xF[13];
28869 n177 = n125*xF[15];
28870 n178 = n124*xF[14];
28876 n184 = n104*xF[14];
28881 n189 = n123*xF[13];
28883 n191 = n129*xF[19];
28887 n195 = n120*xF[10];
28890 n198 = n128*xF[18];
28891 n199 = log((-1.0 + xPj/xF[0])/n2);
28892 n200 = n173*xF[14];
28895 n203 = n182*xF[16];
28923 n231 = n40*n41*n66;
28924 n232 = n40*n43*n68;
28926 n234 = n40*n48*n73;
28927 n235 = n40*n51*n76;
28928 n236 = n40*n53*n78;
28930 n238 = n40*n56*n81;
28931 n239 = n40*n57*n82;
28933 n241 = n40*n59*n84;
28934 n242 = n40*n45*n70;
28935 n243 = n40*n47*n72;
28936 n244 = n205*n40*xF[0];
28940 n248 = n208*n40*xF[4];
28941 n249 = n140*n229 + 1;
28942 n250 = -n229*n63 + 1;
28943 n251 = pow(n249, -n24);
28944 n252 = pow(n250, -n24);
28945 n253 = n1*n229*n63;
28946 n254 = n199 + n23 + n60 + n85;
28948 n256 = n100/(n252*n99);
28950 n258 = n146*(n254 - log(n249)) + 1;
28951 n259 = n146*(n254 - log(n250)) + 1;
28952 n260 = pow(alpha, n0*n258);
28953 n261 = pow(alpha, n258*n4);
28954 n262 = pow(alpha, n258*n5);
28955 n263 = pow(alpha, n258*n6);
28956 n264 = pow(alpha, n258*n7);
28957 n265 = pow(alpha, n258*n8);
28958 n266 = pow(alpha, n258*n9);
28959 n267 = pow(alpha, n10*n258);
28960 n268 = pow(alpha, n11*n258);
28961 n269 = pow(alpha, n12*n258);
28962 n270 = pow(alpha, n13*n258);
28963 n271 = pow(alpha, n14*n258);
28964 n272 = pow(alpha, n15*n258);
28965 n273 = pow(alpha, n16*n258);
28966 n274 = pow(alpha, n17*n258);
28967 n275 = pow(alpha, n18*n258);
28968 n276 = pow(alpha, n19*n258);
28969 n277 = pow(alpha, n20*n258);
28970 n278 = pow(alpha, n21*n258);
28971 n279 = pow(alpha, n22*n258);
28972 n280 = pow(alpha, -n259*n4);
28973 n281 = pow(alpha, -n259*n6);
28974 n282 = pow(alpha, -n259*n9);
28975 n283 = pow(alpha, -n11*n259);
28976 n284 = pow(alpha, -n14*n259);
28977 n285 = pow(alpha, -n16*n259);
28978 n286 = pow(alpha, -n18*n259);
28979 n287 = pow(alpha, -n19*n259);
28980 n288 = pow(alpha, -n20*n259);
28981 n289 = pow(alpha, -n21*n259);
28982 n290 = pow(alpha, -n22*n259);
29028 n336 = pow(alpha, n25*n258) + n96 - 1;
29029 n337 = n97 - 1 + 1.0/n261;
29030 n338 = n101 - 1 + 1.0/n262;
29031 n339 = n102 - 1 + 1.0/n263;
29032 n340 = n103 - 1 + 1.0/n264;
29033 n341 = n104 - 1 + 1.0/n265;
29034 n342 = n105 - 1 + 1.0/n266;
29035 n343 = n106 - 1 + 1.0/n267;
29036 n344 = n107 - 1 + 1.0/n268;
29037 n345 = n108 - 1 + 1.0/n269;
29038 n346 = n109 - 1 + 1.0/n270;
29039 n347 = n110 - 1 + 1.0/n271;
29040 n348 = n111 - 1 + 1.0/n272;
29041 n349 = n112 - 1 + 1.0/n273;
29042 n350 = n113 - 1 + 1.0/n274;
29043 n351 = n114 - 1 + 1.0/n275;
29044 n352 = n115 - 1 + 1.0/n276;
29045 n353 = n116 - 1 + 1.0/n277;
29046 n354 = n117 - 1 + 1.0/n278;
29047 n355 = n118 - 1 + 1.0/n279;
29048 n356 = n96 - 1 + 1.0/n260;
29049 n357 = -n301 + n97 - 1;
29050 n358 = n101 - n310 - 1;
29051 n359 = -n139 - n298 - 1;
29052 n360 = n103 - n295 - 1;
29054 n362 = n105 - n306 - 1;
29056 n364 = n107 - n327 - 1;
29057 n365 = n108 - n291 - 1;
29058 n366 = n109 - n320 - 1;
29059 n367 = n110 - n325 - 1;
29061 n369 = n112 - n317 - 1;
29063 n371 = n114 - n312 - 1;
29064 n372 = n115 - n300 - 1;
29065 n373 = n116 - n329 - 1;
29066 n374 = n117 - n323 - 1;
29067 n375 = n118 - n315 - 1;
29068 n376 = pow(n336, -n24);
29069 n377 = pow(n337, -n24);
29070 n378 = pow(n338, -n24);
29071 n379 = pow(n339, -n24);
29072 n380 = pow(n340, -n24);
29073 n381 = pow(n341, -n24);
29074 n382 = pow(n342, -n24);
29075 n383 = pow(n343, -n24);
29076 n384 = pow(n344, -n24);
29077 n385 = pow(n345, -n24);
29078 n386 = pow(n346, -n24);
29079 n387 = pow(n347, -n24);
29080 n388 = pow(n348, -n24);
29081 n389 = pow(n349, -n24);
29082 n390 = pow(n350, -n24);
29083 n391 = pow(n351, -n24);
29084 n392 = pow(n352, -n24);
29085 n393 = pow(n353, -n24);
29086 n394 = pow(n354, -n24);
29087 n395 = pow(n355, -n24);
29088 n396 = pow(n336, 3);
29089 n397 = pow(n337, 3);
29090 n398 = pow(n338, 3);
29091 n399 = pow(n339, 3);
29092 n400 = pow(n340, 3);
29093 n401 = pow(n341, 3);
29094 n402 = pow(n342, 3);
29095 n403 = pow(n343, 3);
29096 n404 = pow(n344, 3);
29097 n405 = pow(n345, 3);
29098 n406 = pow(n346, 3);
29099 n407 = pow(n347, 3);
29100 n408 = pow(n348, 3);
29101 n409 = pow(n349, 3);
29102 n410 = pow(n350, 3);
29103 n411 = pow(n351, 3);
29104 n412 = pow(n352, 3);
29105 n413 = pow(n353, 3);
29106 n414 = pow(n354, 3);
29107 n415 = pow(n355, 3);
29108 n416 = pow(n356, -n24);
29109 n417 = pow(n357, -n24);
29110 n418 = pow(n362, -n24);
29111 n419 = pow(n364, -n24);
29112 n420 = pow(n366, -n24);
29113 n421 = pow(n368, -n24);
29114 n422 = pow(n369, -n24);
29115 n423 = pow(n370, -n24);
29116 n424 = pow(n371, -n24);
29117 n425 = pow(n372, -n24);
29118 n426 = pow(n373, -n24);
29119 n427 = pow(n356, 3);
29120 n428 = xF[12]/n339;
29121 n429 = xF[17]/n344;
29123 n431 = xF[10]/n337;
29124 n432 = xF[11]/n338;
29125 n433 = xF[19]/n346;
29127 n435 = xF[16]/n343;
29128 n436 = xF[14]/n341;
29132 n440 = xF[17]/n384;
29133 n441 = xF[10]/n377;
29140 n448 = n1*n12/n345;
29145 n453 = n115*xF[6]/n412;
29147 n455 = n113*xF[4]/n390;
29148 n456 = n107*xF[17]/n404;
29149 n457 = n102*xF[12]/n399;
29151 n459 = n97*xF[10]/n397;
29152 n460 = 1/(n249*n274);
29153 n461 = 1/(n249*n260);
29154 n462 = n12/(n249*n269);
29155 n463 = n22/(n249*n279);
29158 n466 = n241*xF[9]/n355;
29159 n467 = n235*xF[1]/n347;
29166 n474 = n1*n25*n434*n63*n86;
29167 n475 = n244*n86/n336;
29168 n476 = n231*n431*n86;
29169 n477 = n202*n40*n432*n86;
29170 n478 = n232*n428*n86;
29171 n479 = n143*n153*n86/n340;
29172 n480 = n242*n436*n86;
29173 n481 = n233*n86*xF[15]/n342;
29174 n482 = n243*n435*n86;
29175 n483 = n234*n429*n86;
29176 n484 = n144*n171*n86/n345;
29177 n485 = n207*n40*n433*n86;
29179 n487 = n181*n449*n86;
29180 n488 = n247*n86/n349;
29181 n489 = n248*n86/n350;
29182 n490 = n237*n86*xF[5]/n351;
29183 n491 = n246*n86/n352;
29184 n492 = n245*n86/n353;
29185 n493 = n145*n174*n86/n354;
29187 n495 = n244*n430*n86;
29188 n496 = n229*n461 + 1;
29189 n497 = n209*n229*n461 + n209;
29190 n498 = n210 + n253*n324/n249;
29191 n499 = n211 + n253*n311/n249;
29192 n500 = n212 + n253*n294/n249;
29193 n501 = n213 + n229*n63*n89/(n249*n264);
29194 n502 = n214 + n253*n305/n249;
29195 n503 = n215 + n229*n63*n91/(n249*n266);
29196 n504 = n216 + n253*n308/n249;
29197 n505 = n217 + n253*n302/n249;
29198 n506 = n218 + n253*n462;
29199 n507 = n219 + n253*n296/n249;
29200 n508 = n220 + n253*n314/n249;
29201 n509 = n221 + n229*n63*n90/(n249*n272);
29202 n510 = n222 + n253*n303/n249;
29203 n511 = n223 + n253*n318/n249;
29204 n512 = n224 + n229*n63*n87/(n249*n275);
29205 n513 = n225 + n253*n304/n249;
29206 n514 = n226 + n253*n297/n249;
29207 n515 = n227 + n229*n63*n92/(n249*n278);
29208 n516 = n228 + n253*n463;
29209 n517 = pow(n497, -n24);
29210 n518 = pow(n498, -n24);
29211 n519 = pow(n499, -n24);
29212 n520 = pow(n500, -n24);
29213 n521 = pow(n501, -n24);
29214 n522 = pow(n502, -n24);
29215 n523 = pow(n503, -n24);
29216 n524 = pow(n504, -n24);
29217 n525 = pow(n505, -n24);
29218 n526 = pow(n506, -n24);
29219 n527 = pow(n507, -n24);
29220 n528 = pow(n508, -n24);
29221 n529 = pow(n509, -n24);
29222 n530 = pow(n510, -n24);
29223 n531 = pow(n511, -n24);
29224 n532 = pow(n512, -n24);
29225 n533 = pow(n513, -n24);
29226 n534 = pow(n514, -n24);
29227 n535 = pow(n515, -n24);
29228 n536 = pow(n516, -n24);
29229 n537 = pow(alpha, n25*n259)*n209*n229/n250 + n209;
29232 n540 = n1*n24*n25*n63 + n24*n25*n253*n461;
29233 n541 = pow(n537, -n24);
29234 n542 = -n205*n229*n255/n260 - n205*n40;
29235 n543 = n205*n229*n461*n88 + n205*n88;
29251 n559 = n500*xF[12]/n379;
29252 n560 = n513*xF[6]/n392;
29254 n562 = n507*xF[19]/n386;
29265 n573 = n517*n96/n396;
29266 n574 = n112*n530*xF[3]/n409;
29267 n575 = n197*n535/n414;
29268 n576 = n109*n527*xF[19]/n406;
29269 n577 = n450*n538*n86;
29270 n578 = n179*n542/n416;
29271 n579 = n24*n25*n447*n63*n86*xF[0]*(pow(alpha, n25*n258 + n62)*n0*n1*n229/n249 + n209);
29272 n580 = n163*n441*n61*n86*(pow(alpha, -n258*n4 + n62)*n1*n229*n4/n249 + n210);
29273 n581 = n211*n30*n86*(pow(alpha, -n258*n5 + n62)*n1*n229*n5/n249 + n211)/n378;
29274 n582 = n212*n29*n86*(pow(alpha, -n258*n6 + n62)*n1*n229*n6/n249 + n212)/n379;
29275 n583 = n143*n61*n7*n86*(pow(alpha, -n258*n7 + n62)*n229*n89/n249 + n213)/n380;
29276 n584 = n200*n61*n86*(pow(alpha, -n258*n8 + n62)*n1*n229*n8/n249 + n214)/n381;
29277 n585 = n194*n61*n86*xF[15]*(pow(alpha, -n258*n9 + n62)*n229*n91/n249 + n215)/n382;
29278 n586 = n203*n61*n86*(pow(alpha, -n10*n258 + n62)*n1*n10*n229/n249 + n216)/n383;
29279 n587 = n217*n36*n86*(pow(alpha, -n11*n258 + n62)*n1*n11*n229/n249 + n217)/n384;
29280 n588 = n12*n144*n61*n86*(pow(alpha, -n12*n258 + n62)*n1*n12*n229/n249 + n218)/n385;
29281 n589 = n169*n61*n86*xF[19]*(pow(alpha, -n13*n258 + n62)*n1*n13*n229/n249 + n219)/n386;
29282 n590 = n220*n35*n86*(pow(alpha, -n14*n258 + n62)*n1*n14*n229/n249 + n220)/n387;
29283 n591 = n147*n15*n61*n86*(pow(alpha, -n15*n258 + n62)*n229*n90/n249 + n221)/n388;
29284 n592 = n154*n437*n61*n86*(pow(alpha, -n16*n258 + n62)*n1*n16*n229/n249 + n222);
29285 n593 = n223*n28*n86*(pow(alpha, -n17*n258 + n62)*n1*n17*n229/n249 + n223)/n390;
29286 n594 = n18*n61*n80*n86*xF[5]*(pow(alpha, -n18*n258 + n62)*n229*n87/n249 + n224)/n391;
29287 n595 = n157*n61*n86*xF[6]*(pow(alpha, -n19*n258 + n62)*n1*n19*n229/n249 + n225)/n392;
29288 n596 = n206*n61*n86*(pow(alpha, -n20*n258 + n62)*n1*n20*n229/n249 + n226)/n393;
29289 n597 = n145*n21*n61*n86*(pow(alpha, -n21*n258 + n62)*n229*n92/n249 + n227)/n394;
29290 n598 = n204*n61*n86*(pow(alpha, -n22*n258 + n62)*n1*n22*n229/n249 + n228)/n395;
29291 n599 = 1.0*n209*n538*n86/n376;
29292 n600 = n450*n543*n86*xF[0];
29294 n602 = pow(alpha, n0*n38)*n0*n100*n324*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n41*n88/(n251*n261*n99) + n158*n229*n255*n324 + n231;
29295 n603 = pow(alpha, n0*n38)*n0*n100*n294*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n43*n88/(n251*n263*n99) + n158*n229*n255*n294 + n232;
29296 n604 = pow(alpha, n0*n38)*n100*n153/(n251*n264*n99) + pow(alpha, n0*n38)*n100*n25*n292*n40/(n251*n99) + n229*n25*n255*n292*n63 + n44*n69*n88;
29297 n605 = pow(alpha, n0*n38)*n0*n100*n321*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n46*n88/(n251*n266*n99) + n158*n229*n255*n321 + n233;
29298 n606 = pow(alpha, n0*n38)*n100*n25*n308*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n333*n40/(n251*n99) + n229*n25*n255*n308*n63 + n47*n72*n88;
29299 n607 = pow(alpha, n0*n38)*n0*n100*n302*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n48*n88/(n251*n268*n99) + n158*n229*n255*n302 + n234;
29300 n608 = pow(alpha, n0*n38)*n100*n12*n25*n40/(n251*n269*n99) + pow(alpha, n0*n38)*n100*n171/(n251*n269*n99) + n12*n229*n25*n255*n63/n269 + n49*n74*n88;
29301 n609 = pow(alpha, n0*n38)*n100*n25*n296*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n40*n50/(n251*n270*n99) + n207*n88 + n229*n25*n255*n296*n63;
29302 n610 = pow(alpha, n0*n38)*n100*n181/(n251*n272*n99) + pow(alpha, n0*n38)*n100*n25*n316*n40/(n251*n99) + n229*n25*n255*n316*n63 + n52*n77*n88;
29303 n611 = pow(alpha, n0*n38)*n0*n100*n303*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n53*n88/(n251*n273*n99) + n158*n229*n255*n303 + n236;
29304 n612 = pow(alpha, n0*n38)*n0*n100*n304*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n56*n88/(n251*n276*n99) + n158*n229*n255*n304 + n238;
29305 n613 = pow(alpha, n0*n38)*n100*n40*n93/(n251*n279*n99) + pow(alpha, n0*n38)*n100*n59*n88/(n251*n279*n99) + n229*n255*n63*n93/n279 + n241;
29306 n614 = pow(alpha, n0*n38)*n100*n25*n311*n40/(n251*n99) + pow(alpha, n0*n38)*n100*n40*n42/(n251*n262*n99) + n202*n88 + n229*n25*n255*n311*n63;
29307 n615 = n184*(pow(alpha, n0*n38 - n258*n8)*n100*n25*n40*n8/(n251*n99) + pow(alpha, n0*n38 - n258*n8)*n100*n40*n45/(n251*n99) + n229*n25*n255*n305*n63 + n45*n70*n88)/n381;
29308 n616 = n176*n86*(pow(alpha, n0*n38 - n258*n7)*n100*n153/(n251*n99) + pow(alpha, n0*n38 - n258*n7)*n100*n25*n40*n7/(n251*n99) + n229*n25*n255*n292*n63 + n44*n69*n88)/n380;
29310 n618 = n149*n86*(pow(alpha, n0*n38 - n10*n258)*n10*n100*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n10*n258)*n100*n40*n47/(n251*n99) + n229*n25*n255*n308*n63 + n47*n72*n88)/n383;
29311 n619 = n152*n86*(pow(alpha, n0*n38 - n12*n258)*n100*n12*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n12*n258)*n100*n171/(n251*n99) + n12*n229*n25*n255*n63/n269 + n49*n74*n88)/n385;
29312 n620 = n109*n86*xF[19]*(pow(alpha, n0*n38 - n13*n258)*n100*n13*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n13*n258)*n100*n40*n50/(n251*n99) + n207*n88 + n229*n25*n255*n296*n63)/n386;
29313 n621 = n170*n86*(pow(alpha, n0*n38 - n15*n258)*n100*n15*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n15*n258)*n100*n181/(n251*n99) + n229*n25*n255*n316*n63 + n52*n77*n88)/n388;
29314 n622 = n455*n86*(pow(alpha, n0*n38 - n17*n258)*n100*n148*n25/(n251*n99) + pow(alpha, n0*n38 - n17*n258)*n100*n40*n54/(n251*n99) + n148*n229*n25*n460*n63 + n208*n88);
29315 n623 = n142*n441*n97*(pow(alpha, n0*n38 - n258*n4)*n0*n100*n4*n40/(n251*n99) + pow(alpha, n0*n38 - n258*n4)*n100*n41*n88/(n251*n99) + n158*n229*n255*n324 + n231);
29316 n624 = n139*n86*xF[12]*(pow(alpha, n0*n38 - n258*n6)*n0*n100*n40*n6/(n251*n99) + pow(alpha, n0*n38 - n258*n6)*n100*n43*n88/(n251*n99) + n158*n229*n255*n294 + n232)/n379;
29317 n625 = n142*n156*(pow(alpha, n0*n38 - n258*n9)*n0*n100*n40*n9/(n251*n99) + pow(alpha, n0*n38 - n258*n9)*n100*n46*n88/(n251*n99) + n158*n229*n255*n321 + n233)/n382;
29318 n626 = n107*n142*n440*(pow(alpha, n0*n38 - n11*n258)*n0*n100*n11*n40/(n251*n99) + pow(alpha, n0*n38 - n11*n258)*n100*n48*n88/(n251*n99) + n158*n229*n255*n302 + n234);
29319 n627 = n142*n454*(pow(alpha, n0*n38 - n14*n258)*n0*n100*n14*n40/(n251*n99) + pow(alpha, n0*n38 - n14*n258)*n100*n51*n88/(n251*n99) + n158*n229*n255*n314 + n235);
29320 n628 = n112*n142*n437*(pow(alpha, n0*n38 - n16*n258)*n0*n100*n16*n40/(n251*n99) + pow(alpha, n0*n38 - n16*n258)*n100*n53*n88/(n251*n99) + n158*n229*n255*n303 + n236);
29321 n629 = n142*n452*(pow(alpha, n0*n38 - n18*n258)*n100*n40*n94/(n251*n99) + pow(alpha, n0*n38 - n18*n258)*n100*n55*n88/(n251*n99) + n229*n255*n63*n94/n275 + n237);
29322 n630 = n115*n142*xF[6]*(pow(alpha, n0*n38 - n19*n258)*n0*n100*n19*n40/(n251*n99) + pow(alpha, n0*n38 - n19*n258)*n100*n56*n88/(n251*n99) + n158*n229*n255*n304 + n238)/n392;
29323 n631 = n142*n164*(pow(alpha, n0*n38 - n20*n258)*n0*n100*n20*n40/(n251*n99) + pow(alpha, n0*n38 - n20*n258)*n100*n57*n88/(n251*n99) + n158*n229*n255*n297 + n239)/n393;
29324 n632 = n142*n458*(pow(alpha, n0*n38 - n21*n258)*n0*n100*n21*n40/(n251*n99) + pow(alpha, n0*n38 - n21*n258)*n100*n58*n88/(n251*n99) + n158*n229*n255*n307 + n240);
29325 n633 = n142*n162*(pow(alpha, n0*n38 - n22*n258)*n100*n40*n93/(n251*n99) + pow(alpha, n0*n38 - n22*n258)*n100*n59*n88/(n251*n99) + n229*n255*n63*n93/n279 + n241)/n395;
29326 n634 = n495 + n599 + n601;
29327 n635 = xTj*(n109*n142*n562 + n115*n142*n560 + n139*n559*n86 + n142*n149*n547 + n142*n150*n548 + n142*n152*n550 + n142*n156*n555 + n142*n162*n551 + n142*n164*n557 + n142*n170*n549 + n142*n176*n553 + n142*n184*n554 + n142*n437*n544 + n142*n440*n546 + n142*n441*n545 + n142*n450*n538 + n142*n452*n512 + n142*n454*n508 + n142*n455*n511 + n142*n458*n515 + n143*n86*n89/n340 + n144*n448*n86 + n145*n86*n92/n354 + n200*n439*n86 + n201*n438*n86 + n203*n442*n86 + n204*n443*n86 + n206*n444*n86 + n209*n434*n86 + n210*n431*n86 + n211*n432*n86 + n212*n428*n86 + n215*n86*xF[15]/n342 + n217*n429*n86 + n219*n433*n86 + n222*n86*xF[3]/n349 + n223*n86*xF[4]/n350 + n224*n86*xF[5]/n351 + n225*n86*xF[6]/n352 + n449*n86*n90);
29328 n636 = n474 + n577 + n635;
29329 n637 = n475 + n476 + n477 + n478 + n479 + n480 + n481 + n482 + n483 + n484 + n485 + n486 + n487 + n488 + n489 + n490 + n491 + n492 + n493 + n494 + n579 + n580 + n581 + n582 + n583 + n584 + n585 + n586 + n587 + n588 + n589 + n590 + n591 + n592 + n593 + n594 + n595 + n596 + n597 + n598 + n600 + n616 + n617 + n618 + n619 + n620 + n621 + n622 + n623 + n624 + n625 + n626 + n627 + n628 + n629 + n630 + n631 + n632 + n633;
29330 n638 = n109*n142*n507*xF[19]*(n169*n61 + n229*n296*n61*n63/n249)/n406 + n139*n500*n86*xF[12]*(n229*n294*n61*n63/n249 + n6*n61*n68)/n399 + n142*n149*n504*(n182*n61 + n229*n308*n61*n63/n249)/n403 + n142*n150*n499*(n229*n311*n61*n63/n249 + n5*n61*n67)/n398 + n142*n152*n506*(n192*n61 + n229*n462*n61*n63)/n405 + n142*n156*n503*(n194*n61 + n229*n321*n61*n63/n249)/n402 + n142*n162*n516*(n185*n61 + n229*n463*n61*n63)/n415 + n142*n164*n514*(n193*n61 + n229*n297*n61*n63/n249)/n413 + n142*n170*n509*(n15*n61*n77 + n229*n316*n61*n63/n249)/n408 + n142*n176*n501*(n229*n292*n61*n63/n249 + n61*n69*n7)/n400 + n142*n184*n502*(n173*n61 + n229*n305*n61*n63/n249)/n401 + n142*n186*n512*(n18*n61*n80 + n229*n322*n61*n63/n249)/n411 + n142*n187*n508*(n188*n61 + n229*n314*n61*n63/n249)/n407 + n142*n197*n515*(n21*n61*n83 + n229*n307*n61*n63/n249)/n414 + n142*n451*n539*(n17*n61*n79 + n229*n318*n61*n63/n249) + n142*n453*n513*(n157*n61 + n229*n304*n61*n63/n249) + n142*n456*n505*(n161*n61 + n229*n302*n61*n63/n249) + n142*n459*n498*(n163*n61 + n229*n324*n61*n63/n249) + n142*n538*n572*n96 + n142*n544*xF[3]*(n154*n61 + n229*n303*n61*n63/n249)/n409 + n150*n86*(pow(alpha, n0*n38 - n258*n5)*n100*n25*n40*n5/(n251*n99) + pow(alpha, n0*n38 - n258*n5)*n100*n40*n42/(n251*n99) + n202*n88 + n229*n25*n255*n311*n63)/n378 + n637;
29331 NP_b = -n209*n450*n496*n86*xF[0] - n38*(1.0*n209*n86*xF[0]*(pow(alpha, -n0*n258 + n62)*n0*n1*n229/n249 + n209)/n376 + 0.5*n450*n86*xF[0]*(pow(alpha, -n0*n258 + n62)*n229*n39*n88/n249 + n205*n88) + n495 - 1.0*n573*n86*xF[0] - 0.5*xTj*(n107*n142*n440*(pow(alpha, n0*n38 - n11*n258)*n0*n100*n11*n40/(n251*n99) + pow(alpha, n0*n38 - n11*n258)*n100*n48*n88/(n251*n99) + pow(alpha, -n11*n258 + n62)*n0*n11*n229*n255 + n234) + n109*n86*xF[19]*(pow(alpha, n0*n38 - n13*n258)*n100*n13*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n13*n258)*n100*n40*n50/(n251*n99) + pow(alpha, -n13*n258 + n62)*n13*n229*n25*n255 + n207*n88)/n386 + n112*n142*n437*(pow(alpha, n0*n38 - n16*n258)*n0*n100*n16*n40/(n251*n99) + pow(alpha, n0*n38 - n16*n258)*n100*n53*n88/(n251*n99) + pow(alpha, -n16*n258 + n62)*n0*n16*n229*n255 + n236) + n115*n142*xF[6]*(pow(alpha, n0*n38 - n19*n258)*n0*n100*n19*n40/(n251*n99) + pow(alpha, n0*n38 - n19*n258)*n100*n56*n88/(n251*n99) + pow(alpha, -n19*n258 + n62)*n0*n19*n229*n255 + n238)/n392 + n139*n86*xF[12]*(pow(alpha, n0*n38 - n258*n6)*n0*n100*n40*n6/(n251*n99) + pow(alpha, n0*n38 - n258*n6)*n100*n43*n88/(n251*n99) + pow(alpha, -n258*n6 + n62)*n0*n229*n255*n6 + n232)/n379 + n142*n150*(pow(alpha, n0*n38 - n258*n5)*n0*n100*n40*n5/(n251*n99) + pow(alpha, n0*n38 - n258*n5)*n100*n42*n88/(n251*n99) + pow(alpha, -n258*n5 + n62)*n0*n229*n255*n5 + n202*n40)/n378 + n142*n156*(pow(alpha, n0*n38 - n258*n9)*n0*n100*n40*n9/(n251*n99) + pow(alpha, n0*n38 - n258*n9)*n100*n46*n88/(n251*n99) + pow(alpha, -n258*n9 + n62)*n0*n229*n255*n9 + n233)/n382 + n142*n162*(pow(alpha, n0*n38 - n22*n258)*n100*n40*n93/(n251*n99) + pow(alpha, n0*n38 - n22*n258)*n100*n59*n88/(n251*n99) + pow(alpha, -n22*n258 + n62)*n229*n255*n93 + n241)/n395 + n142*n164*(pow(alpha, n0*n38 - n20*n258)*n0*n100*n20*n40/(n251*n99) + pow(alpha, n0*n38 - n20*n258)*n100*n57*n88/(n251*n99) + pow(alpha, -n20*n258 + n62)*n0*n20*n229*n255 + n239)/n393 + n142*n441*n97*(pow(alpha, n0*n38 - n258*n4)*n0*n100*n4*n40/(n251*n99) + pow(alpha, n0*n38 - n258*n4)*n100*n41*n88/(n251*n99) + pow(alpha, -n258*n4 + n62)*n0*n229*n255*n4 + n231) + n142*n452*(pow(alpha, n0*n38 - n18*n258)*n100*n40*n94/(n251*n99) + pow(alpha, n0*n38 - n18*n258)*n100*n55*n88/(n251*n99) + pow(alpha, -n18*n258 + n62)*n229*n255*n94 + n237) + n142*n454*(pow(alpha, n0*n38 - n14*n258)*n0*n100*n14*n40/(n251*n99) + pow(alpha, n0*n38 - n14*n258)*n100*n51*n88/(n251*n99) + pow(alpha, -n14*n258 + n62)*n0*n14*n229*n255 + n235) + n142*n458*(pow(alpha, n0*n38 - n21*n258)*n0*n100*n21*n40/(n251*n99) + pow(alpha, n0*n38 - n21*n258)*n100*n58*n88/(n251*n99) + pow(alpha, -n21*n258 + n62)*n0*n21*n229*n255 + n240) + n149*n24*n569*n86 + n149*n86*(pow(alpha, n0*n38 - n10*n258)*n10*n100*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n10*n258)*n100*n40*n47/(n251*n99) + pow(alpha, -n10*n258 + n62)*n10*n229*n25*n255 + n47*n72*n88)/n383 + n150*n24*n568*n86 + n152*n24*n558*n86 + n152*n86*(pow(alpha, n0*n38 - n12*n258)*n100*n12*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n12*n258)*n100*n171/(n251*n99) + pow(alpha, -n12*n258 + n62)*n12*n229*n25*n255 + n49*n74*n88)/n385 + n156*n24*n563*n86 + n162*n24*n561*n86 + n164*n24*n565*n86 + n170*n24*n566*n86 + n170*n86*(pow(alpha, n0*n38 - n15*n258)*n100*n15*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n15*n258)*n100*n181/(n251*n99) + pow(alpha, -n15*n258 + n62)*n15*n229*n25*n255 + n52*n77*n88)/n388 + n176*n24*n564*n86 + n176*n86*(pow(alpha, n0*n38 - n258*n7)*n100*n153/(n251*n99) + pow(alpha, n0*n38 - n258*n7)*n100*n25*n40*n7/(n251*n99) + pow(alpha, -n258*n7 + n62)*n229*n25*n255*n7 + n44*n69*n88)/n380 + n184*n24*n571*n86 + n184*n86*(pow(alpha, n0*n38 - n258*n8)*n100*n25*n40*n8/(n251*n99) + pow(alpha, n0*n38 - n258*n8)*n100*n40*n45/(n251*n99) + pow(alpha, -n258*n8 + n62)*n229*n25*n255*n8 + n45*n70*n88)/n381 + n186*n24*n567*n86 + n187*n24*n570*n86 + n24*n451*n531*n86*xF[4] + n24*n453*n533*n86 + n24*n456*n525*n86 + n24*n457*n520*n86 + n24*n459*n518*n86 + n24*n573*n86*xF[0] + n24*n574*n86 + n24*n575*n86 + n24*n576*n86 + n450*n86*xF[0]*(pow(alpha, -n0*n258 + n62)*n229*n39*n88/n249 + n205*n88) + n455*n86*(pow(alpha, n0*n38 - n17*n258)*n100*n148*n25/(n251*n99) + pow(alpha, n0*n38 - n17*n258)*n100*n40*n54/(n251*n99) + pow(alpha, -n17*n258 + n62)*n148*n229*n25/n249 + n208*n88) + n475 + n476 + n477 + n478 + n479 + n480 + n481 + n482 + n483 + n484 + n485 + n486 + n487 + n488 + n489 + n490 + n491 + n492 + n493 + n494 + n579 + n580 + n581 + n582 + n583 + n584 + n585 + n586 + n587 + n588 + n589 + n590 + n591 + n592 + n593 + n594 + n595 + n596 + n597 + n598)) - n474 - n86*xTj*(-n109*n562 - n115*n560 + n139*n559 + n143*n89/n340 + n144*n448 + n145*n92/n354 - n149*n547 - n150*n548 - n152*n550 - n156*n555 - n162*n551 + n164*n445*n514 - n170*n549 - n176*n553 - n184*n554 + n200*n439 + n201*n438 + n203*n442 + n204*n443 + n206*n444 + n209*n434 + n210*n431 + n211*n432 + n212*n428 + n215*xF[15]/n342 + n217*n429 + n219*n433 + n222*xF[3]/n349 + n223*xF[4]/n350 + n224*xF[5]/n351 + n225*xF[6]/n352 - n437*n544 - n440*n546 - n441*n545 + n449*n90 - n450*n538 - n452*n512 - n454*n508 - n455*n511 - n458*n515);
29332 NP_2a = -n86*(pow(alpha, n0*n38)*n33*n39*n40*pow(n496, -n24)*n96/n396 - 2.0*pow(alpha, n0*n38)*n39*n40*n496*xF[0]/n376 + n205*n450*n88*xF[0]*(n461*(-n26 + xPj*xTj)/n64 - 1) - 1.0*n244/n336 + 1.0*xTj*(-n107*n440*(pow(alpha, n0*n38 - n11*n258)*n0*n100*n11*n40/(n251*n99) + pow(alpha, n0*n38 - n11*n258)*n100*n48*n88/(n251*n99) + n158*n229*n255*n302 + n234) + n109*xF[19]*(pow(alpha, n0*n38 - n13*n258)*n100*n13*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n13*n258)*n100*n40*n50/(n251*n99) + n207*n88 + n229*n25*n255*n296*n63)/n386 - n112*n437*(pow(alpha, n0*n38 - n16*n258)*n0*n100*n16*n40/(n251*n99) + pow(alpha, n0*n38 - n16*n258)*n100*n53*n88/(n251*n99) + n158*n229*n255*n303 + n236) - n115*xF[6]*(pow(alpha, n0*n38 - n19*n258)*n0*n100*n19*n40/(n251*n99) + pow(alpha, n0*n38 - n19*n258)*n100*n56*n88/(n251*n99) + n158*n229*n255*n304 + n238)/n392 + n12*n144*n61*(pow(alpha, -n12*n258 + n62)*n1*n12*n229/n249 + n218)/n385 + n139*xF[12]*(pow(alpha, n0*n38 - n258*n6)*n0*n100*n40*n6/(n251*n99) + pow(alpha, n0*n38 - n258*n6)*n100*n43*n88/(n251*n99) + n158*n229*n255*n294 + n232)/n379 + n143*n153/n340 + n143*n61*n7*(pow(alpha, -n258*n7 + n62)*n229*n89/n249 + n213)/n380 + n144*n171/n345 + n145*n174/n354 + n145*n21*n61*(pow(alpha, -n21*n258 + n62)*n229*n92/n249 + n227)/n394 + n147*n15*n61*(pow(alpha, -n15*n258 + n62)*n229*n90/n249 + n221)/n388 + n149*n24*n569 + n149*(pow(alpha, n0*n38 - n10*n258)*n10*n100*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n10*n258)*n100*n40*n47/(n251*n99) + n229*n25*n255*n308*n63 + n47*n72*n88)/n383 + n150*n24*n568 + n150*(pow(alpha, n0*n38 - n258*n5)*n100*n25*n40*n5/(n251*n99) + pow(alpha, n0*n38 - n258*n5)*n100*n40*n42/(n251*n99) + n202*n88 + n229*n25*n255*n311*n63)/n378 + n152*n24*n558 + n152*(pow(alpha, n0*n38 - n12*n258)*n100*n12*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n12*n258)*n100*n171/(n251*n99) + n12*n229*n25*n255*n63/n269 + n49*n74*n88)/n385 + n154*n437*n61*(pow(alpha, -n16*n258 + n62)*n1*n16*n229/n249 + n222) + n156*n24*n563 - n156*(pow(alpha, n0*n38 - n258*n9)*n0*n100*n40*n9/(n251*n99) + pow(alpha, n0*n38 - n258*n9)*n100*n46*n88/(n251*n99) + n158*n229*n255*n321 + n233)/n382 + n157*n61*xF[6]*(pow(alpha, -n19*n258 + n62)*n1*n19*n229/n249 + n225)/n392 + n162*n24*n561 - n162*(pow(alpha, n0*n38 - n22*n258)*n100*n40*n93/(n251*n99) + pow(alpha, n0*n38 - n22*n258)*n100*n59*n88/(n251*n99) + n229*n255*n63*n93/n279 + n241)/n395 + n163*n441*n61*(pow(alpha, -n258*n4 + n62)*n1*n229*n4/n249 + n210) + n164*n24*n565 + n164*n445*(pow(alpha, n0*n38 - n20*n258)*n0*n100*n20*n40/(n251*n99) + pow(alpha, n0*n38 - n20*n258)*n100*n57*n88/(n251*n99) + n158*n229*n255*n297 + n239) + n169*n61*xF[19]*(pow(alpha, -n13*n258 + n62)*n1*n13*n229/n249 + n219)/n386 + n170*n24*n566 + n170*(pow(alpha, n0*n38 - n15*n258)*n100*n15*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n15*n258)*n100*n181/(n251*n99) + n229*n25*n255*n316*n63 + n52*n77*n88)/n388 + n176*n24*n564 + n176*(pow(alpha, n0*n38 - n258*n7)*n100*n153/(n251*n99) + pow(alpha, n0*n38 - n258*n7)*n100*n25*n40*n7/(n251*n99) + n229*n25*n255*n292*n63 + n44*n69*n88)/n380 + n18*n61*n80*xF[5]*(pow(alpha, -n18*n258 + n62)*n229*n87/n249 + n224)/n391 + n181*n449 + n184*n24*n571 + n186*n24*n567 + n187*n24*n570 + n194*n61*xF[15]*(pow(alpha, -n258*n9 + n62)*n229*n91/n249 + n215)/n382 + n200*n61*(pow(alpha, -n258*n8 + n62)*n1*n229*n8/n249 + n214)/n381 + n202*n40*n432 + n203*n61*(pow(alpha, -n10*n258 + n62)*n1*n10*n229/n249 + n216)/n383 + n204*n61*(pow(alpha, -n22*n258 + n62)*n1*n22*n229/n249 + n228)/n395 + n206*n61*(pow(alpha, -n20*n258 + n62)*n1*n20*n229/n249 + n226)/n393 + n207*n40*n433 + n211*n30*(pow(alpha, -n258*n5 + n62)*n1*n229*n5/n249 + n211)/n378 + n212*n29*(pow(alpha, -n258*n6 + n62)*n1*n229*n6/n249 + n212)/n379 + n217*n36*(pow(alpha, -n11*n258 + n62)*n1*n11*n229/n249 + n217)/n384 + n220*n35*(pow(alpha, -n14*n258 + n62)*n1*n14*n229/n249 + n220)/n387 + n223*n28*(pow(alpha, -n17*n258 + n62)*n1*n17*n229/n249 + n223)/n390 + n231*n431 + n232*n428 + n233*xF[15]/n342 + n234*n429 + n237*xF[5]/n351 + n24*n25*n447*n63*xF[0]*(pow(alpha, n25*n258 + n62)*n0*n1*n229/n249 + n209) + n24*n451*n531*xF[4] + n24*n453*n533 + n24*n456*n525 + n24*n457*n520 + n24*n459*n518 + n24*n573*xF[0] + n24*n574 + n24*n575 + n24*n576 + n242*n436 + n243*n435 + n244/n336 + n245/n353 + n246/n352 + n247/n349 + n248/n350 - n441*n97*(pow(alpha, n0*n38 - n258*n4)*n0*n100*n4*n40/(n251*n99) + pow(alpha, n0*n38 - n258*n4)*n100*n41*n88/(n251*n99) + n158*n229*n255*n324 + n231) + n450*n543*xF[0] - n452*(pow(alpha, n0*n38 - n18*n258)*n100*n40*n94/(n251*n99) + pow(alpha, n0*n38 - n18*n258)*n100*n55*n88/(n251*n99) + n229*n255*n63*n94/n275 + n237) - n454*(pow(alpha, n0*n38 - n14*n258)*n0*n100*n14*n40/(n251*n99) + pow(alpha, n0*n38 - n14*n258)*n100*n51*n88/(n251*n99) + n158*n229*n255*n314 + n235) + n455*(pow(alpha, n0*n38 - n17*n258)*n100*n148*n25/(n251*n99) + pow(alpha, n0*n38 - n17*n258)*n100*n40*n54/(n251*n99) + n148*n229*n25*n460*n63 + n208*n88) - n458*(pow(alpha, n0*n38 - n21*n258)*n0*n100*n21*n40/(n251*n99) + pow(alpha, n0*n38 - n21*n258)*n100*n58*n88/(n251*n99) + n158*n229*n255*n307 + n240) + n466 + n467 + n615));
29333 NP_sqrt_base = (NP0*n636 + n142*n179/n356 + n32*(-n102*n86*xF[12]/(n102 - 1 + pow(alpha, -n6*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n107*n86*xF[17]/(n107 - 1 + pow(alpha, -n11*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n109*n86*xF[19]/(n109 - 1 + pow(alpha, -n13*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n112*n86*xF[3]/(n112 - 1 + pow(alpha, -n16*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n113*n86*xF[4]/(n113 - 1 + pow(alpha, -n17*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n115*n86*xF[6]/(n115 - 1 + pow(alpha, -n19*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n149*n86/(n106 - 1 + pow(alpha, -n10*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n150*n86/(n101 - 1 + pow(alpha, -n5*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n152*n86/(n108 - 1 + pow(alpha, -n12*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n156*n86/(n105 - 1 + pow(alpha, -n9*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n162*n86/(n118 - 1 + pow(alpha, -n22*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n164*n86/(n116 - 1 + pow(alpha, -n20*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n170*n86/(n111 - 1 + pow(alpha, -n15*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n176*n86/(n103 - 1 + pow(alpha, -n7*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n184*n86/(n104 - 1 + pow(alpha, -n8*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n186*n86/(n114 - 1 + pow(alpha, -n18*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n187*n86/(n110 - 1 + pow(alpha, -n14*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n197*n86/(n117 - 1 + pow(alpha, -n21*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) - n86*n96*xF[0]/(pow(alpha, n25*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)) + n96 - 1) - n86*n97*xF[10]/(n97 - 1 + pow(alpha, -n4*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)))) + pow(NP0, -n24)*(1.0*n209*n538*n86/n376 + 0.5*n475 - 0.5*n538*n572*n86*n96 + 0.5*n600 - 0.5*n638*xTj))*(n119*n31*n541*n86/n427 - 4.0*n209*n446*n86*(pow(alpha, n25*n259)*n0*n253/n250 + n0*n1*n63) + n24*n32*(n1*n24*n25*n63*n86*xF[0]*(n209 + pow(alpha, -n0*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n209*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n96 - 1 + pow(alpha, -n0*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n12*n144*n61*n86*(n218 + pow(alpha, -n12*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n12*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n108 - 1 + pow(alpha, -n12*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n121*n24*n86*xF[11]*pow(n211 + pow(alpha, -n5*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n5*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n101 - 1 + pow(alpha, -n5*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n121*n86*xF[11]*pow(n101 - 1 + pow(alpha, -n5*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(-pow(alpha, n0*n38)*pow(alpha, -n5*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n40*n5*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - pow(alpha, n0*n38)*pow(alpha, -n5*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n42*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - n202*n40 - pow(alpha, -n5*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n40*n5*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n122*n142*xF[12]*pow(-n139 - 1 + pow(alpha, -n6*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n6*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n40*n6*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n6*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n43*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n232 + pow(alpha, -n6*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n40*n6*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n122*n24*n86*xF[12]*pow(n212 + pow(alpha, -n6*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n6*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(-n139 - 1 + pow(alpha, -n6*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n142*n151*pow(n114 - 1 + pow(alpha, -n18*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n18*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n40*n94*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n18*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n55*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n237 + pow(alpha, -n18*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n40*n63*n94*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n165*pow(n112 - 1 + pow(alpha, -n16*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n16*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n16*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n16*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n53*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n236 + pow(alpha, -n16*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n16*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n166*pow(n107 - 1 + pow(alpha, -n11*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n11*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n11*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n11*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n48*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n234 + pow(alpha, -n11*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n11*n158*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n167*pow(n116 - 1 + pow(alpha, -n20*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n20*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n20*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n20*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n57*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n239 + pow(alpha, -n20*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n20*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n172*pow(n110 - 1 + pow(alpha, -n14*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n14*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n14*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n14*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n51*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n235 + pow(alpha, -n14*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n14*n158*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n175*pow(n118 - 1 + pow(alpha, -n22*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n22*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n40*n93*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n22*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n59*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n241 + pow(alpha, -n22*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n40*n63*n93*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n177*pow(n105 - 1 + pow(alpha, -n9*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n9*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n40*n9*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n9*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n46*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n233 + pow(alpha, -n9*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n40*n9*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n190*pow(n115 - 1 + pow(alpha, -n19*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n19*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n19*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n19*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n56*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n238 + pow(alpha, -n19*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n19*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n195*pow(n97 - 1 + pow(alpha, -n4*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n4*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n4*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n4*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n41*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n231 + pow(alpha, -n4*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n4*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n142*n196*pow(n117 - 1 + pow(alpha, -n21*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(pow(alpha, n0*n38)*pow(alpha, -n21*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n21*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + pow(alpha, n0*n38)*pow(alpha, -n21*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n58*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) + n240 + pow(alpha, -n21*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n21*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n143*n153*n86/(n103 - 1 + pow(alpha, -n7*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n143*n61*n7*n86*(n213 + pow(alpha, -n7*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n89*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n103 - 1 + pow(alpha, -n7*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n144*n171*n86/(n108 - 1 + pow(alpha, -n12*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n145*n174*n86/(n117 - 1 + pow(alpha, -n21*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n145*n21*n61*n86*(n227 + pow(alpha, -n21*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n92*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n117 - 1 + pow(alpha, -n21*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n147*n15*n61*n86*(n221 + pow(alpha, -n15*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n90*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n111 - 1 + pow(alpha, -n15*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n147*n181*n86/(n111 - 1 + pow(alpha, -n15*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n151*n24*n86*pow(n224 + pow(alpha, -n18*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n87*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n114 - 1 + pow(alpha, -n18*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n154*n61*n86*xF[3]*(n1*n16*n78 + pow(alpha, -n16*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n16*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n112 - 1 + pow(alpha, -n16*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n155*n24*n86*pow(n216 + pow(alpha, -n10*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n10*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n106 - 1 + pow(alpha, -n10*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n155*n86*pow(n106 - 1 + pow(alpha, -n10*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(-pow(alpha, n0*n38)*pow(alpha, -n10*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n10*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - pow(alpha, n0*n38)*pow(alpha, -n10*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n47*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - n243 - pow(alpha, -n10*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n10*n158*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n157*n61*n86*xF[6]*(n1*n19*n81 + pow(alpha, -n19*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n19*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n115 - 1 + pow(alpha, -n19*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n163*n61*n86*xF[10]*(n1*n4*n66 + pow(alpha, -n4*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n4*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n97 - 1 + pow(alpha, -n4*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n165*n24*n86*pow(n222 + pow(alpha, -n16*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n16*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n112 - 1 + pow(alpha, -n16*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n166*n24*n86*pow(n217 + pow(alpha, -n11*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n11*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n107 - 1 + pow(alpha, -n11*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n167*n24*n86*pow(n226 + pow(alpha, -n20*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n20*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n116 - 1 + pow(alpha, -n20*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n168*n24*n86*pow(n223 + pow(alpha, -n17*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n17*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n113 - 1 + pow(alpha, -n17*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n168*n86*pow(n113 - 1 + pow(alpha, -n17*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(-pow(alpha, n0*n38)*pow(alpha, -n17*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n148*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - pow(alpha, n0*n38)*pow(alpha, -n17*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n54*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - n208*n40 - pow(alpha, -n17*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n148*n158*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n169*n61*n86*xF[19]*(n1*n13*n75 + pow(alpha, -n13*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n13*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n109 - 1 + pow(alpha, -n13*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n172*n24*n86*pow(n220 + pow(alpha, -n14*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n14*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n110 - 1 + pow(alpha, -n14*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n175*n24*n86*pow(n228 + pow(alpha, -n22*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n22*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n118 - 1 + pow(alpha, -n22*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n177*n24*n86*pow(n215 + pow(alpha, -n9*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n91*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n105 - 1 + pow(alpha, -n9*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n178*n24*n86*pow(n214 + pow(alpha, -n8*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n63*n8*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n104 - 1 + pow(alpha, -n8*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n178*n86*pow(n104 - 1 + pow(alpha, -n8*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(-pow(alpha, n0*n38)*pow(alpha, -n8*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n40*n8*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - pow(alpha, n0*n38)*pow(alpha, -n8*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n45*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - n242 - pow(alpha, -n8*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n40*n8*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n179*n24*n86*pow(pow(alpha, n25*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n209*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + n209, -n24)/pow(n96 - 1 + pow(alpha, -n0*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n179*n86*(-n205*n40 - pow(alpha, -n0*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n205*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n96 - 1 + pow(alpha, -n0*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n18*n61*n80*n86*xF[5]*(n224 + pow(alpha, -n18*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n87*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n114 - 1 + pow(alpha, -n18*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n183*n24*n86*pow(n221 + pow(alpha, -n15*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n90*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n111 - 1 + pow(alpha, -n15*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n183*n86*pow(n111 - 1 + pow(alpha, -n15*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(-pow(alpha, n0*n38)*pow(alpha, -n15*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n15*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - pow(alpha, n0*n38)*pow(alpha, -n15*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n52*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - n181*n77 - pow(alpha, -n15*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n15*n158*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n189*n24*n86*pow(n213 + pow(alpha, -n7*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n89*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n103 - 1 + pow(alpha, -n7*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n189*n86*pow(n103 - 1 + pow(alpha, -n7*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(-pow(alpha, n0*n38)*pow(alpha, -n7*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n40*n7*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - pow(alpha, n0*n38)*pow(alpha, -n7*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n44*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - n153*n69 - pow(alpha, -n7*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n158*n40*n7*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n190*n24*n86*pow(n225 + pow(alpha, -n19*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n19*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n115 - 1 + pow(alpha, -n19*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n191*n24*n86*pow(n219 + pow(alpha, -n13*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n13*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n109 - 1 + pow(alpha, -n13*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n191*n86*pow(n109 - 1 + pow(alpha, -n13*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(-pow(alpha, n0*n38)*pow(alpha, -n13*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n0*n13*n40*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - pow(alpha, n0*n38)*pow(alpha, -n13*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n50*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - n207*n40 - pow(alpha, -n13*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n13*n158*n40*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n194*n61*n86*xF[15]*(n215 + pow(alpha, -n9*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n91*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n105 - 1 + pow(alpha, -n9*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n195*n24*n86*pow(n210 + pow(alpha, -n4*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n4*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n97 - 1 + pow(alpha, -n4*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n196*n24*n86*pow(n227 + pow(alpha, -n21*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n63*n92*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n117 - 1 + pow(alpha, -n21*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n198*n24*n86*pow(n218 + pow(alpha, -n12*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n12*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)), -n24)/pow(n108 - 1 + pow(alpha, -n12*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), 3) + n198*n86*pow(n108 - 1 + pow(alpha, -n12*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24)*(-pow(alpha, n0*n38)*pow(alpha, -n12*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n40*n95*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - pow(alpha, n0*n38)*pow(alpha, -n12*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n49*n88*pow(n26 + n34*xTj, -n24)*pow(n26 - xF[0]*xTj, n24)*pow(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1, n24) - n171*n74 - pow(alpha, -n12*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n40*n63*n95*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1))) + n200*n61*n86*(n1*n70*n8 + pow(alpha, -n8*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n63*n8*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n104 - 1 + pow(alpha, -n8*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n202*n40*n86*xF[11]/(n101 - 1 + pow(alpha, -n5*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n203*n61*n86*(n1*n10*n72 + pow(alpha, -n10*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n10*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n106 - 1 + pow(alpha, -n10*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n204*n61*n86*(n1*n22*n84 + pow(alpha, -n22*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n22*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n118 - 1 + pow(alpha, -n22*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n206*n61*n86*(n1*n20*n82 + pow(alpha, -n20*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n20*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n116 - 1 + pow(alpha, -n20*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n207*n40*n86*xF[19]/(n109 - 1 + pow(alpha, -n13*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n211*n30*n86*(n1*n5*n67 + pow(alpha, -n5*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n5*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n101 - 1 + pow(alpha, -n5*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n212*n29*n86*(n1*n6*n68 + pow(alpha, -n6*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n6*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(-n139 - 1 + pow(alpha, -n6*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n217*n36*n86*(n1*n11*n73 + pow(alpha, -n11*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n11*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n107 - 1 + pow(alpha, -n11*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n220*n35*n86*(n1*n14*n76 + pow(alpha, -n14*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n14*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n110 - 1 + pow(alpha, -n14*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n223*n28*n86*(n1*n17*n79 + pow(alpha, -n17*(n146*(n254 - log(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))*n1*n17*n63*(n26 + n34*xTj)/((n26 - xF[0]*xTj)*(-n63*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)))*pow(n113 - 1 + pow(alpha, -n17*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)), n24) + n231*n86*xF[10]/(n97 - 1 + pow(alpha, -n4*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n232*n86*xF[12]/(-n139 - 1 + pow(alpha, -n6*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n233*n86*xF[15]/(n105 - 1 + pow(alpha, -n9*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n234*n86*xF[17]/(n107 - 1 + pow(alpha, -n11*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n235*n86*xF[1]/(n110 - 1 + pow(alpha, -n14*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n237*n86*xF[5]/(n114 - 1 + pow(alpha, -n18*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n241*n86*xF[9]/(n118 - 1 + pow(alpha, -n22*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n242*n86*xF[14]/(n104 - 1 + pow(alpha, -n8*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n243*n86*xF[16]/(n106 - 1 + pow(alpha, -n10*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n244*n86/(n96 - 1 + pow(alpha, -n0*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n245*n86/(n116 - 1 + pow(alpha, -n20*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n246*n86/(n115 - 1 + pow(alpha, -n19*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n247*n86/(n112 - 1 + pow(alpha, -n16*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1))) + n248*n86/(n113 - 1 + pow(alpha, -n17*(n146*(n254 - log(n140*(n26 + n34*xTj)/(n26 - xF[0]*xTj) + 1)) + 1)))) - 2.0*n244*n86/n356 - 2.0*n578*n86) + pow(-n38*(1.0*n209*n86*xF[0]*(pow(alpha, -n0*n258 + n62)*n0*n1*n229/n249 + n209)/n376 + 0.5*n450*n86*xF[0]*(pow(alpha, -n0*n258 + n62)*n229*n39*n88/n249 + n205*n88) + n495 - 0.5*xTj*(n107*n142*n440*(pow(alpha, n0*n38 - n11*n258)*n0*n100*n11*n40/(n251*n99) + pow(alpha, n0*n38 - n11*n258)*n100*n48*n88/(n251*n99) + pow(alpha, -n11*n258 + n62)*n0*n11*n229*n255 + n234) + n109*n142*xF[19]*(pow(alpha, -n13*n258 + n62)*n1*n13*n229/n249 + n219)*(pow(alpha, -n13*n258 + n62)*n13*n229*n61/n249 + n169*n61)/n406 + n109*n86*xF[19]*(pow(alpha, n0*n38 - n13*n258)*n100*n13*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n13*n258)*n100*n40*n50/(n251*n99) + pow(alpha, -n13*n258 + n62)*n13*n229*n25*n255 + n207*n88)/n386 + n112*n142*n437*(pow(alpha, n0*n38 - n16*n258)*n0*n100*n16*n40/(n251*n99) + pow(alpha, n0*n38 - n16*n258)*n100*n53*n88/(n251*n99) + pow(alpha, -n16*n258 + n62)*n0*n16*n229*n255 + n236) + n112*n142*xF[3]*(pow(alpha, -n16*n258 + n62)*n1*n16*n229/n249 + n222)*(pow(alpha, -n16*n258 + n62)*n16*n229*n61/n249 + n154*n61)/n409 + n115*n142*xF[6]*(pow(alpha, n0*n38 - n19*n258)*n0*n100*n19*n40/(n251*n99) + pow(alpha, n0*n38 - n19*n258)*n100*n56*n88/(n251*n99) + pow(alpha, -n19*n258 + n62)*n0*n19*n229*n255 + n238)/n392 + n139*n86*xF[12]*(pow(alpha, -n258*n6 + n62)*n1*n229*n6/n249 + n212)*(pow(alpha, -n258*n6 + n62)*n229*n6*n61/n249 + n6*n61*n68)/n399 + n139*n86*xF[12]*(pow(alpha, n0*n38 - n258*n6)*n0*n100*n40*n6/(n251*n99) + pow(alpha, n0*n38 - n258*n6)*n100*n43*n88/(n251*n99) + pow(alpha, -n258*n6 + n62)*n0*n229*n255*n6 + n232)/n379 + n142*n149*(pow(alpha, -n10*n258 + n62)*n1*n10*n229/n249 + n216)*(pow(alpha, -n10*n258 + n62)*n10*n229*n61/n249 + n182*n61)/n403 + n142*n150*(pow(alpha, -n258*n5 + n62)*n1*n229*n5/n249 + n211)*(pow(alpha, -n258*n5 + n62)*n229*n5*n61/n249 + n5*n61*n67)/n398 + n142*n152*(pow(alpha, -n12*n258 + n62)*n1*n12*n229/n249 + n218)*(pow(alpha, -n12*n258 + n62)*n12*n229*n61/n249 + n192*n61)/n405 + n142*n156*(pow(alpha, -n258*n9 + n62)*n229*n91/n249 + n215)*(pow(alpha, -n258*n9 + n62)*n229*n61*n9/n249 + n194*n61)/n402 + n142*n156*(pow(alpha, n0*n38 - n258*n9)*n0*n100*n40*n9/(n251*n99) + pow(alpha, n0*n38 - n258*n9)*n100*n46*n88/(n251*n99) + pow(alpha, -n258*n9 + n62)*n0*n229*n255*n9 + n233)/n382 + n142*n162*(pow(alpha, -n22*n258 + n62)*n1*n22*n229/n249 + n228)*(pow(alpha, -n22*n258 + n62)*n22*n229*n61/n249 + n185*n61)/n415 + n142*n162*(pow(alpha, n0*n38 - n22*n258)*n100*n40*n93/(n251*n99) + pow(alpha, n0*n38 - n22*n258)*n100*n59*n88/(n251*n99) + pow(alpha, -n22*n258 + n62)*n229*n255*n93 + n241)/n395 + n142*n164*(pow(alpha, -n20*n258 + n62)*n1*n20*n229/n249 + n226)*(pow(alpha, -n20*n258 + n62)*n20*n229*n61/n249 + n193*n61)/n413 + n142*n164*(pow(alpha, n0*n38 - n20*n258)*n0*n100*n20*n40/(n251*n99) + pow(alpha, n0*n38 - n20*n258)*n100*n57*n88/(n251*n99) + pow(alpha, -n20*n258 + n62)*n0*n20*n229*n255 + n239)/n393 + n142*n170*(pow(alpha, -n15*n258 + n62)*n229*n90/n249 + n221)*(pow(alpha, -n15*n258 + n62)*n15*n229*n61/n249 + n15*n61*n77)/n408 + n142*n176*(pow(alpha, -n258*n7 + n62)*n229*n89/n249 + n213)*(pow(alpha, -n258*n7 + n62)*n229*n61*n7/n249 + n61*n69*n7)/n400 + n142*n184*(pow(alpha, -n258*n8 + n62)*n1*n229*n8/n249 + n214)*(pow(alpha, -n258*n8 + n62)*n229*n61*n8/n249 + n173*n61)/n401 + n142*n186*(pow(alpha, -n18*n258 + n62)*n229*n87/n249 + n224)*(pow(alpha, -n18*n258 + n62)*n18*n229*n61/n249 + n18*n61*n80)/n411 + n142*n187*(pow(alpha, -n14*n258 + n62)*n1*n14*n229/n249 + n220)*(pow(alpha, -n14*n258 + n62)*n14*n229*n61/n249 + n188*n61)/n407 + n142*n197*(pow(alpha, -n21*n258 + n62)*n229*n92/n249 + n227)*(pow(alpha, -n21*n258 + n62)*n21*n229*n61/n249 + n21*n61*n83)/n414 + n142*n441*n97*(pow(alpha, n0*n38 - n258*n4)*n0*n100*n4*n40/(n251*n99) + pow(alpha, n0*n38 - n258*n4)*n100*n41*n88/(n251*n99) + pow(alpha, -n258*n4 + n62)*n0*n229*n255*n4 + n231) + n142*n451*xF[4]*(pow(alpha, -n17*n258 + n62)*n1*n17*n229/n249 + n223)*(pow(alpha, -n17*n258 + n62)*n17*n229*n61/n249 + n17*n61*n79) + n142*n452*(pow(alpha, n0*n38 - n18*n258)*n100*n40*n94/(n251*n99) + pow(alpha, n0*n38 - n18*n258)*n100*n55*n88/(n251*n99) + pow(alpha, -n18*n258 + n62)*n229*n255*n94 + n237) + n142*n453*(pow(alpha, -n19*n258 + n62)*n1*n19*n229/n249 + n225)*(pow(alpha, -n19*n258 + n62)*n19*n229*n61/n249 + n157*n61) + n142*n454*(pow(alpha, n0*n38 - n14*n258)*n0*n100*n14*n40/(n251*n99) + pow(alpha, n0*n38 - n14*n258)*n100*n51*n88/(n251*n99) + pow(alpha, -n14*n258 + n62)*n0*n14*n229*n255 + n235) + n142*n456*(pow(alpha, -n11*n258 + n62)*n1*n11*n229/n249 + n217)*(pow(alpha, -n11*n258 + n62)*n11*n229*n61/n249 + n161*n61) + n142*n458*(pow(alpha, n0*n38 - n21*n258)*n0*n100*n21*n40/(n251*n99) + pow(alpha, n0*n38 - n21*n258)*n100*n58*n88/(n251*n99) + pow(alpha, -n21*n258 + n62)*n0*n21*n229*n255 + n240) + n142*n459*(pow(alpha, -n258*n4 + n62)*n1*n229*n4/n249 + n210)*(pow(alpha, -n258*n4 + n62)*n229*n4*n61/n249 + n163*n61) + n142*n96*xF[0]*(pow(alpha, -n0*n258 + n62)*n0*n1*n229/n249 + n209)*(pow(alpha, -n0*n258 + n62)*n1*n229*n24*n25/n249 + n1*n24*n25*n63)/n396 + n149*n86*(pow(alpha, n0*n38 - n10*n258)*n10*n100*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n10*n258)*n100*n40*n47/(n251*n99) + pow(alpha, -n10*n258 + n62)*n10*n229*n25*n255 + n47*n72*n88)/n383 + n150*n86*(pow(alpha, n0*n38 - n258*n5)*n100*n25*n40*n5/(n251*n99) + pow(alpha, n0*n38 - n258*n5)*n100*n40*n42/(n251*n99) + pow(alpha, -n258*n5 + n62)*n229*n25*n255*n5 + n202*n88)/n378 + n152*n86*(pow(alpha, n0*n38 - n12*n258)*n100*n12*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n12*n258)*n100*n171/(n251*n99) + pow(alpha, -n12*n258 + n62)*n12*n229*n25*n255 + n49*n74*n88)/n385 + n170*n86*(pow(alpha, n0*n38 - n15*n258)*n100*n15*n25*n40/(n251*n99) + pow(alpha, n0*n38 - n15*n258)*n100*n181/(n251*n99) + pow(alpha, -n15*n258 + n62)*n15*n229*n25*n255 + n52*n77*n88)/n388 + n176*n86*(pow(alpha, n0*n38 - n258*n7)*n100*n153/(n251*n99) + pow(alpha, n0*n38 - n258*n7)*n100*n25*n40*n7/(n251*n99) + pow(alpha, -n258*n7 + n62)*n229*n25*n255*n7 + n44*n69*n88)/n380 + n184*n86*(pow(alpha, n0*n38 - n258*n8)*n100*n25*n40*n8/(n251*n99) + pow(alpha, n0*n38 - n258*n8)*n100*n40*n45/(n251*n99) + pow(alpha, -n258*n8 + n62)*n229*n25*n255*n8 + n45*n70*n88)/n381 + n450*n86*xF[0]*(pow(alpha, -n0*n258 + n62)*n229*n39*n88/n249 + n205*n88) + n455*n86*(pow(alpha, n0*n38 - n17*n258)*n100*n148*n25/(n251*n99) + pow(alpha, n0*n38 - n17*n258)*n100*n40*n54/(n251*n99) + pow(alpha, -n17*n258 + n62)*n148*n229*n25/n249 + n208*n88) + n475 + n476 + n477 + n478 + n479 + n480 + n481 + n482 + n483 + n484 + n485 + n486 + n487 + n488 + n489 + n490 + n491 + n492 + n493 + n494 + n579 + n580 + n581 + n582 + n583 + n584 + n585 + n586 + n587 + n588 + n589 + n590 + n591 + n592 + n593 + n594 + n595 + n596 + n597 + n598) - 0.5*n86*n96*xF[0]*(pow(alpha, -n0*n258 + n62)*n0*n1*n229/n249 + n209)*(pow(alpha, -n0*n258 + n62)*n1*n229*n24*n25/n249 + n1*n24*n25*n63)/n396) - n636, -n24);
29334 NP_sqrt_base = fabs(NP_sqrt_base);
29335 NP1 = (-NP_b - sqrt(NP_sqrt_base))/NP_2a;
29336 NT1 = n146*(n254 - log(-pow(alpha, NP1*n0)*n229 + 1));
29337 g0 = MW[1] - Mstar;
29338 g1 = MW[0] - Mstar;
29341 g4 = MW[10] - Mstar;
29342 g5 = MW[11] - Mstar;
29343 g6 = MW[12] - Mstar;
29344 g7 = MW[13] - Mstar;
29345 g8 = MW[14] - Mstar;
29346 g9 = MW[15] - Mstar;
29347 g10 = MW[16] - Mstar;
29348 g11 = MW[17] - Mstar;
29349 g12 = MW[18] - Mstar;
29350 g13 = MW[19] - Mstar;
29351 g14 = MW[2] - Mstar;
29352 g15 = MW[3] - Mstar;
29353 g16 = MW[4] - Mstar;
29354 g17 = MW[5] - Mstar;
29355 g18 = MW[6] - Mstar;
29356 g19 = MW[7] - Mstar;
29357 g20 = MW[8] - Mstar;
29358 g21 = MW[9] - Mstar;
29363 g26 = pow(alpha, -g1);
29364 g27 = pow(alpha, -g4);
29365 g28 = pow(alpha, -g5);
29366 g29 = pow(alpha, -g6);
29367 g30 = pow(alpha, -g7);
29368 g31 = pow(alpha, -g8);
29369 g32 = pow(alpha, -g9);
29370 g33 = pow(alpha, -g10);
29371 g34 = pow(alpha, -g11);
29372 g35 = pow(alpha, -g12);
29373 g36 = pow(alpha, -g13);
29374 g37 = pow(alpha, -g0);
29375 g38 = pow(alpha, -g14);
29376 g39 = pow(alpha, -g15);
29377 g40 = pow(alpha, -g16);
29378 g41 = pow(alpha, -g17);
29379 g42 = pow(alpha, -g18);
29380 g43 = pow(alpha, -g19);
29381 g44 = pow(alpha, -g20);
29382 g45 = pow(alpha, -g21);
29383 g46 = log(xF[0]/xF[1]);
29385 g48 = pow(alpha, NP1*g0);
29386 g49 = pow(alpha, NP1*g1);
29387 g50 = pow(alpha, NP1*g4);
29389 g52 = pow(alpha, NP1*g5);
29390 g53 = pow(alpha, NP1*g6);
29391 g54 = pow(alpha, NP1*g7);
29392 g55 = pow(alpha, NP1*g8);
29393 g56 = pow(alpha, NP1*g9);
29394 g57 = pow(alpha, NP1*g10);
29395 g58 = pow(alpha, NP1*g11);
29396 g59 = pow(alpha, NP1*g12);
29397 g60 = pow(alpha, NP1*g13);
29398 g61 = pow(alpha, NP1*g14);
29399 g62 = pow(alpha, NP1*g15);
29400 g63 = pow(alpha, NP1*g16);
29401 g64 = pow(alpha, NP1*g17);
29402 g65 = pow(alpha, NP1*g18);
29403 g66 = pow(alpha, NP1*g19);
29404 g67 = pow(alpha, NP1*g20);
29405 g68 = pow(alpha, NP1*g21);
29451 g114 = g23/(g3*xF[1]);
29452 g115 = pow(alpha, g0*g47) - 1;
29453 g116 = pow(alpha, g0*g47) - 1;
29454 g117 = pow(alpha, g1*g47) - 1;
29455 g118 = pow(alpha, g14*g47) - 1;
29456 g119 = pow(alpha, g15*g47) - 1;
29457 g120 = pow(alpha, g16*g47) - 1;
29458 g121 = pow(alpha, g17*g47) - 1;
29459 g122 = pow(alpha, g18*g47) - 1;
29460 g123 = pow(alpha, g19*g47) - 1;
29461 g124 = pow(alpha, g20*g47) - 1;
29462 g125 = pow(alpha, g21*g47) - 1;
29463 g126 = pow(alpha, g4*g47) - 1;
29464 g127 = pow(alpha, g47*g5) - 1;
29465 g128 = pow(alpha, g47*g6) - 1;
29466 g129 = pow(alpha, g47*g7) - 1;
29467 g130 = pow(alpha, g47*g8) - 1;
29468 g131 = pow(alpha, g47*g9) - 1;
29469 g132 = pow(alpha, g10*g47) - 1;
29470 g133 = pow(alpha, g11*g47) - 1;
29471 g134 = pow(alpha, g12*g47) - 1;
29472 g135 = pow(alpha, g13*g47) - 1;
29473 g136 = -pow(alpha, g1*g47);
29474 g137 = -pow(alpha, g4*g47);
29475 g138 = -pow(alpha, g47*g5);
29476 g139 = -pow(alpha, g47*g6);
29477 g140 = -pow(alpha, g47*g7);
29478 g141 = -pow(alpha, g47*g8);
29479 g142 = -pow(alpha, g47*g9);
29480 g143 = -pow(alpha, g10*g47);
29481 g144 = -pow(alpha, g11*g47);
29482 g145 = -pow(alpha, g12*g47);
29483 g146 = -pow(alpha, g13*g47);
29484 g147 = -pow(alpha, g14*g47);
29485 g148 = -pow(alpha, g15*g47);
29486 g149 = -pow(alpha, g16*g47);
29487 g150 = -pow(alpha, g17*g47);
29488 g151 = -pow(alpha, g18*g47);
29489 g152 = -pow(alpha, g19*g47);
29490 g153 = -pow(alpha, g20*g47);
29491 g154 = -pow(alpha, g21*g47);
29493 g156 = -g136 - g49;
29494 g157 = -g137 - g50;
29495 g158 = -g138 - g52;
29496 g159 = -g139 - g53;
29497 g160 = -g140 - g54;
29498 g161 = -g141 - g55;
29499 g162 = -g142 - g56;
29500 g163 = -g143 - g57;
29501 g164 = -g144 - g58;
29502 g165 = -g145 - g59;
29503 g166 = -g146 - g60;
29504 g167 = -g147 - g61;
29505 g168 = -g148 - g62;
29506 g169 = -g149 - g63;
29507 g170 = -g150 - g64;
29508 g171 = -g151 - g65;
29509 g172 = -g152 - g66;
29510 g173 = -g153 - g67;
29511 g174 = -g154 - g68;
29512 g175 = pow(alpha, g1*g47) + g93;
29514 g177 = pow(alpha, g4*g47) + g94;
29515 g178 = pow(alpha, g47*g5) + g95;
29516 g179 = pow(alpha, g47*g6) + g96;
29517 g180 = pow(alpha, g47*g7) + g97;
29518 g181 = pow(alpha, g47*g8) + g98;
29519 g182 = pow(alpha, g47*g9) + g99;
29520 g183 = pow(alpha, g10*g47) + g100;
29521 g184 = pow(alpha, g11*g47) + g101;
29522 g185 = pow(alpha, g12*g47) + g102;
29523 g186 = pow(alpha, g13*g47) + g103;
29524 g187 = pow(alpha, g14*g47) + g104;
29525 g188 = pow(alpha, g15*g47) + g105;
29526 g189 = pow(alpha, g16*g47) + g106;
29527 g190 = pow(alpha, g17*g47) + g107;
29528 g191 = pow(alpha, g18*g47) + g108;
29529 g192 = pow(alpha, g19*g47) + g109;
29530 g193 = pow(alpha, g20*g47) + g110;
29531 g194 = pow(alpha, g21*g47) + g111;
29534 g197 = xF[11]/g178;
29537 g200 = xF[10]/g177;
29538 g201 = xF[19]/g186;
29539 g202 = xF[17]/g184;
29540 g203 = xF[15]/g182;
29541 g204 = xF[16]/g183;
29544 g207 = xF[12]/g179;
29545 g208 = xF[13]/g180;
29547 g210 = xF[14]/g181;
29550 g213 = xF[18]/g185;
29552 g215 = xF[17]/g164;
29556 g219 = xF[15]/g162;
29558 g221 = xF[11]/g158;
29559 g222 = xF[18]/g165;
29561 g224 = xF[13]/g160;
29562 g225 = xF[16]/g163;
29565 g228 = xF[14]/g161;
29567 g230 = xF[12]/g159;
29568 g231 = xF[19]/g166;
29569 g232 = xF[10]/g157;
29612 g275 = log(g114*g176*g24/g73);
29613 g276 = log(g114*g155*g24/g72);
29614 g277 = log(g176*g25*g70/g116);
29616 g279 = log(g155*g25*g70/g115);
29618 g281 = -g112*xF[0] - g112*xF[10] - g112*xF[11] - g112*xF[12] - g112*xF[13] - g112*xF[14] - g112*xF[15] - g112*xF[16] - g112*xF[17] - g112*xF[18] - g112*xF[19] - g112*xF[1] - g112*xF[2] - g112*xF[3] - g112*xF[4] - g112*xF[5] - g112*xF[6] - g112*xF[7] - g112*xF[8] - g112*xF[9] - g116*g198*g280 - g195*g278*(g111 + 1) - g195*g280*(pow(alpha, g21*g47) - 1) - g196*g278*(g110 + 1) - g196*g280*(pow(alpha, g20*g47) - 1) - g197*g278*(g95 + 1) - g197*g280*(pow(alpha, g47*g5) - 1) - g198*g278*g73 - g199*g278*(g105 + 1) - g199*g280*(pow(alpha, g15*g47) - 1) - g200*g278*(g94 + 1) - g200*g280*(pow(alpha, g4*g47) - 1) - g201*g278*(g103 + 1) - g201*g280*(pow(alpha, g13*g47) - 1) - g202*g278*(g101 + 1) - g202*g280*(pow(alpha, g11*g47) - 1) - g203*g278*(g99 + 1) - g203*g280*(pow(alpha, g47*g9) - 1) - g204*g278*(g100 + 1) - g204*g280*(pow(alpha, g10*g47) - 1) - g205*g278*(g109 + 1) - g205*g280*(pow(alpha, g19*g47) - 1) - g206*g278*(g106 + 1) - g206*g280*(pow(alpha, g16*g47) - 1) - g207*g278*(g96 + 1) - g207*g280*(pow(alpha, g47*g6) - 1) - g208*g278*(g97 + 1) - g208*g280*(pow(alpha, g47*g7) - 1) - g209*g278*(g108 + 1) - g209*g280*(pow(alpha, g18*g47) - 1) - g210*g278*(g98 + 1) - g210*g280*(pow(alpha, g47*g8) - 1) - g211*g278*(g104 + 1) - g211*g280*(pow(alpha, g14*g47) - 1) - g212*g278*(g107 + 1) - g212*g280*(pow(alpha, g17*g47) - 1) - g213*g278*(g102 + 1) - g213*g280*(pow(alpha, g12*g47) - 1) - g214*g278*(g93 + 1) - g214*g280*(pow(alpha, g1*g47) - 1);
29619 LpF = xF[0]*(g26 + 1.0)*(g252*g276 + g255*g279 + g69)/(g51*(g26 - 1.0)) + xF[10]*(g27 + 1.0)*(g251*g276 + g272*g279 + g69)/(g51*(g27 - 1.0)) + xF[11]*(g28 + 1.0)*(g248*g276 + g257*g279 + g69)/(g51*(g28 - 1.0)) + xF[12]*(g29 + 1.0)*(g235*g276 + g268*g279 + g69)/(g51*(g29 - 1.0)) + xF[13]*(g30 + 1.0)*(g244*g276 + g269*g279 + g69)/(g51*(g30 - 1.0)) + xF[14]*(g31 + 1.0)*(g250*g276 + g267*g279 + g69)/(g51*(g31 - 1.0)) + xF[15]*(g32 + 1.0)*(g246*g276 + g256*g279 + g69)/(g51*(g32 - 1.0)) + xF[16]*(g33 + 1.0)*(g247*g276 + g265*g279 + g69)/(g51*(g33 - 1.0)) + xF[17]*(g34 + 1.0)*(g237*g276 + g261*g279 + g69)/(g51*(g34 - 1.0)) + xF[18]*(g35 + 1.0)*(g242*g276 + g270*g279 + g69)/(g51*(g35 - 1.0)) + xF[19]*(g36 + 1.0)*(g249*g276 + g274*g279 + g69)/(g51*(g36 - 1.0)) + xF[1]*(g37 + 1.0)*(g254*g276 + g262*g279 + g69)/(g51*(g37 - 1.0)) + xF[2]*(g38 + 1.0)*(g240*g276 + g258*g279 + g69)/(g51*(g38 - 1.0)) + xF[3]*(g39 + 1.0)*(g245*g276 + g259*g279 + g69)/(g51*(g39 - 1.0)) + xF[4]*(g40 + 1.0)*(g238*g276 + g260*g279 + g69)/(g51*(g40 - 1.0)) + xF[5]*(g41 + 1.0)*(g241*g276 + g273*g279 + g69)/(g51*(g41 - 1.0)) + xF[6]*(g42 + 1.0)*(g243*g276 + g266*g279 + g69)/(g51*(g42 - 1.0)) + xF[7]*(g43 + 1.0)*(g239*g276 + g271*g279 + g69)/(g51*(g43 - 1.0)) + xF[8]*(g44 + 1.0)*(g253*g276 + g263*g279 + g69)/(g51*(g44 - 1.0)) + xF[9]*(g45 + 1.0)*(g236*g276 + g264*g279 + g69)/(g51*(g45 - 1.0));
29624 xP[0] = g117*g216*g71;
29625 xP[1] = g115*g223*g71;
29626 xP[2] = g118*g220*g71;
29627 xP[3] = g119*g226*g71;
29628 xP[4] = g120*g218*g71;
29629 xP[5] = g121*g234*g71;
29630 xP[6] = g122*g227*g71;
29631 xP[7] = g123*g233*g71;
29632 xP[8] = g124*g229*g71;
29633 xP[9] = g125*g217*g71;
29634 xP[10] = g126*g232*g71;
29635 xP[11] = g127*g221*g71;
29636 xP[12] = g128*g230*g71;
29637 xP[13] = g129*g224*g71;
29638 xP[14] = g130*g228*g71;
29639 xP[15] = g131*g219*g71;
29640 xP[16] = g132*g225*g71;
29641 xP[17] = g133*g215*g71;
29642 xP[18] = g134*g222*g71;
29643 xP[19] = g135*g231*g71;
29644 xT[0] = g113*g216*g74;
29645 xT[1] = g113*g223*g72;
29646 xT[2] = g113*g220*g75;
29647 xT[3] = g113*g226*g76;
29648 xT[4] = g113*g218*g77;
29649 xT[5] = g113*g234*g78;
29650 xT[6] = g113*g227*g79;
29651 xT[7] = g113*g233*g80;
29652 xT[8] = g113*g229*g81;
29653 xT[9] = g113*g217*g82;
29654 xT[10] = g113*g232*g83;
29655 xT[11] = g113*g221*g84;
29656 xT[12] = g113*g230*g85;
29657 xT[13] = g113*g224*g86;
29658 xT[14] = g113*g228*g87;
29659 xT[15] = g113*g219*g88;
29660 xT[16] = g113*g225*g89;
29661 xT[17] = g113*g215*g90;
29662 xT[18] = g113*g222*g91;
29663 xT[19] = g113*g231*g92;
29676 if (nuc == j || nuc == k)
29709 #ifdef PYNE_DECAY_IS_DUMMY 29719 #ifndef PYNE_IS_AMALGAMATED 29724 namespace decayers {
29726 void decay_h(
double t, std::map<int, double>::const_iterator &it, std::map<int, double> &outcomp,
double (&out)[4]) {
29728 switch (it->first) {
29730 out[0] += it->second;
29733 out[1] += it->second;
29736 double b0 = exp2(-2.572085e-09*t);
29737 out[2] += (it->second) * (b0);
29738 out[3] += (it->second) * (-1.000000e+00*b0 + 1.0);
29741 outcomp.insert(*it);
29747 void decay_he(
double t, std::map<int, double>::const_iterator &it, std::map<int, double> &outcomp,
double (&out)[4]) {
29749 switch (it->first) {
29751 out[3] += it->second;
29754 outcomp.insert(*it);
29760 std::map<int, double>
decay(std::map<int, double> comp,
double t) {
29765 double out [4] = {};
29766 map<int, double> outcomp;
29769 map<int, double>::const_iterator it = comp.begin();
29770 for (; it != comp.end(); ++it) {
29773 decay_h(t, it, outcomp, out);
29779 outcomp.insert(*it);
29785 for (i = 0; i < 4; ++i)
29792 10010000, 10020000, 10030000, 20030000
29798 #endif // PYNE_DECAY_IS_DUMMY// std::map< std::string, unsigned int > altnames
Mapping between alternative names for reactions and the reaction id.
unsigned int hash(std::string s)
std::vector< int > beta_parent(double energy, double error)
double prod_per_feed(double x_feed, double x_prod, double x_tail)
Computes the product per feed mass ratio for feed, product, and tails enrichments x_feed...
struct pyne::alpha alpha
a struct matching the '/decay/alphas' table in nuc_data.h5.
name_zz_t::iterator name_zz_iter
name and Z num iter type
static void _load_simple_xs_map(std::string energy)
comp_map::iterator comp_iter
Nuclide-mass composition iter type.
std::map< std::pair< int, int >, decay > decay_data
Mapping from a pair of nuclides in id form to a struct containing data associated with the decay from...
A struct matching the dose factor table in nuc_data.h5.
std::vector< double > ec_intensity(int parent)
Value & operator[](ArrayIndex index)
Access an array element (zero based index ).
double to_dbl(std::string s)
Converts a valid string to a float using atof().
zz_group name_to_zz_group(name_group eg)
Converts a name group to a Z number group.
std::map< std::string, std::map< int, std::map< int, double > > > simple_xs_map
map<energy, map<nuclide, map<rx, xs> > >
Material()
empty constructor
int ensdf_to_id(const char *nuc)
std::map< unsigned int, std::string > id_name
Mapping from reaction ids to reaction names.
void norm_comp()
Normalizes the mass values in the composition.
double x_prod_j
enrichment of the j-th isotope in the product stream
struct pyne::material_data material_data
A stuct for reprensenting fundemental data in a material.
double yield_fast_err
fast yield error [fraction]
bool operator>(const Value &other) const
std::string fluka_material_component(int fid, int nucid, std::string fluka_name)
Intermediate level call to prepare final info and call material_line(..)
std::string fluka_format_field(float field)
Convenience function to format a single fluka field.
std::vector< std::string > Members
struct pyne::atomic atomic
Structure for atomic data.
std::map< int, atomic > atomic_data_map
comp_map mult_by_mass()
Returns a composition map that has been unnormalized by multiplying each mass weight by the actual ma...
double yield_thermal
thermal yield [fraction]
Material set_range(int lower=0, int upper=10000000, double value=0.0)
Creates a new Material with the mass weights for all nuclides in the id range set to value...
std::map< int, double > q_val_map
Mapping from nuclides in id form to their q_values and the fraction of Q that comes from gammas...
name_group LAN
lanthanide name group
zz_group lan
lanthanide Z number group
Value get(ArrayIndex index, const Value &defaultValue) const
If the array contains at least index+1 elements, returns the element value, otherwise returns default...
Value(ValueType type=nullValue)
Create a default Value of the given type.
Cascade solve_symbolic(Cascade &orig_casc)
A multicomponent enrichment cascade solver using a symbolic solution to the mass flow rate equations...
Material decay(double t)
Decays this material for a given amount of time in seconds.
double ext_soil_dose(int nuc, int source)
Function for External Soil Dose Factors.
std::vector< std::pair< double, double > > gamma_energy(int parent)
double b(int nuc)
Computes the scattering length [cm] from the coherent and incoherent components.
void clear()
Remove all object members and array elements.
std::ostream & operator<<(std::ostream &sout, const Value &root)
Output using the StyledStreamWriter.
bool allowComments_
true if comments are allowed. Default: true.
name_t MA_array[10]
array of minor actinide names
double branch_ratio(std::pair< int, int > from_to)
Returns the branch ratio for a parent/child nuclide pair.
bool isConvertibleTo(ValueType other) const
std::string get_flag(char line[], int max_l)
Finds and returns the first white-space delimited token of a line.
const_iterator end() const
std::vector< int > ecbp_parent(double energy, double error)
Custom exception for when an enrichment solver iteration has produced a NaN.
Material expand_elements()
Returns a copy of the current material where all natural elements in the composition are expanded to ...
std::vector< std::pair< int, int > > gamma_from_to(int parent)
Writes a Value in JSON format in a human friendly way, to a stream rather than to a string...
bool isnuclide(std::string nuc)
std::string source_string(int source)
Functions for Source Location in nuc_data.h5 and related Map Pointers.
std::string natural_naming(std::string name)
Calculates a version of the string name that is also a valid variable name.
Features()
Initialize the configuration like JsonConfig::allFeatures;.
std::map< int, double > decay(std::map< int, double > comp, double t)
std::string fluka_material_str(int id)
High level call to get details and call material_component(..)
bool isEqual(const SelfType &other) const
Json::LargestInt LargestInt
bool operator<(const CapacityConstraint< T > &lhs, const CapacityConstraint< T > &rhs)
CapacityConstraint-CapacityConstraint comparison operator, allows usage in ordered containers...
Value removeMember(const char *key)
Remove and return the named member.
double dose_ratio(int nuc, int source)
Dose Ratio.
double swu_per_feed(double x_feed, double x_prod, double x_tail)
Computes the swu per feed ratio for feed, product, and tails enrichments x_feed, x_prod, and x_tails.
static const LargestUInt maxLargestUInt
Maximum unsigned integer value that can be stored in a Json::Value.
const char * c_str() const
int nist_to_id(const char *nuc)
std::string getComment(CommentPlacement placement) const
Include delimiters and embedded newlines.
void _insert_atomic_mass_map()
function to create mapping from nuclides in id form to their atomic masses
std::string last_char(std::string s)
Returns the last character in a string.
Custom exception to be thrown in the event that a required file is not able to be found...
const double Bq_per_Ci
Becquerel per Curie.
std::string dose_lung_model(int nuc, int source)
Lung Model.
bool operator!=(const Value &other) const
int alara_to_id(const char *nuc)
std::vector< double > beta_endpoint_energy(int parent)
complex type struct, matching PyTables definition
void _load_dose_map(std::map< int, dose > &dm, std::string source_path)
Loads the dose factor data from the nuc_data.h5 file into memory according to the user-input source...
std::map< std::string, std::string > get_data_checksums()
int metastable_id(int nuc, int m)
Returns the nuc_id of a metastable state.
name_group MA
minor actinide name group
Cascade()
default constructors
static const LargestInt minLargestInt
Minimum signed integer value that can be stored in a Json::Value.
double ingest_dose(int nuc, int source)
Functions for Ingestion Dose Factors and Fraction of activity that is absorbed by body fluids...
int nuc
nuclide in id form
Material del_range(int lower=0, int upper=10000000)
Creates a new Material with the all nuclides in the id range removed.
std::vector< double > beta_average_energy(int parent)
std::vector< std::pair< double, double > > gamma_total_intensity(int parent)
void decay_c(double t, std::map< int, double >::const_iterator &it, std::map< int, double > &outcomp, double(&out)[4141])
std::string getFormatedErrorMessages() const
Returns a user friendly string that list errors in the parsed document.
Value key() const
Return either the index or the member name of the referenced value as a Value.
Experimental and untested: represents an element of the "path" to access a node.
double coth(double x)
The hyperbolic cotangent function.
std::vector< std::pair< double, double > > betas(int parent_state_id)
std::map< int, double > atomic_mass_map
Mapping from nuclides in id form to their atomic masses.
Json::ArrayIndex ArrayIndex
std::map< int, double > natural_abund_map
Mapping from nuclides in id form to their natural abundances.
double yield_14MeV
14 MeV yield [fraction]
double l_t_per_feed
Total flow rate per feed rate.
const double barns_per_cm2
barns per cm^2
Material collapse_elements(std::set< int > exception_znum)
virtual std::string write(const Value &root)
Serialize a Value in JSON format.
Cascade default_uranium_cascade
a cascade instance with default values for a uranium enrichment.
int map_metastable[TOTAL_STATE_MAPS]
virtual std::string write(const Value &root)
Lightweight wrapper to tag static string.
static const unsigned int unknown
Unknown size marker.
std::map< std::pair< int, unsigned int >, level_data > level_data_rx_map
ValueConstIterator const_iterator
double yield_fast
fast yield [fraction]
double yield_thermal_err
thermal yield error [fraction]
void * _fill_maps()
A helper function to set the contents of the variables in this library.
std::string fluka(int nuc)
double swu_per_prod
This is the SWU for 1 kg of Product material.
std::string PYNE_DATA
Path to the directory containing the PyNE data.
std::map< int, double > to_atom_dens()
Returns a mapping of the nuclides in this material to their atom densities.
std::vector< std::pair< double, double > > decay_photon_branch_ratios(int parent)
Structure for atomic data.
bool ternary_ge(int a, int b, int c)
Returns true if a <= b <= c and flase otherwise.
struct pyne::ecbp ecbp
A struct matching the '/decay/ecbp' table in nuc_data.h5.
bool operator!() const
Return isNull()
double mass
mass (in arbitrary units) of the Material.
std::vector< std::pair< double, double > > xrays(int parent)
bool operator()(const std::pair< int, double > &lhs, const std::pair< int, double > &rhs) const
This operator compares the second item in a pair first.
static bool in(Reader::Char c, Reader::Char c1, Reader::Char c2, Reader::Char c3, Reader::Char c4, Reader::Char c5)
Cascade solve_numeric(Cascade &orig_casc, double tolerance=1.0E-7, int max_iter=100)
Finds the total flow rate (L) over the feed flow rate (F), the number of enriching stages (N)...
bool isValidIndex(ArrayIndex index) const
Return true if index < size().
std::string name(int nuc)
std::string to_lower(std::string s)
Returns an all lower case copy of the string.
std::map< int, double > b_map
Mapping from nuclides in id form to their scattering length.
bool parse(const std::string &document, Value &root, bool collectComments=true)
Read a Value from a JSON document.
void _load_q_val_map()
Loads the q_value data from the nuc_data.h5 file into memory.
double gamma_frac(int nuc)
A stuct for reprensenting fundemental data in a material.
double prod_per_tail(double x_feed, double x_prod, double x_tail)
Computes the product per tails mass ratio for feed, product, and tails enrichments x_feed...
std::string asString() const
const double N_A
Avogadro's Number.
static const UInt maxUInt
Maximum unsigned int value that can be stored in a Json::Value.
#define JSON_ASSERT_MESSAGE(condition, message)
std::vector< std::pair< double, double > > decay_beta_branch_ratios(int parent)
std::vector< double > ecbp_endpoint_energy(int parent)
returns a list of electron capture/ beta plus decay endpoint energies from input parent nuclide ...
AllocatedType * allocate()
allocate space for an array of objectPerAllocation object.
std::map< std::string, unsigned int > name_id
Mapping from reaction names to reaction ids.
double Mstar
mass separation factor
void load_json(Json::Value)
Loads a JSON instance tree into this Material.
name_t FP_array[88]
array of fission product names
Material operator/(double)
Divides a material's mass.
xd_complex_t b_coherent(int nuc)
Finds the coherent scattering length [cm] for a nuclide nuc.
int id_to_state_id(int nuc_id)
void setComment(const char *comment, CommentPlacement placement)
Comments must be //... or /* ... */.
int id_from_level(int nuc, double level)
Returns the nuc_id of an energy level.
std::map< std::pair< int, double >, alpha > alpha_data
A vector of structs containing alpha data for access in memory.
double dose_fluid_frac(int nuc, int source)
Fluid Fraction.
Material operator+(double)
Adds mass to a material instance.
a struct matching the '/neutron/wimsd_fission_product' table in nuc_data.h5.
name_t LAN_array[15]
array of lanthanide names
Configuration passed to reader and writer.
std::map< unsigned int, unsigned int > mt_id
Mapping from MT numbers to reaction names.
const Value & resolve(const Value &root) const
void _load_atomic_mass_map_memory()
main function to be called when you whish to load the nuclide data into memory
static std::string alphabet
uppercase alphabetical characters
Material sub_elem(int element)
Creates a sub-Material of only the given element.
a comment placed on the line before a value
void write_json(char *filename)
Writes the Material out to a JSON file.
zzname_t zz_fluka
nucid to fluka-name map
static std::string fluka_mat_strings[]
int fluka_to_id(std::string name)
Custom exception for when a path is not found in an HDF5 file.
a struct matching the '/decay/betas' table in nuc_data.h5.
static const UInt64 maxUInt64
Maximum unsigned 64 bits int value that can be stored in a Json::Value.
bool contains_substring(std::string s, std::string substr)
Returns true if substr is in s.
def memcpy(dest, src, size)
pyne::Material mat_prod
product material
std::vector< int > gamma_parent(double energy, double error)
zzname_t get_zz_fluka()
Creates standard nucid to fluka-name mapping.
std::vector< int > beta_child(double energy, double error)
std::vector< std::pair< int, int > > gamma_parent_child(double energy, double error)
static const Int64 maxInt64
Maximum signed 64 bits int value that can be stored in a Json::Value.
bool toggle_warnings()
Toggles warnings on and off.
std::vector< int > ecbp_child(double energy, double error)
Material sub_fp()
Creates a sub-Material of only fission products.
double endftod_f(char *s)
Converts a string from ENDF format to a float.
void _recompute_nm(Cascade &casc, double tolerance=1.0E-7)
So,ves for valid stage numbers N &nd M of a casc.
std::map< name_t, zz_t > name_zz_t
name and Z num map type
SelfType & operator=(const ValueIteratorBase &other)
std::string NUC_DATA_PATH
Path to the nuc_data.h5 file.
a struct matching the q_value table in nuc_data.h5.
bool not_fluka_builtin(std::string fluka_name)
Convenience function to tell whether a given name needs a material card.
void enableYAMLCompatibility()
Value & make(Value &root) const
Creates the "path" to access the specified node and returns a reference on the node.
Material sub_ma()
Creates a sub-Material of only minor actinides.
double feed_per_prod(double x_feed, double x_prod, double x_tail)
Computes the feed per product mass ratio for feed, product, and tails enrichments x_feed...
bool operator>=(const Value &other) const
std::map< std::pair< int, double >, beta > beta_data
A vector of structs containing beta data for access in memory.
Outputs a Value in JSON format without formatting (not human friendly).
#define NUM_RX_NAMES
Number of reactions supported by default.
int child(int nuc, unsigned int rx, std::string z="n")
static std::string codePointToUTF8(unsigned int cp)
Converts a unicode code-point to UTF-8.
double yield_fast
fast yield [fraction]
a struct matching the '/decay/alphas' table in nuc_data.h5.
void _recompute_prod_tail_mats(Cascade &casc)
This function takes a given initial guess number of enriching and stripping stages for a given compos...
Enrichment Component Class and Functions.
void write_hdf5(char *filename, char *datapath, char *nucpath, float row=-0.0, int chunksize=100)
Writes this material out to an HDF5 file.
double alphastar_i(double alpha, double Mstar, double M_i)
Computes the nuclide-specific stage separation factor from the overall stage separation factor alpha...
std::map< zz_t, name_t > zzname_t
Z num to name map type.
const double Ci_per_Bq
Curies per Becquerel.
Cascade _fill_default_uranium_cascade()
Greates a cascade instance with default values for a uranium enrichment.
int state_id_to_id(int state)
zz_group act
actinide Z number group
std::map< std::pair< std::string, int >, unsigned int > offset_id
Mapping from particle type and offset pairs to reaction ids.
static const Int minInt
Minimum signed int value that can be stored in a Json::Value.
void normalize()
Normalizes the mass.
std::map< int, dose > genii_dose_map
void resize(ArrayIndex size)
Resize the array to size elements.
Value & operator=(const Value &other)
std::map< int, double > comp_map
Nuclide-mass composition map type.
std::string valueToString(LargestInt value)
double yield_fast_err
fast yield error [fraction]
void _load_comp_protocol1(hid_t db, std::string datapath, int row)
Loads the matrial composition from an HDF5 file according to the layout defined by protocol 1...
bool isMember(const char *key) const
Return true if the object has a member named key.
void _load_scattering_lengths()
Loads the scattering length data from the nuc_data.h5 file into memory.
static bool isControlCharacter(char ch)
Returns true if ch is a control character (in range [0,32[).
std::string to_str(int t)
struct pyne::dose dose
A struct matching the dose factor table in nuc_data.h5.
a struct matching the '/decay/decays' table in nuc_data.h5.
std::map< CZString, Value > ObjectValues
std::string nist(int nuc)
double state_energy(int nuc)
Returns the excitation energy [MeV] of a nuc in a given state.
double yield_14MeV
14 MeV yield [fraction]
BatchAllocator(unsigned int objectsPerPage=255)
std::map< std::pair< std::string, unsigned int >, int > id_offset
Mapping from particle type and reaction ids to offsets.
static const Int64 minInt64
Minimum signed 64 bits int value that can be stored in a Json::Value.
std::string name_t
name type
double mass_density(double num_dens=-1.0, double apm=-1.0)
Computes, sets, and returns the mass density when num_dens is greater than or equal zero...
double inhale_dose(int nuc, int source)
Functions for Inhalation Dose Factors and Lung Model used to obtain dose factors. ...
double endftod_cpp(char *s)
Converts a string from ENDF format to a float.
int cinder_to_id(int nuc)
Reader()
Constructs a Reader allowing all features for parsing.
std::vector< std::pair< double, double > > xrays()
Returns a list of x-rays average energies in keV and intensities in decays/s material unnormalized...
std::string zzllaaam(int nuc)
a struct matching the '/decay/level_list' table in nuc_data.h5.
void _load_ndsfpy()
Loads the NDS fission product yield data from the nuc_data.h5 file into memory.
bool hasComment(CommentPlacement placement) const
A struct matching the '/decay/ecbp' table in nuc_data.h5.
std::string slice_from_end(std::string s, int n=-1, int l=1)
Returns the slice of a string s using the negative index n and the length of the slice l...
std::vector< std::pair< double, double > > ecbp_xrays(int parent)
std::vector< std::pair< double, double > > gamma_photon_intensity(int parent)
#define JSON_ASSERT_UNREACHABLE
std::vector< std::pair< double, double > > normalize_radioactivity(std::vector< std::pair< double, double > > unnormed)
Takes a list of photon energies and intensities and normalizes them so the sum of the intensities is ...
double natural_abund(int nuc)
Returns the natural abundance of a nuclide nuc.
std::vector< std::pair< double, double > > calculate_xray_data(int z, double k_conv, double l_conv)
double ext_air_dose(int nuc, int source)
Returns the dose factors of a nuclide.
std::vector< std::pair< double, double > > gamma_conversion_intensity(int parent)
name_group ACT
actinide name group
comp_map comp
composition, maps nuclides in id form to normalized mass weights.
static void uintToString(LargestUInt value, char *¤t)
Converts an unsigned integer to string.
object value (collection of name/value pairs).
static Features all()
A configuration that allows all features and assumes all strings are UTF-8.
std::pair< double, double > decay_photon_branch_ratio(std::pair< int, int >)
comp_map decay_heat()
Calculates the decay heat of a material based on the composition and each nuclide's mass...
Json::LargestUInt LargestUInt
name_group FP
fission product name group
name_t TRU_array[22]
array of transuranic names
std::string fluka_material_line(int znum, double atomic_mass, int fid, std::string fluka_name)
Format information into a FLUKA material card.
Custom exception for declaring a simple_xs request invalid.
std::map< std::pair< int, double >, ecbp > ecbp_data
A vector of structs containing ecbp data for access in memory.
Material sub_lan()
Creates a sub-Material of only lanthanides.
xd_complex_t b_incoherent(int nuc)
Finds the incoherent scattering length [cm] for a nuclide nuc.
Material del_mat(std::set< int > nucset)
Creates a new Material with the all nuclides in nucset removed.
int to_int(std::string s)
Converts a string of digits to an int using atoi().
void swap(Value &other)
Swap values.
std::map< int, pyne::dose > & dose_source_map(int source)
name_zz_t fluka_zz
fluka-name to nucid map
Material sub_range(int lower=0, int upper=10000000)
Creates a sub-Material based on a range of id-form integers.
char UIntToStringBuffer[uintToStringBufferSize]
int parent(int nuc, unsigned int rx, std::string z="n")
CustomWriter(std::string opencurly="{", std::string closecurly="}", std::string opensquare="[", std::string closesquare="]", std::string colon=":", std::string comma=",", std::string indent=" ", int maxWidth=74)
double alpha
stage separation factor
ValueType
Type of the value held by a Value object.
struct pyne::decay decay
a struct matching the '/decay/decays' table in nuc_data.h5.
double _deltaU_i_OverG(Cascade &casc, int i)
Solves for a stage separative power relevant to the ith component per unit of flow G...
std::map< int, xd_complex_t > b_coherent_map
Mapping from nuclides in id form to their coherent scattering length.
std::string toStyledString() const
struct pyne::gamma gamma
a struct matching the '/decay/gammas' table in nuc_data.h5.
double q_val(int nuc)
Returns the q_value of a nuclide nuc.
std::string to_upper(std::string s)
switches endftod to fast cpp version
Cascade multicomponent(Cascade &orig_casc, char *solver, double tolerance=1.0E-7, int max_iter=100)
void decay_he(double t, std::map< int, double >::const_iterator &it, std::map< int, double > &outcomp, double(&out)[4141])
zz_group fp
fission product Z number group
const double MeV_per_MJ
MeV per MJ.
struct pyne::level_data level_data
a struct matching the '/decay/level_list' table in nuc_data.h5.
a struct matching the '/decay/gammas' table in nuc_data.h5.
comp_map dose_per_g(std::string dose_type, int source=0)
Caclulates the dose per gram using the composition of the the material, the dose type desired...
void _reset_xjs()
Sets x_feed_j to j-th value of mat_feed.
JSON (JavaScript Object Notation).
a comment just after a value on the same line
static void releaseStringValue(char *value)
Free the string duplicated by duplicateStringValue().
void _load_atomic_mass_map()
Loads the atomic mass and natural abundance data from the nuc_data.h5 file into memory.
#define JSON_FAIL_MESSAGE(message)
int nuc
nuclide in id form
std::string serpent(int nuc)
void _load_comp_protocol0(hid_t db, std::string datapath, int row)
Loads the matrial composition from an HDF5 file according to the layout defined by protocol 0...
static bool containsControlCharacter(const char *str)
std::istream & operator>>(std::istream &sin, Value &root)
Read from 'sin' into 'root'.
std::string mcnp(std::string frac_type="mass")
Return an mcnp input deck record as a string.
base class for Value iterators.
std::set< std::string > fluka_builtin(pyne::fluka_mat_strings, pyne::fluka_mat_strings+pyne::FLUKA_MAT_NUM)
------------------------------------------------------------------------—// Create a set out of the ...
int map_nuc_ids[TOTAL_STATE_MAPS]
double tail_per_feed(double x_feed, double x_prod, double x_tail)
Computes the tails per feed mass ratio for feed, product, and tails enrichments x_feed, x_prod, and x_tails.
int j
Component to enrich (U-235), id form.
std::vector< int > alpha_child(double energy, double error)
std::map< std::pair< int, double >, level_data > level_data_lvl_map
Mapping from nuclides in id form to a struct containing data associated with that level...
Custom exception for invalid HDF5 protocol numbers.
std::vector< std::pair< double, double > > gamma_xrays(int parent)
std::vector< double > beta_intensity(int parent)
double slope(double x2, double y2, double x1, double y1)
Finds the slope of a line from the points (x1, y1) and (x2, y2).
double N
number of enriching stages
bool iselement(std::string nuc)
std::vector< T > data_access(double emin, double emax, size_t valoffset, std::map< std::pair< int, double >, U > &data)
Access data in a std::map<std::pair<int, double> for a range of values of the second member of the pa...
name_group TRU
transuranic name group
comp_map activity()
Calculates the activity of a material based on the composition and each nuclide's mass...
static std::string words
string of all valid word characters for variable names in programing languages.
double yield_14MeV_err
14 MeV yield error [fraction]
std::vector< double > ecbp_average_energy(int parent)
zz_group ma
minor actinide Z number group
name_zz_t name_zz
name to Z num map
std::map< std::pair< int, int >, ndsfpysub > ndsfpy_data
UInt index() const
Return the index of the referenced Value. -1 if it is not an arrayValue.
double swu_per_tail(double x_feed, double x_prod, double x_tail)
Computes the swu per tails ratio for feed, product, and tails enrichments x_feed, x_prod...
int zzllaaam_to_id(const char *nuc)
double yield_14MeV_err
14 MeV yield error [fraction]
Path(const std::string &path, const PathArgument &a1=PathArgument(), const PathArgument &a2=PathArgument(), const PathArgument &a3=PathArgument(), const PathArgument &a4=PathArgument(), const PathArgument &a5=PathArgument())
std::map< unsigned int, std::string > labels
Mapping from reaction ids to labels (short descriptions).
ArrayIndex size() const
Number of values in array or object.
double M
number of stripping stages
std::vector< double > decay_branch_ratios(int parent)
std::set< std::string > names
Set of reaction names, must be valid variable names.
std::set< int > decay_children(int nuc)
Returns a set of decay children of a nuc.
a comment on the line after a value (only make sense for root value)
const double cm2_per_barn
cm^2 per barn
name_zz_t get_fluka_zz()
Creates standard fluka-name to nucid mapping.
struct pyne::beta beta
a struct matching the '/decay/betas' table in nuc_data.h5.
zzname_t get_zz_name()
Creates standard Z number to name mapping.
void from_atom_frac(std::map< int, double > atom_fracs)
Sets the composition, mass, and atoms_per_molecule of this material to those calculated from atom_fra...
double swu_per_prod(double x_feed, double x_prod, double x_tail)
Computes the swu per product ratio for feed, product, and tails enrichments x_feed, x_prod, and x_tails.
std::string alara(int nuc)
static std::string digits
string of digit characters
void copy(const SelfType &other)
a struct matching the atomic_mass table in nuc_data.h5.
double yields
fission product yield, fraction [unitless]
std::string fluka_compound_str(int id, std::string frac_type="mass")
Return FLUKA compound card and the material card for the named compound but not the material cards of...
std::vector< int > gamma_child(double energy, double error)
Custom exception for when an existing file is not in a valid HDF5 format.
std::string valueToQuotedString(const char *value)
std::vector< double > bp_intensity(int parent)
name_group::iterator name_group_iter
name grouping iter type
void decay_br(double t, std::map< int, double >::const_iterator &it, std::map< int, double > &outcomp, double(&out)[4141])
std::map< unsigned int, unsigned int > id_mt
Mapping from reaction ids to MT numbers.
a struct matching the '/neutron/nds_fission_product' table in nuc_data.h5
LargestInt asLargestInt() const
static bool in(Reader::Char c, Reader::Char c1, Reader::Char c2, Reader::Char c3, Reader::Char c4)
std::string capitalize(std::string s)
Returns a capitalized copy of the string.
static hid_t PYTABLES_COMPLEX128
The HDF5 id for a complex data type compatible with PyTables generated data.
SelfType & operator=(const SelfType &other)
bool operator==(const CapacityConstraint< T > &lhs, const CapacityConstraint< T > &rhs)
CapacityConstraint-CapacityConstraint equality operator.
std::map< unsigned int, std::string > docs
Mapping from reaction ids to documentation strings (long descriptions).
~Material()
default destructor
virtual std::string write(const Value &root)
int zzzaaa_to_id(int nuc)
double value_func(double x)
Computes the value or separation potential of an assay x.
std::vector< std::pair< double, double > > photons(bool norm)
Returns a list of photon energies in keV and intensities in decays/s/atom material unnormalized...
static const Int maxInt
Maximum signed int value that can be stored in a Json::Value.
bool operator<=(const Value &other) const
std::map< std::string, std::string > data_checksums
Mapping from nodes in nuc_data.h5 to hashes of nodes.
std::vector< double > alpha_energy(int parent)
void _insert_abund_map()
function to create mapping from nuclides in id form to their natural abundances
std::vector< std::pair< double, double > > gammas(int parent_state_id)
Returns a list of energies and intensities normalized to branching ratios.
bool empty() const
Return true if empty array, empty object, or null; otherwise, false.
void warning(std::string s)
Prints a warning message.
double yield_thermal_err
thermal yield error [fraction]
int serpent_to_id(const char *nuc)
void write(std::ostream &out, const Value &root)
Serialize a Value in JSON format.
double tail_per_prod(double x_feed, double x_prod, double x_tail)
Computes the tails per product mass ratio for feed, product, and tails enrichments x_feed...
void decay_h(double t, std::map< int, double >::const_iterator &it, std::map< int, double > &outcomp, double(&out)[4141])
zz_group tru
transuranic Z number group
const double pi
pi = 3.14159265359
static Features strictMode()
A configuration that is strictly compatible with the JSON specification.
void release(AllocatedType *object)
Release the object.
difference_type computeDistance(const SelfType &other) const
std::pair< double, double > decay_beta_branch_ratio(std::pair< int, int >)
const double MeV_per_K
MeV per Kelvin.
std::map< std::pair< int, double >, gamma > gamma_data
Constant that specify the size of the buffer that must be passed to uintToString. ...
void from_json(char *filename)
Reads data from a JSON file at filename into this Material instance.
std::map< int, double > to_atom_frac()
Returns a mapping of the nuclides in this material to their atom fractions.
double half_life(int nuc)
Returns the half life for a nuclide nuc.
Json::Value dump_json()
Dumps the Material out to a JSON instance tree.
Material set_mat(std::set< int > nucset, double value)
Creates a new Material with the mass weights for all nuclides in nucset set to value.
LargestUInt asLargestUInt() const
std::vector< std::pair< double, double > > alphas(int parent_state_id)
name_t ACT_array[15]
array of actinide names
Unserialize a JSON document into a Value.
std::map< int, int > state_id_map
unsigned long long int UInt64
double decay_const(int nuc)
Returns the decay constant for a nuclide nuc.
std::set< zz_t > zz_group
Z number grouping type (for testing containment)
double yield_thermal
thermal yield [fraction]
The 'pyne' namespace all PyNE functionality is included in.
void write_text(char *filename)
Writes the Material out to a simple plaintext file readable by from_text().
double fpyield(std::pair< int, int > from_to, int source, bool get_error)
Returns the fission product yield for a parent/child nuclide pair.
std::string _names[NUM_RX_NAMES]
Raw array of reaction names.
std::map< int, xd_complex_t > b_incoherent_map
Mapping from nuclides in id form to their incoherent scattering length.
#define JSON_ASSERT(condition)
void _load_wimsdfpy()
Loads the WIMSD fission product yield data from the nuc_data.h5 file into memory. ...
double simple_xs(int nuc, int rx, std::string energy)
returns the microscopic cross section in barns for the specified nuclide, reaction, and energy group.
static const LargestInt maxLargestInt
Maximum signed integer value that can be stored in a Json::Value.
std::vector< std::pair< double, double > > decay_half_lifes(int)
std::string fluka(int id, std::string frac_type="mass")
Return a fluka input deck MATERIAL card as a string.
std::vector< int > decay_data_children(int parent)
Material operator*(double)
Multiplies a material's mass.
int zzaaam_to_id(int nuc)
const double sec_per_day
seconds per day
Top-level enrichment functionality.
name_zz_t get_name_zz()
Creates standard name to Z number mapping.
std::string replace_all_substrings(std::string s, std::string substr, std::string repstr)
Replaces all instance of substr in s with repstr.
static bool containsNewLine(Reader::Location begin, Reader::Location end)
A set of physical parameters used to specify an enrichment cascade.
a struct matching the '/neutron/scattering_lengths' table in nuc_data.h5.
static char * duplicateStringValue(const char *value, unsigned int length=unknown)
Duplicates the specified string value.
void from_text(char *filename)
Reads data from a plaintext file at filename into this Material instance.
Iterator for object and array value.
enable_if< has_const_iterator< T >::value, typename T::const_iterator >::type end(const T &c)
int compare(const Value &other) const
Members getMemberNames() const
Return a list of the member names.
Material sub_tru()
Creates a sub-Material of only transuranics.
bool operator<(const Value &other) const
std::map< int, dose > epa_dose_map
Mapping from int to dose for 3 sources.
double feed_per_tail(double x_feed, double x_prod, double x_tail)
Computes the feed per tails mass ratio for feed, product, and tails enrichments x_feed, x_prod, and x_tails.
double atomic_mass(int nuc)
Returns the atomic mass of a nuclide nuc.
bool file_exists(std::string strfilename)
Returns true if the file can be found.
void pyne_start()
Initializes PyNE based on environment.
zzname_t zz_name
Z num to name map.
void _load_data< level_data >()
Writes a Value in JSON format in a human friendly way.
double(* endftod)(char *s)
endftod function pointer. defaults to fortran
void from_hdf5(char *filename, char *datapath, int row=-1, int protocol=1)
Loads a material from an HDF5 file into this object.
Material composed of nuclides.
std::string remove_characters(std::string s, std::string chars)
Removes all characters in the string chars from s.
int nuc
nuclide in id form
const char * memberName() const
Return the member name of the referenced Value. "" if it is not an objectValue.
const char * asCString() const
Custom exception for declaring a value not to be a valid reaction.
StyledStreamWriter(std::string indentation="\)
Custom expection for declaring that a value does not follow a recognizable nuclide naming convention...
bool strictRoot_
true if root must be either an array or an object value. Default: false.
double solve_line(double x, double x2, double y2, double x1, double y1)
Solves the equation for the line y = mx + b, given x and the points that form the line: (x1...
Value & append(const Value &value)
Append value to array at the end.
std::string getFormattedErrorMessages() const
Returns a user friendly string that list errors in the parsed document.
bool operator==(const Value &other) const
const iterator for object and array value.
Material sub_mat(std::set< int > nucset)
Creates a sub-Material with only the nuclides present in nucset.
int offset(int dz, int da, int ds=0)
A helper function to compute nuclide id offsets from z-, a-, and s- deltas.
double molecular_mass(double apm=-1.0)
Calculates the atomic weight of this material based on the composition and the number of atoms per mo...
a struct for the nds data for fpyield
Material sub_act()
Creates a sub-Material of only actinides.
double swu_per_feed
This is the SWU for 1 kg of Feed material.
std::pair< double, double > decay_branch_ratio(std::pair< int, int >)
T get_array_index(hid_t dset, int n, hid_t dtype=H5T_NATIVE_DOUBLE)
Retrieves the nth index out of the dataset dset (which has an HDF5 datatype dtype).
double tanh(double x)
The hyperbolic tangent function.
std::vector< int > alpha_parent(double energy, double error)
double get_comp_sum()
Computes the total mass stored in the composition.
enable_if< has_const_iterator< T >::value, typename T::const_iterator >::type begin(const T &c)
double x_tail_j
enrichment of the j-th isotope in the tails stream
std::map< std::pair< int, int >, double > wimsdfpy_data
Mapping from nuclides in id form to their scattering length.
void * _
A dummy variable used when calling _fill_maps().
pyne::Material mat_feed
feed material
std::set< name_t > name_group
name grouping type (for testing containment)
double x_feed_j
enrichment of the j-th isotope in the feed stream
std::pair< double, double > decay_half_life(std::pair< int, int >)
std::map< int, double > gamma_frac_map
double number_density(double mass_dens=-1.0, double apm=-1.0)
Computes and returns the number density of the material using the mass density if mass_dens is greate...
std::vector< double > alpha_intensity(int parent)
int k
Component to de-enrich, or strip (U-238), id form.
pyne::Material mat_tail
tails material
std::map< int, dose > doe_dose_map
~Cascade()
default destructor
bool path_exists(hid_t h5file, std::string path)
Determines if a path exists in an hdf5 file.
std::string remove_substring(std::string s, std::string substr)
Creates a copy of s with all instances of substr taken out.
array value (ordered list)
std::vector< std::pair< double, double > > gammas()
Returns a list of gamma-rays energies in keV and intensities in decays/s/atom material unnormalized...
const_iterator begin() const
Cascade _norm_comp_secant(Cascade &casc, double tolerance=1.0E-7, int max_iter=100)
This function solves the whole system of equations.