#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 r15447 = b_2F2;
        float r15448 = -r15447;
        float r15449 = r15447 * r15447;
        float r15450 = a;
        float r15451 = c;
        float r15452 = r15450 * r15451;
        float r15453 = r15449 - r15452;
        float r15454 = sqrt(r15453);
        float r15455 = r15448 + r15454;
        float r15456 = r15455 / r15450;
        return r15456;
}

double f_id(double a, double b_2F2, double c) {
        double r15457 = b_2F2;
        double r15458 = -r15457;
        double r15459 = r15457 * r15457;
        double r15460 = a;
        double r15461 = c;
        double r15462 = r15460 * r15461;
        double r15463 = r15459 - r15462;
        double r15464 = sqrt(r15463);
        double r15465 = r15458 + r15464;
        double r15466 = r15465 / r15460;
        return r15466;
}


double f_of(float a, float b_2F2, float c) {
        float r15467 = b_2F2;
        float r15468 = -1.2339538201069979e+148f;
        bool r15469 = r15467 <= r15468;
        float r15470 = -2.0f;
        float r15471 = a;
        float r15472 = r15467 / r15471;
        float r15473 = r15470 * r15472;
        float r15474 = 4.6117267249984834e-185f;
        bool r15475 = r15467 <= r15474;
        float r15476 = -r15467;
        float r15477 = r15467 * r15467;
        float r15478 = c;
        float r15479 = r15471 * r15478;
        float r15480 = r15477 - r15479;
        float r15481 = sqrt(r15480);
        float r15482 = r15476 + r15481;
        float r15483 = r15482 / r15471;
        float r15484 = 2.4608343160951844e+34f;
        bool r15485 = r15467 <= r15484;
        float r15486 = r15476 - r15481;
        float r15487 = r15479 / r15486;
        float r15488 = r15487 / r15471;
        float r15489 = r15467 + r15476;
        float r15490 = r15489 / r15471;
        float r15491 = 0.5f;
        float r15492 = r15467 / r15491;
        float r15493 = r15478 / r15492;
        float r15494 = r15490 - r15493;
        float r15495 = r15485 ? r15488 : r15494;
        float r15496 = r15475 ? r15483 : r15495;
        float r15497 = r15469 ? r15473 : r15496;
        return r15497;
}

double f_od(double a, double b_2F2, double c) {
        double r15498 = b_2F2;
        double r15499 = -1.2339538201069979e+148;
        bool r15500 = r15498 <= r15499;
        double r15501 = -2.0;
        double r15502 = a;
        double r15503 = r15498 / r15502;
        double r15504 = r15501 * r15503;
        double r15505 = 4.6117267249984834e-185;
        bool r15506 = r15498 <= r15505;
        double r15507 = -r15498;
        double r15508 = r15498 * r15498;
        double r15509 = c;
        double r15510 = r15502 * r15509;
        double r15511 = r15508 - r15510;
        double r15512 = sqrt(r15511);
        double r15513 = r15507 + r15512;
        double r15514 = r15513 / r15502;
        double r15515 = 2.4608343160951844e+34;
        bool r15516 = r15498 <= r15515;
        double r15517 = r15507 - r15512;
        double r15518 = r15510 / r15517;
        double r15519 = r15518 / r15502;
        double r15520 = r15498 + r15507;
        double r15521 = r15520 / r15502;
        double r15522 = 0.5;
        double r15523 = r15498 / r15522;
        double r15524 = r15509 / r15523;
        double r15525 = r15521 - r15524;
        double r15526 = r15516 ? r15519 : r15525;
        double r15527 = r15506 ? r15514 : r15526;
        double r15528 = r15500 ? r15504 : r15527;
        return r15528;
}

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 r15529, r15530, r15531, r15532, r15533, r15534, r15535, r15536, r15537, r15538;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init(r15529);
        mpfr_init(r15530);
        mpfr_init(r15531);
        mpfr_init(r15532);
        mpfr_init(r15533);
        mpfr_init(r15534);
        mpfr_init(r15535);
        mpfr_init(r15536);
        mpfr_init(r15537);
        mpfr_init(r15538);
}

double f_im(double a, double b_2F2, double c) {
        mpfr_set_d(r15529, b_2F2, MPFR_RNDN);
        mpfr_neg(r15530, r15529, MPFR_RNDN);
        mpfr_sqr(r15531, r15529, MPFR_RNDN);
        mpfr_set_d(r15532, a, MPFR_RNDN);
        mpfr_set_d(r15533, c, MPFR_RNDN);
        mpfr_mul(r15534, r15532, r15533, MPFR_RNDN);
        mpfr_sub(r15535, r15531, r15534, MPFR_RNDN);
        mpfr_sqrt(r15536, r15535, MPFR_RNDN);
        mpfr_add(r15537, r15530, r15536, MPFR_RNDN);
        mpfr_div(r15538, r15537, r15532, MPFR_RNDN);
        return mpfr_get_d(r15538, MPFR_RNDN);
}

static mpfr_t r15539, r15540, r15541, r15542, r15543, r15544, r15545, r15546, r15547, r15548, r15549, r15550, r15551, r15552, r15553, r15554, r15555, r15556, r15557, r15558, r15559, r15560, r15561, r15562, r15563, r15564, r15565, r15566, r15567, r15568, r15569;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r15539);
        mpfr_init_set_str(r15540, "-1.2339538201069979e+148", 10, MPFR_RNDN);
        mpfr_init(r15541);
        mpfr_init_set_str(r15542, "-2", 10, MPFR_RNDN);
        mpfr_init(r15543);
        mpfr_init(r15544);
        mpfr_init(r15545);
        mpfr_init_set_str(r15546, "4.6117267249984834e-185", 10, MPFR_RNDN);
        mpfr_init(r15547);
        mpfr_init(r15548);
        mpfr_init(r15549);
        mpfr_init(r15550);
        mpfr_init(r15551);
        mpfr_init(r15552);
        mpfr_init(r15553);
        mpfr_init(r15554);
        mpfr_init(r15555);
        mpfr_init_set_str(r15556, "2.4608343160951844e+34", 10, MPFR_RNDN);
        mpfr_init(r15557);
        mpfr_init(r15558);
        mpfr_init(r15559);
        mpfr_init(r15560);
        mpfr_init(r15561);
        mpfr_init(r15562);
        mpfr_init_set_str(r15563, "1/2", 10, MPFR_RNDN);
        mpfr_init(r15564);
        mpfr_init(r15565);
        mpfr_init(r15566);
        mpfr_init(r15567);
        mpfr_init(r15568);
        mpfr_init(r15569);
}

double f_fm(double a, double b_2F2, double c) {
        mpfr_set_d(r15539, b_2F2, MPFR_RNDN);
        ;
        mpfr_set_si(r15541, mpfr_cmp(r15539, r15540) <= 0, MPFR_RNDN);
        ;
        mpfr_set_d(r15543, a, MPFR_RNDN);
        mpfr_div(r15544, r15539, r15543, MPFR_RNDN);
        mpfr_mul(r15545, r15542, r15544, MPFR_RNDN);
        ;
        mpfr_set_si(r15547, mpfr_cmp(r15539, r15546) <= 0, MPFR_RNDN);
        mpfr_neg(r15548, r15539, MPFR_RNDN);
        mpfr_sqr(r15549, r15539, MPFR_RNDN);
        mpfr_set_d(r15550, c, MPFR_RNDN);
        mpfr_mul(r15551, r15543, r15550, MPFR_RNDN);
        mpfr_sub(r15552, r15549, r15551, MPFR_RNDN);
        mpfr_sqrt(r15553, r15552, MPFR_RNDN);
        mpfr_add(r15554, r15548, r15553, MPFR_RNDN);
        mpfr_div(r15555, r15554, r15543, MPFR_RNDN);
        ;
        mpfr_set_si(r15557, mpfr_cmp(r15539, r15556) <= 0, MPFR_RNDN);
        mpfr_sub(r15558, r15548, r15553, MPFR_RNDN);
        mpfr_div(r15559, r15551, r15558, MPFR_RNDN);
        mpfr_div(r15560, r15559, r15543, MPFR_RNDN);
        mpfr_add(r15561, r15539, r15548, MPFR_RNDN);
        mpfr_div(r15562, r15561, r15543, MPFR_RNDN);
        ;
        mpfr_div(r15564, r15539, r15563, MPFR_RNDN);
        mpfr_div(r15565, r15550, r15564, MPFR_RNDN);
        mpfr_sub(r15566, r15562, r15565, MPFR_RNDN);
        if (mpfr_get_si(r15557, MPFR_RNDN)) { mpfr_set(r15567, r15560, MPFR_RNDN); } else { mpfr_set(r15567, r15566, MPFR_RNDN); };
        if (mpfr_get_si(r15547, MPFR_RNDN)) { mpfr_set(r15568, r15555, MPFR_RNDN); } else { mpfr_set(r15568, r15567, MPFR_RNDN); };
        if (mpfr_get_si(r15541, MPFR_RNDN)) { mpfr_set(r15569, r15545, MPFR_RNDN); } else { mpfr_set(r15569, r15568, MPFR_RNDN); };
        return mpfr_get_d(r15569, MPFR_RNDN);
}

static mpfr_t r15570, r15571, r15572, r15573, r15574, r15575, r15576, r15577, r15578, r15579, r15580, r15581, r15582, r15583, r15584, r15585, r15586, r15587, r15588, r15589, r15590, r15591, r15592, r15593, r15594, r15595, r15596, r15597, r15598, r15599, r15600;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r15570);
        mpfr_init_set_str(r15571, "-1.2339538201069979e+148", 10, MPFR_RNDN);
        mpfr_init(r15572);
        mpfr_init_set_str(r15573, "-2", 10, MPFR_RNDN);
        mpfr_init(r15574);
        mpfr_init(r15575);
        mpfr_init(r15576);
        mpfr_init_set_str(r15577, "4.6117267249984834e-185", 10, MPFR_RNDN);
        mpfr_init(r15578);
        mpfr_init(r15579);
        mpfr_init(r15580);
        mpfr_init(r15581);
        mpfr_init(r15582);
        mpfr_init(r15583);
        mpfr_init(r15584);
        mpfr_init(r15585);
        mpfr_init(r15586);
        mpfr_init_set_str(r15587, "2.4608343160951844e+34", 10, MPFR_RNDN);
        mpfr_init(r15588);
        mpfr_init(r15589);
        mpfr_init(r15590);
        mpfr_init(r15591);
        mpfr_init(r15592);
        mpfr_init(r15593);
        mpfr_init_set_str(r15594, "1/2", 10, MPFR_RNDN);
        mpfr_init(r15595);
        mpfr_init(r15596);
        mpfr_init(r15597);
        mpfr_init(r15598);
        mpfr_init(r15599);
        mpfr_init(r15600);
}

double f_dm(double a, double b_2F2, double c) {
        mpfr_set_d(r15570, b_2F2, MPFR_RNDN);
        ;
        mpfr_set_si(r15572, mpfr_cmp(r15570, r15571) <= 0, MPFR_RNDN);
        ;
        mpfr_set_d(r15574, a, MPFR_RNDN);
        mpfr_div(r15575, r15570, r15574, MPFR_RNDN);
        mpfr_mul(r15576, r15573, r15575, MPFR_RNDN);
        ;
        mpfr_set_si(r15578, mpfr_cmp(r15570, r15577) <= 0, MPFR_RNDN);
        mpfr_neg(r15579, r15570, MPFR_RNDN);
        mpfr_sqr(r15580, r15570, MPFR_RNDN);
        mpfr_set_d(r15581, c, MPFR_RNDN);
        mpfr_mul(r15582, r15574, r15581, MPFR_RNDN);
        mpfr_sub(r15583, r15580, r15582, MPFR_RNDN);
        mpfr_sqrt(r15584, r15583, MPFR_RNDN);
        mpfr_add(r15585, r15579, r15584, MPFR_RNDN);
        mpfr_div(r15586, r15585, r15574, MPFR_RNDN);
        ;
        mpfr_set_si(r15588, mpfr_cmp(r15570, r15587) <= 0, MPFR_RNDN);
        mpfr_sub(r15589, r15579, r15584, MPFR_RNDN);
        mpfr_div(r15590, r15582, r15589, MPFR_RNDN);
        mpfr_div(r15591, r15590, r15574, MPFR_RNDN);
        mpfr_add(r15592, r15570, r15579, MPFR_RNDN);
        mpfr_div(r15593, r15592, r15574, MPFR_RNDN);
        ;
        mpfr_div(r15595, r15570, r15594, MPFR_RNDN);
        mpfr_div(r15596, r15581, r15595, MPFR_RNDN);
        mpfr_sub(r15597, r15593, r15596, MPFR_RNDN);
        if (mpfr_get_si(r15588, MPFR_RNDN)) { mpfr_set(r15598, r15591, MPFR_RNDN); } else { mpfr_set(r15598, r15597, MPFR_RNDN); };
        if (mpfr_get_si(r15578, MPFR_RNDN)) { mpfr_set(r15599, r15586, MPFR_RNDN); } else { mpfr_set(r15599, r15598, MPFR_RNDN); };
        if (mpfr_get_si(r15572, MPFR_RNDN)) { mpfr_set(r15600, r15576, MPFR_RNDN); } else { mpfr_set(r15600, r15599, MPFR_RNDN); };
        return mpfr_get_d(r15600, MPFR_RNDN);
}

