#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 r18577 = d1;
        float r18578 = 3.0f;
        float r18579 = r18577 * r18578;
        float r18580 = d2;
        float r18581 = r18577 * r18580;
        float r18582 = r18579 + r18581;
        float r18583 = d3;
        float r18584 = r18577 * r18583;
        float r18585 = r18582 + r18584;
        return r18585;
}

double f_id(double d1, double d2, double d3) {
        double r18586 = d1;
        double r18587 = 3.0;
        double r18588 = r18586 * r18587;
        double r18589 = d2;
        double r18590 = r18586 * r18589;
        double r18591 = r18588 + r18590;
        double r18592 = d3;
        double r18593 = r18586 * r18592;
        double r18594 = r18591 + r18593;
        return r18594;
}


double f_of(float d1, float d2, float d3) {
        float r18595 = d1;
        float r18596 = 3.0f;
        float r18597 = d2;
        float r18598 = r18596 + r18597;
        float r18599 = d3;
        float r18600 = r18598 + r18599;
        float r18601 = r18595 * r18600;
        return r18601;
}

double f_od(double d1, double d2, double d3) {
        double r18602 = d1;
        double r18603 = 3.0;
        double r18604 = d2;
        double r18605 = r18603 + r18604;
        double r18606 = d3;
        double r18607 = r18605 + r18606;
        double r18608 = r18602 * r18607;
        return r18608;
}

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 r18609, r18610, r18611, r18612, r18613, r18614, r18615, r18616, r18617;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init(r18609);
        mpfr_init_set_str(r18610, "3", 10, MPFR_RNDN);
        mpfr_init(r18611);
        mpfr_init(r18612);
        mpfr_init(r18613);
        mpfr_init(r18614);
        mpfr_init(r18615);
        mpfr_init(r18616);
        mpfr_init(r18617);
}

double f_im(double d1, double d2, double d3) {
        mpfr_set_d(r18609, d1, MPFR_RNDN);
        ;
        mpfr_mul(r18611, r18609, r18610, MPFR_RNDN);
        mpfr_set_d(r18612, d2, MPFR_RNDN);
        mpfr_mul(r18613, r18609, r18612, MPFR_RNDN);
        mpfr_add(r18614, r18611, r18613, MPFR_RNDN);
        mpfr_set_d(r18615, d3, MPFR_RNDN);
        mpfr_mul(r18616, r18609, r18615, MPFR_RNDN);
        mpfr_add(r18617, r18614, r18616, MPFR_RNDN);
        return mpfr_get_d(r18617, MPFR_RNDN);
}

static mpfr_t r18618, r18619, r18620, r18621, r18622, r18623, r18624;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r18618);
        mpfr_init_set_str(r18619, "3", 10, MPFR_RNDN);
        mpfr_init(r18620);
        mpfr_init(r18621);
        mpfr_init(r18622);
        mpfr_init(r18623);
        mpfr_init(r18624);
}

double f_fm(double d1, double d2, double d3) {
        mpfr_set_d(r18618, d1, MPFR_RNDN);
        ;
        mpfr_set_d(r18620, d2, MPFR_RNDN);
        mpfr_add(r18621, r18619, r18620, MPFR_RNDN);
        mpfr_set_d(r18622, d3, MPFR_RNDN);
        mpfr_add(r18623, r18621, r18622, MPFR_RNDN);
        mpfr_mul(r18624, r18618, r18623, MPFR_RNDN);
        return mpfr_get_d(r18624, MPFR_RNDN);
}

static mpfr_t r18625, r18626, r18627, r18628, r18629, r18630, r18631;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r18625);
        mpfr_init_set_str(r18626, "3", 10, MPFR_RNDN);
        mpfr_init(r18627);
        mpfr_init(r18628);
        mpfr_init(r18629);
        mpfr_init(r18630);
        mpfr_init(r18631);
}

double f_dm(double d1, double d2, double d3) {
        mpfr_set_d(r18625, d1, MPFR_RNDN);
        ;
        mpfr_set_d(r18627, d2, MPFR_RNDN);
        mpfr_add(r18628, r18626, r18627, MPFR_RNDN);
        mpfr_set_d(r18629, d3, MPFR_RNDN);
        mpfr_add(r18630, r18628, r18629, MPFR_RNDN);
        mpfr_mul(r18631, r18625, r18630, MPFR_RNDN);
        return mpfr_get_d(r18631, MPFR_RNDN);
}

