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

char *name = "FastMath dist3";

double f_if(float d1, float d2, float d3) {
        float r25010 = d1;
        float r25011 = d2;
        float r25012 = r25010 * r25011;
        float r25013 = d3;
        float r25014 = 5;
        float r25015 = r25013 + r25014;
        float r25016 = r25015 * r25010;
        float r25017 = r25012 + r25016;
        float r25018 = 32;
        float r25019 = r25010 * r25018;
        float r25020 = r25017 + r25019;
        return r25020;
}

double f_id(double d1, double d2, double d3) {
        double r25021 = d1;
        double r25022 = d2;
        double r25023 = r25021 * r25022;
        double r25024 = d3;
        double r25025 = 5;
        double r25026 = r25024 + r25025;
        double r25027 = r25026 * r25021;
        double r25028 = r25023 + r25027;
        double r25029 = 32;
        double r25030 = r25021 * r25029;
        double r25031 = r25028 + r25030;
        return r25031;
}


double f_of(float d1, float d2, float d3) {
        float r25032 = d1;
        float r25033 = 32;
        float r25034 = d2;
        float r25035 = r25033 + r25034;
        float r25036 = d3;
        float r25037 = 5;
        float r25038 = r25036 + r25037;
        float r25039 = r25035 + r25038;
        float r25040 = r25032 * r25039;
        return r25040;
}

double f_od(double d1, double d2, double d3) {
        double r25041 = d1;
        double r25042 = 32;
        double r25043 = d2;
        double r25044 = r25042 + r25043;
        double r25045 = d3;
        double r25046 = 5;
        double r25047 = r25045 + r25046;
        double r25048 = r25044 + r25047;
        double r25049 = r25041 * r25048;
        return r25049;
}

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 r25050, r25051, r25052, r25053, r25054, r25055, r25056, r25057, r25058, r25059, r25060;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(1424);
        mpfr_init(r25050);
        mpfr_init(r25051);
        mpfr_init(r25052);
        mpfr_init(r25053);
        mpfr_init_set_str(r25054, "5", 10, MPFR_RNDN);
        mpfr_init(r25055);
        mpfr_init(r25056);
        mpfr_init(r25057);
        mpfr_init_set_str(r25058, "32", 10, MPFR_RNDN);
        mpfr_init(r25059);
        mpfr_init(r25060);
}

double f_im(double d1, double d2, double d3) {
        mpfr_set_d(r25050, d1, MPFR_RNDN);
        mpfr_set_d(r25051, d2, MPFR_RNDN);
        mpfr_mul(r25052, r25050, r25051, MPFR_RNDN);
        mpfr_set_d(r25053, d3, MPFR_RNDN);
        ;
        mpfr_add(r25055, r25053, r25054, MPFR_RNDN);
        mpfr_mul(r25056, r25055, r25050, MPFR_RNDN);
        mpfr_add(r25057, r25052, r25056, MPFR_RNDN);
        ;
        mpfr_mul(r25059, r25050, r25058, MPFR_RNDN);
        mpfr_add(r25060, r25057, r25059, MPFR_RNDN);
        return mpfr_get_d(r25060, MPFR_RNDN);
}

static mpfr_t r25061, r25062, r25063, r25064, r25065, r25066, r25067, r25068, r25069;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(1424);
        mpfr_init(r25061);
        mpfr_init_set_str(r25062, "32", 10, MPFR_RNDN);
        mpfr_init(r25063);
        mpfr_init(r25064);
        mpfr_init(r25065);
        mpfr_init_set_str(r25066, "5", 10, MPFR_RNDN);
        mpfr_init(r25067);
        mpfr_init(r25068);
        mpfr_init(r25069);
}

double f_fm(double d1, double d2, double d3) {
        mpfr_set_d(r25061, d1, MPFR_RNDN);
        ;
        mpfr_set_d(r25063, d2, MPFR_RNDN);
        mpfr_add(r25064, r25062, r25063, MPFR_RNDN);
        mpfr_set_d(r25065, d3, MPFR_RNDN);
        ;
        mpfr_add(r25067, r25065, r25066, MPFR_RNDN);
        mpfr_add(r25068, r25064, r25067, MPFR_RNDN);
        mpfr_mul(r25069, r25061, r25068, MPFR_RNDN);
        return mpfr_get_d(r25069, MPFR_RNDN);
}

static mpfr_t r25070, r25071, r25072, r25073, r25074, r25075, r25076, r25077, r25078;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(1424);
        mpfr_init(r25070);
        mpfr_init_set_str(r25071, "32", 10, MPFR_RNDN);
        mpfr_init(r25072);
        mpfr_init(r25073);
        mpfr_init(r25074);
        mpfr_init_set_str(r25075, "5", 10, MPFR_RNDN);
        mpfr_init(r25076);
        mpfr_init(r25077);
        mpfr_init(r25078);
}

double f_dm(double d1, double d2, double d3) {
        mpfr_set_d(r25070, d1, MPFR_RNDN);
        ;
        mpfr_set_d(r25072, d2, MPFR_RNDN);
        mpfr_add(r25073, r25071, r25072, MPFR_RNDN);
        mpfr_set_d(r25074, d3, MPFR_RNDN);
        ;
        mpfr_add(r25076, r25074, r25075, MPFR_RNDN);
        mpfr_add(r25077, r25073, r25076, MPFR_RNDN);
        mpfr_mul(r25078, r25070, r25077, MPFR_RNDN);
        return mpfr_get_d(r25078, MPFR_RNDN);
}