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

char *name = "fma_test1";

double f_if(float t) {
        float r19531 = 1.0f;
        float r19532 = t;
        float r19533 = 2e-16f;
        float r19534 = r19532 * r19533;
        float r19535 = r19531 + r19534;
        float r19536 = r19535 * r19535;
        float r19537 = -1.0f;
        float r19538 = 2.0f;
        float r19539 = r19538 * r19534;
        float r19540 = r19537 - r19539;
        float r19541 = r19536 + r19540;
        return r19541;
}

double f_id(double t) {
        double r19542 = 1.0;
        double r19543 = t;
        double r19544 = 2e-16;
        double r19545 = r19543 * r19544;
        double r19546 = r19542 + r19545;
        double r19547 = r19546 * r19546;
        double r19548 = -1.0;
        double r19549 = 2.0;
        double r19550 = r19549 * r19545;
        double r19551 = r19548 - r19550;
        double r19552 = r19547 + r19551;
        return r19552;
}


double f_of(float t) {
        float r19553 = 3.9999999999999997e-32f;
        float r19554 = t;
        float r19555 = r19553 * r19554;
        float r19556 = r19555 * r19554;
        return r19556;
}

double f_od(double t) {
        double r19557 = 3.9999999999999997e-32;
        double r19558 = t;
        double r19559 = r19557 * r19558;
        double r19560 = r19559 * r19558;
        return r19560;
}

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 r19561, r19562, r19563, r19564, r19565, r19566, r19567, r19568, r19569, r19570, r19571;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(656);
        mpfr_init_set_str(r19561, "1", 10, MPFR_RNDN);
        mpfr_init(r19562);
        mpfr_init_set_str(r19563, "2e-16", 10, MPFR_RNDN);
        mpfr_init(r19564);
        mpfr_init(r19565);
        mpfr_init(r19566);
        mpfr_init_set_str(r19567, "-1", 10, MPFR_RNDN);
        mpfr_init_set_str(r19568, "2", 10, MPFR_RNDN);
        mpfr_init(r19569);
        mpfr_init(r19570);
        mpfr_init(r19571);
}

double f_im(double t) {
        ;
        mpfr_set_d(r19562, t, MPFR_RNDN);
        ;
        mpfr_mul(r19564, r19562, r19563, MPFR_RNDN);
        mpfr_add(r19565, r19561, r19564, MPFR_RNDN);
        mpfr_mul(r19566, r19565, r19565, MPFR_RNDN);
        ;
        ;
        mpfr_mul(r19569, r19568, r19564, MPFR_RNDN);
        mpfr_sub(r19570, r19567, r19569, MPFR_RNDN);
        mpfr_add(r19571, r19566, r19570, MPFR_RNDN);
        return mpfr_get_d(r19571, MPFR_RNDN);
}

static mpfr_t r19572, r19573, r19574, r19575;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(656);
        mpfr_init_set_str(r19572, "3.9999999999999997e-32", 10, MPFR_RNDN);
        mpfr_init(r19573);
        mpfr_init(r19574);
        mpfr_init(r19575);
}

double f_fm(double t) {
        ;
        mpfr_set_d(r19573, t, MPFR_RNDN);
        mpfr_mul(r19574, r19572, r19573, MPFR_RNDN);
        mpfr_mul(r19575, r19574, r19573, MPFR_RNDN);
        return mpfr_get_d(r19575, MPFR_RNDN);
}

static mpfr_t r19576, r19577, r19578, r19579;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(656);
        mpfr_init_set_str(r19576, "3.9999999999999997e-32", 10, MPFR_RNDN);
        mpfr_init(r19577);
        mpfr_init(r19578);
        mpfr_init(r19579);
}

double f_dm(double t) {
        ;
        mpfr_set_d(r19577, t, MPFR_RNDN);
        mpfr_mul(r19578, r19576, r19577, MPFR_RNDN);
        mpfr_mul(r19579, r19578, r19577, MPFR_RNDN);
        return mpfr_get_d(r19579, MPFR_RNDN);
}