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

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

double f_if(float re, float im) {
        float r15776 = re;
        float r15777 = exp(r15776);
        float r15778 = im;
        float r15779 = cos(r15778);
        float r15780 = r15777 * r15779;
        return r15780;
}

double f_id(double re, double im) {
        double r15781 = re;
        double r15782 = exp(r15781);
        double r15783 = im;
        double r15784 = cos(r15783);
        double r15785 = r15782 * r15784;
        return r15785;
}


double f_of(float re, float im) {
        float r15786 = re;
        float r15787 = exp(r15786);
        float r15788 = im;
        float r15789 = cos(r15788);
        float r15790 = r15787 * r15789;
        return r15790;
}

double f_od(double re, double im) {
        double r15791 = re;
        double r15792 = exp(r15791);
        double r15793 = im;
        double r15794 = cos(r15793);
        double r15795 = r15792 * r15794;
        return r15795;
}

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 r15796, r15797, r15798, r15799, r15800;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init(r15796);
        mpfr_init(r15797);
        mpfr_init(r15798);
        mpfr_init(r15799);
        mpfr_init(r15800);
}

double f_im(double re, double im) {
        mpfr_set_d(r15796, re, MPFR_RNDN);
        mpfr_exp(r15797, r15796, MPFR_RNDN);
        mpfr_set_d(r15798, im, MPFR_RNDN);
        mpfr_cos(r15799, r15798, MPFR_RNDN);
        mpfr_mul(r15800, r15797, r15799, MPFR_RNDN);
        return mpfr_get_d(r15800, MPFR_RNDN);
}

static mpfr_t r15801, r15802, r15803, r15804, r15805;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r15801);
        mpfr_init(r15802);
        mpfr_init(r15803);
        mpfr_init(r15804);
        mpfr_init(r15805);
}

double f_fm(double re, double im) {
        mpfr_set_d(r15801, re, MPFR_RNDN);
        mpfr_exp(r15802, r15801, MPFR_RNDN);
        mpfr_set_d(r15803, im, MPFR_RNDN);
        mpfr_cos(r15804, r15803, MPFR_RNDN);
        mpfr_mul(r15805, r15802, r15804, MPFR_RNDN);
        return mpfr_get_d(r15805, MPFR_RNDN);
}

static mpfr_t r15806, r15807, r15808, r15809, r15810;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r15806);
        mpfr_init(r15807);
        mpfr_init(r15808);
        mpfr_init(r15809);
        mpfr_init(r15810);
}

double f_dm(double re, double im) {
        mpfr_set_d(r15806, re, MPFR_RNDN);
        mpfr_exp(r15807, r15806, MPFR_RNDN);
        mpfr_set_d(r15808, im, MPFR_RNDN);
        mpfr_cos(r15809, r15808, MPFR_RNDN);
        mpfr_mul(r15810, r15807, r15809, MPFR_RNDN);
        return mpfr_get_d(r15810, MPFR_RNDN);
}