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

char *name = "NMSE problem 3.2.1, negative";

double f_if(float a, float b_2F2, float c) {
        float r15529 = b_2F2;
        float r15530 = -r15529;
        float r15531 = r15529 * r15529;
        float r15532 = a;
        float r15533 = c;
        float r15534 = r15532 * r15533;
        float r15535 = r15531 - r15534;
        float r15536 = sqrt(r15535);
        float r15537 = r15530 - r15536;
        float r15538 = r15537 / r15532;
        return r15538;
}

double f_id(double a, double b_2F2, double c) {
        double r15539 = b_2F2;
        double r15540 = -r15539;
        double r15541 = r15539 * r15539;
        double r15542 = a;
        double r15543 = c;
        double r15544 = r15542 * r15543;
        double r15545 = r15541 - r15544;
        double r15546 = sqrt(r15545);
        double r15547 = r15540 - r15546;
        double r15548 = r15547 / r15542;
        return r15548;
}


double f_of(float a, float b_2F2, float c) {
        float r15549 = b_2F2;
        float r15550 = -2.004330212912464e-07f;
        bool r15551 = r15549 <= r15550;
        float r15552 = c;
        float r15553 = 0.5f;
        float r15554 = r15553 * r15552;
        float r15555 = a;
        float r15556 = r15555 / r15549;
        float r15557 = r15554 * r15556;
        float r15558 = 2.0f;
        float r15559 = r15558 * r15549;
        float r15560 = r15557 - r15559;
        float r15561 = r15552 / r15560;
        float r15562 = 100403176.0f;
        bool r15563 = r15549 <= r15562;
        float r15564 = -r15549;
        float r15565 = r15549 * r15549;
        float r15566 = r15555 * r15552;
        float r15567 = r15565 - r15566;
        float r15568 = sqrt(r15567);
        float r15569 = r15564 - r15568;
        float r15570 = 1.0f;
        float r15571 = r15570 / r15555;
        float r15572 = r15569 * r15571;
        float r15573 = r15549 / r15552;
        float r15574 = r15553 / r15573;
        float r15575 = r15549 / r15555;
        float r15576 = r15575 * r15558;
        float r15577 = r15574 - r15576;
        float r15578 = r15563 ? r15572 : r15577;
        float r15579 = r15551 ? r15561 : r15578;
        return r15579;
}

double f_od(double a, double b_2F2, double c) {
        double r15580 = b_2F2;
        double r15581 = -2.004330212912464e-07;
        bool r15582 = r15580 <= r15581;
        double r15583 = c;
        double r15584 = 0.5;
        double r15585 = r15584 * r15583;
        double r15586 = a;
        double r15587 = r15586 / r15580;
        double r15588 = r15585 * r15587;
        double r15589 = 2.0;
        double r15590 = r15589 * r15580;
        double r15591 = r15588 - r15590;
        double r15592 = r15583 / r15591;
        double r15593 = 100403176.0;
        bool r15594 = r15580 <= r15593;
        double r15595 = -r15580;
        double r15596 = r15580 * r15580;
        double r15597 = r15586 * r15583;
        double r15598 = r15596 - r15597;
        double r15599 = sqrt(r15598);
        double r15600 = r15595 - r15599;
        double r15601 = 1.0;
        double r15602 = r15601 / r15586;
        double r15603 = r15600 * r15602;
        double r15604 = r15580 / r15583;
        double r15605 = r15584 / r15604;
        double r15606 = r15580 / r15586;
        double r15607 = r15606 * r15589;
        double r15608 = r15605 - r15607;
        double r15609 = r15594 ? r15603 : r15608;
        double r15610 = r15582 ? r15592 : r15609;
        return r15610;
}

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 r15611, r15612, r15613, r15614, r15615, r15616, r15617, r15618, r15619, r15620;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init(r15611);
        mpfr_init(r15612);
        mpfr_init(r15613);
        mpfr_init(r15614);
        mpfr_init(r15615);
        mpfr_init(r15616);
        mpfr_init(r15617);
        mpfr_init(r15618);
        mpfr_init(r15619);
        mpfr_init(r15620);
}

double f_im(double a, double b_2F2, double c) {
        mpfr_set_d(r15611, b_2F2, MPFR_RNDN);
        mpfr_neg(r15612, r15611, MPFR_RNDN);
        mpfr_sqr(r15613, r15611, MPFR_RNDN);
        mpfr_set_d(r15614, a, MPFR_RNDN);
        mpfr_set_d(r15615, c, MPFR_RNDN);
        mpfr_mul(r15616, r15614, r15615, MPFR_RNDN);
        mpfr_sub(r15617, r15613, r15616, MPFR_RNDN);
        mpfr_sqrt(r15618, r15617, MPFR_RNDN);
        mpfr_sub(r15619, r15612, r15618, MPFR_RNDN);
        mpfr_div(r15620, r15619, r15614, MPFR_RNDN);
        return mpfr_get_d(r15620, MPFR_RNDN);
}

static mpfr_t r15621, r15622, r15623, r15624, r15625, r15626, r15627, r15628, r15629, r15630, r15631, r15632, r15633, r15634, r15635, r15636, r15637, r15638, r15639, r15640, r15641, r15642, r15643, r15644, r15645, r15646, r15647, r15648, r15649, r15650, r15651;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r15621);
        mpfr_init_set_str(r15622, "-2.0043302f-07", 10, MPFR_RNDN);
        mpfr_init(r15623);
        mpfr_init(r15624);
        mpfr_init_set_str(r15625, "1/2", 10, MPFR_RNDN);
        mpfr_init(r15626);
        mpfr_init(r15627);
        mpfr_init(r15628);
        mpfr_init(r15629);
        mpfr_init_set_str(r15630, "2", 10, MPFR_RNDN);
        mpfr_init(r15631);
        mpfr_init(r15632);
        mpfr_init(r15633);
        mpfr_init_set_str(r15634, "100403176.0f0", 10, MPFR_RNDN);
        mpfr_init(r15635);
        mpfr_init(r15636);
        mpfr_init(r15637);
        mpfr_init(r15638);
        mpfr_init(r15639);
        mpfr_init(r15640);
        mpfr_init(r15641);
        mpfr_init_set_str(r15642, "1", 10, MPFR_RNDN);
        mpfr_init(r15643);
        mpfr_init(r15644);
        mpfr_init(r15645);
        mpfr_init(r15646);
        mpfr_init(r15647);
        mpfr_init(r15648);
        mpfr_init(r15649);
        mpfr_init(r15650);
        mpfr_init(r15651);
}

double f_fm(double a, double b_2F2, double c) {
        mpfr_set_d(r15621, b_2F2, MPFR_RNDN);
        ;
        mpfr_set_si(r15623, mpfr_cmp(r15621, r15622) <= 0, MPFR_RNDN);
        mpfr_set_d(r15624, c, MPFR_RNDN);
        ;
        mpfr_mul(r15626, r15625, r15624, MPFR_RNDN);
        mpfr_set_d(r15627, a, MPFR_RNDN);
        mpfr_div(r15628, r15627, r15621, MPFR_RNDN);
        mpfr_mul(r15629, r15626, r15628, MPFR_RNDN);
        ;
        mpfr_mul(r15631, r15630, r15621, MPFR_RNDN);
        mpfr_sub(r15632, r15629, r15631, MPFR_RNDN);
        mpfr_div(r15633, r15624, r15632, MPFR_RNDN);
        ;
        mpfr_set_si(r15635, mpfr_cmp(r15621, r15634) <= 0, MPFR_RNDN);
        mpfr_neg(r15636, r15621, MPFR_RNDN);
        mpfr_sqr(r15637, r15621, MPFR_RNDN);
        mpfr_mul(r15638, r15627, r15624, MPFR_RNDN);
        mpfr_sub(r15639, r15637, r15638, MPFR_RNDN);
        mpfr_sqrt(r15640, r15639, MPFR_RNDN);
        mpfr_sub(r15641, r15636, r15640, MPFR_RNDN);
        ;
        mpfr_div(r15643, r15642, r15627, MPFR_RNDN);
        mpfr_mul(r15644, r15641, r15643, MPFR_RNDN);
        mpfr_div(r15645, r15621, r15624, MPFR_RNDN);
        mpfr_div(r15646, r15625, r15645, MPFR_RNDN);
        mpfr_div(r15647, r15621, r15627, MPFR_RNDN);
        mpfr_mul(r15648, r15647, r15630, MPFR_RNDN);
        mpfr_sub(r15649, r15646, r15648, MPFR_RNDN);
        if (mpfr_get_si(r15635, MPFR_RNDN)) { mpfr_set(r15650, r15644, MPFR_RNDN); } else { mpfr_set(r15650, r15649, MPFR_RNDN); };
        if (mpfr_get_si(r15623, MPFR_RNDN)) { mpfr_set(r15651, r15633, MPFR_RNDN); } else { mpfr_set(r15651, r15650, MPFR_RNDN); };
        return mpfr_get_d(r15651, MPFR_RNDN);
}

static mpfr_t r15652, r15653, r15654, r15655, r15656, r15657, r15658, r15659, r15660, r15661, r15662, r15663, r15664, r15665, r15666, r15667, r15668, r15669, r15670, r15671, r15672, r15673, r15674, r15675, r15676, r15677, r15678, r15679, r15680, r15681, r15682;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r15652);
        mpfr_init_set_str(r15653, "-2.0043302f-07", 10, MPFR_RNDN);
        mpfr_init(r15654);
        mpfr_init(r15655);
        mpfr_init_set_str(r15656, "1/2", 10, MPFR_RNDN);
        mpfr_init(r15657);
        mpfr_init(r15658);
        mpfr_init(r15659);
        mpfr_init(r15660);
        mpfr_init_set_str(r15661, "2", 10, MPFR_RNDN);
        mpfr_init(r15662);
        mpfr_init(r15663);
        mpfr_init(r15664);
        mpfr_init_set_str(r15665, "100403176.0f0", 10, MPFR_RNDN);
        mpfr_init(r15666);
        mpfr_init(r15667);
        mpfr_init(r15668);
        mpfr_init(r15669);
        mpfr_init(r15670);
        mpfr_init(r15671);
        mpfr_init(r15672);
        mpfr_init_set_str(r15673, "1", 10, MPFR_RNDN);
        mpfr_init(r15674);
        mpfr_init(r15675);
        mpfr_init(r15676);
        mpfr_init(r15677);
        mpfr_init(r15678);
        mpfr_init(r15679);
        mpfr_init(r15680);
        mpfr_init(r15681);
        mpfr_init(r15682);
}

double f_dm(double a, double b_2F2, double c) {
        mpfr_set_d(r15652, b_2F2, MPFR_RNDN);
        ;
        mpfr_set_si(r15654, mpfr_cmp(r15652, r15653) <= 0, MPFR_RNDN);
        mpfr_set_d(r15655, c, MPFR_RNDN);
        ;
        mpfr_mul(r15657, r15656, r15655, MPFR_RNDN);
        mpfr_set_d(r15658, a, MPFR_RNDN);
        mpfr_div(r15659, r15658, r15652, MPFR_RNDN);
        mpfr_mul(r15660, r15657, r15659, MPFR_RNDN);
        ;
        mpfr_mul(r15662, r15661, r15652, MPFR_RNDN);
        mpfr_sub(r15663, r15660, r15662, MPFR_RNDN);
        mpfr_div(r15664, r15655, r15663, MPFR_RNDN);
        ;
        mpfr_set_si(r15666, mpfr_cmp(r15652, r15665) <= 0, MPFR_RNDN);
        mpfr_neg(r15667, r15652, MPFR_RNDN);
        mpfr_sqr(r15668, r15652, MPFR_RNDN);
        mpfr_mul(r15669, r15658, r15655, MPFR_RNDN);
        mpfr_sub(r15670, r15668, r15669, MPFR_RNDN);
        mpfr_sqrt(r15671, r15670, MPFR_RNDN);
        mpfr_sub(r15672, r15667, r15671, MPFR_RNDN);
        ;
        mpfr_div(r15674, r15673, r15658, MPFR_RNDN);
        mpfr_mul(r15675, r15672, r15674, MPFR_RNDN);
        mpfr_div(r15676, r15652, r15655, MPFR_RNDN);
        mpfr_div(r15677, r15656, r15676, MPFR_RNDN);
        mpfr_div(r15678, r15652, r15658, MPFR_RNDN);
        mpfr_mul(r15679, r15678, r15661, MPFR_RNDN);
        mpfr_sub(r15680, r15677, r15679, MPFR_RNDN);
        if (mpfr_get_si(r15666, MPFR_RNDN)) { mpfr_set(r15681, r15675, MPFR_RNDN); } else { mpfr_set(r15681, r15680, MPFR_RNDN); };
        if (mpfr_get_si(r15654, MPFR_RNDN)) { mpfr_set(r15682, r15664, MPFR_RNDN); } else { mpfr_set(r15682, r15681, MPFR_RNDN); };
        return mpfr_get_d(r15682, MPFR_RNDN);
}

