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

char *name = "math.cos on complex, imaginary part";

double f_if(float re, float im) {
        float r19513 = 0.5f;
        float r19514 = re;
        float r19515 = sin(r19514);
        float r19516 = r19513 * r19515;
        float r19517 = im;
        float r19518 = -r19517;
        float r19519 = exp(r19518);
        float r19520 = exp(r19517);
        float r19521 = r19519 - r19520;
        float r19522 = r19516 * r19521;
        return r19522;
}

double f_id(double re, double im) {
        double r19523 = 0.5;
        double r19524 = re;
        double r19525 = sin(r19524);
        double r19526 = r19523 * r19525;
        double r19527 = im;
        double r19528 = -r19527;
        double r19529 = exp(r19528);
        double r19530 = exp(r19527);
        double r19531 = r19529 - r19530;
        double r19532 = r19526 * r19531;
        return r19532;
}


double f_of(float re, float im) {
        float r19533 = im;
        float r19534 = -0.21930791437625885f;
        bool r19535 = r19533 <= r19534;
        float r19536 = 0.5f;
        float r19537 = re;
        float r19538 = sin(r19537);
        float r19539 = r19536 * r19538;
        float r19540 = -r19533;
        float r19541 = exp(r19540);
        float r19542 = sqrt(r19541);
        float r19543 = exp(r19533);
        float r19544 = sqrt(r19543);
        float r19545 = r19542 + r19544;
        float r19546 = r19542 - r19544;
        float r19547 = r19545 * r19546;
        float r19548 = r19539 * r19547;
        float r19549 = 0.01666666753590107f;
        float r19550 = 5.0f;
        float r19551 = pow(r19533, r19550);
        float r19552 = r19549 * r19551;
        float r19553 = -r19552;
        float r19554 = r19539 * r19553;
        float r19555 = 2.0f;
        float r19556 = r19555 * r19533;
        float r19557 = 0.3333333432674408f;
        float r19558 = r19533 * (r19533 * r19533);
        float r19559 = r19557 * r19558;
        float r19560 = r19556 + r19559;
        float r19561 = -r19536;
        float r19562 = r19538 * r19561;
        float r19563 = r19560 * r19562;
        float r19564 = r19554 + r19563;
        float r19565 = r19535 ? r19548 : r19564;
        return r19565;
}

double f_od(double re, double im) {
        double r19566 = im;
        double r19567 = -0.21930791437625885;
        bool r19568 = r19566 <= r19567;
        double r19569 = 0.5;
        double r19570 = re;
        double r19571 = sin(r19570);
        double r19572 = r19569 * r19571;
        double r19573 = -r19566;
        double r19574 = exp(r19573);
        double r19575 = sqrt(r19574);
        double r19576 = exp(r19566);
        double r19577 = sqrt(r19576);
        double r19578 = r19575 + r19577;
        double r19579 = r19575 - r19577;
        double r19580 = r19578 * r19579;
        double r19581 = r19572 * r19580;
        double r19582 = 0.01666666753590107;
        double r19583 = 5.0;
        double r19584 = pow(r19566, r19583);
        double r19585 = r19582 * r19584;
        double r19586 = -r19585;
        double r19587 = r19572 * r19586;
        double r19588 = 2.0;
        double r19589 = r19588 * r19566;
        double r19590 = 0.3333333432674408;
        double r19591 = r19566 * (r19566 * r19566);
        double r19592 = r19590 * r19591;
        double r19593 = r19589 + r19592;
        double r19594 = -r19569;
        double r19595 = r19571 * r19594;
        double r19596 = r19593 * r19595;
        double r19597 = r19587 + r19596;
        double r19598 = r19568 ? r19581 : r19597;
        return r19598;
}

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 r19599, r19600, r19601, r19602, r19603, r19604, r19605, r19606, r19607, r19608;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init_set_str(r19599, "0.5", 10, MPFR_RNDN);
        mpfr_init(r19600);
        mpfr_init(r19601);
        mpfr_init(r19602);
        mpfr_init(r19603);
        mpfr_init(r19604);
        mpfr_init(r19605);
        mpfr_init(r19606);
        mpfr_init(r19607);
        mpfr_init(r19608);
}

double f_im(double re, double im) {
        ;
        mpfr_set_d(r19600, re, MPFR_RNDN);
        mpfr_sin(r19601, r19600, MPFR_RNDN);
        mpfr_mul(r19602, r19599, r19601, MPFR_RNDN);
        mpfr_set_d(r19603, im, MPFR_RNDN);
        mpfr_neg(r19604, r19603, MPFR_RNDN);
        mpfr_exp(r19605, r19604, MPFR_RNDN);
        mpfr_exp(r19606, r19603, MPFR_RNDN);
        mpfr_sub(r19607, r19605, r19606, MPFR_RNDN);
        mpfr_mul(r19608, r19602, r19607, MPFR_RNDN);
        return mpfr_get_d(r19608, MPFR_RNDN);
}

static mpfr_t r19609, r19610, r19611, r19612, r19613, r19614, r19615, r19616, r19617, r19618, r19619, r19620, r19621, r19622, r19623, r19624, r19625, r19626, r19627, r19628, r19629, r19630, r19631, r19632, r19633, r19634, r19635, r19636, r19637, r19638, r19639, r19640, r19641;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r19609);
        mpfr_init_set_str(r19610, "-0.21930791f0", 10, MPFR_RNDN);
        mpfr_init(r19611);
        mpfr_init_set_str(r19612, "0.5", 10, MPFR_RNDN);
        mpfr_init(r19613);
        mpfr_init(r19614);
        mpfr_init(r19615);
        mpfr_init(r19616);
        mpfr_init(r19617);
        mpfr_init(r19618);
        mpfr_init(r19619);
        mpfr_init(r19620);
        mpfr_init(r19621);
        mpfr_init(r19622);
        mpfr_init(r19623);
        mpfr_init(r19624);
        mpfr_init_set_str(r19625, "1/60", 10, MPFR_RNDN);
        mpfr_init_set_str(r19626, "5", 10, MPFR_RNDN);
        mpfr_init(r19627);
        mpfr_init(r19628);
        mpfr_init(r19629);
        mpfr_init(r19630);
        mpfr_init_set_str(r19631, "2", 10, MPFR_RNDN);
        mpfr_init(r19632);
        mpfr_init_set_str(r19633, "1/3", 10, MPFR_RNDN);
        mpfr_init(r19634);
        mpfr_init(r19635);
        mpfr_init(r19636);
        mpfr_init(r19637);
        mpfr_init(r19638);
        mpfr_init(r19639);
        mpfr_init(r19640);
        mpfr_init(r19641);
}

double f_fm(double re, double im) {
        mpfr_set_d(r19609, im, MPFR_RNDN);
        ;
        mpfr_set_si(r19611, mpfr_cmp(r19609, r19610) <= 0, MPFR_RNDN);
        ;
        mpfr_set_d(r19613, re, MPFR_RNDN);
        mpfr_sin(r19614, r19613, MPFR_RNDN);
        mpfr_mul(r19615, r19612, r19614, MPFR_RNDN);
        mpfr_neg(r19616, r19609, MPFR_RNDN);
        mpfr_exp(r19617, r19616, MPFR_RNDN);
        mpfr_sqrt(r19618, r19617, MPFR_RNDN);
        mpfr_exp(r19619, r19609, MPFR_RNDN);
        mpfr_sqrt(r19620, r19619, MPFR_RNDN);
        mpfr_add(r19621, r19618, r19620, MPFR_RNDN);
        mpfr_sub(r19622, r19618, r19620, MPFR_RNDN);
        mpfr_mul(r19623, r19621, r19622, MPFR_RNDN);
        mpfr_mul(r19624, r19615, r19623, MPFR_RNDN);
        ;
        ;
        mpfr_pow(r19627, r19609, r19626, MPFR_RNDN);
        mpfr_mul(r19628, r19625, r19627, MPFR_RNDN);
        mpfr_neg(r19629, r19628, MPFR_RNDN);
        mpfr_mul(r19630, r19615, r19629, MPFR_RNDN);
        ;
        mpfr_mul(r19632, r19631, r19609, MPFR_RNDN);
        ;
        mpfr_mul(r19634, r19609, r19609, MPFR_RNDN); mpfr_mul(r19634, r19634, r19609, MPFR_RNDN);
        mpfr_mul(r19635, r19633, r19634, MPFR_RNDN);
        mpfr_add(r19636, r19632, r19635, MPFR_RNDN);
        mpfr_neg(r19637, r19612, MPFR_RNDN);
        mpfr_mul(r19638, r19614, r19637, MPFR_RNDN);
        mpfr_mul(r19639, r19636, r19638, MPFR_RNDN);
        mpfr_add(r19640, r19630, r19639, MPFR_RNDN);
        if (mpfr_get_si(r19611, MPFR_RNDN)) { mpfr_set(r19641, r19624, MPFR_RNDN); } else { mpfr_set(r19641, r19640, MPFR_RNDN); };
        return mpfr_get_d(r19641, MPFR_RNDN);
}

static mpfr_t r19642, r19643, r19644, r19645, r19646, r19647, r19648, r19649, r19650, r19651, r19652, r19653, r19654, r19655, r19656, r19657, r19658, r19659, r19660, r19661, r19662, r19663, r19664, r19665, r19666, r19667, r19668, r19669, r19670, r19671, r19672, r19673, r19674;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r19642);
        mpfr_init_set_str(r19643, "-0.21930791f0", 10, MPFR_RNDN);
        mpfr_init(r19644);
        mpfr_init_set_str(r19645, "0.5", 10, MPFR_RNDN);
        mpfr_init(r19646);
        mpfr_init(r19647);
        mpfr_init(r19648);
        mpfr_init(r19649);
        mpfr_init(r19650);
        mpfr_init(r19651);
        mpfr_init(r19652);
        mpfr_init(r19653);
        mpfr_init(r19654);
        mpfr_init(r19655);
        mpfr_init(r19656);
        mpfr_init(r19657);
        mpfr_init_set_str(r19658, "1/60", 10, MPFR_RNDN);
        mpfr_init_set_str(r19659, "5", 10, MPFR_RNDN);
        mpfr_init(r19660);
        mpfr_init(r19661);
        mpfr_init(r19662);
        mpfr_init(r19663);
        mpfr_init_set_str(r19664, "2", 10, MPFR_RNDN);
        mpfr_init(r19665);
        mpfr_init_set_str(r19666, "1/3", 10, MPFR_RNDN);
        mpfr_init(r19667);
        mpfr_init(r19668);
        mpfr_init(r19669);
        mpfr_init(r19670);
        mpfr_init(r19671);
        mpfr_init(r19672);
        mpfr_init(r19673);
        mpfr_init(r19674);
}

double f_dm(double re, double im) {
        mpfr_set_d(r19642, im, MPFR_RNDN);
        ;
        mpfr_set_si(r19644, mpfr_cmp(r19642, r19643) <= 0, MPFR_RNDN);
        ;
        mpfr_set_d(r19646, re, MPFR_RNDN);
        mpfr_sin(r19647, r19646, MPFR_RNDN);
        mpfr_mul(r19648, r19645, r19647, MPFR_RNDN);
        mpfr_neg(r19649, r19642, MPFR_RNDN);
        mpfr_exp(r19650, r19649, MPFR_RNDN);
        mpfr_sqrt(r19651, r19650, MPFR_RNDN);
        mpfr_exp(r19652, r19642, MPFR_RNDN);
        mpfr_sqrt(r19653, r19652, MPFR_RNDN);
        mpfr_add(r19654, r19651, r19653, MPFR_RNDN);
        mpfr_sub(r19655, r19651, r19653, MPFR_RNDN);
        mpfr_mul(r19656, r19654, r19655, MPFR_RNDN);
        mpfr_mul(r19657, r19648, r19656, MPFR_RNDN);
        ;
        ;
        mpfr_pow(r19660, r19642, r19659, MPFR_RNDN);
        mpfr_mul(r19661, r19658, r19660, MPFR_RNDN);
        mpfr_neg(r19662, r19661, MPFR_RNDN);
        mpfr_mul(r19663, r19648, r19662, MPFR_RNDN);
        ;
        mpfr_mul(r19665, r19664, r19642, MPFR_RNDN);
        ;
        mpfr_mul(r19667, r19642, r19642, MPFR_RNDN); mpfr_mul(r19667, r19667, r19642, MPFR_RNDN);
        mpfr_mul(r19668, r19666, r19667, MPFR_RNDN);
        mpfr_add(r19669, r19665, r19668, MPFR_RNDN);
        mpfr_neg(r19670, r19645, MPFR_RNDN);
        mpfr_mul(r19671, r19647, r19670, MPFR_RNDN);
        mpfr_mul(r19672, r19669, r19671, MPFR_RNDN);
        mpfr_add(r19673, r19663, r19672, MPFR_RNDN);
        if (mpfr_get_si(r19644, MPFR_RNDN)) { mpfr_set(r19674, r19657, MPFR_RNDN); } else { mpfr_set(r19674, r19673, MPFR_RNDN); };
        return mpfr_get_d(r19674, MPFR_RNDN);
}