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

char *name = "arccos";

double f_if(float x) {
        float r7443 = 2.0f;
        float r7444 = 1.0f;
        float r7445 = x;
        float r7446 = r7444 - r7445;
        float r7447 = r7444 + r7445;
        float r7448 = r7446 / r7447;
        float r7449 = sqrt(r7448);
        float r7450 = atan(r7449);
        float r7451 = r7443 * r7450;
        return r7451;
}

double f_id(double x) {
        double r7452 = 2.0;
        double r7453 = 1.0;
        double r7454 = x;
        double r7455 = r7453 - r7454;
        double r7456 = r7453 + r7454;
        double r7457 = r7455 / r7456;
        double r7458 = sqrt(r7457);
        double r7459 = atan(r7458);
        double r7460 = r7452 * r7459;
        return r7460;
}


double f_of(float x) {
        float r7461 = 1.0f;
        float r7462 = x;
        float r7463 = r7461 - r7462;
        float r7464 = r7461 + r7462;
        float r7465 = r7463 / r7464;
        float r7466 = log1p(r7465);
        float r7467 = expm1(r7466);
        float r7468 = sqrt(r7467);
        float r7469 = atan(r7468);
        float r7470 = 2.0f;
        float r7471 = r7469 * r7470;
        return r7471;
}

double f_od(double x) {
        double r7472 = 1.0;
        double r7473 = x;
        double r7474 = r7472 - r7473;
        double r7475 = r7472 + r7473;
        double r7476 = r7474 / r7475;
        double r7477 = log1p(r7476);
        double r7478 = expm1(r7477);
        double r7479 = sqrt(r7478);
        double r7480 = atan(r7479);
        double r7481 = 2.0;
        double r7482 = r7480 * r7481;
        return r7482;
}

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 r7483, r7484, r7485, r7486, r7487, r7488, r7489, r7490, r7491;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(336);
        mpfr_init_set_str(r7483, "2", 10, MPFR_RNDN);
        mpfr_init_set_str(r7484, "1", 10, MPFR_RNDN);
        mpfr_init(r7485);
        mpfr_init(r7486);
        mpfr_init(r7487);
        mpfr_init(r7488);
        mpfr_init(r7489);
        mpfr_init(r7490);
        mpfr_init(r7491);
}

double f_im(double x) {
        ;
        ;
        mpfr_set_d(r7485, x, MPFR_RNDN);
        mpfr_sub(r7486, r7484, r7485, MPFR_RNDN);
        mpfr_add(r7487, r7484, r7485, MPFR_RNDN);
        mpfr_div(r7488, r7486, r7487, MPFR_RNDN);
        mpfr_sqrt(r7489, r7488, MPFR_RNDN);
        mpfr_atan(r7490, r7489, MPFR_RNDN);
        mpfr_mul(r7491, r7483, r7490, MPFR_RNDN);
        return mpfr_get_d(r7491, MPFR_RNDN);
}

static mpfr_t r7492, r7493, r7494, r7495, r7496, r7497, r7498, r7499, r7500, r7501, r7502;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(336);
        mpfr_init_set_str(r7492, "1", 10, MPFR_RNDN);
        mpfr_init(r7493);
        mpfr_init(r7494);
        mpfr_init(r7495);
        mpfr_init(r7496);
        mpfr_init(r7497);
        mpfr_init(r7498);
        mpfr_init(r7499);
        mpfr_init(r7500);
        mpfr_init_set_str(r7501, "2", 10, MPFR_RNDN);
        mpfr_init(r7502);
}

double f_fm(double x) {
        ;
        mpfr_set_d(r7493, x, MPFR_RNDN);
        mpfr_sub(r7494, r7492, r7493, MPFR_RNDN);
        mpfr_add(r7495, r7492, r7493, MPFR_RNDN);
        mpfr_div(r7496, r7494, r7495, MPFR_RNDN);
        mpfr_log1p(r7497, r7496, MPFR_RNDN);
        mpfr_expm1(r7498, r7497, MPFR_RNDN);
        mpfr_sqrt(r7499, r7498, MPFR_RNDN);
        mpfr_atan(r7500, r7499, MPFR_RNDN);
        ;
        mpfr_mul(r7502, r7500, r7501, MPFR_RNDN);
        return mpfr_get_d(r7502, MPFR_RNDN);
}

static mpfr_t r7503, r7504, r7505, r7506, r7507, r7508, r7509, r7510, r7511, r7512, r7513;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(336);
        mpfr_init_set_str(r7503, "1", 10, MPFR_RNDN);
        mpfr_init(r7504);
        mpfr_init(r7505);
        mpfr_init(r7506);
        mpfr_init(r7507);
        mpfr_init(r7508);
        mpfr_init(r7509);
        mpfr_init(r7510);
        mpfr_init(r7511);
        mpfr_init_set_str(r7512, "2", 10, MPFR_RNDN);
        mpfr_init(r7513);
}

double f_dm(double x) {
        ;
        mpfr_set_d(r7504, x, MPFR_RNDN);
        mpfr_sub(r7505, r7503, r7504, MPFR_RNDN);
        mpfr_add(r7506, r7503, r7504, MPFR_RNDN);
        mpfr_div(r7507, r7505, r7506, MPFR_RNDN);
        mpfr_log1p(r7508, r7507, MPFR_RNDN);
        mpfr_expm1(r7509, r7508, MPFR_RNDN);
        mpfr_sqrt(r7510, r7509, MPFR_RNDN);
        mpfr_atan(r7511, r7510, MPFR_RNDN);
        ;
        mpfr_mul(r7513, r7511, r7512, MPFR_RNDN);
        return mpfr_get_d(r7513, MPFR_RNDN);
}

