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

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

double f_if(float re, float im) {
        float r25120 = re;
        float r25121 = exp(r25120);
        float r25122 = im;
        float r25123 = sin(r25122);
        float r25124 = r25121 * r25123;
        return r25124;
}

double f_id(double re, double im) {
        double r25125 = re;
        double r25126 = exp(r25125);
        double r25127 = im;
        double r25128 = sin(r25127);
        double r25129 = r25126 * r25128;
        return r25129;
}


double f_of(float re, float im) {
        float r25130 = re;
        float r25131 = exp(r25130);
        float r25132 = im;
        float r25133 = sin(r25132);
        float r25134 = r25131 * r25133;
        return r25134;
}

double f_od(double re, double im) {
        double r25135 = re;
        double r25136 = exp(r25135);
        double r25137 = im;
        double r25138 = sin(r25137);
        double r25139 = r25136 * r25138;
        return r25139;
}

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 r25140, r25141, r25142, r25143, r25144;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(336);
        mpfr_init(r25140);
        mpfr_init(r25141);
        mpfr_init(r25142);
        mpfr_init(r25143);
        mpfr_init(r25144);
}

double f_im(double re, double im) {
        mpfr_set_d(r25140, re, MPFR_RNDN);
        mpfr_exp(r25141, r25140, MPFR_RNDN);
        mpfr_set_d(r25142, im, MPFR_RNDN);
        mpfr_sin(r25143, r25142, MPFR_RNDN);
        mpfr_mul(r25144, r25141, r25143, MPFR_RNDN);
        return mpfr_get_d(r25144, MPFR_RNDN);
}

static mpfr_t r25145, r25146, r25147, r25148, r25149;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(336);
        mpfr_init(r25145);
        mpfr_init(r25146);
        mpfr_init(r25147);
        mpfr_init(r25148);
        mpfr_init(r25149);
}

double f_fm(double re, double im) {
        mpfr_set_d(r25145, re, MPFR_RNDN);
        mpfr_exp(r25146, r25145, MPFR_RNDN);
        mpfr_set_d(r25147, im, MPFR_RNDN);
        mpfr_sin(r25148, r25147, MPFR_RNDN);
        mpfr_mul(r25149, r25146, r25148, MPFR_RNDN);
        return mpfr_get_d(r25149, MPFR_RNDN);
}

static mpfr_t r25150, r25151, r25152, r25153, r25154;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(336);
        mpfr_init(r25150);
        mpfr_init(r25151);
        mpfr_init(r25152);
        mpfr_init(r25153);
        mpfr_init(r25154);
}

double f_dm(double re, double im) {
        mpfr_set_d(r25150, re, MPFR_RNDN);
        mpfr_exp(r25151, r25150, MPFR_RNDN);
        mpfr_set_d(r25152, im, MPFR_RNDN);
        mpfr_sin(r25153, r25152, MPFR_RNDN);
        mpfr_mul(r25154, r25151, r25153, MPFR_RNDN);
        return mpfr_get_d(r25154, MPFR_RNDN);
}