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

char *name = "FastMath test5";

double f_if(float d1) {
        float r28760 = d1;
        float r28761 = r28760 * r28760;
        float r28762 = r28760 * r28761;
        float r28763 = r28762 * r28760;
        float r28764 = r28763 * r28760;
        float r28765 = r28764 * r28761;
        float r28766 = r28765 * r28760;
        float r28767 = r28760 * r28766;
        float r28768 = r28767 * r28760;
        return r28768;
}

double f_id(double d1) {
        double r28769 = d1;
        double r28770 = r28769 * r28769;
        double r28771 = r28769 * r28770;
        double r28772 = r28771 * r28769;
        double r28773 = r28772 * r28769;
        double r28774 = r28773 * r28770;
        double r28775 = r28774 * r28769;
        double r28776 = r28769 * r28775;
        double r28777 = r28776 * r28769;
        return r28777;
}


double f_of(float d1) {
        float r28778 = d1;
        float r28779 = 3;
        float r28780 = 2;
        float r28781 = r28779 + r28780;
        float r28782 = r28781 + r28781;
        float r28783 = pow(r28778, r28782);
        return r28783;
}

double f_od(double d1) {
        double r28784 = d1;
        double r28785 = 3;
        double r28786 = 2;
        double r28787 = r28785 + r28786;
        double r28788 = r28787 + r28787;
        double r28789 = pow(r28784, r28788);
        return r28789;
}

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 r28790, r28791, r28792, r28793, r28794, r28795, r28796, r28797, r28798;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(592);
        mpfr_init(r28790);
        mpfr_init(r28791);
        mpfr_init(r28792);
        mpfr_init(r28793);
        mpfr_init(r28794);
        mpfr_init(r28795);
        mpfr_init(r28796);
        mpfr_init(r28797);
        mpfr_init(r28798);
}

double f_im(double d1) {
        mpfr_set_d(r28790, d1, MPFR_RNDN);
        mpfr_mul(r28791, r28790, r28790, MPFR_RNDN);
        mpfr_mul(r28792, r28790, r28791, MPFR_RNDN);
        mpfr_mul(r28793, r28792, r28790, MPFR_RNDN);
        mpfr_mul(r28794, r28793, r28790, MPFR_RNDN);
        mpfr_mul(r28795, r28794, r28791, MPFR_RNDN);
        mpfr_mul(r28796, r28795, r28790, MPFR_RNDN);
        mpfr_mul(r28797, r28790, r28796, MPFR_RNDN);
        mpfr_mul(r28798, r28797, r28790, MPFR_RNDN);
        return mpfr_get_d(r28798, MPFR_RNDN);
}

static mpfr_t r28799, r28800, r28801, r28802, r28803, r28804;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(592);
        mpfr_init(r28799);
        mpfr_init_set_str(r28800, "3", 10, MPFR_RNDN);
        mpfr_init_set_str(r28801, "2", 10, MPFR_RNDN);
        mpfr_init(r28802);
        mpfr_init(r28803);
        mpfr_init(r28804);
}

double f_fm(double d1) {
        mpfr_set_d(r28799, d1, MPFR_RNDN);
        ;
        ;
        mpfr_add(r28802, r28800, r28801, MPFR_RNDN);
        mpfr_add(r28803, r28802, r28802, MPFR_RNDN);
        mpfr_pow(r28804, r28799, r28803, MPFR_RNDN);
        return mpfr_get_d(r28804, MPFR_RNDN);
}

static mpfr_t r28805, r28806, r28807, r28808, r28809, r28810;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(592);
        mpfr_init(r28805);
        mpfr_init_set_str(r28806, "3", 10, MPFR_RNDN);
        mpfr_init_set_str(r28807, "2", 10, MPFR_RNDN);
        mpfr_init(r28808);
        mpfr_init(r28809);
        mpfr_init(r28810);
}

double f_dm(double d1) {
        mpfr_set_d(r28805, d1, MPFR_RNDN);
        ;
        ;
        mpfr_add(r28808, r28806, r28807, MPFR_RNDN);
        mpfr_add(r28809, r28808, r28808, MPFR_RNDN);
        mpfr_pow(r28810, r28805, r28809, MPFR_RNDN);
        return mpfr_get_d(r28810, MPFR_RNDN);
}

