#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 r25793 = b;
        float r25794 = -r25793;
        float r25795 = r25793 * r25793;
        float r25796 = 4;
        float r25797 = a;
        float r25798 = r25796 * r25797;
        float r25799 = c;
        float r25800 = r25798 * r25799;
        float r25801 = r25795 - r25800;
        float r25802 = sqrt(r25801);
        float r25803 = r25794 + r25802;
        float r25804 = 2;
        float r25805 = r25804 * r25797;
        float r25806 = r25803 / r25805;
        return r25806;
}

double f_id(double a, double b, double c) {
        double r25807 = b;
        double r25808 = -r25807;
        double r25809 = r25807 * r25807;
        double r25810 = 4;
        double r25811 = a;
        double r25812 = r25810 * r25811;
        double r25813 = c;
        double r25814 = r25812 * r25813;
        double r25815 = r25809 - r25814;
        double r25816 = sqrt(r25815);
        double r25817 = r25808 + r25816;
        double r25818 = 2;
        double r25819 = r25818 * r25811;
        double r25820 = r25817 / r25819;
        return r25820;
}


double f_of(float a, float b, float c) {
        float r25821 = b;
        float r25822 = -9.956082950649737e+126;
        bool r25823 = r25821 <= r25822;
        float r25824 = c;
        float r25825 = r25824 / r25821;
        float r25826 = r25821 + r25821;
        float r25827 = 2;
        float r25828 = a;
        float r25829 = r25827 * r25828;
        float r25830 = r25826 / r25829;
        float r25831 = r25825 - r25830;
        float r25832 = 2.2234292265379327e-306;
        bool r25833 = r25821 <= r25832;
        float r25834 = -r25821;
        float r25835 = r25821 * r25821;
        float r25836 = 4;
        float r25837 = r25836 * r25828;
        float r25838 = r25824 * r25837;
        float r25839 = r25835 - r25838;
        float r25840 = sqrt(r25839);
        float r25841 = r25834 + r25840;
        float r25842 = r25841 / r25829;
        float r25843 = 4.718509050094739e+75;
        bool r25844 = r25821 <= r25843;
        float r25845 = r25834 - r25840;
        float r25846 = r25836 / r25845;
        float r25847 = r25824 / r25827;
        float r25848 = r25846 * r25847;
        float r25849 = -r25824;
        float r25850 = r25849 / r25821;
        float r25851 = r25844 ? r25848 : r25850;
        float r25852 = r25833 ? r25842 : r25851;
        float r25853 = r25823 ? r25831 : r25852;
        return r25853;
}

double f_od(double a, double b, double c) {
        double r25854 = b;
        double r25855 = -9.956082950649737e+126;
        bool r25856 = r25854 <= r25855;
        double r25857 = c;
        double r25858 = r25857 / r25854;
        double r25859 = r25854 + r25854;
        double r25860 = 2;
        double r25861 = a;
        double r25862 = r25860 * r25861;
        double r25863 = r25859 / r25862;
        double r25864 = r25858 - r25863;
        double r25865 = 2.2234292265379327e-306;
        bool r25866 = r25854 <= r25865;
        double r25867 = -r25854;
        double r25868 = r25854 * r25854;
        double r25869 = 4;
        double r25870 = r25869 * r25861;
        double r25871 = r25857 * r25870;
        double r25872 = r25868 - r25871;
        double r25873 = sqrt(r25872);
        double r25874 = r25867 + r25873;
        double r25875 = r25874 / r25862;
        double r25876 = 4.718509050094739e+75;
        bool r25877 = r25854 <= r25876;
        double r25878 = r25867 - r25873;
        double r25879 = r25869 / r25878;
        double r25880 = r25857 / r25860;
        double r25881 = r25879 * r25880;
        double r25882 = -r25857;
        double r25883 = r25882 / r25854;
        double r25884 = r25877 ? r25881 : r25883;
        double r25885 = r25866 ? r25875 : r25884;
        double r25886 = r25856 ? r25864 : r25885;
        return r25886;
}

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 r25887, r25888, r25889, r25890, r25891, r25892, r25893, r25894, r25895, r25896, r25897, r25898, r25899, r25900;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(3408);
        mpfr_init(r25887);
        mpfr_init(r25888);
        mpfr_init(r25889);
        mpfr_init_set_str(r25890, "4", 10, MPFR_RNDN);
        mpfr_init(r25891);
        mpfr_init(r25892);
        mpfr_init(r25893);
        mpfr_init(r25894);
        mpfr_init(r25895);
        mpfr_init(r25896);
        mpfr_init(r25897);
        mpfr_init_set_str(r25898, "2", 10, MPFR_RNDN);
        mpfr_init(r25899);
        mpfr_init(r25900);
}

double f_im(double a, double b, double c) {
        mpfr_set_d(r25887, b, MPFR_RNDN);
        mpfr_neg(r25888, r25887, MPFR_RNDN);
        mpfr_mul(r25889, r25887, r25887, MPFR_RNDN);
        ;
        mpfr_set_d(r25891, a, MPFR_RNDN);
        mpfr_mul(r25892, r25890, r25891, MPFR_RNDN);
        mpfr_set_d(r25893, c, MPFR_RNDN);
        mpfr_mul(r25894, r25892, r25893, MPFR_RNDN);
        mpfr_sub(r25895, r25889, r25894, MPFR_RNDN);
        mpfr_sqrt(r25896, r25895, MPFR_RNDN);
        mpfr_add(r25897, r25888, r25896, MPFR_RNDN);
        ;
        mpfr_mul(r25899, r25898, r25891, MPFR_RNDN);
        mpfr_div(r25900, r25897, r25899, MPFR_RNDN);
        return mpfr_get_d(r25900, MPFR_RNDN);
}

static mpfr_t r25901, r25902, r25903, r25904, r25905, r25906, r25907, r25908, r25909, r25910, r25911, r25912, r25913, r25914, r25915, r25916, r25917, r25918, r25919, r25920, r25921, r25922, r25923, r25924, r25925, r25926, r25927, r25928, r25929, r25930, r25931, r25932, r25933;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(3408);
        mpfr_init(r25901);
        mpfr_init_set_str(r25902, "-9.956082950649737e+126", 10, MPFR_RNDN);
        mpfr_init(r25903);
        mpfr_init(r25904);
        mpfr_init(r25905);
        mpfr_init(r25906);
        mpfr_init_set_str(r25907, "2", 10, MPFR_RNDN);
        mpfr_init(r25908);
        mpfr_init(r25909);
        mpfr_init(r25910);
        mpfr_init(r25911);
        mpfr_init_set_str(r25912, "2.2234292265379327e-306", 10, MPFR_RNDN);
        mpfr_init(r25913);
        mpfr_init(r25914);
        mpfr_init(r25915);
        mpfr_init_set_str(r25916, "4", 10, MPFR_RNDN);
        mpfr_init(r25917);
        mpfr_init(r25918);
        mpfr_init(r25919);
        mpfr_init(r25920);
        mpfr_init(r25921);
        mpfr_init(r25922);
        mpfr_init_set_str(r25923, "4.718509050094739e+75", 10, MPFR_RNDN);
        mpfr_init(r25924);
        mpfr_init(r25925);
        mpfr_init(r25926);
        mpfr_init(r25927);
        mpfr_init(r25928);
        mpfr_init(r25929);
        mpfr_init(r25930);
        mpfr_init(r25931);
        mpfr_init(r25932);
        mpfr_init(r25933);
}

double f_fm(double a, double b, double c) {
        mpfr_set_d(r25901, b, MPFR_RNDN);
        ;
        mpfr_set_si(r25903, mpfr_cmp(r25901, r25902) <= 0, MPFR_RNDN);
        mpfr_set_d(r25904, c, MPFR_RNDN);
        mpfr_div(r25905, r25904, r25901, MPFR_RNDN);
        mpfr_add(r25906, r25901, r25901, MPFR_RNDN);
        ;
        mpfr_set_d(r25908, a, MPFR_RNDN);
        mpfr_mul(r25909, r25907, r25908, MPFR_RNDN);
        mpfr_div(r25910, r25906, r25909, MPFR_RNDN);
        mpfr_sub(r25911, r25905, r25910, MPFR_RNDN);
        ;
        mpfr_set_si(r25913, mpfr_cmp(r25901, r25912) <= 0, MPFR_RNDN);
        mpfr_neg(r25914, r25901, MPFR_RNDN);
        mpfr_mul(r25915, r25901, r25901, MPFR_RNDN);
        ;
        mpfr_mul(r25917, r25916, r25908, MPFR_RNDN);
        mpfr_mul(r25918, r25904, r25917, MPFR_RNDN);
        mpfr_sub(r25919, r25915, r25918, MPFR_RNDN);
        mpfr_sqrt(r25920, r25919, MPFR_RNDN);
        mpfr_add(r25921, r25914, r25920, MPFR_RNDN);
        mpfr_div(r25922, r25921, r25909, MPFR_RNDN);
        ;
        mpfr_set_si(r25924, mpfr_cmp(r25901, r25923) <= 0, MPFR_RNDN);
        mpfr_sub(r25925, r25914, r25920, MPFR_RNDN);
        mpfr_div(r25926, r25916, r25925, MPFR_RNDN);
        mpfr_div(r25927, r25904, r25907, MPFR_RNDN);
        mpfr_mul(r25928, r25926, r25927, MPFR_RNDN);
        mpfr_neg(r25929, r25904, MPFR_RNDN);
        mpfr_div(r25930, r25929, r25901, MPFR_RNDN);
        if (mpfr_get_si(r25924, MPFR_RNDN)) { mpfr_set(r25931, r25928, MPFR_RNDN); } else { mpfr_set(r25931, r25930, MPFR_RNDN); };
        if (mpfr_get_si(r25913, MPFR_RNDN)) { mpfr_set(r25932, r25922, MPFR_RNDN); } else { mpfr_set(r25932, r25931, MPFR_RNDN); };
        if (mpfr_get_si(r25903, MPFR_RNDN)) { mpfr_set(r25933, r25911, MPFR_RNDN); } else { mpfr_set(r25933, r25932, MPFR_RNDN); };
        return mpfr_get_d(r25933, MPFR_RNDN);
}

static mpfr_t r25934, r25935, r25936, r25937, r25938, r25939, r25940, r25941, r25942, r25943, r25944, r25945, r25946, r25947, r25948, r25949, r25950, r25951, r25952, r25953, r25954, r25955, r25956, r25957, r25958, r25959, r25960, r25961, r25962, r25963, r25964, r25965, r25966;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(3408);
        mpfr_init(r25934);
        mpfr_init_set_str(r25935, "-9.956082950649737e+126", 10, MPFR_RNDN);
        mpfr_init(r25936);
        mpfr_init(r25937);
        mpfr_init(r25938);
        mpfr_init(r25939);
        mpfr_init_set_str(r25940, "2", 10, MPFR_RNDN);
        mpfr_init(r25941);
        mpfr_init(r25942);
        mpfr_init(r25943);
        mpfr_init(r25944);
        mpfr_init_set_str(r25945, "2.2234292265379327e-306", 10, MPFR_RNDN);
        mpfr_init(r25946);
        mpfr_init(r25947);
        mpfr_init(r25948);
        mpfr_init_set_str(r25949, "4", 10, MPFR_RNDN);
        mpfr_init(r25950);
        mpfr_init(r25951);
        mpfr_init(r25952);
        mpfr_init(r25953);
        mpfr_init(r25954);
        mpfr_init(r25955);
        mpfr_init_set_str(r25956, "4.718509050094739e+75", 10, MPFR_RNDN);
        mpfr_init(r25957);
        mpfr_init(r25958);
        mpfr_init(r25959);
        mpfr_init(r25960);
        mpfr_init(r25961);
        mpfr_init(r25962);
        mpfr_init(r25963);
        mpfr_init(r25964);
        mpfr_init(r25965);
        mpfr_init(r25966);
}

double f_dm(double a, double b, double c) {
        mpfr_set_d(r25934, b, MPFR_RNDN);
        ;
        mpfr_set_si(r25936, mpfr_cmp(r25934, r25935) <= 0, MPFR_RNDN);
        mpfr_set_d(r25937, c, MPFR_RNDN);
        mpfr_div(r25938, r25937, r25934, MPFR_RNDN);
        mpfr_add(r25939, r25934, r25934, MPFR_RNDN);
        ;
        mpfr_set_d(r25941, a, MPFR_RNDN);
        mpfr_mul(r25942, r25940, r25941, MPFR_RNDN);
        mpfr_div(r25943, r25939, r25942, MPFR_RNDN);
        mpfr_sub(r25944, r25938, r25943, MPFR_RNDN);
        ;
        mpfr_set_si(r25946, mpfr_cmp(r25934, r25945) <= 0, MPFR_RNDN);
        mpfr_neg(r25947, r25934, MPFR_RNDN);
        mpfr_mul(r25948, r25934, r25934, MPFR_RNDN);
        ;
        mpfr_mul(r25950, r25949, r25941, MPFR_RNDN);
        mpfr_mul(r25951, r25937, r25950, MPFR_RNDN);
        mpfr_sub(r25952, r25948, r25951, MPFR_RNDN);
        mpfr_sqrt(r25953, r25952, MPFR_RNDN);
        mpfr_add(r25954, r25947, r25953, MPFR_RNDN);
        mpfr_div(r25955, r25954, r25942, MPFR_RNDN);
        ;
        mpfr_set_si(r25957, mpfr_cmp(r25934, r25956) <= 0, MPFR_RNDN);
        mpfr_sub(r25958, r25947, r25953, MPFR_RNDN);
        mpfr_div(r25959, r25949, r25958, MPFR_RNDN);
        mpfr_div(r25960, r25937, r25940, MPFR_RNDN);
        mpfr_mul(r25961, r25959, r25960, MPFR_RNDN);
        mpfr_neg(r25962, r25937, MPFR_RNDN);
        mpfr_div(r25963, r25962, r25934, MPFR_RNDN);
        if (mpfr_get_si(r25957, MPFR_RNDN)) { mpfr_set(r25964, r25961, MPFR_RNDN); } else { mpfr_set(r25964, r25963, MPFR_RNDN); };
        if (mpfr_get_si(r25946, MPFR_RNDN)) { mpfr_set(r25965, r25955, MPFR_RNDN); } else { mpfr_set(r25965, r25964, MPFR_RNDN); };
        if (mpfr_get_si(r25936, MPFR_RNDN)) { mpfr_set(r25966, r25944, MPFR_RNDN); } else { mpfr_set(r25966, r25965, MPFR_RNDN); };
        return mpfr_get_d(r25966, MPFR_RNDN);
}

