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

char *name = "FastMath test3";

double f_if(float d1, float d2, float d3) {
        float r25727 = d1;
        float r25728 = 3;
        float r25729 = r25727 * r25728;
        float r25730 = d2;
        float r25731 = r25727 * r25730;
        float r25732 = r25729 + r25731;
        float r25733 = d3;
        float r25734 = r25727 * r25733;
        float r25735 = r25732 + r25734;
        return r25735;
}

double f_id(double d1, double d2, double d3) {
        double r25736 = d1;
        double r25737 = 3;
        double r25738 = r25736 * r25737;
        double r25739 = d2;
        double r25740 = r25736 * r25739;
        double r25741 = r25738 + r25740;
        double r25742 = d3;
        double r25743 = r25736 * r25742;
        double r25744 = r25741 + r25743;
        return r25744;
}


double f_of(float d1, float d2, float d3) {
        float r25745 = d1;
        float r25746 = d2;
        float r25747 = 3;
        float r25748 = r25746 + r25747;
        float r25749 = d3;
        float r25750 = r25748 + r25749;
        float r25751 = r25745 * r25750;
        return r25751;
}

double f_od(double d1, double d2, double d3) {
        double r25752 = d1;
        double r25753 = d2;
        double r25754 = 3;
        double r25755 = r25753 + r25754;
        double r25756 = d3;
        double r25757 = r25755 + r25756;
        double r25758 = r25752 * r25757;
        return r25758;
}

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 r25759, r25760, r25761, r25762, r25763, r25764, r25765, r25766, r25767;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(1424);
        mpfr_init(r25759);
        mpfr_init_set_str(r25760, "3", 10, MPFR_RNDN);
        mpfr_init(r25761);
        mpfr_init(r25762);
        mpfr_init(r25763);
        mpfr_init(r25764);
        mpfr_init(r25765);
        mpfr_init(r25766);
        mpfr_init(r25767);
}

double f_im(double d1, double d2, double d3) {
        mpfr_set_d(r25759, d1, MPFR_RNDN);
        ;
        mpfr_mul(r25761, r25759, r25760, MPFR_RNDN);
        mpfr_set_d(r25762, d2, MPFR_RNDN);
        mpfr_mul(r25763, r25759, r25762, MPFR_RNDN);
        mpfr_add(r25764, r25761, r25763, MPFR_RNDN);
        mpfr_set_d(r25765, d3, MPFR_RNDN);
        mpfr_mul(r25766, r25759, r25765, MPFR_RNDN);
        mpfr_add(r25767, r25764, r25766, MPFR_RNDN);
        return mpfr_get_d(r25767, MPFR_RNDN);
}

static mpfr_t r25768, r25769, r25770, r25771, r25772, r25773, r25774;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(1424);
        mpfr_init(r25768);
        mpfr_init(r25769);
        mpfr_init_set_str(r25770, "3", 10, MPFR_RNDN);
        mpfr_init(r25771);
        mpfr_init(r25772);
        mpfr_init(r25773);
        mpfr_init(r25774);
}

double f_fm(double d1, double d2, double d3) {
        mpfr_set_d(r25768, d1, MPFR_RNDN);
        mpfr_set_d(r25769, d2, MPFR_RNDN);
        ;
        mpfr_add(r25771, r25769, r25770, MPFR_RNDN);
        mpfr_set_d(r25772, d3, MPFR_RNDN);
        mpfr_add(r25773, r25771, r25772, MPFR_RNDN);
        mpfr_mul(r25774, r25768, r25773, MPFR_RNDN);
        return mpfr_get_d(r25774, MPFR_RNDN);
}

static mpfr_t r25775, r25776, r25777, r25778, r25779, r25780, r25781;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(1424);
        mpfr_init(r25775);
        mpfr_init(r25776);
        mpfr_init_set_str(r25777, "3", 10, MPFR_RNDN);
        mpfr_init(r25778);
        mpfr_init(r25779);
        mpfr_init(r25780);
        mpfr_init(r25781);
}

double f_dm(double d1, double d2, double d3) {
        mpfr_set_d(r25775, d1, MPFR_RNDN);
        mpfr_set_d(r25776, d2, MPFR_RNDN);
        ;
        mpfr_add(r25778, r25776, r25777, MPFR_RNDN);
        mpfr_set_d(r25779, d3, MPFR_RNDN);
        mpfr_add(r25780, r25778, r25779, MPFR_RNDN);
        mpfr_mul(r25781, r25775, r25780, MPFR_RNDN);
        return mpfr_get_d(r25781, MPFR_RNDN);
}