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

char *name = "quadp (p42, positive)";

double f_if(float a, float b, float c) {
        float r20611 = b;
        float r20612 = -r20611;
        float r20613 = r20611 * r20611;
        float r20614 = 4;
        float r20615 = a;
        float r20616 = c;
        float r20617 = r20615 * r20616;
        float r20618 = r20614 * r20617;
        float r20619 = r20613 - r20618;
        float r20620 = sqrt(r20619);
        float r20621 = r20612 + r20620;
        float r20622 = 2;
        float r20623 = r20622 * r20615;
        float r20624 = r20621 / r20623;
        return r20624;
}

double f_id(double a, double b, double c) {
        double r20625 = b;
        double r20626 = -r20625;
        double r20627 = r20625 * r20625;
        double r20628 = 4;
        double r20629 = a;
        double r20630 = c;
        double r20631 = r20629 * r20630;
        double r20632 = r20628 * r20631;
        double r20633 = r20627 - r20632;
        double r20634 = sqrt(r20633);
        double r20635 = r20626 + r20634;
        double r20636 = 2;
        double r20637 = r20636 * r20629;
        double r20638 = r20635 / r20637;
        return r20638;
}


double f_of(float a, float b, float c) {
        float r20639 = b;
        float r20640 = -2.788370916558726e+153;
        bool r20641 = r20639 <= r20640;
        float r20642 = c;
        float r20643 = r20642 / r20639;
        float r20644 = a;
        float r20645 = r20639 / r20644;
        float r20646 = r20643 - r20645;
        float r20647 = 7.580412743766101e-138;
        bool r20648 = r20639 <= r20647;
        float r20649 = r20639 * r20639;
        float r20650 = 4;
        float r20651 = r20650 * r20642;
        float r20652 = r20651 * r20644;
        float r20653 = r20649 - r20652;
        float r20654 = sqrt(r20653);
        float r20655 = -r20654;
        float r20656 = r20639 + r20655;
        float r20657 = 2;
        float r20658 = r20657 * r20644;
        float r20659 = -r20658;
        float r20660 = r20656 / r20659;
        float r20661 = -2;
        float r20662 = r20661 / r20657;
        float r20663 = r20643 * r20662;
        float r20664 = r20648 ? r20660 : r20663;
        float r20665 = r20641 ? r20646 : r20664;
        return r20665;
}

double f_od(double a, double b, double c) {
        double r20666 = b;
        double r20667 = -2.788370916558726e+153;
        bool r20668 = r20666 <= r20667;
        double r20669 = c;
        double r20670 = r20669 / r20666;
        double r20671 = a;
        double r20672 = r20666 / r20671;
        double r20673 = r20670 - r20672;
        double r20674 = 7.580412743766101e-138;
        bool r20675 = r20666 <= r20674;
        double r20676 = r20666 * r20666;
        double r20677 = 4;
        double r20678 = r20677 * r20669;
        double r20679 = r20678 * r20671;
        double r20680 = r20676 - r20679;
        double r20681 = sqrt(r20680);
        double r20682 = -r20681;
        double r20683 = r20666 + r20682;
        double r20684 = 2;
        double r20685 = r20684 * r20671;
        double r20686 = -r20685;
        double r20687 = r20683 / r20686;
        double r20688 = -2;
        double r20689 = r20688 / r20684;
        double r20690 = r20670 * r20689;
        double r20691 = r20675 ? r20687 : r20690;
        double r20692 = r20668 ? r20673 : r20691;
        return r20692;
}

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 r20693, r20694, r20695, r20696, r20697, r20698, r20699, r20700, r20701, r20702, r20703, r20704, r20705, r20706;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(3472);
        mpfr_init(r20693);
        mpfr_init(r20694);
        mpfr_init(r20695);
        mpfr_init_set_str(r20696, "4", 10, MPFR_RNDN);
        mpfr_init(r20697);
        mpfr_init(r20698);
        mpfr_init(r20699);
        mpfr_init(r20700);
        mpfr_init(r20701);
        mpfr_init(r20702);
        mpfr_init(r20703);
        mpfr_init_set_str(r20704, "2", 10, MPFR_RNDN);
        mpfr_init(r20705);
        mpfr_init(r20706);
}

double f_im(double a, double b, double c) {
        mpfr_set_d(r20693, b, MPFR_RNDN);
        mpfr_neg(r20694, r20693, MPFR_RNDN);
        mpfr_mul(r20695, r20693, r20693, MPFR_RNDN);
        ;
        mpfr_set_d(r20697, a, MPFR_RNDN);
        mpfr_set_d(r20698, c, MPFR_RNDN);
        mpfr_mul(r20699, r20697, r20698, MPFR_RNDN);
        mpfr_mul(r20700, r20696, r20699, MPFR_RNDN);
        mpfr_sub(r20701, r20695, r20700, MPFR_RNDN);
        mpfr_sqrt(r20702, r20701, MPFR_RNDN);
        mpfr_add(r20703, r20694, r20702, MPFR_RNDN);
        ;
        mpfr_mul(r20705, r20704, r20697, MPFR_RNDN);
        mpfr_div(r20706, r20703, r20705, MPFR_RNDN);
        return mpfr_get_d(r20706, MPFR_RNDN);
}

static mpfr_t r20707, r20708, r20709, r20710, r20711, r20712, r20713, r20714, r20715, r20716, r20717, r20718, r20719, r20720, r20721, r20722, r20723, r20724, r20725, r20726, r20727, r20728, r20729, r20730, r20731, r20732, r20733;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(3472);
        mpfr_init(r20707);
        mpfr_init_set_str(r20708, "-2.788370916558726e+153", 10, MPFR_RNDN);
        mpfr_init(r20709);
        mpfr_init(r20710);
        mpfr_init(r20711);
        mpfr_init(r20712);
        mpfr_init(r20713);
        mpfr_init(r20714);
        mpfr_init_set_str(r20715, "7.580412743766101e-138", 10, MPFR_RNDN);
        mpfr_init(r20716);
        mpfr_init(r20717);
        mpfr_init_set_str(r20718, "4", 10, MPFR_RNDN);
        mpfr_init(r20719);
        mpfr_init(r20720);
        mpfr_init(r20721);
        mpfr_init(r20722);
        mpfr_init(r20723);
        mpfr_init(r20724);
        mpfr_init_set_str(r20725, "2", 10, MPFR_RNDN);
        mpfr_init(r20726);
        mpfr_init(r20727);
        mpfr_init(r20728);
        mpfr_init_set_str(r20729, "-2", 10, MPFR_RNDN);
        mpfr_init(r20730);
        mpfr_init(r20731);
        mpfr_init(r20732);
        mpfr_init(r20733);
}

double f_fm(double a, double b, double c) {
        mpfr_set_d(r20707, b, MPFR_RNDN);
        ;
        mpfr_set_si(r20709, mpfr_cmp(r20707, r20708) <= 0, MPFR_RNDN);
        mpfr_set_d(r20710, c, MPFR_RNDN);
        mpfr_div(r20711, r20710, r20707, MPFR_RNDN);
        mpfr_set_d(r20712, a, MPFR_RNDN);
        mpfr_div(r20713, r20707, r20712, MPFR_RNDN);
        mpfr_sub(r20714, r20711, r20713, MPFR_RNDN);
        ;
        mpfr_set_si(r20716, mpfr_cmp(r20707, r20715) <= 0, MPFR_RNDN);
        mpfr_mul(r20717, r20707, r20707, MPFR_RNDN);
        ;
        mpfr_mul(r20719, r20718, r20710, MPFR_RNDN);
        mpfr_mul(r20720, r20719, r20712, MPFR_RNDN);
        mpfr_sub(r20721, r20717, r20720, MPFR_RNDN);
        mpfr_sqrt(r20722, r20721, MPFR_RNDN);
        mpfr_neg(r20723, r20722, MPFR_RNDN);
        mpfr_add(r20724, r20707, r20723, MPFR_RNDN);
        ;
        mpfr_mul(r20726, r20725, r20712, MPFR_RNDN);
        mpfr_neg(r20727, r20726, MPFR_RNDN);
        mpfr_div(r20728, r20724, r20727, MPFR_RNDN);
        ;
        mpfr_div(r20730, r20729, r20725, MPFR_RNDN);
        mpfr_mul(r20731, r20711, r20730, MPFR_RNDN);
        if (mpfr_get_si(r20716, MPFR_RNDN)) { mpfr_set(r20732, r20728, MPFR_RNDN); } else { mpfr_set(r20732, r20731, MPFR_RNDN); };
        if (mpfr_get_si(r20709, MPFR_RNDN)) { mpfr_set(r20733, r20714, MPFR_RNDN); } else { mpfr_set(r20733, r20732, MPFR_RNDN); };
        return mpfr_get_d(r20733, MPFR_RNDN);
}

static mpfr_t r20734, r20735, r20736, r20737, r20738, r20739, r20740, r20741, r20742, r20743, r20744, r20745, r20746, r20747, r20748, r20749, r20750, r20751, r20752, r20753, r20754, r20755, r20756, r20757, r20758, r20759, r20760;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(3472);
        mpfr_init(r20734);
        mpfr_init_set_str(r20735, "-2.788370916558726e+153", 10, MPFR_RNDN);
        mpfr_init(r20736);
        mpfr_init(r20737);
        mpfr_init(r20738);
        mpfr_init(r20739);
        mpfr_init(r20740);
        mpfr_init(r20741);
        mpfr_init_set_str(r20742, "7.580412743766101e-138", 10, MPFR_RNDN);
        mpfr_init(r20743);
        mpfr_init(r20744);
        mpfr_init_set_str(r20745, "4", 10, MPFR_RNDN);
        mpfr_init(r20746);
        mpfr_init(r20747);
        mpfr_init(r20748);
        mpfr_init(r20749);
        mpfr_init(r20750);
        mpfr_init(r20751);
        mpfr_init_set_str(r20752, "2", 10, MPFR_RNDN);
        mpfr_init(r20753);
        mpfr_init(r20754);
        mpfr_init(r20755);
        mpfr_init_set_str(r20756, "-2", 10, MPFR_RNDN);
        mpfr_init(r20757);
        mpfr_init(r20758);
        mpfr_init(r20759);
        mpfr_init(r20760);
}

double f_dm(double a, double b, double c) {
        mpfr_set_d(r20734, b, MPFR_RNDN);
        ;
        mpfr_set_si(r20736, mpfr_cmp(r20734, r20735) <= 0, MPFR_RNDN);
        mpfr_set_d(r20737, c, MPFR_RNDN);
        mpfr_div(r20738, r20737, r20734, MPFR_RNDN);
        mpfr_set_d(r20739, a, MPFR_RNDN);
        mpfr_div(r20740, r20734, r20739, MPFR_RNDN);
        mpfr_sub(r20741, r20738, r20740, MPFR_RNDN);
        ;
        mpfr_set_si(r20743, mpfr_cmp(r20734, r20742) <= 0, MPFR_RNDN);
        mpfr_mul(r20744, r20734, r20734, MPFR_RNDN);
        ;
        mpfr_mul(r20746, r20745, r20737, MPFR_RNDN);
        mpfr_mul(r20747, r20746, r20739, MPFR_RNDN);
        mpfr_sub(r20748, r20744, r20747, MPFR_RNDN);
        mpfr_sqrt(r20749, r20748, MPFR_RNDN);
        mpfr_neg(r20750, r20749, MPFR_RNDN);
        mpfr_add(r20751, r20734, r20750, MPFR_RNDN);
        ;
        mpfr_mul(r20753, r20752, r20739, MPFR_RNDN);
        mpfr_neg(r20754, r20753, MPFR_RNDN);
        mpfr_div(r20755, r20751, r20754, MPFR_RNDN);
        ;
        mpfr_div(r20757, r20756, r20752, MPFR_RNDN);
        mpfr_mul(r20758, r20738, r20757, MPFR_RNDN);
        if (mpfr_get_si(r20743, MPFR_RNDN)) { mpfr_set(r20759, r20755, MPFR_RNDN); } else { mpfr_set(r20759, r20758, MPFR_RNDN); };
        if (mpfr_get_si(r20736, MPFR_RNDN)) { mpfr_set(r20760, r20741, MPFR_RNDN); } else { mpfr_set(r20760, r20759, MPFR_RNDN); };
        return mpfr_get_d(r20760, MPFR_RNDN);
}