#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 r23766 = d1;
        float r23767 = r23766 * r23766;
        float r23768 = r23766 * r23767;
        float r23769 = r23768 * r23766;
        float r23770 = r23769 * r23766;
        float r23771 = r23770 * r23767;
        float r23772 = r23771 * r23766;
        float r23773 = r23766 * r23772;
        float r23774 = r23773 * r23766;
        return r23774;
}

double f_id(double d1) {
        double r23775 = d1;
        double r23776 = r23775 * r23775;
        double r23777 = r23775 * r23776;
        double r23778 = r23777 * r23775;
        double r23779 = r23778 * r23775;
        double r23780 = r23779 * r23776;
        double r23781 = r23780 * r23775;
        double r23782 = r23775 * r23781;
        double r23783 = r23782 * r23775;
        return r23783;
}


double f_of(float d1) {
        float r23784 = d1;
        float r23785 = 2;
        float r23786 = 3;
        float r23787 = r23786 + r23785;
        float r23788 = r23785 * r23787;
        float r23789 = pow(r23784, r23788);
        return r23789;
}

double f_od(double d1) {
        double r23790 = d1;
        double r23791 = 2;
        double r23792 = 3;
        double r23793 = r23792 + r23791;
        double r23794 = r23791 * r23793;
        double r23795 = pow(r23790, r23794);
        return r23795;
}

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 r23796, r23797, r23798, r23799, r23800, r23801, r23802, r23803, r23804;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r23796);
        mpfr_init(r23797);
        mpfr_init(r23798);
        mpfr_init(r23799);
        mpfr_init(r23800);
        mpfr_init(r23801);
        mpfr_init(r23802);
        mpfr_init(r23803);
        mpfr_init(r23804);
}

double f_im(double d1) {
        mpfr_set_d(r23796, d1, MPFR_RNDN);
        mpfr_mul(r23797, r23796, r23796, MPFR_RNDN);
        mpfr_mul(r23798, r23796, r23797, MPFR_RNDN);
        mpfr_mul(r23799, r23798, r23796, MPFR_RNDN);
        mpfr_mul(r23800, r23799, r23796, MPFR_RNDN);
        mpfr_mul(r23801, r23800, r23797, MPFR_RNDN);
        mpfr_mul(r23802, r23801, r23796, MPFR_RNDN);
        mpfr_mul(r23803, r23796, r23802, MPFR_RNDN);
        mpfr_mul(r23804, r23803, r23796, MPFR_RNDN);
        return mpfr_get_d(r23804, MPFR_RNDN);
}

static mpfr_t r23805, r23806, r23807, r23808, r23809, r23810;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r23805);
        mpfr_init_set_str(r23806, "2", 10, MPFR_RNDN);
        mpfr_init_set_str(r23807, "3", 10, MPFR_RNDN);
        mpfr_init(r23808);
        mpfr_init(r23809);
        mpfr_init(r23810);
}

double f_fm(double d1) {
        mpfr_set_d(r23805, d1, MPFR_RNDN);
        ;
        ;
        mpfr_add(r23808, r23807, r23806, MPFR_RNDN);
        mpfr_mul(r23809, r23806, r23808, MPFR_RNDN);
        mpfr_pow(r23810, r23805, r23809, MPFR_RNDN);
        return mpfr_get_d(r23810, MPFR_RNDN);
}

static mpfr_t r23811, r23812, r23813, r23814, r23815, r23816;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r23811);
        mpfr_init_set_str(r23812, "2", 10, MPFR_RNDN);
        mpfr_init_set_str(r23813, "3", 10, MPFR_RNDN);
        mpfr_init(r23814);
        mpfr_init(r23815);
        mpfr_init(r23816);
}

double f_dm(double d1) {
        mpfr_set_d(r23811, d1, MPFR_RNDN);
        ;
        ;
        mpfr_add(r23814, r23813, r23812, MPFR_RNDN);
        mpfr_mul(r23815, r23812, r23814, MPFR_RNDN);
        mpfr_pow(r23816, r23811, r23815, MPFR_RNDN);
        return mpfr_get_d(r23816, MPFR_RNDN);
}