#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 r26195 = x;
        float r26196 = eps;
        float r26197 = r26195 + r26196;
        float r26198 = cos(r26197);
        float r26199 = cos(r26195);
        float r26200 = r26198 - r26199;
        return r26200;
}

double f_id(double x, double eps) {
        double r26201 = x;
        double r26202 = eps;
        double r26203 = r26201 + r26202;
        double r26204 = cos(r26203);
        double r26205 = cos(r26201);
        double r26206 = r26204 - r26205;
        return r26206;
}


double f_of(float x, float eps) {
        float r26207 = eps;
        float r26208 = -1.4194207403981303e-05;
        bool r26209 = r26207 <= r26208;
        float r26210 = 2.6713101620310196e-06;
        bool r26211 = r26207 <= r26210;
        float r26212 = !r26211;
        bool r26213 = r26209 || r26212;
        float r26214 = cos(r26207);
        float r26215 = x;
        float r26216 = cos(r26215);
        float r26217 = r26214 * r26216;
        float r26218 = sin(r26207);
        float r26219 = sin(r26215);
        float r26220 = r26218 * r26219;
        float r26221 = r26217 - r26220;
        float r26222 = r26221 - r26216;
        float r26223 = -2;
        float r26224 = r26207 + r26215;
        float r26225 = r26224 + r26215;
        float r26226 = 2;
        float r26227 = r26225 / r26226;
        float r26228 = sin(r26227);
        float r26229 = r26207 / r26226;
        float r26230 = sin(r26229);
        float r26231 = r26228 * r26230;
        float r26232 = r26223 * r26231;
        float r26233 = r26213 ? r26222 : r26232;
        return r26233;
}

double f_od(double x, double eps) {
        double r26234 = eps;
        double r26235 = -1.4194207403981303e-05;
        bool r26236 = r26234 <= r26235;
        double r26237 = 2.6713101620310196e-06;
        bool r26238 = r26234 <= r26237;
        double r26239 = !r26238;
        bool r26240 = r26236 || r26239;
        double r26241 = cos(r26234);
        double r26242 = x;
        double r26243 = cos(r26242);
        double r26244 = r26241 * r26243;
        double r26245 = sin(r26234);
        double r26246 = sin(r26242);
        double r26247 = r26245 * r26246;
        double r26248 = r26244 - r26247;
        double r26249 = r26248 - r26243;
        double r26250 = -2;
        double r26251 = r26234 + r26242;
        double r26252 = r26251 + r26242;
        double r26253 = 2;
        double r26254 = r26252 / r26253;
        double r26255 = sin(r26254);
        double r26256 = r26234 / r26253;
        double r26257 = sin(r26256);
        double r26258 = r26255 * r26257;
        double r26259 = r26250 * r26258;
        double r26260 = r26240 ? r26249 : r26259;
        return r26260;
}

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 r26261, r26262, r26263, r26264, r26265, r26266;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(2384);
        mpfr_init(r26261);
        mpfr_init(r26262);
        mpfr_init(r26263);
        mpfr_init(r26264);
        mpfr_init(r26265);
        mpfr_init(r26266);
}

double f_im(double x, double eps) {
        mpfr_set_d(r26261, x, MPFR_RNDN);
        mpfr_set_d(r26262, eps, MPFR_RNDN);
        mpfr_add(r26263, r26261, r26262, MPFR_RNDN);
        mpfr_cos(r26264, r26263, MPFR_RNDN);
        mpfr_cos(r26265, r26261, MPFR_RNDN);
        mpfr_sub(r26266, r26264, r26265, MPFR_RNDN);
        return mpfr_get_d(r26266, MPFR_RNDN);
}

static mpfr_t r26267, r26268, r26269, r26270, r26271, r26272, r26273, r26274, r26275, r26276, r26277, r26278, r26279, r26280, r26281, r26282, r26283, r26284, r26285, r26286, r26287, r26288, r26289, r26290, r26291, r26292, r26293;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(2384);
        mpfr_init(r26267);
        mpfr_init_set_str(r26268, "-1.4194207403981303e-05", 10, MPFR_RNDN);
        mpfr_init(r26269);
        mpfr_init_set_str(r26270, "2.6713101620310196e-06", 10, MPFR_RNDN);
        mpfr_init(r26271);
        mpfr_init(r26272);
        mpfr_init(r26273);
        mpfr_init(r26274);
        mpfr_init(r26275);
        mpfr_init(r26276);
        mpfr_init(r26277);
        mpfr_init(r26278);
        mpfr_init(r26279);
        mpfr_init(r26280);
        mpfr_init(r26281);
        mpfr_init(r26282);
        mpfr_init_set_str(r26283, "-2", 10, MPFR_RNDN);
        mpfr_init(r26284);
        mpfr_init(r26285);
        mpfr_init_set_str(r26286, "2", 10, MPFR_RNDN);
        mpfr_init(r26287);
        mpfr_init(r26288);
        mpfr_init(r26289);
        mpfr_init(r26290);
        mpfr_init(r26291);
        mpfr_init(r26292);
        mpfr_init(r26293);
}

double f_fm(double x, double eps) {
        mpfr_set_d(r26267, eps, MPFR_RNDN);
        ;
        mpfr_set_si(r26269, mpfr_cmp(r26267, r26268) <= 0, MPFR_RNDN);
        ;
        mpfr_set_si(r26271, mpfr_cmp(r26267, r26270) <= 0, MPFR_RNDN);
        mpfr_set_si(r26272, !mpfr_get_si(r26271, MPFR_RNDN), MPFR_RNDN);
        mpfr_set_si(r26273, mpfr_get_si(r26269, MPFR_RNDN) || mpfr_get_si(r26272, MPFR_RNDN), MPFR_RNDN);
        mpfr_cos(r26274, r26267, MPFR_RNDN);
        mpfr_set_d(r26275, x, MPFR_RNDN);
        mpfr_cos(r26276, r26275, MPFR_RNDN);
        mpfr_mul(r26277, r26274, r26276, MPFR_RNDN);
        mpfr_sin(r26278, r26267, MPFR_RNDN);
        mpfr_sin(r26279, r26275, MPFR_RNDN);
        mpfr_mul(r26280, r26278, r26279, MPFR_RNDN);
        mpfr_sub(r26281, r26277, r26280, MPFR_RNDN);
        mpfr_sub(r26282, r26281, r26276, MPFR_RNDN);
        ;
        mpfr_add(r26284, r26267, r26275, MPFR_RNDN);
        mpfr_add(r26285, r26284, r26275, MPFR_RNDN);
        ;
        mpfr_div(r26287, r26285, r26286, MPFR_RNDN);
        mpfr_sin(r26288, r26287, MPFR_RNDN);
        mpfr_div(r26289, r26267, r26286, MPFR_RNDN);
        mpfr_sin(r26290, r26289, MPFR_RNDN);
        mpfr_mul(r26291, r26288, r26290, MPFR_RNDN);
        mpfr_mul(r26292, r26283, r26291, MPFR_RNDN);
        if (mpfr_get_si(r26273, MPFR_RNDN)) { mpfr_set(r26293, r26282, MPFR_RNDN); } else { mpfr_set(r26293, r26292, MPFR_RNDN); };
        return mpfr_get_d(r26293, MPFR_RNDN);
}

static mpfr_t r26294, r26295, r26296, r26297, r26298, r26299, r26300, r26301, r26302, r26303, r26304, r26305, r26306, r26307, r26308, r26309, r26310, r26311, r26312, r26313, r26314, r26315, r26316, r26317, r26318, r26319, r26320;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(2384);
        mpfr_init(r26294);
        mpfr_init_set_str(r26295, "-1.4194207403981303e-05", 10, MPFR_RNDN);
        mpfr_init(r26296);
        mpfr_init_set_str(r26297, "2.6713101620310196e-06", 10, MPFR_RNDN);
        mpfr_init(r26298);
        mpfr_init(r26299);
        mpfr_init(r26300);
        mpfr_init(r26301);
        mpfr_init(r26302);
        mpfr_init(r26303);
        mpfr_init(r26304);
        mpfr_init(r26305);
        mpfr_init(r26306);
        mpfr_init(r26307);
        mpfr_init(r26308);
        mpfr_init(r26309);
        mpfr_init_set_str(r26310, "-2", 10, MPFR_RNDN);
        mpfr_init(r26311);
        mpfr_init(r26312);
        mpfr_init_set_str(r26313, "2", 10, MPFR_RNDN);
        mpfr_init(r26314);
        mpfr_init(r26315);
        mpfr_init(r26316);
        mpfr_init(r26317);
        mpfr_init(r26318);
        mpfr_init(r26319);
        mpfr_init(r26320);
}

double f_dm(double x, double eps) {
        mpfr_set_d(r26294, eps, MPFR_RNDN);
        ;
        mpfr_set_si(r26296, mpfr_cmp(r26294, r26295) <= 0, MPFR_RNDN);
        ;
        mpfr_set_si(r26298, mpfr_cmp(r26294, r26297) <= 0, MPFR_RNDN);
        mpfr_set_si(r26299, !mpfr_get_si(r26298, MPFR_RNDN), MPFR_RNDN);
        mpfr_set_si(r26300, mpfr_get_si(r26296, MPFR_RNDN) || mpfr_get_si(r26299, MPFR_RNDN), MPFR_RNDN);
        mpfr_cos(r26301, r26294, MPFR_RNDN);
        mpfr_set_d(r26302, x, MPFR_RNDN);
        mpfr_cos(r26303, r26302, MPFR_RNDN);
        mpfr_mul(r26304, r26301, r26303, MPFR_RNDN);
        mpfr_sin(r26305, r26294, MPFR_RNDN);
        mpfr_sin(r26306, r26302, MPFR_RNDN);
        mpfr_mul(r26307, r26305, r26306, MPFR_RNDN);
        mpfr_sub(r26308, r26304, r26307, MPFR_RNDN);
        mpfr_sub(r26309, r26308, r26303, MPFR_RNDN);
        ;
        mpfr_add(r26311, r26294, r26302, MPFR_RNDN);
        mpfr_add(r26312, r26311, r26302, MPFR_RNDN);
        ;
        mpfr_div(r26314, r26312, r26313, MPFR_RNDN);
        mpfr_sin(r26315, r26314, MPFR_RNDN);
        mpfr_div(r26316, r26294, r26313, MPFR_RNDN);
        mpfr_sin(r26317, r26316, MPFR_RNDN);
        mpfr_mul(r26318, r26315, r26317, MPFR_RNDN);
        mpfr_mul(r26319, r26310, r26318, MPFR_RNDN);
        if (mpfr_get_si(r26300, MPFR_RNDN)) { mpfr_set(r26320, r26309, MPFR_RNDN); } else { mpfr_set(r26320, r26319, MPFR_RNDN); };
        return mpfr_get_d(r26320, MPFR_RNDN);
}

