#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 r27257 = x;
        float r27258 = eps;
        float r27259 = r27257 + r27258;
        float r27260 = tan(r27259);
        float r27261 = tan(r27257);
        float r27262 = r27260 - r27261;
        return r27262;
}

double f_id(double x, double eps) {
        double r27263 = x;
        double r27264 = eps;
        double r27265 = r27263 + r27264;
        double r27266 = tan(r27265);
        double r27267 = tan(r27263);
        double r27268 = r27266 - r27267;
        return r27268;
}


double f_of(float x, float eps) {
        float r27269 = eps;
        float r27270 = sin(r27269);
        float r27271 = x;
        float r27272 = cos(r27271);
        float r27273 = cos(r27269);
        float r27274 = r27272 * r27273;
        float r27275 = r27270 / r27274;
        float r27276 = 1;
        float r27277 = tan(r27269);
        float r27278 = tan(r27271);
        float r27279 = r27277 * r27278;
        float r27280 = r27276 - r27279;
        float r27281 = r27275 / r27280;
        float r27282 = sin(r27271);
        float r27283 = r27272 / r27282;
        float r27284 = r27282 / r27283;
        float r27285 = r27272 + r27284;
        float r27286 = r27281 * r27285;
        return r27286;
}

double f_od(double x, double eps) {
        double r27287 = eps;
        double r27288 = sin(r27287);
        double r27289 = x;
        double r27290 = cos(r27289);
        double r27291 = cos(r27287);
        double r27292 = r27290 * r27291;
        double r27293 = r27288 / r27292;
        double r27294 = 1;
        double r27295 = tan(r27287);
        double r27296 = tan(r27289);
        double r27297 = r27295 * r27296;
        double r27298 = r27294 - r27297;
        double r27299 = r27293 / r27298;
        double r27300 = sin(r27289);
        double r27301 = r27290 / r27300;
        double r27302 = r27300 / r27301;
        double r27303 = r27290 + r27302;
        double r27304 = r27299 * r27303;
        return r27304;
}

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 r27305, r27306, r27307, r27308, r27309, r27310;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(2384);
        mpfr_init(r27305);
        mpfr_init(r27306);
        mpfr_init(r27307);
        mpfr_init(r27308);
        mpfr_init(r27309);
        mpfr_init(r27310);
}

double f_im(double x, double eps) {
        mpfr_set_d(r27305, x, MPFR_RNDN);
        mpfr_set_d(r27306, eps, MPFR_RNDN);
        mpfr_add(r27307, r27305, r27306, MPFR_RNDN);
        mpfr_tan(r27308, r27307, MPFR_RNDN);
        mpfr_tan(r27309, r27305, MPFR_RNDN);
        mpfr_sub(r27310, r27308, r27309, MPFR_RNDN);
        return mpfr_get_d(r27310, MPFR_RNDN);
}

static mpfr_t r27311, r27312, r27313, r27314, r27315, r27316, r27317, r27318, r27319, r27320, r27321, r27322, r27323, r27324, r27325, r27326, r27327, r27328;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(2384);
        mpfr_init(r27311);
        mpfr_init(r27312);
        mpfr_init(r27313);
        mpfr_init(r27314);
        mpfr_init(r27315);
        mpfr_init(r27316);
        mpfr_init(r27317);
        mpfr_init_set_str(r27318, "1", 10, MPFR_RNDN);
        mpfr_init(r27319);
        mpfr_init(r27320);
        mpfr_init(r27321);
        mpfr_init(r27322);
        mpfr_init(r27323);
        mpfr_init(r27324);
        mpfr_init(r27325);
        mpfr_init(r27326);
        mpfr_init(r27327);
        mpfr_init(r27328);
}

double f_fm(double x, double eps) {
        mpfr_set_d(r27311, eps, MPFR_RNDN);
        mpfr_sin(r27312, r27311, MPFR_RNDN);
        mpfr_set_d(r27313, x, MPFR_RNDN);
        mpfr_cos(r27314, r27313, MPFR_RNDN);
        mpfr_cos(r27315, r27311, MPFR_RNDN);
        mpfr_mul(r27316, r27314, r27315, MPFR_RNDN);
        mpfr_div(r27317, r27312, r27316, MPFR_RNDN);
        ;
        mpfr_tan(r27319, r27311, MPFR_RNDN);
        mpfr_tan(r27320, r27313, MPFR_RNDN);
        mpfr_mul(r27321, r27319, r27320, MPFR_RNDN);
        mpfr_sub(r27322, r27318, r27321, MPFR_RNDN);
        mpfr_div(r27323, r27317, r27322, MPFR_RNDN);
        mpfr_sin(r27324, r27313, MPFR_RNDN);
        mpfr_div(r27325, r27314, r27324, MPFR_RNDN);
        mpfr_div(r27326, r27324, r27325, MPFR_RNDN);
        mpfr_add(r27327, r27314, r27326, MPFR_RNDN);
        mpfr_mul(r27328, r27323, r27327, MPFR_RNDN);
        return mpfr_get_d(r27328, MPFR_RNDN);
}

static mpfr_t r27329, r27330, r27331, r27332, r27333, r27334, r27335, r27336, r27337, r27338, r27339, r27340, r27341, r27342, r27343, r27344, r27345, r27346;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(2384);
        mpfr_init(r27329);
        mpfr_init(r27330);
        mpfr_init(r27331);
        mpfr_init(r27332);
        mpfr_init(r27333);
        mpfr_init(r27334);
        mpfr_init(r27335);
        mpfr_init_set_str(r27336, "1", 10, MPFR_RNDN);
        mpfr_init(r27337);
        mpfr_init(r27338);
        mpfr_init(r27339);
        mpfr_init(r27340);
        mpfr_init(r27341);
        mpfr_init(r27342);
        mpfr_init(r27343);
        mpfr_init(r27344);
        mpfr_init(r27345);
        mpfr_init(r27346);
}

double f_dm(double x, double eps) {
        mpfr_set_d(r27329, eps, MPFR_RNDN);
        mpfr_sin(r27330, r27329, MPFR_RNDN);
        mpfr_set_d(r27331, x, MPFR_RNDN);
        mpfr_cos(r27332, r27331, MPFR_RNDN);
        mpfr_cos(r27333, r27329, MPFR_RNDN);
        mpfr_mul(r27334, r27332, r27333, MPFR_RNDN);
        mpfr_div(r27335, r27330, r27334, MPFR_RNDN);
        ;
        mpfr_tan(r27337, r27329, MPFR_RNDN);
        mpfr_tan(r27338, r27331, MPFR_RNDN);
        mpfr_mul(r27339, r27337, r27338, MPFR_RNDN);
        mpfr_sub(r27340, r27336, r27339, MPFR_RNDN);
        mpfr_div(r27341, r27335, r27340, MPFR_RNDN);
        mpfr_sin(r27342, r27331, MPFR_RNDN);
        mpfr_div(r27343, r27332, r27342, MPFR_RNDN);
        mpfr_div(r27344, r27342, r27343, MPFR_RNDN);
        mpfr_add(r27345, r27332, r27344, MPFR_RNDN);
        mpfr_mul(r27346, r27341, r27345, MPFR_RNDN);
        return mpfr_get_d(r27346, MPFR_RNDN);
}