#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 r28323 = d1;
        float r28324 = r28323 * r28323;
        float r28325 = r28323 * r28324;
        float r28326 = r28325 * r28323;
        float r28327 = r28326 * r28323;
        float r28328 = r28327 * r28324;
        float r28329 = r28328 * r28323;
        float r28330 = r28323 * r28329;
        float r28331 = r28330 * r28323;
        return r28331;
}

double f_id(double d1) {
        double r28332 = d1;
        double r28333 = r28332 * r28332;
        double r28334 = r28332 * r28333;
        double r28335 = r28334 * r28332;
        double r28336 = r28335 * r28332;
        double r28337 = r28336 * r28333;
        double r28338 = r28337 * r28332;
        double r28339 = r28332 * r28338;
        double r28340 = r28339 * r28332;
        return r28340;
}


double f_of(float d1) {
        float r28341 = d1;
        float r28342 = 3;
        float r28343 = 2;
        float r28344 = r28342 + r28343;
        float r28345 = r28344 + r28344;
        float r28346 = pow(r28341, r28345);
        return r28346;
}

double f_od(double d1) {
        double r28347 = d1;
        double r28348 = 3;
        double r28349 = 2;
        double r28350 = r28348 + r28349;
        double r28351 = r28350 + r28350;
        double r28352 = pow(r28347, r28351);
        return r28352;
}

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 r28353, r28354, r28355, r28356, r28357, r28358, r28359, r28360, r28361;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(592);
        mpfr_init(r28353);
        mpfr_init(r28354);
        mpfr_init(r28355);
        mpfr_init(r28356);
        mpfr_init(r28357);
        mpfr_init(r28358);
        mpfr_init(r28359);
        mpfr_init(r28360);
        mpfr_init(r28361);
}

double f_im(double d1) {
        mpfr_set_d(r28353, d1, MPFR_RNDN);
        mpfr_mul(r28354, r28353, r28353, MPFR_RNDN);
        mpfr_mul(r28355, r28353, r28354, MPFR_RNDN);
        mpfr_mul(r28356, r28355, r28353, MPFR_RNDN);
        mpfr_mul(r28357, r28356, r28353, MPFR_RNDN);
        mpfr_mul(r28358, r28357, r28354, MPFR_RNDN);
        mpfr_mul(r28359, r28358, r28353, MPFR_RNDN);
        mpfr_mul(r28360, r28353, r28359, MPFR_RNDN);
        mpfr_mul(r28361, r28360, r28353, MPFR_RNDN);
        return mpfr_get_d(r28361, MPFR_RNDN);
}

static mpfr_t r28362, r28363, r28364, r28365, r28366, r28367;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(592);
        mpfr_init(r28362);
        mpfr_init_set_str(r28363, "3", 10, MPFR_RNDN);
        mpfr_init_set_str(r28364, "2", 10, MPFR_RNDN);
        mpfr_init(r28365);
        mpfr_init(r28366);
        mpfr_init(r28367);
}

double f_fm(double d1) {
        mpfr_set_d(r28362, d1, MPFR_RNDN);
        ;
        ;
        mpfr_add(r28365, r28363, r28364, MPFR_RNDN);
        mpfr_add(r28366, r28365, r28365, MPFR_RNDN);
        mpfr_pow(r28367, r28362, r28366, MPFR_RNDN);
        return mpfr_get_d(r28367, MPFR_RNDN);
}

static mpfr_t r28368, r28369, r28370, r28371, r28372, r28373;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(592);
        mpfr_init(r28368);
        mpfr_init_set_str(r28369, "3", 10, MPFR_RNDN);
        mpfr_init_set_str(r28370, "2", 10, MPFR_RNDN);
        mpfr_init(r28371);
        mpfr_init(r28372);
        mpfr_init(r28373);
}

double f_dm(double d1) {
        mpfr_set_d(r28368, d1, MPFR_RNDN);
        ;
        ;
        mpfr_add(r28371, r28369, r28370, MPFR_RNDN);
        mpfr_add(r28372, r28371, r28371, MPFR_RNDN);
        mpfr_pow(r28373, r28368, r28372, MPFR_RNDN);
        return mpfr_get_d(r28373, MPFR_RNDN);
}