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

char *name = "FastMath test1";

double f_if(float d) {
        float r25661 = d;
        float r25662 = 10;
        float r25663 = r25661 * r25662;
        float r25664 = 20;
        float r25665 = r25661 * r25664;
        float r25666 = r25663 + r25665;
        return r25666;
}

double f_id(double d) {
        double r25667 = d;
        double r25668 = 10;
        double r25669 = r25667 * r25668;
        double r25670 = 20;
        double r25671 = r25667 * r25670;
        double r25672 = r25669 + r25671;
        return r25672;
}


double f_of(float d) {
        float r25673 = d;
        float r25674 = 20;
        float r25675 = 10;
        float r25676 = r25674 + r25675;
        float r25677 = r25673 * r25676;
        return r25677;
}

double f_od(double d) {
        double r25678 = d;
        double r25679 = 20;
        double r25680 = 10;
        double r25681 = r25679 + r25680;
        double r25682 = r25678 * r25681;
        return r25682;
}

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 r25683, r25684, r25685, r25686, r25687, r25688;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r25683);
        mpfr_init_set_str(r25684, "10", 10, MPFR_RNDN);
        mpfr_init(r25685);
        mpfr_init_set_str(r25686, "20", 10, MPFR_RNDN);
        mpfr_init(r25687);
        mpfr_init(r25688);
}

double f_im(double d) {
        mpfr_set_d(r25683, d, MPFR_RNDN);
        ;
        mpfr_mul(r25685, r25683, r25684, MPFR_RNDN);
        ;
        mpfr_mul(r25687, r25683, r25686, MPFR_RNDN);
        mpfr_add(r25688, r25685, r25687, MPFR_RNDN);
        return mpfr_get_d(r25688, MPFR_RNDN);
}

static mpfr_t r25689, r25690, r25691, r25692, r25693;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r25689);
        mpfr_init_set_str(r25690, "20", 10, MPFR_RNDN);
        mpfr_init_set_str(r25691, "10", 10, MPFR_RNDN);
        mpfr_init(r25692);
        mpfr_init(r25693);
}

double f_fm(double d) {
        mpfr_set_d(r25689, d, MPFR_RNDN);
        ;
        ;
        mpfr_add(r25692, r25690, r25691, MPFR_RNDN);
        mpfr_mul(r25693, r25689, r25692, MPFR_RNDN);
        return mpfr_get_d(r25693, MPFR_RNDN);
}

static mpfr_t r25694, r25695, r25696, r25697, r25698;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r25694);
        mpfr_init_set_str(r25695, "20", 10, MPFR_RNDN);
        mpfr_init_set_str(r25696, "10", 10, MPFR_RNDN);
        mpfr_init(r25697);
        mpfr_init(r25698);
}

double f_dm(double d) {
        mpfr_set_d(r25694, d, MPFR_RNDN);
        ;
        ;
        mpfr_add(r25697, r25695, r25696, MPFR_RNDN);
        mpfr_mul(r25698, r25694, r25697, MPFR_RNDN);
        return mpfr_get_d(r25698, MPFR_RNDN);
}