#include #include #include #include #include char *name = "Compound Interest"; double f_if(float i, float n) { float r26396 = 100; float r26397 = 1; float r26398 = i; float r26399 = n; float r26400 = r26398 / r26399; float r26401 = r26397 + r26400; float r26402 = pow(r26401, r26399); float r26403 = r26402 - r26397; float r26404 = r26403 / r26400; float r26405 = r26396 * r26404; return r26405; } double f_id(double i, double n) { double r26406 = 100; double r26407 = 1; double r26408 = i; double r26409 = n; double r26410 = r26408 / r26409; double r26411 = r26407 + r26410; double r26412 = pow(r26411, r26409); double r26413 = r26412 - r26407; double r26414 = r26413 / r26410; double r26415 = r26406 * r26414; return r26415; } double f_of(float i, float n) { float r26416 = 1; float r26417 = 1/2; float r26418 = i; float r26419 = r26417 * r26418; float r26420 = r26416 + r26419; float r26421 = -3.5964007201178633e+21; bool r26422 = r26420 <= r26421; float r26423 = 100; float r26424 = n; float r26425 = r26418 / r26424; float r26426 = r26416 + r26425; float r26427 = pow(r26426, r26424); float r26428 = r26427 * r26427; float r26429 = r26428 - r26416; float r26430 = r26427 + r26416; float r26431 = r26429 / r26430; float r26432 = r26431 / r26425; float r26433 = r26423 * r26432; float r26434 = 1.00000000000054; bool r26435 = r26420 <= r26434; float r26436 = 100/3; float r26437 = r26436 * r26418; float r26438 = r26423 + r26437; float r26439 = 25/9; float r26440 = 2; float r26441 = pow(r26418, r26440); float r26442 = r26439 * r26441; float r26443 = r26438 - r26442; float r26444 = cbrt(r26420); float r26445 = r26444 * r26424; float r26446 = r26443 * r26445; float r26447 = 2.3039825294862687e+153; bool r26448 = r26420 <= r26447; float r26449 = r26418 * r26417; float r26450 = r26449 + r26416; float r26451 = log(r26425); float r26452 = r26423 * r26418; float r26453 = log(r26452); float r26454 = r26451 - r26453; float r26455 = exp(r26454); float r26456 = r26450 / r26455; float r26457 = r26448 ? r26433 : r26456; float r26458 = r26435 ? r26446 : r26457; float r26459 = r26422 ? r26433 : r26458; return r26459; } double f_od(double i, double n) { double r26460 = 1; double r26461 = 1/2; double r26462 = i; double r26463 = r26461 * r26462; double r26464 = r26460 + r26463; double r26465 = -3.5964007201178633e+21; bool r26466 = r26464 <= r26465; double r26467 = 100; double r26468 = n; double r26469 = r26462 / r26468; double r26470 = r26460 + r26469; double r26471 = pow(r26470, r26468); double r26472 = r26471 * r26471; double r26473 = r26472 - r26460; double r26474 = r26471 + r26460; double r26475 = r26473 / r26474; double r26476 = r26475 / r26469; double r26477 = r26467 * r26476; double r26478 = 1.00000000000054; bool r26479 = r26464 <= r26478; double r26480 = 100/3; double r26481 = r26480 * r26462; double r26482 = r26467 + r26481; double r26483 = 25/9; double r26484 = 2; double r26485 = pow(r26462, r26484); double r26486 = r26483 * r26485; double r26487 = r26482 - r26486; double r26488 = cbrt(r26464); double r26489 = r26488 * r26468; double r26490 = r26487 * r26489; double r26491 = 2.3039825294862687e+153; bool r26492 = r26464 <= r26491; double r26493 = r26462 * r26461; double r26494 = r26493 + r26460; double r26495 = log(r26469); double r26496 = r26467 * r26462; double r26497 = log(r26496); double r26498 = r26495 - r26497; double r26499 = exp(r26498); double r26500 = r26494 / r26499; double r26501 = r26492 ? r26477 : r26500; double r26502 = r26479 ? r26490 : r26501; double r26503 = r26466 ? r26477 : r26502; return r26503; } void mpfr_fmod2(mpfr_t r, mpfr_t n, mpfr_t d, mpfr_rnd_t rmd) { mpfr_fmod(r, n, d, rmd); if (mpfr_cmp_ui(r, 0) < 0) mpfr_add(r, r, d, rmd); } static mpfr_t r26504, r26505, r26506, r26507, r26508, r26509, r26510, r26511, r26512, r26513; void setup_mpfr_f_im() { mpfr_set_default_prec(3408); mpfr_init_set_str(r26504, "100", 10, MPFR_RNDN); mpfr_init_set_str(r26505, "1", 10, MPFR_RNDN); mpfr_init(r26506); mpfr_init(r26507); mpfr_init(r26508); mpfr_init(r26509); mpfr_init(r26510); mpfr_init(r26511); mpfr_init(r26512); mpfr_init(r26513); } double f_im(double i, double n) { ; ; mpfr_set_d(r26506, i, MPFR_RNDN); mpfr_set_d(r26507, n, MPFR_RNDN); mpfr_div(r26508, r26506, r26507, MPFR_RNDN); mpfr_add(r26509, r26505, r26508, MPFR_RNDN); mpfr_pow(r26510, r26509, r26507, MPFR_RNDN); mpfr_sub(r26511, r26510, r26505, MPFR_RNDN); mpfr_div(r26512, r26511, r26508, MPFR_RNDN); mpfr_mul(r26513, r26504, r26512, MPFR_RNDN); return mpfr_get_d(r26513, MPFR_RNDN); } static mpfr_t r26514, r26515, r26516, r26517, r26518, r26519, r26520, r26521, r26522, r26523, r26524, r26525, r26526, r26527, r26528, r26529, r26530, r26531, r26532, r26533, r26534, r26535, r26536, r26537, r26538, r26539, r26540, r26541, r26542, r26543, r26544, r26545, r26546, r26547, r26548, r26549, r26550, r26551, r26552, r26553, r26554, r26555, r26556, r26557; void setup_mpfr_f_fm() { mpfr_set_default_prec(3408); mpfr_init_set_str(r26514, "1", 10, MPFR_RNDN); mpfr_init_set_str(r26515, "1/2", 10, MPFR_RNDN); mpfr_init(r26516); mpfr_init(r26517); mpfr_init(r26518); mpfr_init_set_str(r26519, "-3.5964007201178633e+21", 10, MPFR_RNDN); mpfr_init(r26520); mpfr_init_set_str(r26521, "100", 10, MPFR_RNDN); mpfr_init(r26522); mpfr_init(r26523); mpfr_init(r26524); mpfr_init(r26525); mpfr_init(r26526); mpfr_init(r26527); mpfr_init(r26528); mpfr_init(r26529); mpfr_init(r26530); mpfr_init(r26531); mpfr_init_set_str(r26532, "1.00000000000054", 10, MPFR_RNDN); mpfr_init(r26533); mpfr_init_set_str(r26534, "100/3", 10, MPFR_RNDN); mpfr_init(r26535); mpfr_init(r26536); mpfr_init_set_str(r26537, "25/9", 10, MPFR_RNDN); mpfr_init_set_str(r26538, "2", 10, MPFR_RNDN); mpfr_init(r26539); mpfr_init(r26540); mpfr_init(r26541); mpfr_init(r26542); mpfr_init(r26543); mpfr_init(r26544); mpfr_init_set_str(r26545, "2.3039825294862687e+153", 10, MPFR_RNDN); mpfr_init(r26546); mpfr_init(r26547); mpfr_init(r26548); mpfr_init(r26549); mpfr_init(r26550); mpfr_init(r26551); mpfr_init(r26552); mpfr_init(r26553); mpfr_init(r26554); mpfr_init(r26555); mpfr_init(r26556); mpfr_init(r26557); } double f_fm(double i, double n) { ; ; mpfr_set_d(r26516, i, MPFR_RNDN); mpfr_mul(r26517, r26515, r26516, MPFR_RNDN); mpfr_add(r26518, r26514, r26517, MPFR_RNDN); ; mpfr_set_si(r26520, mpfr_cmp(r26518, r26519) <= 0, MPFR_RNDN); ; mpfr_set_d(r26522, n, MPFR_RNDN); mpfr_div(r26523, r26516, r26522, MPFR_RNDN); mpfr_add(r26524, r26514, r26523, MPFR_RNDN); mpfr_pow(r26525, r26524, r26522, MPFR_RNDN); mpfr_mul(r26526, r26525, r26525, MPFR_RNDN); mpfr_sub(r26527, r26526, r26514, MPFR_RNDN); mpfr_add(r26528, r26525, r26514, MPFR_RNDN); mpfr_div(r26529, r26527, r26528, MPFR_RNDN); mpfr_div(r26530, r26529, r26523, MPFR_RNDN); mpfr_mul(r26531, r26521, r26530, MPFR_RNDN); ; mpfr_set_si(r26533, mpfr_cmp(r26518, r26532) <= 0, MPFR_RNDN); ; mpfr_mul(r26535, r26534, r26516, MPFR_RNDN); mpfr_add(r26536, r26521, r26535, MPFR_RNDN); ; ; mpfr_pow(r26539, r26516, r26538, MPFR_RNDN); mpfr_mul(r26540, r26537, r26539, MPFR_RNDN); mpfr_sub(r26541, r26536, r26540, MPFR_RNDN); mpfr_cbrt(r26542, r26518, MPFR_RNDN); mpfr_mul(r26543, r26542, r26522, MPFR_RNDN); mpfr_mul(r26544, r26541, r26543, MPFR_RNDN); ; mpfr_set_si(r26546, mpfr_cmp(r26518, r26545) <= 0, MPFR_RNDN); mpfr_mul(r26547, r26516, r26515, MPFR_RNDN); mpfr_add(r26548, r26547, r26514, MPFR_RNDN); mpfr_log(r26549, r26523, MPFR_RNDN); mpfr_mul(r26550, r26521, r26516, MPFR_RNDN); mpfr_log(r26551, r26550, MPFR_RNDN); mpfr_sub(r26552, r26549, r26551, MPFR_RNDN); mpfr_exp(r26553, r26552, MPFR_RNDN); mpfr_div(r26554, r26548, r26553, MPFR_RNDN); if (mpfr_get_si(r26546, MPFR_RNDN)) { mpfr_set(r26555, r26531, MPFR_RNDN); } else { mpfr_set(r26555, r26554, MPFR_RNDN); }; if (mpfr_get_si(r26533, MPFR_RNDN)) { mpfr_set(r26556, r26544, MPFR_RNDN); } else { mpfr_set(r26556, r26555, MPFR_RNDN); }; if (mpfr_get_si(r26520, MPFR_RNDN)) { mpfr_set(r26557, r26531, MPFR_RNDN); } else { mpfr_set(r26557, r26556, MPFR_RNDN); }; return mpfr_get_d(r26557, MPFR_RNDN); } static mpfr_t r26558, r26559, r26560, r26561, r26562, r26563, r26564, r26565, r26566, r26567, r26568, r26569, r26570, r26571, r26572, r26573, r26574, r26575, r26576, r26577, r26578, r26579, r26580, r26581, r26582, r26583, r26584, r26585, r26586, r26587, r26588, r26589, r26590, r26591, r26592, r26593, r26594, r26595, r26596, r26597, r26598, r26599, r26600, r26601; void setup_mpfr_f_dm() { mpfr_set_default_prec(3408); mpfr_init_set_str(r26558, "1", 10, MPFR_RNDN); mpfr_init_set_str(r26559, "1/2", 10, MPFR_RNDN); mpfr_init(r26560); mpfr_init(r26561); mpfr_init(r26562); mpfr_init_set_str(r26563, "-3.5964007201178633e+21", 10, MPFR_RNDN); mpfr_init(r26564); mpfr_init_set_str(r26565, "100", 10, MPFR_RNDN); mpfr_init(r26566); mpfr_init(r26567); mpfr_init(r26568); mpfr_init(r26569); mpfr_init(r26570); mpfr_init(r26571); mpfr_init(r26572); mpfr_init(r26573); mpfr_init(r26574); mpfr_init(r26575); mpfr_init_set_str(r26576, "1.00000000000054", 10, MPFR_RNDN); mpfr_init(r26577); mpfr_init_set_str(r26578, "100/3", 10, MPFR_RNDN); mpfr_init(r26579); mpfr_init(r26580); mpfr_init_set_str(r26581, "25/9", 10, MPFR_RNDN); mpfr_init_set_str(r26582, "2", 10, MPFR_RNDN); mpfr_init(r26583); mpfr_init(r26584); mpfr_init(r26585); mpfr_init(r26586); mpfr_init(r26587); mpfr_init(r26588); mpfr_init_set_str(r26589, "2.3039825294862687e+153", 10, MPFR_RNDN); mpfr_init(r26590); mpfr_init(r26591); mpfr_init(r26592); mpfr_init(r26593); mpfr_init(r26594); mpfr_init(r26595); mpfr_init(r26596); mpfr_init(r26597); mpfr_init(r26598); mpfr_init(r26599); mpfr_init(r26600); mpfr_init(r26601); } double f_dm(double i, double n) { ; ; mpfr_set_d(r26560, i, MPFR_RNDN); mpfr_mul(r26561, r26559, r26560, MPFR_RNDN); mpfr_add(r26562, r26558, r26561, MPFR_RNDN); ; mpfr_set_si(r26564, mpfr_cmp(r26562, r26563) <= 0, MPFR_RNDN); ; mpfr_set_d(r26566, n, MPFR_RNDN); mpfr_div(r26567, r26560, r26566, MPFR_RNDN); mpfr_add(r26568, r26558, r26567, MPFR_RNDN); mpfr_pow(r26569, r26568, r26566, MPFR_RNDN); mpfr_mul(r26570, r26569, r26569, MPFR_RNDN); mpfr_sub(r26571, r26570, r26558, MPFR_RNDN); mpfr_add(r26572, r26569, r26558, MPFR_RNDN); mpfr_div(r26573, r26571, r26572, MPFR_RNDN); mpfr_div(r26574, r26573, r26567, MPFR_RNDN); mpfr_mul(r26575, r26565, r26574, MPFR_RNDN); ; mpfr_set_si(r26577, mpfr_cmp(r26562, r26576) <= 0, MPFR_RNDN); ; mpfr_mul(r26579, r26578, r26560, MPFR_RNDN); mpfr_add(r26580, r26565, r26579, MPFR_RNDN); ; ; mpfr_pow(r26583, r26560, r26582, MPFR_RNDN); mpfr_mul(r26584, r26581, r26583, MPFR_RNDN); mpfr_sub(r26585, r26580, r26584, MPFR_RNDN); mpfr_cbrt(r26586, r26562, MPFR_RNDN); mpfr_mul(r26587, r26586, r26566, MPFR_RNDN); mpfr_mul(r26588, r26585, r26587, MPFR_RNDN); ; mpfr_set_si(r26590, mpfr_cmp(r26562, r26589) <= 0, MPFR_RNDN); mpfr_mul(r26591, r26560, r26559, MPFR_RNDN); mpfr_add(r26592, r26591, r26558, MPFR_RNDN); mpfr_log(r26593, r26567, MPFR_RNDN); mpfr_mul(r26594, r26565, r26560, MPFR_RNDN); mpfr_log(r26595, r26594, MPFR_RNDN); mpfr_sub(r26596, r26593, r26595, MPFR_RNDN); mpfr_exp(r26597, r26596, MPFR_RNDN); mpfr_div(r26598, r26592, r26597, MPFR_RNDN); if (mpfr_get_si(r26590, MPFR_RNDN)) { mpfr_set(r26599, r26575, MPFR_RNDN); } else { mpfr_set(r26599, r26598, MPFR_RNDN); }; if (mpfr_get_si(r26577, MPFR_RNDN)) { mpfr_set(r26600, r26588, MPFR_RNDN); } else { mpfr_set(r26600, r26599, MPFR_RNDN); }; if (mpfr_get_si(r26564, MPFR_RNDN)) { mpfr_set(r26601, r26575, MPFR_RNDN); } else { mpfr_set(r26601, r26600, MPFR_RNDN); }; return mpfr_get_d(r26601, MPFR_RNDN); }