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

char *name = "Linear.Quaternion:$csinh from linear-1.19.1.3";

double f_if(float x, float y) {
        float r47182 = x;
        float r47183 = cosh(r47182);
        float r47184 = y;
        float r47185 = sin(r47184);
        float r47186 = r47185 / r47184;
        float r47187 = r47183 * r47186;
        return r47187;
}

double f_id(double x, double y) {
        double r47188 = x;
        double r47189 = cosh(r47188);
        double r47190 = y;
        double r47191 = sin(r47190);
        double r47192 = r47191 / r47190;
        double r47193 = r47189 * r47192;
        return r47193;
}


double f_of(float x, float y) {
        float r47194 = x;
        float r47195 = cosh(r47194);
        float r47196 = y;
        float r47197 = sin(r47196);
        float r47198 = r47197 / r47196;
        float r47199 = r47195 * r47198;
        return r47199;
}

double f_od(double x, double y) {
        double r47200 = x;
        double r47201 = cosh(r47200);
        double r47202 = y;
        double r47203 = sin(r47202);
        double r47204 = r47203 / r47202;
        double r47205 = r47201 * r47204;
        return r47205;
}

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 r47206, r47207, r47208, r47209, r47210, r47211;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r47206);
        mpfr_init(r47207);
        mpfr_init(r47208);
        mpfr_init(r47209);
        mpfr_init(r47210);
        mpfr_init(r47211);
}

double f_im(double x, double y) {
        mpfr_set_d(r47206, x, MPFR_RNDN);
        mpfr_cosh(r47207, r47206, MPFR_RNDN);
        mpfr_set_d(r47208, y, MPFR_RNDN);
        mpfr_sin(r47209, r47208, MPFR_RNDN);
        mpfr_div(r47210, r47209, r47208, MPFR_RNDN);
        mpfr_mul(r47211, r47207, r47210, MPFR_RNDN);
        return mpfr_get_d(r47211, MPFR_RNDN);
}

static mpfr_t r47212, r47213, r47214, r47215, r47216, r47217;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r47212);
        mpfr_init(r47213);
        mpfr_init(r47214);
        mpfr_init(r47215);
        mpfr_init(r47216);
        mpfr_init(r47217);
}

double f_fm(double x, double y) {
        mpfr_set_d(r47212, x, MPFR_RNDN);
        mpfr_cosh(r47213, r47212, MPFR_RNDN);
        mpfr_set_d(r47214, y, MPFR_RNDN);
        mpfr_sin(r47215, r47214, MPFR_RNDN);
        mpfr_div(r47216, r47215, r47214, MPFR_RNDN);
        mpfr_mul(r47217, r47213, r47216, MPFR_RNDN);
        return mpfr_get_d(r47217, MPFR_RNDN);
}

static mpfr_t r47218, r47219, r47220, r47221, r47222, r47223;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r47218);
        mpfr_init(r47219);
        mpfr_init(r47220);
        mpfr_init(r47221);
        mpfr_init(r47222);
        mpfr_init(r47223);
}

double f_dm(double x, double y) {
        mpfr_set_d(r47218, x, MPFR_RNDN);
        mpfr_cosh(r47219, r47218, MPFR_RNDN);
        mpfr_set_d(r47220, y, MPFR_RNDN);
        mpfr_sin(r47221, r47220, MPFR_RNDN);
        mpfr_div(r47222, r47221, r47220, MPFR_RNDN);
        mpfr_mul(r47223, r47219, r47222, MPFR_RNDN);
        return mpfr_get_d(r47223, MPFR_RNDN);
}

