#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 r15433 = b_2F2;
        float r15434 = -r15433;
        float r15435 = r15433 * r15433;
        float r15436 = a;
        float r15437 = c;
        float r15438 = r15436 * r15437;
        float r15439 = r15435 - r15438;
        float r15440 = sqrt(r15439);
        float r15441 = r15434 - r15440;
        float r15442 = r15441 / r15436;
        return r15442;
}

double f_id(double a, double b_2F2, double c) {
        double r15443 = b_2F2;
        double r15444 = -r15443;
        double r15445 = r15443 * r15443;
        double r15446 = a;
        double r15447 = c;
        double r15448 = r15446 * r15447;
        double r15449 = r15445 - r15448;
        double r15450 = sqrt(r15449);
        double r15451 = r15444 - r15450;
        double r15452 = r15451 / r15446;
        return r15452;
}


double f_of(float a, float b_2F2, float c) {
        float r15453 = b_2F2;
        float r15454 = -1.3358072873053585e-141f;
        bool r15455 = r15453 <= r15454;
        float r15456 = c;
        float r15457 = 0.5f;
        float r15458 = r15457 * r15456;
        float r15459 = a;
        float r15460 = r15459 / r15453;
        float r15461 = r15458 * r15460;
        float r15462 = 2.0f;
        float r15463 = r15462 * r15453;
        float r15464 = r15461 - r15463;
        float r15465 = r15456 / r15464;
        float r15466 = 2.0626415808173556e+74f;
        bool r15467 = r15453 <= r15466;
        float r15468 = -r15453;
        float r15469 = r15468 / r15459;
        float r15470 = r15453 * r15453;
        float r15471 = r15459 * r15456;
        float r15472 = r15470 - r15471;
        float r15473 = sqrt(r15472);
        float r15474 = r15473 / r15459;
        float r15475 = r15469 - r15474;
        float r15476 = r15453 / r15456;
        float r15477 = r15457 / r15476;
        float r15478 = r15453 / r15459;
        float r15479 = r15478 * r15462;
        float r15480 = r15477 - r15479;
        float r15481 = r15467 ? r15475 : r15480;
        float r15482 = r15455 ? r15465 : r15481;
        return r15482;
}

double f_od(double a, double b_2F2, double c) {
        double r15483 = b_2F2;
        double r15484 = -1.3358072873053585e-141;
        bool r15485 = r15483 <= r15484;
        double r15486 = c;
        double r15487 = 0.5;
        double r15488 = r15487 * r15486;
        double r15489 = a;
        double r15490 = r15489 / r15483;
        double r15491 = r15488 * r15490;
        double r15492 = 2.0;
        double r15493 = r15492 * r15483;
        double r15494 = r15491 - r15493;
        double r15495 = r15486 / r15494;
        double r15496 = 2.0626415808173556e+74;
        bool r15497 = r15483 <= r15496;
        double r15498 = -r15483;
        double r15499 = r15498 / r15489;
        double r15500 = r15483 * r15483;
        double r15501 = r15489 * r15486;
        double r15502 = r15500 - r15501;
        double r15503 = sqrt(r15502);
        double r15504 = r15503 / r15489;
        double r15505 = r15499 - r15504;
        double r15506 = r15483 / r15486;
        double r15507 = r15487 / r15506;
        double r15508 = r15483 / r15489;
        double r15509 = r15508 * r15492;
        double r15510 = r15507 - r15509;
        double r15511 = r15497 ? r15505 : r15510;
        double r15512 = r15485 ? r15495 : r15511;
        return r15512;
}

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 r15513, r15514, r15515, r15516, r15517, r15518, r15519, r15520, r15521, r15522;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init(r15513);
        mpfr_init(r15514);
        mpfr_init(r15515);
        mpfr_init(r15516);
        mpfr_init(r15517);
        mpfr_init(r15518);
        mpfr_init(r15519);
        mpfr_init(r15520);
        mpfr_init(r15521);
        mpfr_init(r15522);
}

double f_im(double a, double b_2F2, double c) {
        mpfr_set_d(r15513, b_2F2, MPFR_RNDN);
        mpfr_neg(r15514, r15513, MPFR_RNDN);
        mpfr_sqr(r15515, r15513, MPFR_RNDN);
        mpfr_set_d(r15516, a, MPFR_RNDN);
        mpfr_set_d(r15517, c, MPFR_RNDN);
        mpfr_mul(r15518, r15516, r15517, MPFR_RNDN);
        mpfr_sub(r15519, r15515, r15518, MPFR_RNDN);
        mpfr_sqrt(r15520, r15519, MPFR_RNDN);
        mpfr_sub(r15521, r15514, r15520, MPFR_RNDN);
        mpfr_div(r15522, r15521, r15516, MPFR_RNDN);
        return mpfr_get_d(r15522, MPFR_RNDN);
}

static mpfr_t r15523, r15524, r15525, r15526, r15527, r15528, r15529, r15530, r15531, r15532, r15533, r15534, r15535, r15536, r15537, r15538, r15539, r15540, r15541, r15542, r15543, r15544, r15545, r15546, r15547, r15548, r15549, r15550, r15551, r15552;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r15523);
        mpfr_init_set_str(r15524, "-1.3358072873053585e-141", 10, MPFR_RNDN);
        mpfr_init(r15525);
        mpfr_init(r15526);
        mpfr_init_set_str(r15527, "1/2", 10, MPFR_RNDN);
        mpfr_init(r15528);
        mpfr_init(r15529);
        mpfr_init(r15530);
        mpfr_init(r15531);
        mpfr_init_set_str(r15532, "2", 10, MPFR_RNDN);
        mpfr_init(r15533);
        mpfr_init(r15534);
        mpfr_init(r15535);
        mpfr_init_set_str(r15536, "2.0626415808173556e+74", 10, MPFR_RNDN);
        mpfr_init(r15537);
        mpfr_init(r15538);
        mpfr_init(r15539);
        mpfr_init(r15540);
        mpfr_init(r15541);
        mpfr_init(r15542);
        mpfr_init(r15543);
        mpfr_init(r15544);
        mpfr_init(r15545);
        mpfr_init(r15546);
        mpfr_init(r15547);
        mpfr_init(r15548);
        mpfr_init(r15549);
        mpfr_init(r15550);
        mpfr_init(r15551);
        mpfr_init(r15552);
}

double f_fm(double a, double b_2F2, double c) {
        mpfr_set_d(r15523, b_2F2, MPFR_RNDN);
        ;
        mpfr_set_si(r15525, mpfr_cmp(r15523, r15524) <= 0, MPFR_RNDN);
        mpfr_set_d(r15526, c, MPFR_RNDN);
        ;
        mpfr_mul(r15528, r15527, r15526, MPFR_RNDN);
        mpfr_set_d(r15529, a, MPFR_RNDN);
        mpfr_div(r15530, r15529, r15523, MPFR_RNDN);
        mpfr_mul(r15531, r15528, r15530, MPFR_RNDN);
        ;
        mpfr_mul(r15533, r15532, r15523, MPFR_RNDN);
        mpfr_sub(r15534, r15531, r15533, MPFR_RNDN);
        mpfr_div(r15535, r15526, r15534, MPFR_RNDN);
        ;
        mpfr_set_si(r15537, mpfr_cmp(r15523, r15536) <= 0, MPFR_RNDN);
        mpfr_neg(r15538, r15523, MPFR_RNDN);
        mpfr_div(r15539, r15538, r15529, MPFR_RNDN);
        mpfr_sqr(r15540, r15523, MPFR_RNDN);
        mpfr_mul(r15541, r15529, r15526, MPFR_RNDN);
        mpfr_sub(r15542, r15540, r15541, MPFR_RNDN);
        mpfr_sqrt(r15543, r15542, MPFR_RNDN);
        mpfr_div(r15544, r15543, r15529, MPFR_RNDN);
        mpfr_sub(r15545, r15539, r15544, MPFR_RNDN);
        mpfr_div(r15546, r15523, r15526, MPFR_RNDN);
        mpfr_div(r15547, r15527, r15546, MPFR_RNDN);
        mpfr_div(r15548, r15523, r15529, MPFR_RNDN);
        mpfr_mul(r15549, r15548, r15532, MPFR_RNDN);
        mpfr_sub(r15550, r15547, r15549, MPFR_RNDN);
        if (mpfr_get_si(r15537, MPFR_RNDN)) { mpfr_set(r15551, r15545, MPFR_RNDN); } else { mpfr_set(r15551, r15550, MPFR_RNDN); };
        if (mpfr_get_si(r15525, MPFR_RNDN)) { mpfr_set(r15552, r15535, MPFR_RNDN); } else { mpfr_set(r15552, r15551, MPFR_RNDN); };
        return mpfr_get_d(r15552, MPFR_RNDN);
}

static mpfr_t r15553, r15554, r15555, r15556, r15557, r15558, r15559, r15560, r15561, r15562, r15563, r15564, r15565, r15566, r15567, r15568, r15569, r15570, r15571, r15572, r15573, r15574, r15575, r15576, r15577, r15578, r15579, r15580, r15581, r15582;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r15553);
        mpfr_init_set_str(r15554, "-1.3358072873053585e-141", 10, MPFR_RNDN);
        mpfr_init(r15555);
        mpfr_init(r15556);
        mpfr_init_set_str(r15557, "1/2", 10, MPFR_RNDN);
        mpfr_init(r15558);
        mpfr_init(r15559);
        mpfr_init(r15560);
        mpfr_init(r15561);
        mpfr_init_set_str(r15562, "2", 10, MPFR_RNDN);
        mpfr_init(r15563);
        mpfr_init(r15564);
        mpfr_init(r15565);
        mpfr_init_set_str(r15566, "2.0626415808173556e+74", 10, MPFR_RNDN);
        mpfr_init(r15567);
        mpfr_init(r15568);
        mpfr_init(r15569);
        mpfr_init(r15570);
        mpfr_init(r15571);
        mpfr_init(r15572);
        mpfr_init(r15573);
        mpfr_init(r15574);
        mpfr_init(r15575);
        mpfr_init(r15576);
        mpfr_init(r15577);
        mpfr_init(r15578);
        mpfr_init(r15579);
        mpfr_init(r15580);
        mpfr_init(r15581);
        mpfr_init(r15582);
}

double f_dm(double a, double b_2F2, double c) {
        mpfr_set_d(r15553, b_2F2, MPFR_RNDN);
        ;
        mpfr_set_si(r15555, mpfr_cmp(r15553, r15554) <= 0, MPFR_RNDN);
        mpfr_set_d(r15556, c, MPFR_RNDN);
        ;
        mpfr_mul(r15558, r15557, r15556, MPFR_RNDN);
        mpfr_set_d(r15559, a, MPFR_RNDN);
        mpfr_div(r15560, r15559, r15553, MPFR_RNDN);
        mpfr_mul(r15561, r15558, r15560, MPFR_RNDN);
        ;
        mpfr_mul(r15563, r15562, r15553, MPFR_RNDN);
        mpfr_sub(r15564, r15561, r15563, MPFR_RNDN);
        mpfr_div(r15565, r15556, r15564, MPFR_RNDN);
        ;
        mpfr_set_si(r15567, mpfr_cmp(r15553, r15566) <= 0, MPFR_RNDN);
        mpfr_neg(r15568, r15553, MPFR_RNDN);
        mpfr_div(r15569, r15568, r15559, MPFR_RNDN);
        mpfr_sqr(r15570, r15553, MPFR_RNDN);
        mpfr_mul(r15571, r15559, r15556, MPFR_RNDN);
        mpfr_sub(r15572, r15570, r15571, MPFR_RNDN);
        mpfr_sqrt(r15573, r15572, MPFR_RNDN);
        mpfr_div(r15574, r15573, r15559, MPFR_RNDN);
        mpfr_sub(r15575, r15569, r15574, MPFR_RNDN);
        mpfr_div(r15576, r15553, r15556, MPFR_RNDN);
        mpfr_div(r15577, r15557, r15576, MPFR_RNDN);
        mpfr_div(r15578, r15553, r15559, MPFR_RNDN);
        mpfr_mul(r15579, r15578, r15562, MPFR_RNDN);
        mpfr_sub(r15580, r15577, r15579, MPFR_RNDN);
        if (mpfr_get_si(r15567, MPFR_RNDN)) { mpfr_set(r15581, r15575, MPFR_RNDN); } else { mpfr_set(r15581, r15580, MPFR_RNDN); };
        if (mpfr_get_si(r15555, MPFR_RNDN)) { mpfr_set(r15582, r15565, MPFR_RNDN); } else { mpfr_set(r15582, r15581, MPFR_RNDN); };
        return mpfr_get_d(r15582, MPFR_RNDN);
}