#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 r11666 = d1;
        float r11667 = 3.0f;
        float r11668 = r11666 * r11667;
        float r11669 = d2;
        float r11670 = r11666 * r11669;
        float r11671 = r11668 + r11670;
        float r11672 = d3;
        float r11673 = r11666 * r11672;
        float r11674 = r11671 + r11673;
        return r11674;
}

double f_id(double d1, double d2, double d3) {
        double r11675 = d1;
        double r11676 = 3.0;
        double r11677 = r11675 * r11676;
        double r11678 = d2;
        double r11679 = r11675 * r11678;
        double r11680 = r11677 + r11679;
        double r11681 = d3;
        double r11682 = r11675 * r11681;
        double r11683 = r11680 + r11682;
        return r11683;
}


double f_of(float d1, float d2, float d3) {
        float r11684 = d1;
        float r11685 = 3.0f;
        float r11686 = d2;
        float r11687 = r11685 + r11686;
        float r11688 = d3;
        float r11689 = r11688 * r11684;
        float r11690 = fma(r11684, r11687, r11689);
        return r11690;
}

double f_od(double d1, double d2, double d3) {
        double r11691 = d1;
        double r11692 = 3.0;
        double r11693 = d2;
        double r11694 = r11692 + r11693;
        double r11695 = d3;
        double r11696 = r11695 * r11691;
        double r11697 = fma(r11691, r11694, r11696);
        return r11697;
}

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 r11698, r11699, r11700, r11701, r11702, r11703, r11704, r11705, r11706;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(1360);
        mpfr_init(r11698);
        mpfr_init_set_str(r11699, "3", 10, MPFR_RNDN);
        mpfr_init(r11700);
        mpfr_init(r11701);
        mpfr_init(r11702);
        mpfr_init(r11703);
        mpfr_init(r11704);
        mpfr_init(r11705);
        mpfr_init(r11706);
}

double f_im(double d1, double d2, double d3) {
        mpfr_set_d(r11698, d1, MPFR_RNDN);
        ;
        mpfr_mul(r11700, r11698, r11699, MPFR_RNDN);
        mpfr_set_d(r11701, d2, MPFR_RNDN);
        mpfr_mul(r11702, r11698, r11701, MPFR_RNDN);
        mpfr_add(r11703, r11700, r11702, MPFR_RNDN);
        mpfr_set_d(r11704, d3, MPFR_RNDN);
        mpfr_mul(r11705, r11698, r11704, MPFR_RNDN);
        mpfr_add(r11706, r11703, r11705, MPFR_RNDN);
        return mpfr_get_d(r11706, MPFR_RNDN);
}

static mpfr_t r11707, r11708, r11709, r11710, r11711, r11712, r11713;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(1360);
        mpfr_init(r11707);
        mpfr_init_set_str(r11708, "3", 10, MPFR_RNDN);
        mpfr_init(r11709);
        mpfr_init(r11710);
        mpfr_init(r11711);
        mpfr_init(r11712);
        mpfr_init(r11713);
}

double f_fm(double d1, double d2, double d3) {
        mpfr_set_d(r11707, d1, MPFR_RNDN);
        ;
        mpfr_set_d(r11709, d2, MPFR_RNDN);
        mpfr_add(r11710, r11708, r11709, MPFR_RNDN);
        mpfr_set_d(r11711, d3, MPFR_RNDN);
        mpfr_mul(r11712, r11711, r11707, MPFR_RNDN);
        mpfr_fma(r11713, r11707, r11710, r11712, MPFR_RNDN);
        return mpfr_get_d(r11713, MPFR_RNDN);
}

static mpfr_t r11714, r11715, r11716, r11717, r11718, r11719, r11720;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(1360);
        mpfr_init(r11714);
        mpfr_init_set_str(r11715, "3", 10, MPFR_RNDN);
        mpfr_init(r11716);
        mpfr_init(r11717);
        mpfr_init(r11718);
        mpfr_init(r11719);
        mpfr_init(r11720);
}

double f_dm(double d1, double d2, double d3) {
        mpfr_set_d(r11714, d1, MPFR_RNDN);
        ;
        mpfr_set_d(r11716, d2, MPFR_RNDN);
        mpfr_add(r11717, r11715, r11716, MPFR_RNDN);
        mpfr_set_d(r11718, d3, MPFR_RNDN);
        mpfr_mul(r11719, r11718, r11714, MPFR_RNDN);
        mpfr_fma(r11720, r11714, r11717, r11719, MPFR_RNDN);
        return mpfr_get_d(r11720, MPFR_RNDN);
}