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

char *name = "The quadratic formula (r1)";

double f_if(float a, float b, float c) {
        float r18432 = b;
        float r18433 = -r18432;
        float r18434 = r18432 * r18432;
        float r18435 = 4.0f;
        float r18436 = a;
        float r18437 = r18435 * r18436;
        float r18438 = c;
        float r18439 = r18437 * r18438;
        float r18440 = r18434 - r18439;
        float r18441 = sqrt(r18440);
        float r18442 = r18433 + r18441;
        float r18443 = 2.0f;
        float r18444 = r18443 * r18436;
        float r18445 = r18442 / r18444;
        return r18445;
}

double f_id(double a, double b, double c) {
        double r18446 = b;
        double r18447 = -r18446;
        double r18448 = r18446 * r18446;
        double r18449 = 4.0;
        double r18450 = a;
        double r18451 = r18449 * r18450;
        double r18452 = c;
        double r18453 = r18451 * r18452;
        double r18454 = r18448 - r18453;
        double r18455 = sqrt(r18454);
        double r18456 = r18447 + r18455;
        double r18457 = 2.0;
        double r18458 = r18457 * r18450;
        double r18459 = r18456 / r18458;
        return r18459;
}


double f_of(float a, float b, float c) {
        float r18460 = b;
        float r18461 = -6.535583427163324e+18f;
        bool r18462 = r18460 <= r18461;
        float r18463 = -r18460;
        float r18464 = a;
        float r18465 = r18463 / r18464;
        float r18466 = -1.5102727599532934e-36f;
        bool r18467 = r18460 <= r18466;
        float r18468 = r18460 * r18460;
        float r18469 = 4.0f;
        float r18470 = r18469 * r18464;
        float r18471 = c;
        float r18472 = r18470 * r18471;
        float r18473 = r18468 - r18472;
        float r18474 = sqrt(r18473);
        float r18475 = r18463 + r18474;
        float r18476 = 2.0f;
        float r18477 = r18476 * r18464;
        float r18478 = r18475 / r18477;
        float r18479 = 6851907356196864.0f;
        bool r18480 = r18460 <= r18479;
        float r18481 = 1.0f;
        float r18482 = r18463 - r18474;
        float r18483 = r18476 / r18469;
        float r18484 = r18483 / r18471;
        float r18485 = r18482 * r18484;
        float r18486 = r18481 / r18485;
        float r18487 = r18471 / r18460;
        float r18488 = -2.0f;
        float r18489 = r18488 / r18476;
        float r18490 = r18487 * r18489;
        float r18491 = r18480 ? r18486 : r18490;
        float r18492 = r18467 ? r18478 : r18491;
        float r18493 = r18462 ? r18465 : r18492;
        return r18493;
}

double f_od(double a, double b, double c) {
        double r18494 = b;
        double r18495 = -6.535583427163324e+18;
        bool r18496 = r18494 <= r18495;
        double r18497 = -r18494;
        double r18498 = a;
        double r18499 = r18497 / r18498;
        double r18500 = -1.5102727599532934e-36;
        bool r18501 = r18494 <= r18500;
        double r18502 = r18494 * r18494;
        double r18503 = 4.0;
        double r18504 = r18503 * r18498;
        double r18505 = c;
        double r18506 = r18504 * r18505;
        double r18507 = r18502 - r18506;
        double r18508 = sqrt(r18507);
        double r18509 = r18497 + r18508;
        double r18510 = 2.0;
        double r18511 = r18510 * r18498;
        double r18512 = r18509 / r18511;
        double r18513 = 6851907356196864.0;
        bool r18514 = r18494 <= r18513;
        double r18515 = 1.0;
        double r18516 = r18497 - r18508;
        double r18517 = r18510 / r18503;
        double r18518 = r18517 / r18505;
        double r18519 = r18516 * r18518;
        double r18520 = r18515 / r18519;
        double r18521 = r18505 / r18494;
        double r18522 = -2.0;
        double r18523 = r18522 / r18510;
        double r18524 = r18521 * r18523;
        double r18525 = r18514 ? r18520 : r18524;
        double r18526 = r18501 ? r18512 : r18525;
        double r18527 = r18496 ? r18499 : r18526;
        return r18527;
}

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 r18528, r18529, r18530, r18531, r18532, r18533, r18534, r18535, r18536, r18537, r18538, r18539, r18540, r18541;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init(r18528);
        mpfr_init(r18529);
        mpfr_init(r18530);
        mpfr_init_set_str(r18531, "4", 10, MPFR_RNDN);
        mpfr_init(r18532);
        mpfr_init(r18533);
        mpfr_init(r18534);
        mpfr_init(r18535);
        mpfr_init(r18536);
        mpfr_init(r18537);
        mpfr_init(r18538);
        mpfr_init_set_str(r18539, "2", 10, MPFR_RNDN);
        mpfr_init(r18540);
        mpfr_init(r18541);
}

double f_im(double a, double b, double c) {
        mpfr_set_d(r18528, b, MPFR_RNDN);
        mpfr_neg(r18529, r18528, MPFR_RNDN);
        mpfr_sqr(r18530, r18528, MPFR_RNDN);
        ;
        mpfr_set_d(r18532, a, MPFR_RNDN);
        mpfr_mul(r18533, r18531, r18532, MPFR_RNDN);
        mpfr_set_d(r18534, c, MPFR_RNDN);
        mpfr_mul(r18535, r18533, r18534, MPFR_RNDN);
        mpfr_sub(r18536, r18530, r18535, MPFR_RNDN);
        mpfr_sqrt(r18537, r18536, MPFR_RNDN);
        mpfr_add(r18538, r18529, r18537, MPFR_RNDN);
        ;
        mpfr_mul(r18540, r18539, r18532, MPFR_RNDN);
        mpfr_div(r18541, r18538, r18540, MPFR_RNDN);
        return mpfr_get_d(r18541, MPFR_RNDN);
}

static mpfr_t r18542, r18543, r18544, r18545, r18546, r18547, r18548, r18549, r18550, r18551, r18552, r18553, r18554, r18555, r18556, r18557, r18558, r18559, r18560, r18561, r18562, r18563, r18564, r18565, r18566, r18567, r18568, r18569, r18570, r18571, r18572, r18573, r18574, r18575;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r18542);
        mpfr_init_set_str(r18543, "-6.5355834f+18", 10, MPFR_RNDN);
        mpfr_init(r18544);
        mpfr_init(r18545);
        mpfr_init(r18546);
        mpfr_init(r18547);
        mpfr_init_set_str(r18548, "-1.5102728f-36", 10, MPFR_RNDN);
        mpfr_init(r18549);
        mpfr_init(r18550);
        mpfr_init_set_str(r18551, "4", 10, MPFR_RNDN);
        mpfr_init(r18552);
        mpfr_init(r18553);
        mpfr_init(r18554);
        mpfr_init(r18555);
        mpfr_init(r18556);
        mpfr_init(r18557);
        mpfr_init_set_str(r18558, "2", 10, MPFR_RNDN);
        mpfr_init(r18559);
        mpfr_init(r18560);
        mpfr_init_set_str(r18561, "6.8519074f+15", 10, MPFR_RNDN);
        mpfr_init(r18562);
        mpfr_init_set_str(r18563, "1", 10, MPFR_RNDN);
        mpfr_init(r18564);
        mpfr_init(r18565);
        mpfr_init(r18566);
        mpfr_init(r18567);
        mpfr_init(r18568);
        mpfr_init(r18569);
        mpfr_init_set_str(r18570, "-2", 10, MPFR_RNDN);
        mpfr_init(r18571);
        mpfr_init(r18572);
        mpfr_init(r18573);
        mpfr_init(r18574);
        mpfr_init(r18575);
}

double f_fm(double a, double b, double c) {
        mpfr_set_d(r18542, b, MPFR_RNDN);
        ;
        mpfr_set_si(r18544, mpfr_cmp(r18542, r18543) <= 0, MPFR_RNDN);
        mpfr_neg(r18545, r18542, MPFR_RNDN);
        mpfr_set_d(r18546, a, MPFR_RNDN);
        mpfr_div(r18547, r18545, r18546, MPFR_RNDN);
        ;
        mpfr_set_si(r18549, mpfr_cmp(r18542, r18548) <= 0, MPFR_RNDN);
        mpfr_sqr(r18550, r18542, MPFR_RNDN);
        ;
        mpfr_mul(r18552, r18551, r18546, MPFR_RNDN);
        mpfr_set_d(r18553, c, MPFR_RNDN);
        mpfr_mul(r18554, r18552, r18553, MPFR_RNDN);
        mpfr_sub(r18555, r18550, r18554, MPFR_RNDN);
        mpfr_sqrt(r18556, r18555, MPFR_RNDN);
        mpfr_add(r18557, r18545, r18556, MPFR_RNDN);
        ;
        mpfr_mul(r18559, r18558, r18546, MPFR_RNDN);
        mpfr_div(r18560, r18557, r18559, MPFR_RNDN);
        ;
        mpfr_set_si(r18562, mpfr_cmp(r18542, r18561) <= 0, MPFR_RNDN);
        ;
        mpfr_sub(r18564, r18545, r18556, MPFR_RNDN);
        mpfr_div(r18565, r18558, r18551, MPFR_RNDN);
        mpfr_div(r18566, r18565, r18553, MPFR_RNDN);
        mpfr_mul(r18567, r18564, r18566, MPFR_RNDN);
        mpfr_div(r18568, r18563, r18567, MPFR_RNDN);
        mpfr_div(r18569, r18553, r18542, MPFR_RNDN);
        ;
        mpfr_div(r18571, r18570, r18558, MPFR_RNDN);
        mpfr_mul(r18572, r18569, r18571, MPFR_RNDN);
        if (mpfr_get_si(r18562, MPFR_RNDN)) { mpfr_set(r18573, r18568, MPFR_RNDN); } else { mpfr_set(r18573, r18572, MPFR_RNDN); };
        if (mpfr_get_si(r18549, MPFR_RNDN)) { mpfr_set(r18574, r18560, MPFR_RNDN); } else { mpfr_set(r18574, r18573, MPFR_RNDN); };
        if (mpfr_get_si(r18544, MPFR_RNDN)) { mpfr_set(r18575, r18547, MPFR_RNDN); } else { mpfr_set(r18575, r18574, MPFR_RNDN); };
        return mpfr_get_d(r18575, MPFR_RNDN);
}

static mpfr_t r18576, r18577, r18578, r18579, r18580, r18581, r18582, r18583, r18584, r18585, r18586, r18587, r18588, r18589, r18590, r18591, r18592, r18593, r18594, r18595, r18596, r18597, r18598, r18599, r18600, r18601, r18602, r18603, r18604, r18605, r18606, r18607, r18608, r18609;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r18576);
        mpfr_init_set_str(r18577, "-6.5355834f+18", 10, MPFR_RNDN);
        mpfr_init(r18578);
        mpfr_init(r18579);
        mpfr_init(r18580);
        mpfr_init(r18581);
        mpfr_init_set_str(r18582, "-1.5102728f-36", 10, MPFR_RNDN);
        mpfr_init(r18583);
        mpfr_init(r18584);
        mpfr_init_set_str(r18585, "4", 10, MPFR_RNDN);
        mpfr_init(r18586);
        mpfr_init(r18587);
        mpfr_init(r18588);
        mpfr_init(r18589);
        mpfr_init(r18590);
        mpfr_init(r18591);
        mpfr_init_set_str(r18592, "2", 10, MPFR_RNDN);
        mpfr_init(r18593);
        mpfr_init(r18594);
        mpfr_init_set_str(r18595, "6.8519074f+15", 10, MPFR_RNDN);
        mpfr_init(r18596);
        mpfr_init_set_str(r18597, "1", 10, MPFR_RNDN);
        mpfr_init(r18598);
        mpfr_init(r18599);
        mpfr_init(r18600);
        mpfr_init(r18601);
        mpfr_init(r18602);
        mpfr_init(r18603);
        mpfr_init_set_str(r18604, "-2", 10, MPFR_RNDN);
        mpfr_init(r18605);
        mpfr_init(r18606);
        mpfr_init(r18607);
        mpfr_init(r18608);
        mpfr_init(r18609);
}

double f_dm(double a, double b, double c) {
        mpfr_set_d(r18576, b, MPFR_RNDN);
        ;
        mpfr_set_si(r18578, mpfr_cmp(r18576, r18577) <= 0, MPFR_RNDN);
        mpfr_neg(r18579, r18576, MPFR_RNDN);
        mpfr_set_d(r18580, a, MPFR_RNDN);
        mpfr_div(r18581, r18579, r18580, MPFR_RNDN);
        ;
        mpfr_set_si(r18583, mpfr_cmp(r18576, r18582) <= 0, MPFR_RNDN);
        mpfr_sqr(r18584, r18576, MPFR_RNDN);
        ;
        mpfr_mul(r18586, r18585, r18580, MPFR_RNDN);
        mpfr_set_d(r18587, c, MPFR_RNDN);
        mpfr_mul(r18588, r18586, r18587, MPFR_RNDN);
        mpfr_sub(r18589, r18584, r18588, MPFR_RNDN);
        mpfr_sqrt(r18590, r18589, MPFR_RNDN);
        mpfr_add(r18591, r18579, r18590, MPFR_RNDN);
        ;
        mpfr_mul(r18593, r18592, r18580, MPFR_RNDN);
        mpfr_div(r18594, r18591, r18593, MPFR_RNDN);
        ;
        mpfr_set_si(r18596, mpfr_cmp(r18576, r18595) <= 0, MPFR_RNDN);
        ;
        mpfr_sub(r18598, r18579, r18590, MPFR_RNDN);
        mpfr_div(r18599, r18592, r18585, MPFR_RNDN);
        mpfr_div(r18600, r18599, r18587, MPFR_RNDN);
        mpfr_mul(r18601, r18598, r18600, MPFR_RNDN);
        mpfr_div(r18602, r18597, r18601, MPFR_RNDN);
        mpfr_div(r18603, r18587, r18576, MPFR_RNDN);
        ;
        mpfr_div(r18605, r18604, r18592, MPFR_RNDN);
        mpfr_mul(r18606, r18603, r18605, MPFR_RNDN);
        if (mpfr_get_si(r18596, MPFR_RNDN)) { mpfr_set(r18607, r18602, MPFR_RNDN); } else { mpfr_set(r18607, r18606, MPFR_RNDN); };
        if (mpfr_get_si(r18583, MPFR_RNDN)) { mpfr_set(r18608, r18594, MPFR_RNDN); } else { mpfr_set(r18608, r18607, MPFR_RNDN); };
        if (mpfr_get_si(r18578, MPFR_RNDN)) { mpfr_set(r18609, r18581, MPFR_RNDN); } else { mpfr_set(r18609, r18608, MPFR_RNDN); };
        return mpfr_get_d(r18609, MPFR_RNDN);
}

