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

char *name = "Hyperbolic arc-cosine";

double f_if(float x) {
        float r20134 = x;
        float r20135 = r20134 * r20134;
        float r20136 = 1;
        float r20137 = r20135 - r20136;
        float r20138 = sqrt(r20137);
        float r20139 = r20134 + r20138;
        float r20140 = log(r20139);
        return r20140;
}

double f_id(double x) {
        double r20141 = x;
        double r20142 = r20141 * r20141;
        double r20143 = 1;
        double r20144 = r20142 - r20143;
        double r20145 = sqrt(r20144);
        double r20146 = r20141 + r20145;
        double r20147 = log(r20146);
        return r20147;
}


double f_of(float x) {
        float r20148 = x;
        float r20149 = 1;
        float r20150 = r20148 + r20149;
        float r20151 = sqrt(r20150);
        float r20152 = r20148 - r20149;
        float r20153 = sqrt(r20152);
        float r20154 = r20151 * r20153;
        float r20155 = r20148 + r20154;
        float r20156 = log(r20155);
        return r20156;
}

double f_od(double x) {
        double r20157 = x;
        double r20158 = 1;
        double r20159 = r20157 + r20158;
        double r20160 = sqrt(r20159);
        double r20161 = r20157 - r20158;
        double r20162 = sqrt(r20161);
        double r20163 = r20160 * r20162;
        double r20164 = r20157 + r20163;
        double r20165 = log(r20164);
        return r20165;
}

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 r20166, r20167, r20168, r20169, r20170, r20171, r20172;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(2448);
        mpfr_init(r20166);
        mpfr_init(r20167);
        mpfr_init_set_str(r20168, "1", 10, MPFR_RNDN);
        mpfr_init(r20169);
        mpfr_init(r20170);
        mpfr_init(r20171);
        mpfr_init(r20172);
}

double f_im(double x) {
        mpfr_set_d(r20166, x, MPFR_RNDN);
        mpfr_mul(r20167, r20166, r20166, MPFR_RNDN);
        ;
        mpfr_sub(r20169, r20167, r20168, MPFR_RNDN);
        mpfr_sqrt(r20170, r20169, MPFR_RNDN);
        mpfr_add(r20171, r20166, r20170, MPFR_RNDN);
        mpfr_log(r20172, r20171, MPFR_RNDN);
        return mpfr_get_d(r20172, MPFR_RNDN);
}

static mpfr_t r20173, r20174, r20175, r20176, r20177, r20178, r20179, r20180, r20181;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(2448);
        mpfr_init(r20173);
        mpfr_init_set_str(r20174, "1", 10, MPFR_RNDN);
        mpfr_init(r20175);
        mpfr_init(r20176);
        mpfr_init(r20177);
        mpfr_init(r20178);
        mpfr_init(r20179);
        mpfr_init(r20180);
        mpfr_init(r20181);
}

double f_fm(double x) {
        mpfr_set_d(r20173, x, MPFR_RNDN);
        ;
        mpfr_add(r20175, r20173, r20174, MPFR_RNDN);
        mpfr_sqrt(r20176, r20175, MPFR_RNDN);
        mpfr_sub(r20177, r20173, r20174, MPFR_RNDN);
        mpfr_sqrt(r20178, r20177, MPFR_RNDN);
        mpfr_mul(r20179, r20176, r20178, MPFR_RNDN);
        mpfr_add(r20180, r20173, r20179, MPFR_RNDN);
        mpfr_log(r20181, r20180, MPFR_RNDN);
        return mpfr_get_d(r20181, MPFR_RNDN);
}

static mpfr_t r20182, r20183, r20184, r20185, r20186, r20187, r20188, r20189, r20190;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(2448);
        mpfr_init(r20182);
        mpfr_init_set_str(r20183, "1", 10, MPFR_RNDN);
        mpfr_init(r20184);
        mpfr_init(r20185);
        mpfr_init(r20186);
        mpfr_init(r20187);
        mpfr_init(r20188);
        mpfr_init(r20189);
        mpfr_init(r20190);
}

double f_dm(double x) {
        mpfr_set_d(r20182, x, MPFR_RNDN);
        ;
        mpfr_add(r20184, r20182, r20183, MPFR_RNDN);
        mpfr_sqrt(r20185, r20184, MPFR_RNDN);
        mpfr_sub(r20186, r20182, r20183, MPFR_RNDN);
        mpfr_sqrt(r20187, r20186, MPFR_RNDN);
        mpfr_mul(r20188, r20185, r20187, MPFR_RNDN);
        mpfr_add(r20189, r20182, r20188, MPFR_RNDN);
        mpfr_log(r20190, r20189, MPFR_RNDN);
        return mpfr_get_d(r20190, MPFR_RNDN);
}

