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

char *name = "NMSE section 3.5";

double f_if(float a, float x) {
        float r26089 = a;
        float r26090 = x;
        float r26091 = r26089 * r26090;
        float r26092 = exp(r26091);
        float r26093 = 1;
        float r26094 = r26092 - r26093;
        return r26094;
}

double f_id(double a, double x) {
        double r26095 = a;
        double r26096 = x;
        double r26097 = r26095 * r26096;
        double r26098 = exp(r26097);
        double r26099 = 1;
        double r26100 = r26098 - r26099;
        return r26100;
}


double f_of(float a, float x) {
        float r26101 = a;
        float r26102 = x;
        float r26103 = r26101 * r26102;
        float r26104 = exp(r26103);
        float r26105 = 1;
        float r26106 = r26104 - r26105;
        float r26107 = -1.3573432371303997e-08;
        bool r26108 = r26106 <= r26107;
        float r26109 = exp(r26106);
        float r26110 = log(r26109);
        float r26111 = r26103 * r26103;
        float r26112 = 1/6;
        float r26113 = r26112 * r26102;
        float r26114 = r26113 * r26101;
        float r26115 = 1/2;
        float r26116 = r26114 + r26115;
        float r26117 = r26111 * r26116;
        float r26118 = r26117 + r26103;
        float r26119 = r26108 ? r26110 : r26118;
        return r26119;
}

double f_od(double a, double x) {
        double r26120 = a;
        double r26121 = x;
        double r26122 = r26120 * r26121;
        double r26123 = exp(r26122);
        double r26124 = 1;
        double r26125 = r26123 - r26124;
        double r26126 = -1.3573432371303997e-08;
        bool r26127 = r26125 <= r26126;
        double r26128 = exp(r26125);
        double r26129 = log(r26128);
        double r26130 = r26122 * r26122;
        double r26131 = 1/6;
        double r26132 = r26131 * r26121;
        double r26133 = r26132 * r26120;
        double r26134 = 1/2;
        double r26135 = r26133 + r26134;
        double r26136 = r26130 * r26135;
        double r26137 = r26136 + r26122;
        double r26138 = r26127 ? r26129 : r26137;
        return r26138;
}

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 r26139, r26140, r26141, r26142, r26143, r26144;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(1424);
        mpfr_init(r26139);
        mpfr_init(r26140);
        mpfr_init(r26141);
        mpfr_init(r26142);
        mpfr_init_set_str(r26143, "1", 10, MPFR_RNDN);
        mpfr_init(r26144);
}

double f_im(double a, double x) {
        mpfr_set_d(r26139, a, MPFR_RNDN);
        mpfr_set_d(r26140, x, MPFR_RNDN);
        mpfr_mul(r26141, r26139, r26140, MPFR_RNDN);
        mpfr_exp(r26142, r26141, MPFR_RNDN);
        ;
        mpfr_sub(r26144, r26142, r26143, MPFR_RNDN);
        return mpfr_get_d(r26144, MPFR_RNDN);
}

static mpfr_t r26145, r26146, r26147, r26148, r26149, r26150, r26151, r26152, r26153, r26154, r26155, r26156, r26157, r26158, r26159, r26160, r26161, r26162, r26163;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(1424);
        mpfr_init(r26145);
        mpfr_init(r26146);
        mpfr_init(r26147);
        mpfr_init(r26148);
        mpfr_init_set_str(r26149, "1", 10, MPFR_RNDN);
        mpfr_init(r26150);
        mpfr_init_set_str(r26151, "-1.3573432371303997e-08", 10, MPFR_RNDN);
        mpfr_init(r26152);
        mpfr_init(r26153);
        mpfr_init(r26154);
        mpfr_init(r26155);
        mpfr_init_set_str(r26156, "1/6", 10, MPFR_RNDN);
        mpfr_init(r26157);
        mpfr_init(r26158);
        mpfr_init_set_str(r26159, "1/2", 10, MPFR_RNDN);
        mpfr_init(r26160);
        mpfr_init(r26161);
        mpfr_init(r26162);
        mpfr_init(r26163);
}

double f_fm(double a, double x) {
        mpfr_set_d(r26145, a, MPFR_RNDN);
        mpfr_set_d(r26146, x, MPFR_RNDN);
        mpfr_mul(r26147, r26145, r26146, MPFR_RNDN);
        mpfr_exp(r26148, r26147, MPFR_RNDN);
        ;
        mpfr_sub(r26150, r26148, r26149, MPFR_RNDN);
        ;
        mpfr_set_si(r26152, mpfr_cmp(r26150, r26151) <= 0, MPFR_RNDN);
        mpfr_exp(r26153, r26150, MPFR_RNDN);
        mpfr_log(r26154, r26153, MPFR_RNDN);
        mpfr_mul(r26155, r26147, r26147, MPFR_RNDN);
        ;
        mpfr_mul(r26157, r26156, r26146, MPFR_RNDN);
        mpfr_mul(r26158, r26157, r26145, MPFR_RNDN);
        ;
        mpfr_add(r26160, r26158, r26159, MPFR_RNDN);
        mpfr_mul(r26161, r26155, r26160, MPFR_RNDN);
        mpfr_add(r26162, r26161, r26147, MPFR_RNDN);
        if (mpfr_get_si(r26152, MPFR_RNDN)) { mpfr_set(r26163, r26154, MPFR_RNDN); } else { mpfr_set(r26163, r26162, MPFR_RNDN); };
        return mpfr_get_d(r26163, MPFR_RNDN);
}

static mpfr_t r26164, r26165, r26166, r26167, r26168, r26169, r26170, r26171, r26172, r26173, r26174, r26175, r26176, r26177, r26178, r26179, r26180, r26181, r26182;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(1424);
        mpfr_init(r26164);
        mpfr_init(r26165);
        mpfr_init(r26166);
        mpfr_init(r26167);
        mpfr_init_set_str(r26168, "1", 10, MPFR_RNDN);
        mpfr_init(r26169);
        mpfr_init_set_str(r26170, "-1.3573432371303997e-08", 10, MPFR_RNDN);
        mpfr_init(r26171);
        mpfr_init(r26172);
        mpfr_init(r26173);
        mpfr_init(r26174);
        mpfr_init_set_str(r26175, "1/6", 10, MPFR_RNDN);
        mpfr_init(r26176);
        mpfr_init(r26177);
        mpfr_init_set_str(r26178, "1/2", 10, MPFR_RNDN);
        mpfr_init(r26179);
        mpfr_init(r26180);
        mpfr_init(r26181);
        mpfr_init(r26182);
}

double f_dm(double a, double x) {
        mpfr_set_d(r26164, a, MPFR_RNDN);
        mpfr_set_d(r26165, x, MPFR_RNDN);
        mpfr_mul(r26166, r26164, r26165, MPFR_RNDN);
        mpfr_exp(r26167, r26166, MPFR_RNDN);
        ;
        mpfr_sub(r26169, r26167, r26168, MPFR_RNDN);
        ;
        mpfr_set_si(r26171, mpfr_cmp(r26169, r26170) <= 0, MPFR_RNDN);
        mpfr_exp(r26172, r26169, MPFR_RNDN);
        mpfr_log(r26173, r26172, MPFR_RNDN);
        mpfr_mul(r26174, r26166, r26166, MPFR_RNDN);
        ;
        mpfr_mul(r26176, r26175, r26165, MPFR_RNDN);
        mpfr_mul(r26177, r26176, r26164, MPFR_RNDN);
        ;
        mpfr_add(r26179, r26177, r26178, MPFR_RNDN);
        mpfr_mul(r26180, r26174, r26179, MPFR_RNDN);
        mpfr_add(r26181, r26180, r26166, MPFR_RNDN);
        if (mpfr_get_si(r26171, MPFR_RNDN)) { mpfr_set(r26182, r26173, MPFR_RNDN); } else { mpfr_set(r26182, r26181, MPFR_RNDN); };
        return mpfr_get_d(r26182, MPFR_RNDN);
}