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

char *name = "NMSE problem 3.3.6";

double f_if(float N) {
        float r5318634 = N;
        float r5318635 = 1.0f;
        float r5318636 = r5318634 + r5318635;
        float r5318637 = log(r5318636);
        float r5318638 = log(r5318634);
        float r5318639 = r5318637 - r5318638;
        return r5318639;
}

double f_id(double N) {
        double r5318640 = N;
        double r5318641 = 1.0;
        double r5318642 = r5318640 + r5318641;
        double r5318643 = log(r5318642);
        double r5318644 = log(r5318640);
        double r5318645 = r5318643 - r5318644;
        return r5318645;
}


double f_of(float N) {
        float r5318646 = N;
        float r5318647 = 2136887.5541925835f;
        bool r5318648 = r5318646 <= r5318647;
        float r5318649 = 1.0f;
        float r5318650 = r5318646 + r5318649;
        float r5318651 = r5318650 / r5318646;
        float r5318652 = log(r5318651);
        float r5318653 = r5318649 / r5318646;
        float r5318654 = 0.3333333333333333f;
        float r5318655 = r5318654 / r5318646;
        float r5318656 = 0.5f;
        float r5318657 = r5318655 - r5318656;
        float r5318658 = r5318646 * r5318646;
        float r5318659 = r5318657 / r5318658;
        float r5318660 = r5318653 + r5318659;
        float r5318661 = r5318648 ? r5318652 : r5318660;
        return r5318661;
}

double f_od(double N) {
        double r5318662 = N;
        double r5318663 = 2136887.5541925835;
        bool r5318664 = r5318662 <= r5318663;
        double r5318665 = 1.0;
        double r5318666 = r5318662 + r5318665;
        double r5318667 = r5318666 / r5318662;
        double r5318668 = log(r5318667);
        double r5318669 = r5318665 / r5318662;
        double r5318670 = 0.3333333333333333;
        double r5318671 = r5318670 / r5318662;
        double r5318672 = 0.5;
        double r5318673 = r5318671 - r5318672;
        double r5318674 = r5318662 * r5318662;
        double r5318675 = r5318673 / r5318674;
        double r5318676 = r5318669 + r5318675;
        double r5318677 = r5318664 ? r5318668 : r5318676;
        return r5318677;
}

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 r5318678, r5318679, r5318680, r5318681, r5318682, r5318683;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init(r5318678);
        mpfr_init_set_str(r5318679, "1", 10, MPFR_RNDN);
        mpfr_init(r5318680);
        mpfr_init(r5318681);
        mpfr_init(r5318682);
        mpfr_init(r5318683);
}

double f_im(double N) {
        mpfr_set_d(r5318678, N, MPFR_RNDN);
        ;
        mpfr_add(r5318680, r5318678, r5318679, MPFR_RNDN);
        mpfr_log(r5318681, r5318680, MPFR_RNDN);
        mpfr_log(r5318682, r5318678, MPFR_RNDN);
        mpfr_sub(r5318683, r5318681, r5318682, MPFR_RNDN);
        return mpfr_get_d(r5318683, MPFR_RNDN);
}

static mpfr_t r5318684, r5318685, r5318686, r5318687, r5318688, r5318689, r5318690, r5318691, r5318692, r5318693, r5318694, r5318695, r5318696, r5318697, r5318698, r5318699;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r5318684);
        mpfr_init_set_str(r5318685, "2136887.5541925835", 10, MPFR_RNDN);
        mpfr_init(r5318686);
        mpfr_init_set_str(r5318687, "1", 10, MPFR_RNDN);
        mpfr_init(r5318688);
        mpfr_init(r5318689);
        mpfr_init(r5318690);
        mpfr_init(r5318691);
        mpfr_init_set_str(r5318692, "1/3", 10, MPFR_RNDN);
        mpfr_init(r5318693);
        mpfr_init_set_str(r5318694, "1/2", 10, MPFR_RNDN);
        mpfr_init(r5318695);
        mpfr_init(r5318696);
        mpfr_init(r5318697);
        mpfr_init(r5318698);
        mpfr_init(r5318699);
}

double f_fm(double N) {
        mpfr_set_d(r5318684, N, MPFR_RNDN);
        ;
        mpfr_set_si(r5318686, mpfr_cmp(r5318684, r5318685) <= 0, MPFR_RNDN);
        ;
        mpfr_add(r5318688, r5318684, r5318687, MPFR_RNDN);
        mpfr_div(r5318689, r5318688, r5318684, MPFR_RNDN);
        mpfr_log(r5318690, r5318689, MPFR_RNDN);
        mpfr_div(r5318691, r5318687, r5318684, MPFR_RNDN);
        ;
        mpfr_div(r5318693, r5318692, r5318684, MPFR_RNDN);
        ;
        mpfr_sub(r5318695, r5318693, r5318694, MPFR_RNDN);
        mpfr_sqr(r5318696, r5318684, MPFR_RNDN);
        mpfr_div(r5318697, r5318695, r5318696, MPFR_RNDN);
        mpfr_add(r5318698, r5318691, r5318697, MPFR_RNDN);
        if (mpfr_get_si(r5318686, MPFR_RNDN)) { mpfr_set(r5318699, r5318690, MPFR_RNDN); } else { mpfr_set(r5318699, r5318698, MPFR_RNDN); };
        return mpfr_get_d(r5318699, MPFR_RNDN);
}

static mpfr_t r5318700, r5318701, r5318702, r5318703, r5318704, r5318705, r5318706, r5318707, r5318708, r5318709, r5318710, r5318711, r5318712, r5318713, r5318714, r5318715;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r5318700);
        mpfr_init_set_str(r5318701, "2136887.5541925835", 10, MPFR_RNDN);
        mpfr_init(r5318702);
        mpfr_init_set_str(r5318703, "1", 10, MPFR_RNDN);
        mpfr_init(r5318704);
        mpfr_init(r5318705);
        mpfr_init(r5318706);
        mpfr_init(r5318707);
        mpfr_init_set_str(r5318708, "1/3", 10, MPFR_RNDN);
        mpfr_init(r5318709);
        mpfr_init_set_str(r5318710, "1/2", 10, MPFR_RNDN);
        mpfr_init(r5318711);
        mpfr_init(r5318712);
        mpfr_init(r5318713);
        mpfr_init(r5318714);
        mpfr_init(r5318715);
}

double f_dm(double N) {
        mpfr_set_d(r5318700, N, MPFR_RNDN);
        ;
        mpfr_set_si(r5318702, mpfr_cmp(r5318700, r5318701) <= 0, MPFR_RNDN);
        ;
        mpfr_add(r5318704, r5318700, r5318703, MPFR_RNDN);
        mpfr_div(r5318705, r5318704, r5318700, MPFR_RNDN);
        mpfr_log(r5318706, r5318705, MPFR_RNDN);
        mpfr_div(r5318707, r5318703, r5318700, MPFR_RNDN);
        ;
        mpfr_div(r5318709, r5318708, r5318700, MPFR_RNDN);
        ;
        mpfr_sub(r5318711, r5318709, r5318710, MPFR_RNDN);
        mpfr_sqr(r5318712, r5318700, MPFR_RNDN);
        mpfr_div(r5318713, r5318711, r5318712, MPFR_RNDN);
        mpfr_add(r5318714, r5318707, r5318713, MPFR_RNDN);
        if (mpfr_get_si(r5318702, MPFR_RNDN)) { mpfr_set(r5318715, r5318706, MPFR_RNDN); } else { mpfr_set(r5318715, r5318714, MPFR_RNDN); };
        return mpfr_get_d(r5318715, MPFR_RNDN);
}

