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

char *name = "2tan (problem 3.3.2)";

double f_if(float x, float eps) {
        float r27313 = x;
        float r27314 = eps;
        float r27315 = r27313 + r27314;
        float r27316 = tan(r27315);
        float r27317 = tan(r27313);
        float r27318 = r27316 - r27317;
        return r27318;
}

double f_id(double x, double eps) {
        double r27319 = x;
        double r27320 = eps;
        double r27321 = r27319 + r27320;
        double r27322 = tan(r27321);
        double r27323 = tan(r27319);
        double r27324 = r27322 - r27323;
        return r27324;
}


double f_of(float x, float eps) {
        float r27325 = eps;
        float r27326 = 3;
        float r27327 = pow(r27325, r27326);
        float r27328 = x;
        float r27329 = 2;
        float r27330 = pow(r27328, r27329);
        float r27331 = r27327 * r27330;
        float r27332 = pow(r27325, r27329);
        float r27333 = r27332 * r27328;
        float r27334 = r27331 + r27333;
        float r27335 = r27325 + r27334;
        float r27336 = -6.817958129115741e-10;
        bool r27337 = r27335 <= r27336;
        float r27338 = cos(r27328);
        float r27339 = 1;
        float r27340 = tan(r27328);
        float r27341 = tan(r27325);
        float r27342 = r27340 * r27341;
        float r27343 = r27339 - r27342;
        float r27344 = r27340 + r27341;
        float r27345 = sin(r27328);
        float r27346 = r27344 / r27345;
        float r27347 = r27343 / r27346;
        float r27348 = r27338 - r27347;
        float r27349 = r27343 / r27344;
        float r27350 = r27349 * r27338;
        float r27351 = r27348 / r27350;
        float r27352 = 8.04931125323374e-27;
        bool r27353 = r27335 <= r27352;
        float r27354 = r27344 / r27343;
        float r27355 = r27354 * r27354;
        float r27356 = r27340 * r27340;
        float r27357 = r27355 - r27356;
        float r27358 = r27354 + r27340;
        float r27359 = r27357 / r27358;
        float r27360 = r27353 ? r27335 : r27359;
        float r27361 = r27337 ? r27351 : r27360;
        return r27361;
}

double f_od(double x, double eps) {
        double r27362 = eps;
        double r27363 = 3;
        double r27364 = pow(r27362, r27363);
        double r27365 = x;
        double r27366 = 2;
        double r27367 = pow(r27365, r27366);
        double r27368 = r27364 * r27367;
        double r27369 = pow(r27362, r27366);
        double r27370 = r27369 * r27365;
        double r27371 = r27368 + r27370;
        double r27372 = r27362 + r27371;
        double r27373 = -6.817958129115741e-10;
        bool r27374 = r27372 <= r27373;
        double r27375 = cos(r27365);
        double r27376 = 1;
        double r27377 = tan(r27365);
        double r27378 = tan(r27362);
        double r27379 = r27377 * r27378;
        double r27380 = r27376 - r27379;
        double r27381 = r27377 + r27378;
        double r27382 = sin(r27365);
        double r27383 = r27381 / r27382;
        double r27384 = r27380 / r27383;
        double r27385 = r27375 - r27384;
        double r27386 = r27380 / r27381;
        double r27387 = r27386 * r27375;
        double r27388 = r27385 / r27387;
        double r27389 = 8.04931125323374e-27;
        bool r27390 = r27372 <= r27389;
        double r27391 = r27381 / r27380;
        double r27392 = r27391 * r27391;
        double r27393 = r27377 * r27377;
        double r27394 = r27392 - r27393;
        double r27395 = r27391 + r27377;
        double r27396 = r27394 / r27395;
        double r27397 = r27390 ? r27372 : r27396;
        double r27398 = r27374 ? r27388 : 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_tan(r27402, r27401, MPFR_RNDN);
        mpfr_tan(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, r27439, r27440, r27441;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(2384);
        mpfr_init(r27405);
        mpfr_init_set_str(r27406, "3", 10, MPFR_RNDN);
        mpfr_init(r27407);
        mpfr_init(r27408);
        mpfr_init_set_str(r27409, "2", 10, MPFR_RNDN);
        mpfr_init(r27410);
        mpfr_init(r27411);
        mpfr_init(r27412);
        mpfr_init(r27413);
        mpfr_init(r27414);
        mpfr_init(r27415);
        mpfr_init_set_str(r27416, "-6.817958129115741e-10", 10, MPFR_RNDN);
        mpfr_init(r27417);
        mpfr_init(r27418);
        mpfr_init_set_str(r27419, "1", 10, MPFR_RNDN);
        mpfr_init(r27420);
        mpfr_init(r27421);
        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(r27431);
        mpfr_init_set_str(r27432, "8.04931125323374e-27", 10, MPFR_RNDN);
        mpfr_init(r27433);
        mpfr_init(r27434);
        mpfr_init(r27435);
        mpfr_init(r27436);
        mpfr_init(r27437);
        mpfr_init(r27438);
        mpfr_init(r27439);
        mpfr_init(r27440);
        mpfr_init(r27441);
}

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

static mpfr_t 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, r27473, r27474, r27475, r27476, r27477, r27478;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(2384);
        mpfr_init(r27442);
        mpfr_init_set_str(r27443, "3", 10, MPFR_RNDN);
        mpfr_init(r27444);
        mpfr_init(r27445);
        mpfr_init_set_str(r27446, "2", 10, MPFR_RNDN);
        mpfr_init(r27447);
        mpfr_init(r27448);
        mpfr_init(r27449);
        mpfr_init(r27450);
        mpfr_init(r27451);
        mpfr_init(r27452);
        mpfr_init_set_str(r27453, "-6.817958129115741e-10", 10, MPFR_RNDN);
        mpfr_init(r27454);
        mpfr_init(r27455);
        mpfr_init_set_str(r27456, "1", 10, MPFR_RNDN);
        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(r27465);
        mpfr_init(r27466);
        mpfr_init(r27467);
        mpfr_init(r27468);
        mpfr_init_set_str(r27469, "8.04931125323374e-27", 10, MPFR_RNDN);
        mpfr_init(r27470);
        mpfr_init(r27471);
        mpfr_init(r27472);
        mpfr_init(r27473);
        mpfr_init(r27474);
        mpfr_init(r27475);
        mpfr_init(r27476);
        mpfr_init(r27477);
        mpfr_init(r27478);
}

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

