#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 r25881 = b;
        float r25882 = -r25881;
        float r25883 = r25881 * r25881;
        float r25884 = 4;
        float r25885 = a;
        float r25886 = r25884 * r25885;
        float r25887 = c;
        float r25888 = r25886 * r25887;
        float r25889 = r25883 - r25888;
        float r25890 = sqrt(r25889);
        float r25891 = r25882 + r25890;
        float r25892 = 2;
        float r25893 = r25892 * r25885;
        float r25894 = r25891 / r25893;
        return r25894;
}

double f_id(double a, double b, double c) {
        double r25895 = b;
        double r25896 = -r25895;
        double r25897 = r25895 * r25895;
        double r25898 = 4;
        double r25899 = a;
        double r25900 = r25898 * r25899;
        double r25901 = c;
        double r25902 = r25900 * r25901;
        double r25903 = r25897 - r25902;
        double r25904 = sqrt(r25903);
        double r25905 = r25896 + r25904;
        double r25906 = 2;
        double r25907 = r25906 * r25899;
        double r25908 = r25905 / r25907;
        return r25908;
}


double f_of(float a, float b, float c) {
        float r25909 = b;
        float r25910 = -r25909;
        float r25911 = -2.406002782340257e+56;
        bool r25912 = r25910 <= r25911;
        float r25913 = c;
        float r25914 = r25913 / r25909;
        float r25915 = -r25914;
        float r25916 = -3.204523618328988e-129;
        bool r25917 = r25910 <= r25916;
        float r25918 = a;
        float r25919 = 4;
        float r25920 = r25918 * r25919;
        float r25921 = r25920 * r25913;
        float r25922 = r25909 * r25909;
        float r25923 = r25922 - r25921;
        float r25924 = sqrt(r25923);
        float r25925 = r25910 - r25924;
        float r25926 = r25921 / r25925;
        float r25927 = 2;
        float r25928 = r25918 * r25927;
        float r25929 = r25926 / r25928;
        float r25930 = 7.554938830379422e+118;
        bool r25931 = r25910 <= r25930;
        float r25932 = 1;
        float r25933 = r25932 / r25928;
        float r25934 = r25910 + r25924;
        float r25935 = r25933 * r25934;
        float r25936 = r25909 / r25913;
        float r25937 = r25928 / r25936;
        float r25938 = r25909 + r25909;
        float r25939 = r25937 - r25938;
        float r25940 = r25939 / r25928;
        float r25941 = r25931 ? r25935 : r25940;
        float r25942 = r25917 ? r25929 : r25941;
        float r25943 = r25912 ? r25915 : r25942;
        return r25943;
}

double f_od(double a, double b, double c) {
        double r25944 = b;
        double r25945 = -r25944;
        double r25946 = -2.406002782340257e+56;
        bool r25947 = r25945 <= r25946;
        double r25948 = c;
        double r25949 = r25948 / r25944;
        double r25950 = -r25949;
        double r25951 = -3.204523618328988e-129;
        bool r25952 = r25945 <= r25951;
        double r25953 = a;
        double r25954 = 4;
        double r25955 = r25953 * r25954;
        double r25956 = r25955 * r25948;
        double r25957 = r25944 * r25944;
        double r25958 = r25957 - r25956;
        double r25959 = sqrt(r25958);
        double r25960 = r25945 - r25959;
        double r25961 = r25956 / r25960;
        double r25962 = 2;
        double r25963 = r25953 * r25962;
        double r25964 = r25961 / r25963;
        double r25965 = 7.554938830379422e+118;
        bool r25966 = r25945 <= r25965;
        double r25967 = 1;
        double r25968 = r25967 / r25963;
        double r25969 = r25945 + r25959;
        double r25970 = r25968 * r25969;
        double r25971 = r25944 / r25948;
        double r25972 = r25963 / r25971;
        double r25973 = r25944 + r25944;
        double r25974 = r25972 - r25973;
        double r25975 = r25974 / r25963;
        double r25976 = r25966 ? r25970 : r25975;
        double r25977 = r25952 ? r25964 : r25976;
        double r25978 = r25947 ? r25950 : r25977;
        return r25978;
}

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 r25979, r25980, r25981, r25982, r25983, r25984, r25985, r25986, r25987, r25988, r25989, r25990, r25991, r25992;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(3408);
        mpfr_init(r25979);
        mpfr_init(r25980);
        mpfr_init(r25981);
        mpfr_init_set_str(r25982, "4", 10, MPFR_RNDN);
        mpfr_init(r25983);
        mpfr_init(r25984);
        mpfr_init(r25985);
        mpfr_init(r25986);
        mpfr_init(r25987);
        mpfr_init(r25988);
        mpfr_init(r25989);
        mpfr_init_set_str(r25990, "2", 10, MPFR_RNDN);
        mpfr_init(r25991);
        mpfr_init(r25992);
}

double f_im(double a, double b, double c) {
        mpfr_set_d(r25979, b, MPFR_RNDN);
        mpfr_neg(r25980, r25979, MPFR_RNDN);
        mpfr_mul(r25981, r25979, r25979, MPFR_RNDN);
        ;
        mpfr_set_d(r25983, a, MPFR_RNDN);
        mpfr_mul(r25984, r25982, r25983, MPFR_RNDN);
        mpfr_set_d(r25985, c, MPFR_RNDN);
        mpfr_mul(r25986, r25984, r25985, MPFR_RNDN);
        mpfr_sub(r25987, r25981, r25986, MPFR_RNDN);
        mpfr_sqrt(r25988, r25987, MPFR_RNDN);
        mpfr_add(r25989, r25980, r25988, MPFR_RNDN);
        ;
        mpfr_mul(r25991, r25990, r25983, MPFR_RNDN);
        mpfr_div(r25992, r25989, r25991, MPFR_RNDN);
        return mpfr_get_d(r25992, MPFR_RNDN);
}

static mpfr_t r25993, r25994, r25995, r25996, r25997, r25998, r25999, r26000, r26001, r26002, r26003, r26004, r26005, r26006, r26007, r26008, r26009, r26010, r26011, r26012, r26013, r26014, r26015, r26016, r26017, r26018, r26019, r26020, r26021, r26022, r26023, r26024, r26025, r26026, r26027;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(3408);
        mpfr_init(r25993);
        mpfr_init(r25994);
        mpfr_init_set_str(r25995, "-2.406002782340257e+56", 10, MPFR_RNDN);
        mpfr_init(r25996);
        mpfr_init(r25997);
        mpfr_init(r25998);
        mpfr_init(r25999);
        mpfr_init_set_str(r26000, "-3.204523618328988e-129", 10, MPFR_RNDN);
        mpfr_init(r26001);
        mpfr_init(r26002);
        mpfr_init_set_str(r26003, "4", 10, MPFR_RNDN);
        mpfr_init(r26004);
        mpfr_init(r26005);
        mpfr_init(r26006);
        mpfr_init(r26007);
        mpfr_init(r26008);
        mpfr_init(r26009);
        mpfr_init(r26010);
        mpfr_init_set_str(r26011, "2", 10, MPFR_RNDN);
        mpfr_init(r26012);
        mpfr_init(r26013);
        mpfr_init_set_str(r26014, "7.554938830379422e+118", 10, MPFR_RNDN);
        mpfr_init(r26015);
        mpfr_init_set_str(r26016, "1", 10, MPFR_RNDN);
        mpfr_init(r26017);
        mpfr_init(r26018);
        mpfr_init(r26019);
        mpfr_init(r26020);
        mpfr_init(r26021);
        mpfr_init(r26022);
        mpfr_init(r26023);
        mpfr_init(r26024);
        mpfr_init(r26025);
        mpfr_init(r26026);
        mpfr_init(r26027);
}

double f_fm(double a, double b, double c) {
        mpfr_set_d(r25993, b, MPFR_RNDN);
        mpfr_neg(r25994, r25993, MPFR_RNDN);
        ;
        mpfr_set_si(r25996, mpfr_cmp(r25994, r25995) <= 0, MPFR_RNDN);
        mpfr_set_d(r25997, c, MPFR_RNDN);
        mpfr_div(r25998, r25997, r25993, MPFR_RNDN);
        mpfr_neg(r25999, r25998, MPFR_RNDN);
        ;
        mpfr_set_si(r26001, mpfr_cmp(r25994, r26000) <= 0, MPFR_RNDN);
        mpfr_set_d(r26002, a, MPFR_RNDN);
        ;
        mpfr_mul(r26004, r26002, r26003, MPFR_RNDN);
        mpfr_mul(r26005, r26004, r25997, MPFR_RNDN);
        mpfr_mul(r26006, r25993, r25993, MPFR_RNDN);
        mpfr_sub(r26007, r26006, r26005, MPFR_RNDN);
        mpfr_sqrt(r26008, r26007, MPFR_RNDN);
        mpfr_sub(r26009, r25994, r26008, MPFR_RNDN);
        mpfr_div(r26010, r26005, r26009, MPFR_RNDN);
        ;
        mpfr_mul(r26012, r26002, r26011, MPFR_RNDN);
        mpfr_div(r26013, r26010, r26012, MPFR_RNDN);
        ;
        mpfr_set_si(r26015, mpfr_cmp(r25994, r26014) <= 0, MPFR_RNDN);
        ;
        mpfr_div(r26017, r26016, r26012, MPFR_RNDN);
        mpfr_add(r26018, r25994, r26008, MPFR_RNDN);
        mpfr_mul(r26019, r26017, r26018, MPFR_RNDN);
        mpfr_div(r26020, r25993, r25997, MPFR_RNDN);
        mpfr_div(r26021, r26012, r26020, MPFR_RNDN);
        mpfr_add(r26022, r25993, r25993, MPFR_RNDN);
        mpfr_sub(r26023, r26021, r26022, MPFR_RNDN);
        mpfr_div(r26024, r26023, r26012, MPFR_RNDN);
        if (mpfr_get_si(r26015, MPFR_RNDN)) { mpfr_set(r26025, r26019, MPFR_RNDN); } else { mpfr_set(r26025, r26024, MPFR_RNDN); };
        if (mpfr_get_si(r26001, MPFR_RNDN)) { mpfr_set(r26026, r26013, MPFR_RNDN); } else { mpfr_set(r26026, r26025, MPFR_RNDN); };
        if (mpfr_get_si(r25996, MPFR_RNDN)) { mpfr_set(r26027, r25999, MPFR_RNDN); } else { mpfr_set(r26027, r26026, MPFR_RNDN); };
        return mpfr_get_d(r26027, MPFR_RNDN);
}

static mpfr_t r26028, r26029, r26030, r26031, r26032, r26033, r26034, r26035, r26036, r26037, r26038, r26039, r26040, r26041, r26042, r26043, r26044, r26045, r26046, r26047, r26048, r26049, r26050, r26051, r26052, r26053, r26054, r26055, r26056, r26057, r26058, r26059, r26060, r26061, r26062;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(3408);
        mpfr_init(r26028);
        mpfr_init(r26029);
        mpfr_init_set_str(r26030, "-2.406002782340257e+56", 10, MPFR_RNDN);
        mpfr_init(r26031);
        mpfr_init(r26032);
        mpfr_init(r26033);
        mpfr_init(r26034);
        mpfr_init_set_str(r26035, "-3.204523618328988e-129", 10, MPFR_RNDN);
        mpfr_init(r26036);
        mpfr_init(r26037);
        mpfr_init_set_str(r26038, "4", 10, MPFR_RNDN);
        mpfr_init(r26039);
        mpfr_init(r26040);
        mpfr_init(r26041);
        mpfr_init(r26042);
        mpfr_init(r26043);
        mpfr_init(r26044);
        mpfr_init(r26045);
        mpfr_init_set_str(r26046, "2", 10, MPFR_RNDN);
        mpfr_init(r26047);
        mpfr_init(r26048);
        mpfr_init_set_str(r26049, "7.554938830379422e+118", 10, MPFR_RNDN);
        mpfr_init(r26050);
        mpfr_init_set_str(r26051, "1", 10, MPFR_RNDN);
        mpfr_init(r26052);
        mpfr_init(r26053);
        mpfr_init(r26054);
        mpfr_init(r26055);
        mpfr_init(r26056);
        mpfr_init(r26057);
        mpfr_init(r26058);
        mpfr_init(r26059);
        mpfr_init(r26060);
        mpfr_init(r26061);
        mpfr_init(r26062);
}

double f_dm(double a, double b, double c) {
        mpfr_set_d(r26028, b, MPFR_RNDN);
        mpfr_neg(r26029, r26028, MPFR_RNDN);
        ;
        mpfr_set_si(r26031, mpfr_cmp(r26029, r26030) <= 0, MPFR_RNDN);
        mpfr_set_d(r26032, c, MPFR_RNDN);
        mpfr_div(r26033, r26032, r26028, MPFR_RNDN);
        mpfr_neg(r26034, r26033, MPFR_RNDN);
        ;
        mpfr_set_si(r26036, mpfr_cmp(r26029, r26035) <= 0, MPFR_RNDN);
        mpfr_set_d(r26037, a, MPFR_RNDN);
        ;
        mpfr_mul(r26039, r26037, r26038, MPFR_RNDN);
        mpfr_mul(r26040, r26039, r26032, MPFR_RNDN);
        mpfr_mul(r26041, r26028, r26028, MPFR_RNDN);
        mpfr_sub(r26042, r26041, r26040, MPFR_RNDN);
        mpfr_sqrt(r26043, r26042, MPFR_RNDN);
        mpfr_sub(r26044, r26029, r26043, MPFR_RNDN);
        mpfr_div(r26045, r26040, r26044, MPFR_RNDN);
        ;
        mpfr_mul(r26047, r26037, r26046, MPFR_RNDN);
        mpfr_div(r26048, r26045, r26047, MPFR_RNDN);
        ;
        mpfr_set_si(r26050, mpfr_cmp(r26029, r26049) <= 0, MPFR_RNDN);
        ;
        mpfr_div(r26052, r26051, r26047, MPFR_RNDN);
        mpfr_add(r26053, r26029, r26043, MPFR_RNDN);
        mpfr_mul(r26054, r26052, r26053, MPFR_RNDN);
        mpfr_div(r26055, r26028, r26032, MPFR_RNDN);
        mpfr_div(r26056, r26047, r26055, MPFR_RNDN);
        mpfr_add(r26057, r26028, r26028, MPFR_RNDN);
        mpfr_sub(r26058, r26056, r26057, MPFR_RNDN);
        mpfr_div(r26059, r26058, r26047, MPFR_RNDN);
        if (mpfr_get_si(r26050, MPFR_RNDN)) { mpfr_set(r26060, r26054, MPFR_RNDN); } else { mpfr_set(r26060, r26059, MPFR_RNDN); };
        if (mpfr_get_si(r26036, MPFR_RNDN)) { mpfr_set(r26061, r26048, MPFR_RNDN); } else { mpfr_set(r26061, r26060, MPFR_RNDN); };
        if (mpfr_get_si(r26031, MPFR_RNDN)) { mpfr_set(r26062, r26034, MPFR_RNDN); } else { mpfr_set(r26062, r26061, MPFR_RNDN); };
        return mpfr_get_d(r26062, MPFR_RNDN);
}

