#include <tgmath.h>
#include <gmp.h>
#include <mpfr.h>
#include <stdio.h>
#include <stdbool.h>

char *name = "Compound Interest";

double f_if(float i, float n) {
        float r26237 = 100;
        float r26238 = 1;
        float r26239 = i;
        float r26240 = n;
        float r26241 = r26239 / r26240;
        float r26242 = r26238 + r26241;
        float r26243 = pow(r26242, r26240);
        float r26244 = r26243 - r26238;
        float r26245 = r26244 / r26241;
        float r26246 = r26237 * r26245;
        return r26246;
}

double f_id(double i, double n) {
        double r26247 = 100;
        double r26248 = 1;
        double r26249 = i;
        double r26250 = n;
        double r26251 = r26249 / r26250;
        double r26252 = r26248 + r26251;
        double r26253 = pow(r26252, r26250);
        double r26254 = r26253 - r26248;
        double r26255 = r26254 / r26251;
        double r26256 = r26247 * r26255;
        return r26256;
}


double f_of(float i, float n) {
        float r26257 = i;
        float r26258 = -0.04885614718136047;
        bool r26259 = r26257 <= r26258;
        float r26260 = 100;
        float r26261 = 1;
        float r26262 = n;
        float r26263 = r26257 / r26262;
        float r26264 = r26261 + r26263;
        float r26265 = pow(r26264, r26262);
        float r26266 = r26265 - r26261;
        float r26267 = exp(r26266);
        float r26268 = log(r26267);
        float r26269 = r26268 / r26263;
        float r26270 = r26260 * r26269;
        float r26271 = 1.3527856789294112e-17;
        bool r26272 = r26257 <= r26271;
        float r26273 = 1/2;
        float r26274 = r26273 * r26257;
        float r26275 = r26261 + r26274;
        float r26276 = cbrt(r26275);
        float r26277 = r26276 * r26260;
        float r26278 = r26277 * r26276;
        float r26279 = r26276 * r26262;
        float r26280 = r26278 * r26279;
        float r26281 = r26257 * r26273;
        float r26282 = r26281 + r26261;
        float r26283 = r26261 / r26262;
        float r26284 = r26283 / r26260;
        float r26285 = exp(r26284);
        float r26286 = log(r26285);
        float r26287 = r26282 / r26286;
        float r26288 = r26272 ? r26280 : r26287;
        float r26289 = r26259 ? r26270 : r26288;
        return r26289;
}

double f_od(double i, double n) {
        double r26290 = i;
        double r26291 = -0.04885614718136047;
        bool r26292 = r26290 <= r26291;
        double r26293 = 100;
        double r26294 = 1;
        double r26295 = n;
        double r26296 = r26290 / r26295;
        double r26297 = r26294 + r26296;
        double r26298 = pow(r26297, r26295);
        double r26299 = r26298 - r26294;
        double r26300 = exp(r26299);
        double r26301 = log(r26300);
        double r26302 = r26301 / r26296;
        double r26303 = r26293 * r26302;
        double r26304 = 1.3527856789294112e-17;
        bool r26305 = r26290 <= r26304;
        double r26306 = 1/2;
        double r26307 = r26306 * r26290;
        double r26308 = r26294 + r26307;
        double r26309 = cbrt(r26308);
        double r26310 = r26309 * r26293;
        double r26311 = r26310 * r26309;
        double r26312 = r26309 * r26295;
        double r26313 = r26311 * r26312;
        double r26314 = r26290 * r26306;
        double r26315 = r26314 + r26294;
        double r26316 = r26294 / r26295;
        double r26317 = r26316 / r26293;
        double r26318 = exp(r26317);
        double r26319 = log(r26318);
        double r26320 = r26315 / r26319;
        double r26321 = r26305 ? r26313 : r26320;
        double r26322 = r26292 ? r26303 : r26321;
        return r26322;
}

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 r26323, r26324, r26325, r26326, r26327, r26328, r26329, r26330, r26331, r26332;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(3152);
        mpfr_init_set_str(r26323, "100", 10, MPFR_RNDN);
        mpfr_init_set_str(r26324, "1", 10, MPFR_RNDN);
        mpfr_init(r26325);
        mpfr_init(r26326);
        mpfr_init(r26327);
        mpfr_init(r26328);
        mpfr_init(r26329);
        mpfr_init(r26330);
        mpfr_init(r26331);
        mpfr_init(r26332);
}

double f_im(double i, double n) {
        ;
        ;
        mpfr_set_d(r26325, i, MPFR_RNDN);
        mpfr_set_d(r26326, n, MPFR_RNDN);
        mpfr_div(r26327, r26325, r26326, MPFR_RNDN);
        mpfr_add(r26328, r26324, r26327, MPFR_RNDN);
        mpfr_pow(r26329, r26328, r26326, MPFR_RNDN);
        mpfr_sub(r26330, r26329, r26324, MPFR_RNDN);
        mpfr_div(r26331, r26330, r26327, MPFR_RNDN);
        mpfr_mul(r26332, r26323, r26331, MPFR_RNDN);
        return mpfr_get_d(r26332, MPFR_RNDN);
}

static mpfr_t r26333, r26334, r26335, r26336, r26337, r26338, r26339, r26340, r26341, r26342, r26343, r26344, r26345, r26346, r26347, r26348, r26349, r26350, r26351, r26352, r26353, r26354, r26355, r26356, r26357, r26358, r26359, r26360, r26361, r26362, r26363, r26364, r26365;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(3152);
        mpfr_init(r26333);
        mpfr_init_set_str(r26334, "-0.04885614718136047", 10, MPFR_RNDN);
        mpfr_init(r26335);
        mpfr_init_set_str(r26336, "100", 10, MPFR_RNDN);
        mpfr_init_set_str(r26337, "1", 10, MPFR_RNDN);
        mpfr_init(r26338);
        mpfr_init(r26339);
        mpfr_init(r26340);
        mpfr_init(r26341);
        mpfr_init(r26342);
        mpfr_init(r26343);
        mpfr_init(r26344);
        mpfr_init(r26345);
        mpfr_init(r26346);
        mpfr_init_set_str(r26347, "1.3527856789294112e-17", 10, MPFR_RNDN);
        mpfr_init(r26348);
        mpfr_init_set_str(r26349, "1/2", 10, MPFR_RNDN);
        mpfr_init(r26350);
        mpfr_init(r26351);
        mpfr_init(r26352);
        mpfr_init(r26353);
        mpfr_init(r26354);
        mpfr_init(r26355);
        mpfr_init(r26356);
        mpfr_init(r26357);
        mpfr_init(r26358);
        mpfr_init(r26359);
        mpfr_init(r26360);
        mpfr_init(r26361);
        mpfr_init(r26362);
        mpfr_init(r26363);
        mpfr_init(r26364);
        mpfr_init(r26365);
}

double f_fm(double i, double n) {
        mpfr_set_d(r26333, i, MPFR_RNDN);
        ;
        mpfr_set_si(r26335, mpfr_cmp(r26333, r26334) <= 0, MPFR_RNDN);
        ;
        ;
        mpfr_set_d(r26338, n, MPFR_RNDN);
        mpfr_div(r26339, r26333, r26338, MPFR_RNDN);
        mpfr_add(r26340, r26337, r26339, MPFR_RNDN);
        mpfr_pow(r26341, r26340, r26338, MPFR_RNDN);
        mpfr_sub(r26342, r26341, r26337, MPFR_RNDN);
        mpfr_exp(r26343, r26342, MPFR_RNDN);
        mpfr_log(r26344, r26343, MPFR_RNDN);
        mpfr_div(r26345, r26344, r26339, MPFR_RNDN);
        mpfr_mul(r26346, r26336, r26345, MPFR_RNDN);
        ;
        mpfr_set_si(r26348, mpfr_cmp(r26333, r26347) <= 0, MPFR_RNDN);
        ;
        mpfr_mul(r26350, r26349, r26333, MPFR_RNDN);
        mpfr_add(r26351, r26337, r26350, MPFR_RNDN);
        mpfr_cbrt(r26352, r26351, MPFR_RNDN);
        mpfr_mul(r26353, r26352, r26336, MPFR_RNDN);
        mpfr_mul(r26354, r26353, r26352, MPFR_RNDN);
        mpfr_mul(r26355, r26352, r26338, MPFR_RNDN);
        mpfr_mul(r26356, r26354, r26355, MPFR_RNDN);
        mpfr_mul(r26357, r26333, r26349, MPFR_RNDN);
        mpfr_add(r26358, r26357, r26337, MPFR_RNDN);
        mpfr_div(r26359, r26337, r26338, MPFR_RNDN);
        mpfr_div(r26360, r26359, r26336, MPFR_RNDN);
        mpfr_exp(r26361, r26360, MPFR_RNDN);
        mpfr_log(r26362, r26361, MPFR_RNDN);
        mpfr_div(r26363, r26358, r26362, MPFR_RNDN);
        if (mpfr_get_si(r26348, MPFR_RNDN)) { mpfr_set(r26364, r26356, MPFR_RNDN); } else { mpfr_set(r26364, r26363, MPFR_RNDN); };
        if (mpfr_get_si(r26335, MPFR_RNDN)) { mpfr_set(r26365, r26346, MPFR_RNDN); } else { mpfr_set(r26365, r26364, MPFR_RNDN); };
        return mpfr_get_d(r26365, MPFR_RNDN);
}

static mpfr_t r26366, r26367, r26368, r26369, r26370, r26371, r26372, r26373, r26374, r26375, r26376, r26377, r26378, r26379, r26380, r26381, r26382, r26383, r26384, r26385, r26386, r26387, r26388, r26389, r26390, r26391, r26392, r26393, r26394, r26395, r26396, r26397, r26398;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(3152);
        mpfr_init(r26366);
        mpfr_init_set_str(r26367, "-0.04885614718136047", 10, MPFR_RNDN);
        mpfr_init(r26368);
        mpfr_init_set_str(r26369, "100", 10, MPFR_RNDN);
        mpfr_init_set_str(r26370, "1", 10, MPFR_RNDN);
        mpfr_init(r26371);
        mpfr_init(r26372);
        mpfr_init(r26373);
        mpfr_init(r26374);
        mpfr_init(r26375);
        mpfr_init(r26376);
        mpfr_init(r26377);
        mpfr_init(r26378);
        mpfr_init(r26379);
        mpfr_init_set_str(r26380, "1.3527856789294112e-17", 10, MPFR_RNDN);
        mpfr_init(r26381);
        mpfr_init_set_str(r26382, "1/2", 10, MPFR_RNDN);
        mpfr_init(r26383);
        mpfr_init(r26384);
        mpfr_init(r26385);
        mpfr_init(r26386);
        mpfr_init(r26387);
        mpfr_init(r26388);
        mpfr_init(r26389);
        mpfr_init(r26390);
        mpfr_init(r26391);
        mpfr_init(r26392);
        mpfr_init(r26393);
        mpfr_init(r26394);
        mpfr_init(r26395);
        mpfr_init(r26396);
        mpfr_init(r26397);
        mpfr_init(r26398);
}

double f_dm(double i, double n) {
        mpfr_set_d(r26366, i, MPFR_RNDN);
        ;
        mpfr_set_si(r26368, mpfr_cmp(r26366, r26367) <= 0, MPFR_RNDN);
        ;
        ;
        mpfr_set_d(r26371, n, MPFR_RNDN);
        mpfr_div(r26372, r26366, r26371, MPFR_RNDN);
        mpfr_add(r26373, r26370, r26372, MPFR_RNDN);
        mpfr_pow(r26374, r26373, r26371, MPFR_RNDN);
        mpfr_sub(r26375, r26374, r26370, MPFR_RNDN);
        mpfr_exp(r26376, r26375, MPFR_RNDN);
        mpfr_log(r26377, r26376, MPFR_RNDN);
        mpfr_div(r26378, r26377, r26372, MPFR_RNDN);
        mpfr_mul(r26379, r26369, r26378, MPFR_RNDN);
        ;
        mpfr_set_si(r26381, mpfr_cmp(r26366, r26380) <= 0, MPFR_RNDN);
        ;
        mpfr_mul(r26383, r26382, r26366, MPFR_RNDN);
        mpfr_add(r26384, r26370, r26383, MPFR_RNDN);
        mpfr_cbrt(r26385, r26384, MPFR_RNDN);
        mpfr_mul(r26386, r26385, r26369, MPFR_RNDN);
        mpfr_mul(r26387, r26386, r26385, MPFR_RNDN);
        mpfr_mul(r26388, r26385, r26371, MPFR_RNDN);
        mpfr_mul(r26389, r26387, r26388, MPFR_RNDN);
        mpfr_mul(r26390, r26366, r26382, MPFR_RNDN);
        mpfr_add(r26391, r26390, r26370, MPFR_RNDN);
        mpfr_div(r26392, r26370, r26371, MPFR_RNDN);
        mpfr_div(r26393, r26392, r26369, MPFR_RNDN);
        mpfr_exp(r26394, r26393, MPFR_RNDN);
        mpfr_log(r26395, r26394, MPFR_RNDN);
        mpfr_div(r26396, r26391, r26395, MPFR_RNDN);
        if (mpfr_get_si(r26381, MPFR_RNDN)) { mpfr_set(r26397, r26389, MPFR_RNDN); } else { mpfr_set(r26397, r26396, MPFR_RNDN); };
        if (mpfr_get_si(r26368, MPFR_RNDN)) { mpfr_set(r26398, r26379, MPFR_RNDN); } else { mpfr_set(r26398, r26397, MPFR_RNDN); };
        return mpfr_get_d(r26398, MPFR_RNDN);
}

