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

char *name = "ln(1 + x)";

double f_if(float x) {
        float r25482 = 1;
        float r25483 = x;
        float r25484 = r25482 + r25483;
        float r25485 = log(r25484);
        return r25485;
}

double f_id(double x) {
        double r25486 = 1;
        double r25487 = x;
        double r25488 = r25486 + r25487;
        double r25489 = log(r25488);
        return r25489;
}


double f_of(float x) {
        float r25490 = 1;
        float r25491 = x;
        float r25492 = r25490 + r25491;
        float r25493 = log(r25492);
        float r25494 = 1.1422547758105787e-05;
        bool r25495 = r25493 <= r25494;
        float r25496 = 1/2;
        float r25497 = 1/3;
        float r25498 = r25491 * r25497;
        float r25499 = r25496 - r25498;
        float r25500 = r25491 * r25491;
        float r25501 = r25499 * r25500;
        float r25502 = r25491 - r25501;
        float r25503 = r25495 ? r25502 : r25493;
        return r25503;
}

double f_od(double x) {
        double r25504 = 1;
        double r25505 = x;
        double r25506 = r25504 + r25505;
        double r25507 = log(r25506);
        double r25508 = 1.1422547758105787e-05;
        bool r25509 = r25507 <= r25508;
        double r25510 = 1/2;
        double r25511 = 1/3;
        double r25512 = r25505 * r25511;
        double r25513 = r25510 - r25512;
        double r25514 = r25505 * r25505;
        double r25515 = r25513 * r25514;
        double r25516 = r25505 - r25515;
        double r25517 = r25509 ? r25516 : r25507;
        return r25517;
}

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 r25518, r25519, r25520, r25521;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(1360);
        mpfr_init_set_str(r25518, "1", 10, MPFR_RNDN);
        mpfr_init(r25519);
        mpfr_init(r25520);
        mpfr_init(r25521);
}

double f_im(double x) {
        ;
        mpfr_set_d(r25519, x, MPFR_RNDN);
        mpfr_add(r25520, r25518, r25519, MPFR_RNDN);
        mpfr_log(r25521, r25520, MPFR_RNDN);
        return mpfr_get_d(r25521, MPFR_RNDN);
}

static mpfr_t r25522, r25523, r25524, r25525, r25526, r25527, r25528, r25529, r25530, r25531, r25532, r25533, r25534, r25535;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(1360);
        mpfr_init_set_str(r25522, "1", 10, MPFR_RNDN);
        mpfr_init(r25523);
        mpfr_init(r25524);
        mpfr_init(r25525);
        mpfr_init_set_str(r25526, "1.1422547758105787e-05", 10, MPFR_RNDN);
        mpfr_init(r25527);
        mpfr_init_set_str(r25528, "1/2", 10, MPFR_RNDN);
        mpfr_init_set_str(r25529, "1/3", 10, MPFR_RNDN);
        mpfr_init(r25530);
        mpfr_init(r25531);
        mpfr_init(r25532);
        mpfr_init(r25533);
        mpfr_init(r25534);
        mpfr_init(r25535);
}

double f_fm(double x) {
        ;
        mpfr_set_d(r25523, x, MPFR_RNDN);
        mpfr_add(r25524, r25522, r25523, MPFR_RNDN);
        mpfr_log(r25525, r25524, MPFR_RNDN);
        ;
        mpfr_set_si(r25527, mpfr_cmp(r25525, r25526) <= 0, MPFR_RNDN);
        ;
        ;
        mpfr_mul(r25530, r25523, r25529, MPFR_RNDN);
        mpfr_sub(r25531, r25528, r25530, MPFR_RNDN);
        mpfr_mul(r25532, r25523, r25523, MPFR_RNDN);
        mpfr_mul(r25533, r25531, r25532, MPFR_RNDN);
        mpfr_sub(r25534, r25523, r25533, MPFR_RNDN);
        if (mpfr_get_si(r25527, MPFR_RNDN)) { mpfr_set(r25535, r25534, MPFR_RNDN); } else { mpfr_set(r25535, r25525, MPFR_RNDN); };
        return mpfr_get_d(r25535, MPFR_RNDN);
}

static mpfr_t r25536, r25537, r25538, r25539, r25540, r25541, r25542, r25543, r25544, r25545, r25546, r25547, r25548, r25549;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(1360);
        mpfr_init_set_str(r25536, "1", 10, MPFR_RNDN);
        mpfr_init(r25537);
        mpfr_init(r25538);
        mpfr_init(r25539);
        mpfr_init_set_str(r25540, "1.1422547758105787e-05", 10, MPFR_RNDN);
        mpfr_init(r25541);
        mpfr_init_set_str(r25542, "1/2", 10, MPFR_RNDN);
        mpfr_init_set_str(r25543, "1/3", 10, MPFR_RNDN);
        mpfr_init(r25544);
        mpfr_init(r25545);
        mpfr_init(r25546);
        mpfr_init(r25547);
        mpfr_init(r25548);
        mpfr_init(r25549);
}

double f_dm(double x) {
        ;
        mpfr_set_d(r25537, x, MPFR_RNDN);
        mpfr_add(r25538, r25536, r25537, MPFR_RNDN);
        mpfr_log(r25539, r25538, MPFR_RNDN);
        ;
        mpfr_set_si(r25541, mpfr_cmp(r25539, r25540) <= 0, MPFR_RNDN);
        ;
        ;
        mpfr_mul(r25544, r25537, r25543, MPFR_RNDN);
        mpfr_sub(r25545, r25542, r25544, MPFR_RNDN);
        mpfr_mul(r25546, r25537, r25537, MPFR_RNDN);
        mpfr_mul(r25547, r25545, r25546, MPFR_RNDN);
        mpfr_sub(r25548, r25537, r25547, MPFR_RNDN);
        if (mpfr_get_si(r25541, MPFR_RNDN)) { mpfr_set(r25549, r25548, MPFR_RNDN); } else { mpfr_set(r25549, r25539, MPFR_RNDN); };
        return mpfr_get_d(r25549, MPFR_RNDN);
}

