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

char *name = "Hyperbolic sine";

double f_if(float x) {
        float r8592 = x;
        float r8593 = exp(r8592);
        float r8594 = -r8592;
        float r8595 = exp(r8594);
        float r8596 = r8593 - r8595;
        float r8597 = 2.0f;
        float r8598 = r8596 / r8597;
        return r8598;
}

double f_id(double x) {
        double r8599 = x;
        double r8600 = exp(r8599);
        double r8601 = -r8599;
        double r8602 = exp(r8601);
        double r8603 = r8600 - r8602;
        double r8604 = 2.0;
        double r8605 = r8603 / r8604;
        return r8605;
}


double f_of(float x) {
        float r8606 = 0.3333333333333333f;
        float r8607 = x;
        float r8608 = r8607 * r8607;
        float r8609 = 2.0f;
        float r8610 = fma(r8606, r8608, r8609);
        float r8611 = 0.016666666666666666f;
        float r8612 = 5.0f;
        float r8613 = pow(r8607, r8612);
        float r8614 = r8611 * r8613;
        float r8615 = fma(r8610, r8607, r8614);
        float r8616 = r8615 / r8609;
        return r8616;
}

double f_od(double x) {
        double r8617 = 0.3333333333333333;
        double r8618 = x;
        double r8619 = r8618 * r8618;
        double r8620 = 2.0;
        double r8621 = fma(r8617, r8619, r8620);
        double r8622 = 0.016666666666666666;
        double r8623 = 5.0;
        double r8624 = pow(r8618, r8623);
        double r8625 = r8622 * r8624;
        double r8626 = fma(r8621, r8618, r8625);
        double r8627 = r8626 / r8620;
        return r8627;
}

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 r8628, r8629, r8630, r8631, r8632, r8633, r8634;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(1360);
        mpfr_init(r8628);
        mpfr_init(r8629);
        mpfr_init(r8630);
        mpfr_init(r8631);
        mpfr_init(r8632);
        mpfr_init_set_str(r8633, "2", 10, MPFR_RNDN);
        mpfr_init(r8634);
}

double f_im(double x) {
        mpfr_set_d(r8628, x, MPFR_RNDN);
        mpfr_exp(r8629, r8628, MPFR_RNDN);
        mpfr_neg(r8630, r8628, MPFR_RNDN);
        mpfr_exp(r8631, r8630, MPFR_RNDN);
        mpfr_sub(r8632, r8629, r8631, MPFR_RNDN);
        ;
        mpfr_div(r8634, r8632, r8633, MPFR_RNDN);
        return mpfr_get_d(r8634, MPFR_RNDN);
}

static mpfr_t r8635, r8636, r8637, r8638, r8639, r8640, r8641, r8642, r8643, r8644, r8645;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(1360);
        mpfr_init_set_str(r8635, "1/3", 10, MPFR_RNDN);
        mpfr_init(r8636);
        mpfr_init(r8637);
        mpfr_init_set_str(r8638, "2", 10, MPFR_RNDN);
        mpfr_init(r8639);
        mpfr_init_set_str(r8640, "1/60", 10, MPFR_RNDN);
        mpfr_init_set_str(r8641, "5", 10, MPFR_RNDN);
        mpfr_init(r8642);
        mpfr_init(r8643);
        mpfr_init(r8644);
        mpfr_init(r8645);
}

double f_fm(double x) {
        ;
        mpfr_set_d(r8636, x, MPFR_RNDN);
        mpfr_mul(r8637, r8636, r8636, MPFR_RNDN);
        ;
        mpfr_fma(r8639, r8635, r8637, r8638, MPFR_RNDN);
        ;
        ;
        mpfr_pow(r8642, r8636, r8641, MPFR_RNDN);
        mpfr_mul(r8643, r8640, r8642, MPFR_RNDN);
        mpfr_fma(r8644, r8639, r8636, r8643, MPFR_RNDN);
        mpfr_div(r8645, r8644, r8638, MPFR_RNDN);
        return mpfr_get_d(r8645, MPFR_RNDN);
}

static mpfr_t r8646, r8647, r8648, r8649, r8650, r8651, r8652, r8653, r8654, r8655, r8656;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(1360);
        mpfr_init_set_str(r8646, "1/3", 10, MPFR_RNDN);
        mpfr_init(r8647);
        mpfr_init(r8648);
        mpfr_init_set_str(r8649, "2", 10, MPFR_RNDN);
        mpfr_init(r8650);
        mpfr_init_set_str(r8651, "1/60", 10, MPFR_RNDN);
        mpfr_init_set_str(r8652, "5", 10, MPFR_RNDN);
        mpfr_init(r8653);
        mpfr_init(r8654);
        mpfr_init(r8655);
        mpfr_init(r8656);
}

double f_dm(double x) {
        ;
        mpfr_set_d(r8647, x, MPFR_RNDN);
        mpfr_mul(r8648, r8647, r8647, MPFR_RNDN);
        ;
        mpfr_fma(r8650, r8646, r8648, r8649, MPFR_RNDN);
        ;
        ;
        mpfr_pow(r8653, r8647, r8652, MPFR_RNDN);
        mpfr_mul(r8654, r8651, r8653, MPFR_RNDN);
        mpfr_fma(r8655, r8650, r8647, r8654, MPFR_RNDN);
        mpfr_div(r8656, r8655, r8649, MPFR_RNDN);
        return mpfr_get_d(r8656, MPFR_RNDN);
}