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

char *name = "cos2 (problem 3.4.1)";

double f_if(float x) {
        float r20340 = 1;
        float r20341 = x;
        float r20342 = cos(r20341);
        float r20343 = r20340 - r20342;
        float r20344 = r20341 * r20341;
        float r20345 = r20343 / r20344;
        return r20345;
}

double f_id(double x) {
        double r20346 = 1;
        double r20347 = x;
        double r20348 = cos(r20347);
        double r20349 = r20346 - r20348;
        double r20350 = r20347 * r20347;
        double r20351 = r20349 / r20350;
        return r20351;
}


double f_of(float x) {
        float r20352 = x;
        float r20353 = sin(r20352);
        float r20354 = r20353 / r20352;
        float r20355 = 1;
        float r20356 = cos(r20352);
        float r20357 = r20355 + r20356;
        float r20358 = r20353 / r20357;
        float r20359 = r20358 / r20352;
        float r20360 = r20354 * r20359;
        return r20360;
}

double f_od(double x) {
        double r20361 = x;
        double r20362 = sin(r20361);
        double r20363 = r20362 / r20361;
        double r20364 = 1;
        double r20365 = cos(r20361);
        double r20366 = r20364 + r20365;
        double r20367 = r20362 / r20366;
        double r20368 = r20367 / r20361;
        double r20369 = r20363 * r20368;
        return r20369;
}

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 r20370, r20371, r20372, r20373, r20374, r20375;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(2448);
        mpfr_init_set_str(r20370, "1", 10, MPFR_RNDN);
        mpfr_init(r20371);
        mpfr_init(r20372);
        mpfr_init(r20373);
        mpfr_init(r20374);
        mpfr_init(r20375);
}

double f_im(double x) {
        ;
        mpfr_set_d(r20371, x, MPFR_RNDN);
        mpfr_cos(r20372, r20371, MPFR_RNDN);
        mpfr_sub(r20373, r20370, r20372, MPFR_RNDN);
        mpfr_mul(r20374, r20371, r20371, MPFR_RNDN);
        mpfr_div(r20375, r20373, r20374, MPFR_RNDN);
        return mpfr_get_d(r20375, MPFR_RNDN);
}

static mpfr_t r20376, r20377, r20378, r20379, r20380, r20381, r20382, r20383, r20384;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(2448);
        mpfr_init(r20376);
        mpfr_init(r20377);
        mpfr_init(r20378);
        mpfr_init_set_str(r20379, "1", 10, MPFR_RNDN);
        mpfr_init(r20380);
        mpfr_init(r20381);
        mpfr_init(r20382);
        mpfr_init(r20383);
        mpfr_init(r20384);
}

double f_fm(double x) {
        mpfr_set_d(r20376, x, MPFR_RNDN);
        mpfr_sin(r20377, r20376, MPFR_RNDN);
        mpfr_div(r20378, r20377, r20376, MPFR_RNDN);
        ;
        mpfr_cos(r20380, r20376, MPFR_RNDN);
        mpfr_add(r20381, r20379, r20380, MPFR_RNDN);
        mpfr_div(r20382, r20377, r20381, MPFR_RNDN);
        mpfr_div(r20383, r20382, r20376, MPFR_RNDN);
        mpfr_mul(r20384, r20378, r20383, MPFR_RNDN);
        return mpfr_get_d(r20384, MPFR_RNDN);
}

static mpfr_t r20385, r20386, r20387, r20388, r20389, r20390, r20391, r20392, r20393;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(2448);
        mpfr_init(r20385);
        mpfr_init(r20386);
        mpfr_init(r20387);
        mpfr_init_set_str(r20388, "1", 10, MPFR_RNDN);
        mpfr_init(r20389);
        mpfr_init(r20390);
        mpfr_init(r20391);
        mpfr_init(r20392);
        mpfr_init(r20393);
}

double f_dm(double x) {
        mpfr_set_d(r20385, x, MPFR_RNDN);
        mpfr_sin(r20386, r20385, MPFR_RNDN);
        mpfr_div(r20387, r20386, r20385, MPFR_RNDN);
        ;
        mpfr_cos(r20389, r20385, MPFR_RNDN);
        mpfr_add(r20390, r20388, r20389, MPFR_RNDN);
        mpfr_div(r20391, r20386, r20390, MPFR_RNDN);
        mpfr_div(r20392, r20391, r20385, MPFR_RNDN);
        mpfr_mul(r20393, r20387, r20392, MPFR_RNDN);
        return mpfr_get_d(r20393, MPFR_RNDN);
}