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

char *name = "exp2 (problem 3.3.7)";

double f_if(float x) {
        float r26990 = x;
        float r26991 = exp(r26990);
        float r26992 = 2;
        float r26993 = r26991 - r26992;
        float r26994 = -r26990;
        float r26995 = exp(r26994);
        float r26996 = r26993 + r26995;
        return r26996;
}

double f_id(double x) {
        double r26997 = x;
        double r26998 = exp(r26997);
        double r26999 = 2;
        double r27000 = r26998 - r26999;
        double r27001 = -r26997;
        double r27002 = exp(r27001);
        double r27003 = r27000 + r27002;
        return r27003;
}


double f_of(float x) {
        float r27004 = x;
        float r27005 = 2;
        float r27006 = pow(r27004, r27005);
        float r27007 = 1/12;
        float r27008 = 4;
        float r27009 = pow(r27004, r27008);
        float r27010 = r27007 * r27009;
        float r27011 = 1/360;
        float r27012 = 6;
        float r27013 = pow(r27004, r27012);
        float r27014 = r27011 * r27013;
        float r27015 = r27010 + r27014;
        float r27016 = r27006 + r27015;
        return r27016;
}

double f_od(double x) {
        double r27017 = x;
        double r27018 = 2;
        double r27019 = pow(r27017, r27018);
        double r27020 = 1/12;
        double r27021 = 4;
        double r27022 = pow(r27017, r27021);
        double r27023 = r27020 * r27022;
        double r27024 = 1/360;
        double r27025 = 6;
        double r27026 = pow(r27017, r27025);
        double r27027 = r27024 * r27026;
        double r27028 = r27023 + r27027;
        double r27029 = r27019 + r27028;
        return r27029;
}

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 r27030, r27031, r27032, r27033, r27034, r27035, r27036;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(1360);
        mpfr_init(r27030);
        mpfr_init(r27031);
        mpfr_init_set_str(r27032, "2", 10, MPFR_RNDN);
        mpfr_init(r27033);
        mpfr_init(r27034);
        mpfr_init(r27035);
        mpfr_init(r27036);
}

double f_im(double x) {
        mpfr_set_d(r27030, x, MPFR_RNDN);
        mpfr_exp(r27031, r27030, MPFR_RNDN);
        ;
        mpfr_sub(r27033, r27031, r27032, MPFR_RNDN);
        mpfr_neg(r27034, r27030, MPFR_RNDN);
        mpfr_exp(r27035, r27034, MPFR_RNDN);
        mpfr_add(r27036, r27033, r27035, MPFR_RNDN);
        return mpfr_get_d(r27036, MPFR_RNDN);
}

static mpfr_t r27037, r27038, r27039, r27040, r27041, r27042, r27043, r27044, r27045, r27046, r27047, r27048, r27049;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(1360);
        mpfr_init(r27037);
        mpfr_init_set_str(r27038, "2", 10, MPFR_RNDN);
        mpfr_init(r27039);
        mpfr_init_set_str(r27040, "1/12", 10, MPFR_RNDN);
        mpfr_init_set_str(r27041, "4", 10, MPFR_RNDN);
        mpfr_init(r27042);
        mpfr_init(r27043);
        mpfr_init_set_str(r27044, "1/360", 10, MPFR_RNDN);
        mpfr_init_set_str(r27045, "6", 10, MPFR_RNDN);
        mpfr_init(r27046);
        mpfr_init(r27047);
        mpfr_init(r27048);
        mpfr_init(r27049);
}

double f_fm(double x) {
        mpfr_set_d(r27037, x, MPFR_RNDN);
        ;
        mpfr_pow(r27039, r27037, r27038, MPFR_RNDN);
        ;
        ;
        mpfr_pow(r27042, r27037, r27041, MPFR_RNDN);
        mpfr_mul(r27043, r27040, r27042, MPFR_RNDN);
        ;
        ;
        mpfr_pow(r27046, r27037, r27045, MPFR_RNDN);
        mpfr_mul(r27047, r27044, r27046, MPFR_RNDN);
        mpfr_add(r27048, r27043, r27047, MPFR_RNDN);
        mpfr_add(r27049, r27039, r27048, MPFR_RNDN);
        return mpfr_get_d(r27049, MPFR_RNDN);
}

static mpfr_t r27050, r27051, r27052, r27053, r27054, r27055, r27056, r27057, r27058, r27059, r27060, r27061, r27062;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(1360);
        mpfr_init(r27050);
        mpfr_init_set_str(r27051, "2", 10, MPFR_RNDN);
        mpfr_init(r27052);
        mpfr_init_set_str(r27053, "1/12", 10, MPFR_RNDN);
        mpfr_init_set_str(r27054, "4", 10, MPFR_RNDN);
        mpfr_init(r27055);
        mpfr_init(r27056);
        mpfr_init_set_str(r27057, "1/360", 10, MPFR_RNDN);
        mpfr_init_set_str(r27058, "6", 10, MPFR_RNDN);
        mpfr_init(r27059);
        mpfr_init(r27060);
        mpfr_init(r27061);
        mpfr_init(r27062);
}

double f_dm(double x) {
        mpfr_set_d(r27050, x, MPFR_RNDN);
        ;
        mpfr_pow(r27052, r27050, r27051, MPFR_RNDN);
        ;
        ;
        mpfr_pow(r27055, r27050, r27054, MPFR_RNDN);
        mpfr_mul(r27056, r27053, r27055, MPFR_RNDN);
        ;
        ;
        mpfr_pow(r27059, r27050, r27058, MPFR_RNDN);
        mpfr_mul(r27060, r27057, r27059, MPFR_RNDN);
        mpfr_add(r27061, r27056, r27060, MPFR_RNDN);
        mpfr_add(r27062, r27052, r27061, MPFR_RNDN);
        return mpfr_get_d(r27062, MPFR_RNDN);
}