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

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

double f_if(float x, float y) {
        float r29516 = x;
        float r29517 = cos(r29516);
        float r29518 = y;
        float r29519 = sinh(r29518);
        float r29520 = r29519 / r29518;
        float r29521 = r29517 * r29520;
        return r29521;
}

double f_id(double x, double y) {
        double r29522 = x;
        double r29523 = cos(r29522);
        double r29524 = y;
        double r29525 = sinh(r29524);
        double r29526 = r29525 / r29524;
        double r29527 = r29523 * r29526;
        return r29527;
}


double f_of(float x, float y) {
        float r29528 = x;
        float r29529 = cos(r29528);
        float r29530 = y;
        float r29531 = sinh(r29530);
        float r29532 = r29531 / r29530;
        float r29533 = r29529 * r29532;
        return r29533;
}

double f_od(double x, double y) {
        double r29534 = x;
        double r29535 = cos(r29534);
        double r29536 = y;
        double r29537 = sinh(r29536);
        double r29538 = r29537 / r29536;
        double r29539 = r29535 * r29538;
        return r29539;
}

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 r29540, r29541, r29542, r29543, r29544, r29545;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r29540);
        mpfr_init(r29541);
        mpfr_init(r29542);
        mpfr_init(r29543);
        mpfr_init(r29544);
        mpfr_init(r29545);
}

double f_im(double x, double y) {
        mpfr_set_d(r29540, x, MPFR_RNDN);
        mpfr_cos(r29541, r29540, MPFR_RNDN);
        mpfr_set_d(r29542, y, MPFR_RNDN);
        mpfr_sinh(r29543, r29542, MPFR_RNDN);
        mpfr_div(r29544, r29543, r29542, MPFR_RNDN);
        mpfr_mul(r29545, r29541, r29544, MPFR_RNDN);
        return mpfr_get_d(r29545, MPFR_RNDN);
}

static mpfr_t r29546, r29547, r29548, r29549, r29550, r29551;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r29546);
        mpfr_init(r29547);
        mpfr_init(r29548);
        mpfr_init(r29549);
        mpfr_init(r29550);
        mpfr_init(r29551);
}

double f_fm(double x, double y) {
        mpfr_set_d(r29546, x, MPFR_RNDN);
        mpfr_cos(r29547, r29546, MPFR_RNDN);
        mpfr_set_d(r29548, y, MPFR_RNDN);
        mpfr_sinh(r29549, r29548, MPFR_RNDN);
        mpfr_div(r29550, r29549, r29548, MPFR_RNDN);
        mpfr_mul(r29551, r29547, r29550, MPFR_RNDN);
        return mpfr_get_d(r29551, MPFR_RNDN);
}

static mpfr_t r29552, r29553, r29554, r29555, r29556, r29557;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r29552);
        mpfr_init(r29553);
        mpfr_init(r29554);
        mpfr_init(r29555);
        mpfr_init(r29556);
        mpfr_init(r29557);
}

double f_dm(double x, double y) {
        mpfr_set_d(r29552, x, MPFR_RNDN);
        mpfr_cos(r29553, r29552, MPFR_RNDN);
        mpfr_set_d(r29554, y, MPFR_RNDN);
        mpfr_sinh(r29555, r29554, MPFR_RNDN);
        mpfr_div(r29556, r29555, r29554, MPFR_RNDN);
        mpfr_mul(r29557, r29553, r29556, MPFR_RNDN);
        return mpfr_get_d(r29557, MPFR_RNDN);
}

