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

char *name = "2sin (example 3.3)";

double f_if(float x, float eps) {
        float r27319 = x;
        float r27320 = eps;
        float r27321 = r27319 + r27320;
        float r27322 = sin(r27321);
        float r27323 = sin(r27319);
        float r27324 = r27322 - r27323;
        return r27324;
}

double f_id(double x, double eps) {
        double r27325 = x;
        double r27326 = eps;
        double r27327 = r27325 + r27326;
        double r27328 = sin(r27327);
        double r27329 = sin(r27325);
        double r27330 = r27328 - r27329;
        return r27330;
}


double f_of(float x, float eps) {
        float r27331 = 2;
        float r27332 = eps;
        float r27333 = r27332 / r27331;
        float r27334 = sin(r27333);
        float r27335 = x;
        float r27336 = r27332 + r27335;
        float r27337 = r27335 + r27336;
        float r27338 = r27337 / r27331;
        float r27339 = cos(r27338);
        float r27340 = exp(r27339);
        float r27341 = 3;
        float r27342 = pow(r27340, r27341);
        float r27343 = cbrt(r27342);
        float r27344 = log(r27343);
        float r27345 = r27334 * r27344;
        float r27346 = r27331 * r27345;
        float r27347 = -0.00018331553885800084;
        bool r27348 = r27346 <= r27347;
        float r27349 = sin(r27335);
        float r27350 = cos(r27332);
        float r27351 = r27349 * r27350;
        float r27352 = cos(r27335);
        float r27353 = sin(r27332);
        float r27354 = r27352 * r27353;
        float r27355 = r27351 + r27354;
        float r27356 = r27355 - r27349;
        float r27357 = 6.394770773575919e-11;
        bool r27358 = r27346 <= r27357;
        float r27359 = r27334 * r27339;
        float r27360 = r27331 * r27359;
        float r27361 = r27354 - r27349;
        float r27362 = r27351 + r27361;
        float r27363 = r27358 ? r27360 : r27362;
        float r27364 = r27348 ? r27356 : r27363;
        return r27364;
}

double f_od(double x, double eps) {
        double r27365 = 2;
        double r27366 = eps;
        double r27367 = r27366 / r27365;
        double r27368 = sin(r27367);
        double r27369 = x;
        double r27370 = r27366 + r27369;
        double r27371 = r27369 + r27370;
        double r27372 = r27371 / r27365;
        double r27373 = cos(r27372);
        double r27374 = exp(r27373);
        double r27375 = 3;
        double r27376 = pow(r27374, r27375);
        double r27377 = cbrt(r27376);
        double r27378 = log(r27377);
        double r27379 = r27368 * r27378;
        double r27380 = r27365 * r27379;
        double r27381 = -0.00018331553885800084;
        bool r27382 = r27380 <= r27381;
        double r27383 = sin(r27369);
        double r27384 = cos(r27366);
        double r27385 = r27383 * r27384;
        double r27386 = cos(r27369);
        double r27387 = sin(r27366);
        double r27388 = r27386 * r27387;
        double r27389 = r27385 + r27388;
        double r27390 = r27389 - r27383;
        double r27391 = 6.394770773575919e-11;
        bool r27392 = r27380 <= r27391;
        double r27393 = r27368 * r27373;
        double r27394 = r27365 * r27393;
        double r27395 = r27388 - r27383;
        double r27396 = r27385 + r27395;
        double r27397 = r27392 ? r27394 : r27396;
        double r27398 = r27382 ? r27390 : r27397;
        return r27398;
}

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 r27399, r27400, r27401, r27402, r27403, r27404;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(2384);
        mpfr_init(r27399);
        mpfr_init(r27400);
        mpfr_init(r27401);
        mpfr_init(r27402);
        mpfr_init(r27403);
        mpfr_init(r27404);
}

double f_im(double x, double eps) {
        mpfr_set_d(r27399, x, MPFR_RNDN);
        mpfr_set_d(r27400, eps, MPFR_RNDN);
        mpfr_add(r27401, r27399, r27400, MPFR_RNDN);
        mpfr_sin(r27402, r27401, MPFR_RNDN);
        mpfr_sin(r27403, r27399, MPFR_RNDN);
        mpfr_sub(r27404, r27402, r27403, MPFR_RNDN);
        return mpfr_get_d(r27404, MPFR_RNDN);
}

static mpfr_t r27405, r27406, r27407, r27408, r27409, r27410, r27411, r27412, r27413, r27414, r27415, r27416, r27417, r27418, r27419, r27420, r27421, r27422, r27423, r27424, r27425, r27426, r27427, r27428, r27429, r27430, r27431, r27432, r27433, r27434, r27435, r27436, r27437, r27438;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(2384);
        mpfr_init_set_str(r27405, "2", 10, MPFR_RNDN);
        mpfr_init(r27406);
        mpfr_init(r27407);
        mpfr_init(r27408);
        mpfr_init(r27409);
        mpfr_init(r27410);
        mpfr_init(r27411);
        mpfr_init(r27412);
        mpfr_init(r27413);
        mpfr_init(r27414);
        mpfr_init_set_str(r27415, "3", 10, MPFR_RNDN);
        mpfr_init(r27416);
        mpfr_init(r27417);
        mpfr_init(r27418);
        mpfr_init(r27419);
        mpfr_init(r27420);
        mpfr_init_set_str(r27421, "-0.00018331553885800084", 10, MPFR_RNDN);
        mpfr_init(r27422);
        mpfr_init(r27423);
        mpfr_init(r27424);
        mpfr_init(r27425);
        mpfr_init(r27426);
        mpfr_init(r27427);
        mpfr_init(r27428);
        mpfr_init(r27429);
        mpfr_init(r27430);
        mpfr_init_set_str(r27431, "6.394770773575919e-11", 10, MPFR_RNDN);
        mpfr_init(r27432);
        mpfr_init(r27433);
        mpfr_init(r27434);
        mpfr_init(r27435);
        mpfr_init(r27436);
        mpfr_init(r27437);
        mpfr_init(r27438);
}

double f_fm(double x, double eps) {
        ;
        mpfr_set_d(r27406, eps, MPFR_RNDN);
        mpfr_div(r27407, r27406, r27405, MPFR_RNDN);
        mpfr_sin(r27408, r27407, MPFR_RNDN);
        mpfr_set_d(r27409, x, MPFR_RNDN);
        mpfr_add(r27410, r27406, r27409, MPFR_RNDN);
        mpfr_add(r27411, r27409, r27410, MPFR_RNDN);
        mpfr_div(r27412, r27411, r27405, MPFR_RNDN);
        mpfr_cos(r27413, r27412, MPFR_RNDN);
        mpfr_exp(r27414, r27413, MPFR_RNDN);
        ;
        mpfr_pow(r27416, r27414, r27415, MPFR_RNDN);
        mpfr_cbrt(r27417, r27416, MPFR_RNDN);
        mpfr_log(r27418, r27417, MPFR_RNDN);
        mpfr_mul(r27419, r27408, r27418, MPFR_RNDN);
        mpfr_mul(r27420, r27405, r27419, MPFR_RNDN);
        ;
        mpfr_set_si(r27422, mpfr_cmp(r27420, r27421) <= 0, MPFR_RNDN);
        mpfr_sin(r27423, r27409, MPFR_RNDN);
        mpfr_cos(r27424, r27406, MPFR_RNDN);
        mpfr_mul(r27425, r27423, r27424, MPFR_RNDN);
        mpfr_cos(r27426, r27409, MPFR_RNDN);
        mpfr_sin(r27427, r27406, MPFR_RNDN);
        mpfr_mul(r27428, r27426, r27427, MPFR_RNDN);
        mpfr_add(r27429, r27425, r27428, MPFR_RNDN);
        mpfr_sub(r27430, r27429, r27423, MPFR_RNDN);
        ;
        mpfr_set_si(r27432, mpfr_cmp(r27420, r27431) <= 0, MPFR_RNDN);
        mpfr_mul(r27433, r27408, r27413, MPFR_RNDN);
        mpfr_mul(r27434, r27405, r27433, MPFR_RNDN);
        mpfr_sub(r27435, r27428, r27423, MPFR_RNDN);
        mpfr_add(r27436, r27425, r27435, MPFR_RNDN);
        if (mpfr_get_si(r27432, MPFR_RNDN)) { mpfr_set(r27437, r27434, MPFR_RNDN); } else { mpfr_set(r27437, r27436, MPFR_RNDN); };
        if (mpfr_get_si(r27422, MPFR_RNDN)) { mpfr_set(r27438, r27430, MPFR_RNDN); } else { mpfr_set(r27438, r27437, MPFR_RNDN); };
        return mpfr_get_d(r27438, MPFR_RNDN);
}

static mpfr_t r27439, r27440, r27441, r27442, r27443, r27444, r27445, r27446, r27447, r27448, r27449, r27450, r27451, r27452, r27453, r27454, r27455, r27456, r27457, r27458, r27459, r27460, r27461, r27462, r27463, r27464, r27465, r27466, r27467, r27468, r27469, r27470, r27471, r27472;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(2384);
        mpfr_init_set_str(r27439, "2", 10, MPFR_RNDN);
        mpfr_init(r27440);
        mpfr_init(r27441);
        mpfr_init(r27442);
        mpfr_init(r27443);
        mpfr_init(r27444);
        mpfr_init(r27445);
        mpfr_init(r27446);
        mpfr_init(r27447);
        mpfr_init(r27448);
        mpfr_init_set_str(r27449, "3", 10, MPFR_RNDN);
        mpfr_init(r27450);
        mpfr_init(r27451);
        mpfr_init(r27452);
        mpfr_init(r27453);
        mpfr_init(r27454);
        mpfr_init_set_str(r27455, "-0.00018331553885800084", 10, MPFR_RNDN);
        mpfr_init(r27456);
        mpfr_init(r27457);
        mpfr_init(r27458);
        mpfr_init(r27459);
        mpfr_init(r27460);
        mpfr_init(r27461);
        mpfr_init(r27462);
        mpfr_init(r27463);
        mpfr_init(r27464);
        mpfr_init_set_str(r27465, "6.394770773575919e-11", 10, MPFR_RNDN);
        mpfr_init(r27466);
        mpfr_init(r27467);
        mpfr_init(r27468);
        mpfr_init(r27469);
        mpfr_init(r27470);
        mpfr_init(r27471);
        mpfr_init(r27472);
}

double f_dm(double x, double eps) {
        ;
        mpfr_set_d(r27440, eps, MPFR_RNDN);
        mpfr_div(r27441, r27440, r27439, MPFR_RNDN);
        mpfr_sin(r27442, r27441, MPFR_RNDN);
        mpfr_set_d(r27443, x, MPFR_RNDN);
        mpfr_add(r27444, r27440, r27443, MPFR_RNDN);
        mpfr_add(r27445, r27443, r27444, MPFR_RNDN);
        mpfr_div(r27446, r27445, r27439, MPFR_RNDN);
        mpfr_cos(r27447, r27446, MPFR_RNDN);
        mpfr_exp(r27448, r27447, MPFR_RNDN);
        ;
        mpfr_pow(r27450, r27448, r27449, MPFR_RNDN);
        mpfr_cbrt(r27451, r27450, MPFR_RNDN);
        mpfr_log(r27452, r27451, MPFR_RNDN);
        mpfr_mul(r27453, r27442, r27452, MPFR_RNDN);
        mpfr_mul(r27454, r27439, r27453, MPFR_RNDN);
        ;
        mpfr_set_si(r27456, mpfr_cmp(r27454, r27455) <= 0, MPFR_RNDN);
        mpfr_sin(r27457, r27443, MPFR_RNDN);
        mpfr_cos(r27458, r27440, MPFR_RNDN);
        mpfr_mul(r27459, r27457, r27458, MPFR_RNDN);
        mpfr_cos(r27460, r27443, MPFR_RNDN);
        mpfr_sin(r27461, r27440, MPFR_RNDN);
        mpfr_mul(r27462, r27460, r27461, MPFR_RNDN);
        mpfr_add(r27463, r27459, r27462, MPFR_RNDN);
        mpfr_sub(r27464, r27463, r27457, MPFR_RNDN);
        ;
        mpfr_set_si(r27466, mpfr_cmp(r27454, r27465) <= 0, MPFR_RNDN);
        mpfr_mul(r27467, r27442, r27447, MPFR_RNDN);
        mpfr_mul(r27468, r27439, r27467, MPFR_RNDN);
        mpfr_sub(r27469, r27462, r27457, MPFR_RNDN);
        mpfr_add(r27470, r27459, r27469, MPFR_RNDN);
        if (mpfr_get_si(r27466, MPFR_RNDN)) { mpfr_set(r27471, r27468, MPFR_RNDN); } else { mpfr_set(r27471, r27470, MPFR_RNDN); };
        if (mpfr_get_si(r27456, MPFR_RNDN)) { mpfr_set(r27472, r27464, MPFR_RNDN); } else { mpfr_set(r27472, r27471, MPFR_RNDN); };
        return mpfr_get_d(r27472, MPFR_RNDN);
}

