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

char *name = "2cos (problem 3.3.5)";

double f_if(float x, float eps) {
        float r20509 = x;
        float r20510 = eps;
        float r20511 = r20509 + r20510;
        float r20512 = cos(r20511);
        float r20513 = cos(r20509);
        float r20514 = r20512 - r20513;
        return r20514;
}

double f_id(double x, double eps) {
        double r20515 = x;
        double r20516 = eps;
        double r20517 = r20515 + r20516;
        double r20518 = cos(r20517);
        double r20519 = cos(r20515);
        double r20520 = r20518 - r20519;
        return r20520;
}


double f_of(float x, float eps) {
        float r20521 = eps;
        float r20522 = -9.37597390527974e-08;
        bool r20523 = r20521 <= r20522;
        float r20524 = x;
        float r20525 = cos(r20524);
        float r20526 = cos(r20521);
        float r20527 = r20525 * r20526;
        float r20528 = sin(r20524);
        float r20529 = sin(r20521);
        float r20530 = r20528 * r20529;
        float r20531 = r20527 - r20530;
        float r20532 = r20531 - r20525;
        float r20533 = 4.740336461885289e-05;
        bool r20534 = r20521 <= r20533;
        float r20535 = -2;
        float r20536 = 2;
        float r20537 = r20521 / r20536;
        float r20538 = sin(r20537);
        float r20539 = r20524 + r20524;
        float r20540 = r20521 + r20539;
        float r20541 = r20540 / r20536;
        float r20542 = sin(r20541);
        float r20543 = r20538 * r20542;
        float r20544 = r20535 * r20543;
        float r20545 = r20530 + r20525;
        float r20546 = r20527 - r20545;
        float r20547 = r20534 ? r20544 : r20546;
        float r20548 = r20523 ? r20532 : r20547;
        return r20548;
}

double f_od(double x, double eps) {
        double r20549 = eps;
        double r20550 = -9.37597390527974e-08;
        bool r20551 = r20549 <= r20550;
        double r20552 = x;
        double r20553 = cos(r20552);
        double r20554 = cos(r20549);
        double r20555 = r20553 * r20554;
        double r20556 = sin(r20552);
        double r20557 = sin(r20549);
        double r20558 = r20556 * r20557;
        double r20559 = r20555 - r20558;
        double r20560 = r20559 - r20553;
        double r20561 = 4.740336461885289e-05;
        bool r20562 = r20549 <= r20561;
        double r20563 = -2;
        double r20564 = 2;
        double r20565 = r20549 / r20564;
        double r20566 = sin(r20565);
        double r20567 = r20552 + r20552;
        double r20568 = r20549 + r20567;
        double r20569 = r20568 / r20564;
        double r20570 = sin(r20569);
        double r20571 = r20566 * r20570;
        double r20572 = r20563 * r20571;
        double r20573 = r20558 + r20553;
        double r20574 = r20555 - r20573;
        double r20575 = r20562 ? r20572 : r20574;
        double r20576 = r20551 ? r20560 : r20575;
        return r20576;
}

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 r20577, r20578, r20579, r20580, r20581, r20582;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(2448);
        mpfr_init(r20577);
        mpfr_init(r20578);
        mpfr_init(r20579);
        mpfr_init(r20580);
        mpfr_init(r20581);
        mpfr_init(r20582);
}

double f_im(double x, double eps) {
        mpfr_set_d(r20577, x, MPFR_RNDN);
        mpfr_set_d(r20578, eps, MPFR_RNDN);
        mpfr_add(r20579, r20577, r20578, MPFR_RNDN);
        mpfr_cos(r20580, r20579, MPFR_RNDN);
        mpfr_cos(r20581, r20577, MPFR_RNDN);
        mpfr_sub(r20582, r20580, r20581, MPFR_RNDN);
        return mpfr_get_d(r20582, MPFR_RNDN);
}

static mpfr_t r20583, r20584, r20585, r20586, r20587, r20588, r20589, r20590, r20591, r20592, r20593, r20594, r20595, r20596, r20597, r20598, r20599, r20600, r20601, r20602, r20603, r20604, r20605, r20606, r20607, r20608, r20609, r20610;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(2448);
        mpfr_init(r20583);
        mpfr_init_set_str(r20584, "-9.37597390527974e-08", 10, MPFR_RNDN);
        mpfr_init(r20585);
        mpfr_init(r20586);
        mpfr_init(r20587);
        mpfr_init(r20588);
        mpfr_init(r20589);
        mpfr_init(r20590);
        mpfr_init(r20591);
        mpfr_init(r20592);
        mpfr_init(r20593);
        mpfr_init(r20594);
        mpfr_init_set_str(r20595, "4.740336461885289e-05", 10, MPFR_RNDN);
        mpfr_init(r20596);
        mpfr_init_set_str(r20597, "-2", 10, MPFR_RNDN);
        mpfr_init_set_str(r20598, "2", 10, MPFR_RNDN);
        mpfr_init(r20599);
        mpfr_init(r20600);
        mpfr_init(r20601);
        mpfr_init(r20602);
        mpfr_init(r20603);
        mpfr_init(r20604);
        mpfr_init(r20605);
        mpfr_init(r20606);
        mpfr_init(r20607);
        mpfr_init(r20608);
        mpfr_init(r20609);
        mpfr_init(r20610);
}

double f_fm(double x, double eps) {
        mpfr_set_d(r20583, eps, MPFR_RNDN);
        ;
        mpfr_set_si(r20585, mpfr_cmp(r20583, r20584) <= 0, MPFR_RNDN);
        mpfr_set_d(r20586, x, MPFR_RNDN);
        mpfr_cos(r20587, r20586, MPFR_RNDN);
        mpfr_cos(r20588, r20583, MPFR_RNDN);
        mpfr_mul(r20589, r20587, r20588, MPFR_RNDN);
        mpfr_sin(r20590, r20586, MPFR_RNDN);
        mpfr_sin(r20591, r20583, MPFR_RNDN);
        mpfr_mul(r20592, r20590, r20591, MPFR_RNDN);
        mpfr_sub(r20593, r20589, r20592, MPFR_RNDN);
        mpfr_sub(r20594, r20593, r20587, MPFR_RNDN);
        ;
        mpfr_set_si(r20596, mpfr_cmp(r20583, r20595) <= 0, MPFR_RNDN);
        ;
        ;
        mpfr_div(r20599, r20583, r20598, MPFR_RNDN);
        mpfr_sin(r20600, r20599, MPFR_RNDN);
        mpfr_add(r20601, r20586, r20586, MPFR_RNDN);
        mpfr_add(r20602, r20583, r20601, MPFR_RNDN);
        mpfr_div(r20603, r20602, r20598, MPFR_RNDN);
        mpfr_sin(r20604, r20603, MPFR_RNDN);
        mpfr_mul(r20605, r20600, r20604, MPFR_RNDN);
        mpfr_mul(r20606, r20597, r20605, MPFR_RNDN);
        mpfr_add(r20607, r20592, r20587, MPFR_RNDN);
        mpfr_sub(r20608, r20589, r20607, MPFR_RNDN);
        if (mpfr_get_si(r20596, MPFR_RNDN)) { mpfr_set(r20609, r20606, MPFR_RNDN); } else { mpfr_set(r20609, r20608, MPFR_RNDN); };
        if (mpfr_get_si(r20585, MPFR_RNDN)) { mpfr_set(r20610, r20594, MPFR_RNDN); } else { mpfr_set(r20610, r20609, MPFR_RNDN); };
        return mpfr_get_d(r20610, MPFR_RNDN);
}

static mpfr_t r20611, r20612, r20613, r20614, r20615, r20616, r20617, r20618, r20619, r20620, r20621, r20622, r20623, r20624, r20625, r20626, r20627, r20628, r20629, r20630, r20631, r20632, r20633, r20634, r20635, r20636, r20637, r20638;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(2448);
        mpfr_init(r20611);
        mpfr_init_set_str(r20612, "-9.37597390527974e-08", 10, MPFR_RNDN);
        mpfr_init(r20613);
        mpfr_init(r20614);
        mpfr_init(r20615);
        mpfr_init(r20616);
        mpfr_init(r20617);
        mpfr_init(r20618);
        mpfr_init(r20619);
        mpfr_init(r20620);
        mpfr_init(r20621);
        mpfr_init(r20622);
        mpfr_init_set_str(r20623, "4.740336461885289e-05", 10, MPFR_RNDN);
        mpfr_init(r20624);
        mpfr_init_set_str(r20625, "-2", 10, MPFR_RNDN);
        mpfr_init_set_str(r20626, "2", 10, MPFR_RNDN);
        mpfr_init(r20627);
        mpfr_init(r20628);
        mpfr_init(r20629);
        mpfr_init(r20630);
        mpfr_init(r20631);
        mpfr_init(r20632);
        mpfr_init(r20633);
        mpfr_init(r20634);
        mpfr_init(r20635);
        mpfr_init(r20636);
        mpfr_init(r20637);
        mpfr_init(r20638);
}

double f_dm(double x, double eps) {
        mpfr_set_d(r20611, eps, MPFR_RNDN);
        ;
        mpfr_set_si(r20613, mpfr_cmp(r20611, r20612) <= 0, MPFR_RNDN);
        mpfr_set_d(r20614, x, MPFR_RNDN);
        mpfr_cos(r20615, r20614, MPFR_RNDN);
        mpfr_cos(r20616, r20611, MPFR_RNDN);
        mpfr_mul(r20617, r20615, r20616, MPFR_RNDN);
        mpfr_sin(r20618, r20614, MPFR_RNDN);
        mpfr_sin(r20619, r20611, MPFR_RNDN);
        mpfr_mul(r20620, r20618, r20619, MPFR_RNDN);
        mpfr_sub(r20621, r20617, r20620, MPFR_RNDN);
        mpfr_sub(r20622, r20621, r20615, MPFR_RNDN);
        ;
        mpfr_set_si(r20624, mpfr_cmp(r20611, r20623) <= 0, MPFR_RNDN);
        ;
        ;
        mpfr_div(r20627, r20611, r20626, MPFR_RNDN);
        mpfr_sin(r20628, r20627, MPFR_RNDN);
        mpfr_add(r20629, r20614, r20614, MPFR_RNDN);
        mpfr_add(r20630, r20611, r20629, MPFR_RNDN);
        mpfr_div(r20631, r20630, r20626, MPFR_RNDN);
        mpfr_sin(r20632, r20631, MPFR_RNDN);
        mpfr_mul(r20633, r20628, r20632, MPFR_RNDN);
        mpfr_mul(r20634, r20625, r20633, MPFR_RNDN);
        mpfr_add(r20635, r20620, r20615, MPFR_RNDN);
        mpfr_sub(r20636, r20617, r20635, MPFR_RNDN);
        if (mpfr_get_si(r20624, MPFR_RNDN)) { mpfr_set(r20637, r20634, MPFR_RNDN); } else { mpfr_set(r20637, r20636, MPFR_RNDN); };
        if (mpfr_get_si(r20613, MPFR_RNDN)) { mpfr_set(r20638, r20622, MPFR_RNDN); } else { mpfr_set(r20638, r20637, MPFR_RNDN); };
        return mpfr_get_d(r20638, MPFR_RNDN);
}

