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

char *name = "fma_test2";

double f_if(float t) {
        float r22884 = 1.7e+308;
        float r22885 = t;
        float r22886 = r22884 * r22885;
        float r22887 = r22886 - r22884;
        return r22887;
}

double f_id(double t) {
        double r22888 = 1.7e+308;
        double r22889 = t;
        double r22890 = r22888 * r22889;
        double r22891 = r22890 - r22888;
        return r22891;
}


double f_of(float t) {
        float r22892 = 1.7e+308;
        float r22893 = t;
        float r22894 = r22892 * r22893;
        float r22895 = r22894 - r22892;
        return r22895;
}

double f_od(double t) {
        double r22896 = 1.7e+308;
        double r22897 = t;
        double r22898 = r22896 * r22897;
        double r22899 = r22898 - r22896;
        return r22899;
}

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 r22900, r22901, r22902, r22903;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init_set_str(r22900, "1.7e+308", 10, MPFR_RNDN);
        mpfr_init(r22901);
        mpfr_init(r22902);
        mpfr_init(r22903);
}

double f_im(double t) {
        ;
        mpfr_set_d(r22901, t, MPFR_RNDN);
        mpfr_mul(r22902, r22900, r22901, MPFR_RNDN);
        mpfr_sub(r22903, r22902, r22900, MPFR_RNDN);
        return mpfr_get_d(r22903, MPFR_RNDN);
}

static mpfr_t r22904, r22905, r22906, r22907;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init_set_str(r22904, "1.7e+308", 10, MPFR_RNDN);
        mpfr_init(r22905);
        mpfr_init(r22906);
        mpfr_init(r22907);
}

double f_fm(double t) {
        ;
        mpfr_set_d(r22905, t, MPFR_RNDN);
        mpfr_mul(r22906, r22904, r22905, MPFR_RNDN);
        mpfr_sub(r22907, r22906, r22904, MPFR_RNDN);
        return mpfr_get_d(r22907, MPFR_RNDN);
}

static mpfr_t r22908, r22909, r22910, r22911;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init_set_str(r22908, "1.7e+308", 10, MPFR_RNDN);
        mpfr_init(r22909);
        mpfr_init(r22910);
        mpfr_init(r22911);
}

double f_dm(double t) {
        ;
        mpfr_set_d(r22909, t, MPFR_RNDN);
        mpfr_mul(r22910, r22908, r22909, MPFR_RNDN);
        mpfr_sub(r22911, r22910, r22908, MPFR_RNDN);
        return mpfr_get_d(r22911, MPFR_RNDN);
}