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

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

double f_if(float a, float b_2F2, float c) {
        float r15547 = b_2F2;
        float r15548 = -r15547;
        float r15549 = r15547 * r15547;
        float r15550 = a;
        float r15551 = c;
        float r15552 = r15550 * r15551;
        float r15553 = r15549 - r15552;
        float r15554 = sqrt(r15553);
        float r15555 = r15548 + r15554;
        float r15556 = r15555 / r15550;
        return r15556;
}

double f_id(double a, double b_2F2, double c) {
        double r15557 = b_2F2;
        double r15558 = -r15557;
        double r15559 = r15557 * r15557;
        double r15560 = a;
        double r15561 = c;
        double r15562 = r15560 * r15561;
        double r15563 = r15559 - r15562;
        double r15564 = sqrt(r15563);
        double r15565 = r15558 + r15564;
        double r15566 = r15565 / r15560;
        return r15566;
}


double f_of(float a, float b_2F2, float c) {
        float r15567 = b_2F2;
        float r15568 = -1.4548518266586696e-17f;
        bool r15569 = r15567 <= r15568;
        float r15570 = -2.0f;
        float r15571 = a;
        float r15572 = r15567 / r15571;
        float r15573 = r15570 * r15572;
        float r15574 = 1.0428439038139104e-180f;
        bool r15575 = r15567 <= r15574;
        float r15576 = -r15567;
        float r15577 = r15567 * r15567;
        float r15578 = c;
        float r15579 = r15571 * r15578;
        float r15580 = r15577 - r15579;
        float r15581 = sqrt(r15580);
        float r15582 = r15576 + r15581;
        float r15583 = r15582 / r15571;
        float r15584 = 2.0626415808173556e+74f;
        bool r15585 = r15567 <= r15584;
        float r15586 = 1.0f;
        float r15587 = r15576 - r15581;
        float r15588 = r15587 / r15578;
        float r15589 = r15586 / r15588;
        float r15590 = r15567 + r15576;
        float r15591 = r15590 / r15571;
        float r15592 = 0.5f;
        float r15593 = r15567 / r15592;
        float r15594 = r15578 / r15593;
        float r15595 = r15591 - r15594;
        float r15596 = r15585 ? r15589 : r15595;
        float r15597 = r15575 ? r15583 : r15596;
        float r15598 = r15569 ? r15573 : r15597;
        return r15598;
}

double f_od(double a, double b_2F2, double c) {
        double r15599 = b_2F2;
        double r15600 = -1.4548518266586696e-17;
        bool r15601 = r15599 <= r15600;
        double r15602 = -2.0;
        double r15603 = a;
        double r15604 = r15599 / r15603;
        double r15605 = r15602 * r15604;
        double r15606 = 1.0428439038139104e-180;
        bool r15607 = r15599 <= r15606;
        double r15608 = -r15599;
        double r15609 = r15599 * r15599;
        double r15610 = c;
        double r15611 = r15603 * r15610;
        double r15612 = r15609 - r15611;
        double r15613 = sqrt(r15612);
        double r15614 = r15608 + r15613;
        double r15615 = r15614 / r15603;
        double r15616 = 2.0626415808173556e+74;
        bool r15617 = r15599 <= r15616;
        double r15618 = 1.0;
        double r15619 = r15608 - r15613;
        double r15620 = r15619 / r15610;
        double r15621 = r15618 / r15620;
        double r15622 = r15599 + r15608;
        double r15623 = r15622 / r15603;
        double r15624 = 0.5;
        double r15625 = r15599 / r15624;
        double r15626 = r15610 / r15625;
        double r15627 = r15623 - r15626;
        double r15628 = r15617 ? r15621 : r15627;
        double r15629 = r15607 ? r15615 : r15628;
        double r15630 = r15601 ? r15605 : r15629;
        return r15630;
}

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 r15631, r15632, r15633, r15634, r15635, r15636, r15637, r15638, r15639, r15640;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init(r15631);
        mpfr_init(r15632);
        mpfr_init(r15633);
        mpfr_init(r15634);
        mpfr_init(r15635);
        mpfr_init(r15636);
        mpfr_init(r15637);
        mpfr_init(r15638);
        mpfr_init(r15639);
        mpfr_init(r15640);
}

double f_im(double a, double b_2F2, double c) {
        mpfr_set_d(r15631, b_2F2, MPFR_RNDN);
        mpfr_neg(r15632, r15631, MPFR_RNDN);
        mpfr_sqr(r15633, r15631, MPFR_RNDN);
        mpfr_set_d(r15634, a, MPFR_RNDN);
        mpfr_set_d(r15635, c, MPFR_RNDN);
        mpfr_mul(r15636, r15634, r15635, MPFR_RNDN);
        mpfr_sub(r15637, r15633, r15636, MPFR_RNDN);
        mpfr_sqrt(r15638, r15637, MPFR_RNDN);
        mpfr_add(r15639, r15632, r15638, MPFR_RNDN);
        mpfr_div(r15640, r15639, r15634, MPFR_RNDN);
        return mpfr_get_d(r15640, MPFR_RNDN);
}

static mpfr_t r15641, r15642, r15643, r15644, r15645, r15646, r15647, r15648, r15649, r15650, r15651, r15652, r15653, r15654, r15655, r15656, r15657, r15658, r15659, r15660, r15661, r15662, r15663, r15664, r15665, r15666, r15667, r15668, r15669, r15670, r15671, r15672;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r15641);
        mpfr_init_set_str(r15642, "-1.4548518266586696e-17", 10, MPFR_RNDN);
        mpfr_init(r15643);
        mpfr_init_set_str(r15644, "-2", 10, MPFR_RNDN);
        mpfr_init(r15645);
        mpfr_init(r15646);
        mpfr_init(r15647);
        mpfr_init_set_str(r15648, "1.0428439038139104e-180", 10, MPFR_RNDN);
        mpfr_init(r15649);
        mpfr_init(r15650);
        mpfr_init(r15651);
        mpfr_init(r15652);
        mpfr_init(r15653);
        mpfr_init(r15654);
        mpfr_init(r15655);
        mpfr_init(r15656);
        mpfr_init(r15657);
        mpfr_init_set_str(r15658, "2.0626415808173556e+74", 10, MPFR_RNDN);
        mpfr_init(r15659);
        mpfr_init_set_str(r15660, "1", 10, MPFR_RNDN);
        mpfr_init(r15661);
        mpfr_init(r15662);
        mpfr_init(r15663);
        mpfr_init(r15664);
        mpfr_init(r15665);
        mpfr_init_set_str(r15666, "1/2", 10, MPFR_RNDN);
        mpfr_init(r15667);
        mpfr_init(r15668);
        mpfr_init(r15669);
        mpfr_init(r15670);
        mpfr_init(r15671);
        mpfr_init(r15672);
}

double f_fm(double a, double b_2F2, double c) {
        mpfr_set_d(r15641, b_2F2, MPFR_RNDN);
        ;
        mpfr_set_si(r15643, mpfr_cmp(r15641, r15642) <= 0, MPFR_RNDN);
        ;
        mpfr_set_d(r15645, a, MPFR_RNDN);
        mpfr_div(r15646, r15641, r15645, MPFR_RNDN);
        mpfr_mul(r15647, r15644, r15646, MPFR_RNDN);
        ;
        mpfr_set_si(r15649, mpfr_cmp(r15641, r15648) <= 0, MPFR_RNDN);
        mpfr_neg(r15650, r15641, MPFR_RNDN);
        mpfr_sqr(r15651, r15641, MPFR_RNDN);
        mpfr_set_d(r15652, c, MPFR_RNDN);
        mpfr_mul(r15653, r15645, r15652, MPFR_RNDN);
        mpfr_sub(r15654, r15651, r15653, MPFR_RNDN);
        mpfr_sqrt(r15655, r15654, MPFR_RNDN);
        mpfr_add(r15656, r15650, r15655, MPFR_RNDN);
        mpfr_div(r15657, r15656, r15645, MPFR_RNDN);
        ;
        mpfr_set_si(r15659, mpfr_cmp(r15641, r15658) <= 0, MPFR_RNDN);
        ;
        mpfr_sub(r15661, r15650, r15655, MPFR_RNDN);
        mpfr_div(r15662, r15661, r15652, MPFR_RNDN);
        mpfr_div(r15663, r15660, r15662, MPFR_RNDN);
        mpfr_add(r15664, r15641, r15650, MPFR_RNDN);
        mpfr_div(r15665, r15664, r15645, MPFR_RNDN);
        ;
        mpfr_div(r15667, r15641, r15666, MPFR_RNDN);
        mpfr_div(r15668, r15652, r15667, MPFR_RNDN);
        mpfr_sub(r15669, r15665, r15668, MPFR_RNDN);
        if (mpfr_get_si(r15659, MPFR_RNDN)) { mpfr_set(r15670, r15663, MPFR_RNDN); } else { mpfr_set(r15670, r15669, MPFR_RNDN); };
        if (mpfr_get_si(r15649, MPFR_RNDN)) { mpfr_set(r15671, r15657, MPFR_RNDN); } else { mpfr_set(r15671, r15670, MPFR_RNDN); };
        if (mpfr_get_si(r15643, MPFR_RNDN)) { mpfr_set(r15672, r15647, MPFR_RNDN); } else { mpfr_set(r15672, r15671, MPFR_RNDN); };
        return mpfr_get_d(r15672, MPFR_RNDN);
}

static mpfr_t r15673, r15674, r15675, r15676, r15677, r15678, r15679, r15680, r15681, r15682, r15683, r15684, r15685, r15686, r15687, r15688, r15689, r15690, r15691, r15692, r15693, r15694, r15695, r15696, r15697, r15698, r15699, r15700, r15701, r15702, r15703, r15704;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r15673);
        mpfr_init_set_str(r15674, "-1.4548518266586696e-17", 10, MPFR_RNDN);
        mpfr_init(r15675);
        mpfr_init_set_str(r15676, "-2", 10, MPFR_RNDN);
        mpfr_init(r15677);
        mpfr_init(r15678);
        mpfr_init(r15679);
        mpfr_init_set_str(r15680, "1.0428439038139104e-180", 10, MPFR_RNDN);
        mpfr_init(r15681);
        mpfr_init(r15682);
        mpfr_init(r15683);
        mpfr_init(r15684);
        mpfr_init(r15685);
        mpfr_init(r15686);
        mpfr_init(r15687);
        mpfr_init(r15688);
        mpfr_init(r15689);
        mpfr_init_set_str(r15690, "2.0626415808173556e+74", 10, MPFR_RNDN);
        mpfr_init(r15691);
        mpfr_init_set_str(r15692, "1", 10, MPFR_RNDN);
        mpfr_init(r15693);
        mpfr_init(r15694);
        mpfr_init(r15695);
        mpfr_init(r15696);
        mpfr_init(r15697);
        mpfr_init_set_str(r15698, "1/2", 10, MPFR_RNDN);
        mpfr_init(r15699);
        mpfr_init(r15700);
        mpfr_init(r15701);
        mpfr_init(r15702);
        mpfr_init(r15703);
        mpfr_init(r15704);
}

double f_dm(double a, double b_2F2, double c) {
        mpfr_set_d(r15673, b_2F2, MPFR_RNDN);
        ;
        mpfr_set_si(r15675, mpfr_cmp(r15673, r15674) <= 0, MPFR_RNDN);
        ;
        mpfr_set_d(r15677, a, MPFR_RNDN);
        mpfr_div(r15678, r15673, r15677, MPFR_RNDN);
        mpfr_mul(r15679, r15676, r15678, MPFR_RNDN);
        ;
        mpfr_set_si(r15681, mpfr_cmp(r15673, r15680) <= 0, MPFR_RNDN);
        mpfr_neg(r15682, r15673, MPFR_RNDN);
        mpfr_sqr(r15683, r15673, MPFR_RNDN);
        mpfr_set_d(r15684, c, MPFR_RNDN);
        mpfr_mul(r15685, r15677, r15684, MPFR_RNDN);
        mpfr_sub(r15686, r15683, r15685, MPFR_RNDN);
        mpfr_sqrt(r15687, r15686, MPFR_RNDN);
        mpfr_add(r15688, r15682, r15687, MPFR_RNDN);
        mpfr_div(r15689, r15688, r15677, MPFR_RNDN);
        ;
        mpfr_set_si(r15691, mpfr_cmp(r15673, r15690) <= 0, MPFR_RNDN);
        ;
        mpfr_sub(r15693, r15682, r15687, MPFR_RNDN);
        mpfr_div(r15694, r15693, r15684, MPFR_RNDN);
        mpfr_div(r15695, r15692, r15694, MPFR_RNDN);
        mpfr_add(r15696, r15673, r15682, MPFR_RNDN);
        mpfr_div(r15697, r15696, r15677, MPFR_RNDN);
        ;
        mpfr_div(r15699, r15673, r15698, MPFR_RNDN);
        mpfr_div(r15700, r15684, r15699, MPFR_RNDN);
        mpfr_sub(r15701, r15697, r15700, MPFR_RNDN);
        if (mpfr_get_si(r15691, MPFR_RNDN)) { mpfr_set(r15702, r15695, MPFR_RNDN); } else { mpfr_set(r15702, r15701, MPFR_RNDN); };
        if (mpfr_get_si(r15681, MPFR_RNDN)) { mpfr_set(r15703, r15689, MPFR_RNDN); } else { mpfr_set(r15703, r15702, MPFR_RNDN); };
        if (mpfr_get_si(r15675, MPFR_RNDN)) { mpfr_set(r15704, r15679, MPFR_RNDN); } else { mpfr_set(r15704, r15703, MPFR_RNDN); };
        return mpfr_get_d(r15704, MPFR_RNDN);
}

