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

char *name = "3frac (problem 3.3.3)";

double f_if(float x) {
        float r21265 = 1;
        float r21266 = x;
        float r21267 = r21266 + r21265;
        float r21268 = r21265 / r21267;
        float r21269 = 2;
        float r21270 = r21269 / r21266;
        float r21271 = r21268 - r21270;
        float r21272 = r21266 - r21265;
        float r21273 = r21265 / r21272;
        float r21274 = r21271 + r21273;
        return r21274;
}

double f_id(double x) {
        double r21275 = 1;
        double r21276 = x;
        double r21277 = r21276 + r21275;
        double r21278 = r21275 / r21277;
        double r21279 = 2;
        double r21280 = r21279 / r21276;
        double r21281 = r21278 - r21280;
        double r21282 = r21276 - r21275;
        double r21283 = r21275 / r21282;
        double r21284 = r21281 + r21283;
        return r21284;
}


double f_of(float x) {
        float r21285 = x;
        float r21286 = -1.7387217572195604e-16;
        bool r21287 = r21285 <= r21286;
        float r21288 = 2;
        float r21289 = 7;
        float r21290 = pow(r21285, r21289);
        float r21291 = r21288 / r21290;
        float r21292 = 5;
        float r21293 = pow(r21285, r21292);
        float r21294 = r21288 / r21293;
        float r21295 = r21291 + r21294;
        float r21296 = r21288 / r21285;
        float r21297 = r21296 / r21285;
        float r21298 = r21297 / r21285;
        float r21299 = r21295 + r21298;
        float r21300 = 2500116.352981572;
        bool r21301 = r21285 <= r21300;
        float r21302 = 1;
        float r21303 = r21302 / r21285;
        float r21304 = r21288 * r21303;
        float r21305 = 3;
        float r21306 = pow(r21285, r21305);
        float r21307 = r21288 * r21306;
        float r21308 = r21288 * r21285;
        float r21309 = r21307 + r21308;
        float r21310 = r21304 + r21309;
        float r21311 = -r21310;
        float r21312 = r21285 * r21285;
        float r21313 = r21296 / r21312;
        float r21314 = r21295 + r21313;
        float r21315 = r21301 ? r21311 : r21314;
        float r21316 = r21287 ? r21299 : r21315;
        return r21316;
}

double f_od(double x) {
        double r21317 = x;
        double r21318 = -1.7387217572195604e-16;
        bool r21319 = r21317 <= r21318;
        double r21320 = 2;
        double r21321 = 7;
        double r21322 = pow(r21317, r21321);
        double r21323 = r21320 / r21322;
        double r21324 = 5;
        double r21325 = pow(r21317, r21324);
        double r21326 = r21320 / r21325;
        double r21327 = r21323 + r21326;
        double r21328 = r21320 / r21317;
        double r21329 = r21328 / r21317;
        double r21330 = r21329 / r21317;
        double r21331 = r21327 + r21330;
        double r21332 = 2500116.352981572;
        bool r21333 = r21317 <= r21332;
        double r21334 = 1;
        double r21335 = r21334 / r21317;
        double r21336 = r21320 * r21335;
        double r21337 = 3;
        double r21338 = pow(r21317, r21337);
        double r21339 = r21320 * r21338;
        double r21340 = r21320 * r21317;
        double r21341 = r21339 + r21340;
        double r21342 = r21336 + r21341;
        double r21343 = -r21342;
        double r21344 = r21317 * r21317;
        double r21345 = r21328 / r21344;
        double r21346 = r21327 + r21345;
        double r21347 = r21333 ? r21343 : r21346;
        double r21348 = r21319 ? r21331 : r21347;
        return r21348;
}

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 r21349, r21350, r21351, r21352, r21353, r21354, r21355, r21356, r21357, r21358;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(1168);
        mpfr_init_set_str(r21349, "1", 10, MPFR_RNDN);
        mpfr_init(r21350);
        mpfr_init(r21351);
        mpfr_init(r21352);
        mpfr_init_set_str(r21353, "2", 10, MPFR_RNDN);
        mpfr_init(r21354);
        mpfr_init(r21355);
        mpfr_init(r21356);
        mpfr_init(r21357);
        mpfr_init(r21358);
}

double f_im(double x) {
        ;
        mpfr_set_d(r21350, x, MPFR_RNDN);
        mpfr_add(r21351, r21350, r21349, MPFR_RNDN);
        mpfr_div(r21352, r21349, r21351, MPFR_RNDN);
        ;
        mpfr_div(r21354, r21353, r21350, MPFR_RNDN);
        mpfr_sub(r21355, r21352, r21354, MPFR_RNDN);
        mpfr_sub(r21356, r21350, r21349, MPFR_RNDN);
        mpfr_div(r21357, r21349, r21356, MPFR_RNDN);
        mpfr_add(r21358, r21355, r21357, MPFR_RNDN);
        return mpfr_get_d(r21358, MPFR_RNDN);
}

static mpfr_t r21359, r21360, r21361, r21362, r21363, r21364, r21365, r21366, r21367, r21368, r21369, r21370, r21371, r21372, r21373, r21374, r21375, r21376, r21377, r21378, r21379, r21380, r21381, r21382, r21383, r21384, r21385, r21386, r21387, r21388, r21389, r21390;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(1168);
        mpfr_init(r21359);
        mpfr_init_set_str(r21360, "-1.7387217572195604e-16", 10, MPFR_RNDN);
        mpfr_init(r21361);
        mpfr_init_set_str(r21362, "2", 10, MPFR_RNDN);
        mpfr_init_set_str(r21363, "7", 10, MPFR_RNDN);
        mpfr_init(r21364);
        mpfr_init(r21365);
        mpfr_init_set_str(r21366, "5", 10, MPFR_RNDN);
        mpfr_init(r21367);
        mpfr_init(r21368);
        mpfr_init(r21369);
        mpfr_init(r21370);
        mpfr_init(r21371);
        mpfr_init(r21372);
        mpfr_init(r21373);
        mpfr_init_set_str(r21374, "2500116.352981572", 10, MPFR_RNDN);
        mpfr_init(r21375);
        mpfr_init_set_str(r21376, "1", 10, MPFR_RNDN);
        mpfr_init(r21377);
        mpfr_init(r21378);
        mpfr_init_set_str(r21379, "3", 10, MPFR_RNDN);
        mpfr_init(r21380);
        mpfr_init(r21381);
        mpfr_init(r21382);
        mpfr_init(r21383);
        mpfr_init(r21384);
        mpfr_init(r21385);
        mpfr_init(r21386);
        mpfr_init(r21387);
        mpfr_init(r21388);
        mpfr_init(r21389);
        mpfr_init(r21390);
}

double f_fm(double x) {
        mpfr_set_d(r21359, x, MPFR_RNDN);
        ;
        mpfr_set_si(r21361, mpfr_cmp(r21359, r21360) <= 0, MPFR_RNDN);
        ;
        ;
        mpfr_pow(r21364, r21359, r21363, MPFR_RNDN);
        mpfr_div(r21365, r21362, r21364, MPFR_RNDN);
        ;
        mpfr_pow(r21367, r21359, r21366, MPFR_RNDN);
        mpfr_div(r21368, r21362, r21367, MPFR_RNDN);
        mpfr_add(r21369, r21365, r21368, MPFR_RNDN);
        mpfr_div(r21370, r21362, r21359, MPFR_RNDN);
        mpfr_div(r21371, r21370, r21359, MPFR_RNDN);
        mpfr_div(r21372, r21371, r21359, MPFR_RNDN);
        mpfr_add(r21373, r21369, r21372, MPFR_RNDN);
        ;
        mpfr_set_si(r21375, mpfr_cmp(r21359, r21374) <= 0, MPFR_RNDN);
        ;
        mpfr_div(r21377, r21376, r21359, MPFR_RNDN);
        mpfr_mul(r21378, r21362, r21377, MPFR_RNDN);
        ;
        mpfr_pow(r21380, r21359, r21379, MPFR_RNDN);
        mpfr_mul(r21381, r21362, r21380, MPFR_RNDN);
        mpfr_mul(r21382, r21362, r21359, MPFR_RNDN);
        mpfr_add(r21383, r21381, r21382, MPFR_RNDN);
        mpfr_add(r21384, r21378, r21383, MPFR_RNDN);
        mpfr_neg(r21385, r21384, MPFR_RNDN);
        mpfr_mul(r21386, r21359, r21359, MPFR_RNDN);
        mpfr_div(r21387, r21370, r21386, MPFR_RNDN);
        mpfr_add(r21388, r21369, r21387, MPFR_RNDN);
        if (mpfr_get_si(r21375, MPFR_RNDN)) { mpfr_set(r21389, r21385, MPFR_RNDN); } else { mpfr_set(r21389, r21388, MPFR_RNDN); };
        if (mpfr_get_si(r21361, MPFR_RNDN)) { mpfr_set(r21390, r21373, MPFR_RNDN); } else { mpfr_set(r21390, r21389, MPFR_RNDN); };
        return mpfr_get_d(r21390, MPFR_RNDN);
}

static mpfr_t r21391, r21392, r21393, r21394, r21395, r21396, r21397, r21398, r21399, r21400, r21401, r21402, r21403, r21404, r21405, r21406, r21407, r21408, r21409, r21410, r21411, r21412, r21413, r21414, r21415, r21416, r21417, r21418, r21419, r21420, r21421, r21422;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(1168);
        mpfr_init(r21391);
        mpfr_init_set_str(r21392, "-1.7387217572195604e-16", 10, MPFR_RNDN);
        mpfr_init(r21393);
        mpfr_init_set_str(r21394, "2", 10, MPFR_RNDN);
        mpfr_init_set_str(r21395, "7", 10, MPFR_RNDN);
        mpfr_init(r21396);
        mpfr_init(r21397);
        mpfr_init_set_str(r21398, "5", 10, MPFR_RNDN);
        mpfr_init(r21399);
        mpfr_init(r21400);
        mpfr_init(r21401);
        mpfr_init(r21402);
        mpfr_init(r21403);
        mpfr_init(r21404);
        mpfr_init(r21405);
        mpfr_init_set_str(r21406, "2500116.352981572", 10, MPFR_RNDN);
        mpfr_init(r21407);
        mpfr_init_set_str(r21408, "1", 10, MPFR_RNDN);
        mpfr_init(r21409);
        mpfr_init(r21410);
        mpfr_init_set_str(r21411, "3", 10, MPFR_RNDN);
        mpfr_init(r21412);
        mpfr_init(r21413);
        mpfr_init(r21414);
        mpfr_init(r21415);
        mpfr_init(r21416);
        mpfr_init(r21417);
        mpfr_init(r21418);
        mpfr_init(r21419);
        mpfr_init(r21420);
        mpfr_init(r21421);
        mpfr_init(r21422);
}

double f_dm(double x) {
        mpfr_set_d(r21391, x, MPFR_RNDN);
        ;
        mpfr_set_si(r21393, mpfr_cmp(r21391, r21392) <= 0, MPFR_RNDN);
        ;
        ;
        mpfr_pow(r21396, r21391, r21395, MPFR_RNDN);
        mpfr_div(r21397, r21394, r21396, MPFR_RNDN);
        ;
        mpfr_pow(r21399, r21391, r21398, MPFR_RNDN);
        mpfr_div(r21400, r21394, r21399, MPFR_RNDN);
        mpfr_add(r21401, r21397, r21400, MPFR_RNDN);
        mpfr_div(r21402, r21394, r21391, MPFR_RNDN);
        mpfr_div(r21403, r21402, r21391, MPFR_RNDN);
        mpfr_div(r21404, r21403, r21391, MPFR_RNDN);
        mpfr_add(r21405, r21401, r21404, MPFR_RNDN);
        ;
        mpfr_set_si(r21407, mpfr_cmp(r21391, r21406) <= 0, MPFR_RNDN);
        ;
        mpfr_div(r21409, r21408, r21391, MPFR_RNDN);
        mpfr_mul(r21410, r21394, r21409, MPFR_RNDN);
        ;
        mpfr_pow(r21412, r21391, r21411, MPFR_RNDN);
        mpfr_mul(r21413, r21394, r21412, MPFR_RNDN);
        mpfr_mul(r21414, r21394, r21391, MPFR_RNDN);
        mpfr_add(r21415, r21413, r21414, MPFR_RNDN);
        mpfr_add(r21416, r21410, r21415, MPFR_RNDN);
        mpfr_neg(r21417, r21416, MPFR_RNDN);
        mpfr_mul(r21418, r21391, r21391, MPFR_RNDN);
        mpfr_div(r21419, r21402, r21418, MPFR_RNDN);
        mpfr_add(r21420, r21401, r21419, MPFR_RNDN);
        if (mpfr_get_si(r21407, MPFR_RNDN)) { mpfr_set(r21421, r21417, MPFR_RNDN); } else { mpfr_set(r21421, r21420, MPFR_RNDN); };
        if (mpfr_get_si(r21393, MPFR_RNDN)) { mpfr_set(r21422, r21405, MPFR_RNDN); } else { mpfr_set(r21422, r21421, MPFR_RNDN); };
        return mpfr_get_d(r21422, MPFR_RNDN);
}

