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

char *name = "fabs fraction 1";

double f_if(float x, float y, float z) {
        float r20438 = x;
        float r20439 = 4;
        float r20440 = r20438 + r20439;
        float r20441 = y;
        float r20442 = r20440 / r20441;
        float r20443 = r20438 / r20441;
        float r20444 = z;
        float r20445 = r20443 * r20444;
        float r20446 = r20442 - r20445;
        float r20447 = fabs(r20446);
        return r20447;
}

double f_id(double x, double y, double z) {
        double r20448 = x;
        double r20449 = 4;
        double r20450 = r20448 + r20449;
        double r20451 = y;
        double r20452 = r20450 / r20451;
        double r20453 = r20448 / r20451;
        double r20454 = z;
        double r20455 = r20453 * r20454;
        double r20456 = r20452 - r20455;
        double r20457 = fabs(r20456);
        return r20457;
}


double f_of(float x, float y, float z) {
        float r20458 = x;
        float r20459 = y;
        float r20460 = r20458 / r20459;
        float r20461 = z;
        float r20462 = r20460 * r20461;
        float r20463 = -1.6750163676676062e+52;
        bool r20464 = r20462 <= r20463;
        float r20465 = 4;
        float r20466 = r20458 + r20465;
        float r20467 = r20466 / r20459;
        float r20468 = r20467 - r20462;
        float r20469 = fabs(r20468);
        float r20470 = 8.887583300700113e+78;
        bool r20471 = r20462 <= r20470;
        float r20472 = r20458 * r20461;
        float r20473 = r20466 - r20472;
        float r20474 = r20473 / r20459;
        float r20475 = fabs(r20474);
        float r20476 = r20471 ? r20475 : r20469;
        float r20477 = r20464 ? r20469 : r20476;
        return r20477;
}

double f_od(double x, double y, double z) {
        double r20478 = x;
        double r20479 = y;
        double r20480 = r20478 / r20479;
        double r20481 = z;
        double r20482 = r20480 * r20481;
        double r20483 = -1.6750163676676062e+52;
        bool r20484 = r20482 <= r20483;
        double r20485 = 4;
        double r20486 = r20478 + r20485;
        double r20487 = r20486 / r20479;
        double r20488 = r20487 - r20482;
        double r20489 = fabs(r20488);
        double r20490 = 8.887583300700113e+78;
        bool r20491 = r20482 <= r20490;
        double r20492 = r20478 * r20481;
        double r20493 = r20486 - r20492;
        double r20494 = r20493 / r20479;
        double r20495 = fabs(r20494);
        double r20496 = r20491 ? r20495 : r20489;
        double r20497 = r20484 ? r20489 : r20496;
        return r20497;
}

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 r20498, r20499, r20500, r20501, r20502, r20503, r20504, r20505, r20506, r20507;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r20498);
        mpfr_init_set_str(r20499, "4", 10, MPFR_RNDN);
        mpfr_init(r20500);
        mpfr_init(r20501);
        mpfr_init(r20502);
        mpfr_init(r20503);
        mpfr_init(r20504);
        mpfr_init(r20505);
        mpfr_init(r20506);
        mpfr_init(r20507);
}

double f_im(double x, double y, double z) {
        mpfr_set_d(r20498, x, MPFR_RNDN);
        ;
        mpfr_add(r20500, r20498, r20499, MPFR_RNDN);
        mpfr_set_d(r20501, y, MPFR_RNDN);
        mpfr_div(r20502, r20500, r20501, MPFR_RNDN);
        mpfr_div(r20503, r20498, r20501, MPFR_RNDN);
        mpfr_set_d(r20504, z, MPFR_RNDN);
        mpfr_mul(r20505, r20503, r20504, MPFR_RNDN);
        mpfr_sub(r20506, r20502, r20505, MPFR_RNDN);
        mpfr_abs(r20507, r20506, MPFR_RNDN);
        return mpfr_get_d(r20507, MPFR_RNDN);
}

static mpfr_t r20508, r20509, r20510, r20511, r20512, r20513, r20514, r20515, r20516, r20517, r20518, r20519, r20520, r20521, r20522, r20523, r20524, r20525, r20526, r20527;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r20508);
        mpfr_init(r20509);
        mpfr_init(r20510);
        mpfr_init(r20511);
        mpfr_init(r20512);
        mpfr_init_set_str(r20513, "-1.6750163676676062e+52", 10, MPFR_RNDN);
        mpfr_init(r20514);
        mpfr_init_set_str(r20515, "4", 10, MPFR_RNDN);
        mpfr_init(r20516);
        mpfr_init(r20517);
        mpfr_init(r20518);
        mpfr_init(r20519);
        mpfr_init_set_str(r20520, "8.887583300700113e+78", 10, MPFR_RNDN);
        mpfr_init(r20521);
        mpfr_init(r20522);
        mpfr_init(r20523);
        mpfr_init(r20524);
        mpfr_init(r20525);
        mpfr_init(r20526);
        mpfr_init(r20527);
}

double f_fm(double x, double y, double z) {
        mpfr_set_d(r20508, x, MPFR_RNDN);
        mpfr_set_d(r20509, y, MPFR_RNDN);
        mpfr_div(r20510, r20508, r20509, MPFR_RNDN);
        mpfr_set_d(r20511, z, MPFR_RNDN);
        mpfr_mul(r20512, r20510, r20511, MPFR_RNDN);
        ;
        mpfr_set_si(r20514, mpfr_cmp(r20512, r20513) <= 0, MPFR_RNDN);
        ;
        mpfr_add(r20516, r20508, r20515, MPFR_RNDN);
        mpfr_div(r20517, r20516, r20509, MPFR_RNDN);
        mpfr_sub(r20518, r20517, r20512, MPFR_RNDN);
        mpfr_abs(r20519, r20518, MPFR_RNDN);
        ;
        mpfr_set_si(r20521, mpfr_cmp(r20512, r20520) <= 0, MPFR_RNDN);
        mpfr_mul(r20522, r20508, r20511, MPFR_RNDN);
        mpfr_sub(r20523, r20516, r20522, MPFR_RNDN);
        mpfr_div(r20524, r20523, r20509, MPFR_RNDN);
        mpfr_abs(r20525, r20524, MPFR_RNDN);
        if (mpfr_get_si(r20521, MPFR_RNDN)) { mpfr_set(r20526, r20525, MPFR_RNDN); } else { mpfr_set(r20526, r20519, MPFR_RNDN); };
        if (mpfr_get_si(r20514, MPFR_RNDN)) { mpfr_set(r20527, r20519, MPFR_RNDN); } else { mpfr_set(r20527, r20526, MPFR_RNDN); };
        return mpfr_get_d(r20527, MPFR_RNDN);
}

static mpfr_t r20528, r20529, r20530, r20531, r20532, r20533, r20534, r20535, r20536, r20537, r20538, r20539, r20540, r20541, r20542, r20543, r20544, r20545, r20546, r20547;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r20528);
        mpfr_init(r20529);
        mpfr_init(r20530);
        mpfr_init(r20531);
        mpfr_init(r20532);
        mpfr_init_set_str(r20533, "-1.6750163676676062e+52", 10, MPFR_RNDN);
        mpfr_init(r20534);
        mpfr_init_set_str(r20535, "4", 10, MPFR_RNDN);
        mpfr_init(r20536);
        mpfr_init(r20537);
        mpfr_init(r20538);
        mpfr_init(r20539);
        mpfr_init_set_str(r20540, "8.887583300700113e+78", 10, MPFR_RNDN);
        mpfr_init(r20541);
        mpfr_init(r20542);
        mpfr_init(r20543);
        mpfr_init(r20544);
        mpfr_init(r20545);
        mpfr_init(r20546);
        mpfr_init(r20547);
}

double f_dm(double x, double y, double z) {
        mpfr_set_d(r20528, x, MPFR_RNDN);
        mpfr_set_d(r20529, y, MPFR_RNDN);
        mpfr_div(r20530, r20528, r20529, MPFR_RNDN);
        mpfr_set_d(r20531, z, MPFR_RNDN);
        mpfr_mul(r20532, r20530, r20531, MPFR_RNDN);
        ;
        mpfr_set_si(r20534, mpfr_cmp(r20532, r20533) <= 0, MPFR_RNDN);
        ;
        mpfr_add(r20536, r20528, r20535, MPFR_RNDN);
        mpfr_div(r20537, r20536, r20529, MPFR_RNDN);
        mpfr_sub(r20538, r20537, r20532, MPFR_RNDN);
        mpfr_abs(r20539, r20538, MPFR_RNDN);
        ;
        mpfr_set_si(r20541, mpfr_cmp(r20532, r20540) <= 0, MPFR_RNDN);
        mpfr_mul(r20542, r20528, r20531, MPFR_RNDN);
        mpfr_sub(r20543, r20536, r20542, MPFR_RNDN);
        mpfr_div(r20544, r20543, r20529, MPFR_RNDN);
        mpfr_abs(r20545, r20544, MPFR_RNDN);
        if (mpfr_get_si(r20541, MPFR_RNDN)) { mpfr_set(r20546, r20545, MPFR_RNDN); } else { mpfr_set(r20546, r20539, MPFR_RNDN); };
        if (mpfr_get_si(r20534, MPFR_RNDN)) { mpfr_set(r20547, r20539, MPFR_RNDN); } else { mpfr_set(r20547, r20546, MPFR_RNDN); };
        return mpfr_get_d(r20547, MPFR_RNDN);
}

