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

char *name = "(- 1.8612743679730346e-155 (pow a (atan 5.662719674881949e+25)))";

double f_if(float a) {
        float r15236 = 0.0f;
        float r15237 = a;
        float r15238 = 5.662719699154711e+25f;
        float r15239 = atan(r15238);
        float r15240 = pow(r15237, r15239);
        float r15241 = r15236 - r15240;
        return r15241;
}

double f_id(double a) {
        double r15242 = 0.0;
        double r15243 = a;
        double r15244 = 5.662719699154711e+25;
        double r15245 = atan(r15244);
        double r15246 = pow(r15243, r15245);
        double r15247 = r15242 - r15246;
        return r15247;
}


double f_of(float a) {
        float r15248 = 0.0f;
        float r15249 = exp(1.0);
        float r15250 = a;
        float r15251 = 5.662719699154711e+25f;
        float r15252 = atan(r15251);
        float r15253 = pow(r15250, r15252);
        float r15254 = log(r15253);
        float r15255 = pow(r15249, r15254);
        float r15256 = r15248 - r15255;
        return r15256;
}

double f_od(double a) {
        double r15257 = 0.0;
        double r15258 = exp(1.0);
        double r15259 = a;
        double r15260 = 5.662719699154711e+25;
        double r15261 = atan(r15260);
        double r15262 = pow(r15259, r15261);
        double r15263 = log(r15262);
        double r15264 = pow(r15258, r15263);
        double r15265 = r15257 - r15264;
        return r15265;
}

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 r15266, r15267, r15268, r15269, r15270, r15271;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init_set_str(r15266, "1.8612743679730346e-155", 10, MPFR_RNDN);
        mpfr_init(r15267);
        mpfr_init_set_str(r15268, "5.662719674881949e+25", 10, MPFR_RNDN);
        mpfr_init(r15269);
        mpfr_init(r15270);
        mpfr_init(r15271);
}

double f_im(double a) {
        ;
        mpfr_set_d(r15267, a, MPFR_RNDN);
        ;
        mpfr_atan(r15269, r15268, MPFR_RNDN);
        mpfr_pow(r15270, r15267, r15269, MPFR_RNDN);
        mpfr_sub(r15271, r15266, r15270, MPFR_RNDN);
        return mpfr_get_d(r15271, MPFR_RNDN);
}

static mpfr_t r15272, r15273, r15274, r15275, r15276, r15277, r15278, r15279, r15280;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init_set_str(r15272, "1.8612743679730346e-155", 10, MPFR_RNDN);
        mpfr_init(r15273);
        mpfr_init(r15274);
        mpfr_init_set_str(r15275, "5.662719674881949e+25", 10, MPFR_RNDN);
        mpfr_init(r15276);
        mpfr_init(r15277);
        mpfr_init(r15278);
        mpfr_init(r15279);
        mpfr_init(r15280);
}

double f_fm(double a) {
        ;
        mpfr_set_si(r15273, 1, MPFR_RNDN); mpfr_exp(r15273, r15273, MPFR_RNDN);;
        mpfr_set_d(r15274, a, MPFR_RNDN);
        ;
        mpfr_atan(r15276, r15275, MPFR_RNDN);
        mpfr_pow(r15277, r15274, r15276, MPFR_RNDN);
        mpfr_log(r15278, r15277, MPFR_RNDN);
        mpfr_pow(r15279, r15273, r15278, MPFR_RNDN);
        mpfr_sub(r15280, r15272, r15279, MPFR_RNDN);
        return mpfr_get_d(r15280, MPFR_RNDN);
}

static mpfr_t r15281, r15282, r15283, r15284, r15285, r15286, r15287, r15288, r15289;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init_set_str(r15281, "1.8612743679730346e-155", 10, MPFR_RNDN);
        mpfr_init(r15282);
        mpfr_init(r15283);
        mpfr_init_set_str(r15284, "5.662719674881949e+25", 10, MPFR_RNDN);
        mpfr_init(r15285);
        mpfr_init(r15286);
        mpfr_init(r15287);
        mpfr_init(r15288);
        mpfr_init(r15289);
}

double f_dm(double a) {
        ;
        mpfr_set_si(r15282, 1, MPFR_RNDN); mpfr_exp(r15282, r15282, MPFR_RNDN);;
        mpfr_set_d(r15283, a, MPFR_RNDN);
        ;
        mpfr_atan(r15285, r15284, MPFR_RNDN);
        mpfr_pow(r15286, r15283, r15285, MPFR_RNDN);
        mpfr_log(r15287, r15286, MPFR_RNDN);
        mpfr_pow(r15288, r15282, r15287, MPFR_RNDN);
        mpfr_sub(r15289, r15281, r15288, MPFR_RNDN);
        return mpfr_get_d(r15289, MPFR_RNDN);
}