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

char *name = "2cbrt (problem 3.3.4)";

double f_if(float x) {
        float r26321 = x;
        float r26322 = 1;
        float r26323 = r26321 + r26322;
        float r26324 = cbrt(r26323);
        float r26325 = cbrt(r26321);
        float r26326 = r26324 - r26325;
        return r26326;
}

double f_id(double x) {
        double r26327 = x;
        double r26328 = 1;
        double r26329 = r26327 + r26328;
        double r26330 = cbrt(r26329);
        double r26331 = cbrt(r26327);
        double r26332 = r26330 - r26331;
        return r26332;
}


double f_of(float x) {
        float r26333 = 1;
        float r26334 = x;
        float r26335 = r26333 + r26334;
        float r26336 = cbrt(r26335);
        float r26337 = r26336 * r26336;
        float r26338 = cbrt(r26334);
        float r26339 = r26338 + r26336;
        float r26340 = r26339 * r26338;
        float r26341 = cbrt(r26340);
        float r26342 = r26341 * r26341;
        float r26343 = r26342 * r26341;
        float r26344 = r26337 + r26343;
        float r26345 = r26333 / r26344;
        return r26345;
}

double f_od(double x) {
        double r26346 = 1;
        double r26347 = x;
        double r26348 = r26346 + r26347;
        double r26349 = cbrt(r26348);
        double r26350 = r26349 * r26349;
        double r26351 = cbrt(r26347);
        double r26352 = r26351 + r26349;
        double r26353 = r26352 * r26351;
        double r26354 = cbrt(r26353);
        double r26355 = r26354 * r26354;
        double r26356 = r26355 * r26354;
        double r26357 = r26350 + r26356;
        double r26358 = r26346 / r26357;
        return r26358;
}

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 r26359, r26360, r26361, r26362, r26363, r26364;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(1360);
        mpfr_init(r26359);
        mpfr_init_set_str(r26360, "1", 10, MPFR_RNDN);
        mpfr_init(r26361);
        mpfr_init(r26362);
        mpfr_init(r26363);
        mpfr_init(r26364);
}

double f_im(double x) {
        mpfr_set_d(r26359, x, MPFR_RNDN);
        ;
        mpfr_add(r26361, r26359, r26360, MPFR_RNDN);
        mpfr_cbrt(r26362, r26361, MPFR_RNDN);
        mpfr_cbrt(r26363, r26359, MPFR_RNDN);
        mpfr_sub(r26364, r26362, r26363, MPFR_RNDN);
        return mpfr_get_d(r26364, MPFR_RNDN);
}

static mpfr_t r26365, r26366, r26367, r26368, r26369, r26370, r26371, r26372, r26373, r26374, r26375, r26376, r26377;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(1360);
        mpfr_init_set_str(r26365, "1", 10, MPFR_RNDN);
        mpfr_init(r26366);
        mpfr_init(r26367);
        mpfr_init(r26368);
        mpfr_init(r26369);
        mpfr_init(r26370);
        mpfr_init(r26371);
        mpfr_init(r26372);
        mpfr_init(r26373);
        mpfr_init(r26374);
        mpfr_init(r26375);
        mpfr_init(r26376);
        mpfr_init(r26377);
}

double f_fm(double x) {
        ;
        mpfr_set_d(r26366, x, MPFR_RNDN);
        mpfr_add(r26367, r26365, r26366, MPFR_RNDN);
        mpfr_cbrt(r26368, r26367, MPFR_RNDN);
        mpfr_mul(r26369, r26368, r26368, MPFR_RNDN);
        mpfr_cbrt(r26370, r26366, MPFR_RNDN);
        mpfr_add(r26371, r26370, r26368, MPFR_RNDN);
        mpfr_mul(r26372, r26371, r26370, MPFR_RNDN);
        mpfr_cbrt(r26373, r26372, MPFR_RNDN);
        mpfr_mul(r26374, r26373, r26373, MPFR_RNDN);
        mpfr_mul(r26375, r26374, r26373, MPFR_RNDN);
        mpfr_add(r26376, r26369, r26375, MPFR_RNDN);
        mpfr_div(r26377, r26365, r26376, MPFR_RNDN);
        return mpfr_get_d(r26377, MPFR_RNDN);
}

static mpfr_t r26378, r26379, r26380, r26381, r26382, r26383, r26384, r26385, r26386, r26387, r26388, r26389, r26390;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(1360);
        mpfr_init_set_str(r26378, "1", 10, MPFR_RNDN);
        mpfr_init(r26379);
        mpfr_init(r26380);
        mpfr_init(r26381);
        mpfr_init(r26382);
        mpfr_init(r26383);
        mpfr_init(r26384);
        mpfr_init(r26385);
        mpfr_init(r26386);
        mpfr_init(r26387);
        mpfr_init(r26388);
        mpfr_init(r26389);
        mpfr_init(r26390);
}

double f_dm(double x) {
        ;
        mpfr_set_d(r26379, x, MPFR_RNDN);
        mpfr_add(r26380, r26378, r26379, MPFR_RNDN);
        mpfr_cbrt(r26381, r26380, MPFR_RNDN);
        mpfr_mul(r26382, r26381, r26381, MPFR_RNDN);
        mpfr_cbrt(r26383, r26379, MPFR_RNDN);
        mpfr_add(r26384, r26383, r26381, MPFR_RNDN);
        mpfr_mul(r26385, r26384, r26383, MPFR_RNDN);
        mpfr_cbrt(r26386, r26385, MPFR_RNDN);
        mpfr_mul(r26387, r26386, r26386, MPFR_RNDN);
        mpfr_mul(r26388, r26387, r26386, MPFR_RNDN);
        mpfr_add(r26389, r26382, r26388, MPFR_RNDN);
        mpfr_div(r26390, r26378, r26389, MPFR_RNDN);
        return mpfr_get_d(r26390, MPFR_RNDN);
}