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

char *name = "expq3 (problem 3.4.2)";

double f_if(float a, float b, float eps) {
        float r19740 = eps;
        float r19741 = a;
        float r19742 = b;
        float r19743 = r19741 + r19742;
        float r19744 = r19743 * r19740;
        float r19745 = exp(r19744);
        float r19746 = 1.0f;
        float r19747 = r19745 - r19746;
        float r19748 = r19740 * r19747;
        float r19749 = r19741 * r19740;
        float r19750 = exp(r19749);
        float r19751 = r19750 - r19746;
        float r19752 = r19742 * r19740;
        float r19753 = exp(r19752);
        float r19754 = r19753 - r19746;
        float r19755 = r19751 * r19754;
        float r19756 = r19748 / r19755;
        return r19756;
}

double f_id(double a, double b, double eps) {
        double r19757 = eps;
        double r19758 = a;
        double r19759 = b;
        double r19760 = r19758 + r19759;
        double r19761 = r19760 * r19757;
        double r19762 = exp(r19761);
        double r19763 = 1.0;
        double r19764 = r19762 - r19763;
        double r19765 = r19757 * r19764;
        double r19766 = r19758 * r19757;
        double r19767 = exp(r19766);
        double r19768 = r19767 - r19763;
        double r19769 = r19759 * r19757;
        double r19770 = exp(r19769);
        double r19771 = r19770 - r19763;
        double r19772 = r19768 * r19771;
        double r19773 = r19765 / r19772;
        return r19773;
}


double f_of(float a, float b, float __attribute__((unused)) eps) {
        float r19774 = 1.0f;
        float r19775 = b;
        float r19776 = r19774 / r19775;
        float r19777 = a;
        float r19778 = r19774 / r19777;
        float r19779 = r19776 + r19778;
        return r19779;
}

double f_od(double a, double b, double __attribute__((unused)) eps) {
        double r19780 = 1.0;
        double r19781 = b;
        double r19782 = r19780 / r19781;
        double r19783 = a;
        double r19784 = r19780 / r19783;
        double r19785 = r19782 + r19784;
        return r19785;
}

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 r19786, r19787, r19788, r19789, r19790, r19791, r19792, r19793, r19794, r19795, r19796, r19797, r19798, r19799, r19800, r19801, r19802;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(2448);
        mpfr_init(r19786);
        mpfr_init(r19787);
        mpfr_init(r19788);
        mpfr_init(r19789);
        mpfr_init(r19790);
        mpfr_init(r19791);
        mpfr_init_set_str(r19792, "1", 10, MPFR_RNDN);
        mpfr_init(r19793);
        mpfr_init(r19794);
        mpfr_init(r19795);
        mpfr_init(r19796);
        mpfr_init(r19797);
        mpfr_init(r19798);
        mpfr_init(r19799);
        mpfr_init(r19800);
        mpfr_init(r19801);
        mpfr_init(r19802);
}

double f_im(double a, double b, double eps) {
        mpfr_set_d(r19786, eps, MPFR_RNDN);
        mpfr_set_d(r19787, a, MPFR_RNDN);
        mpfr_set_d(r19788, b, MPFR_RNDN);
        mpfr_add(r19789, r19787, r19788, MPFR_RNDN);
        mpfr_mul(r19790, r19789, r19786, MPFR_RNDN);
        mpfr_exp(r19791, r19790, MPFR_RNDN);
        ;
        mpfr_sub(r19793, r19791, r19792, MPFR_RNDN);
        mpfr_mul(r19794, r19786, r19793, MPFR_RNDN);
        mpfr_mul(r19795, r19787, r19786, MPFR_RNDN);
        mpfr_exp(r19796, r19795, MPFR_RNDN);
        mpfr_sub(r19797, r19796, r19792, MPFR_RNDN);
        mpfr_mul(r19798, r19788, r19786, MPFR_RNDN);
        mpfr_exp(r19799, r19798, MPFR_RNDN);
        mpfr_sub(r19800, r19799, r19792, MPFR_RNDN);
        mpfr_mul(r19801, r19797, r19800, MPFR_RNDN);
        mpfr_div(r19802, r19794, r19801, MPFR_RNDN);
        return mpfr_get_d(r19802, MPFR_RNDN);
}

static mpfr_t r19803, r19804, r19805, r19806, r19807, r19808;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(2448);
        mpfr_init_set_str(r19803, "1", 10, MPFR_RNDN);
        mpfr_init(r19804);
        mpfr_init(r19805);
        mpfr_init(r19806);
        mpfr_init(r19807);
        mpfr_init(r19808);
}

double f_fm(double a, double b, double __attribute__((unused)) eps) {
        ;
        mpfr_set_d(r19804, b, MPFR_RNDN);
        mpfr_div(r19805, r19803, r19804, MPFR_RNDN);
        mpfr_set_d(r19806, a, MPFR_RNDN);
        mpfr_div(r19807, r19803, r19806, MPFR_RNDN);
        mpfr_add(r19808, r19805, r19807, MPFR_RNDN);
        return mpfr_get_d(r19808, MPFR_RNDN);
}

static mpfr_t r19809, r19810, r19811, r19812, r19813, r19814;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(2448);
        mpfr_init_set_str(r19809, "1", 10, MPFR_RNDN);
        mpfr_init(r19810);
        mpfr_init(r19811);
        mpfr_init(r19812);
        mpfr_init(r19813);
        mpfr_init(r19814);
}

double f_dm(double a, double b, double __attribute__((unused)) eps) {
        ;
        mpfr_set_d(r19810, b, MPFR_RNDN);
        mpfr_div(r19811, r19809, r19810, MPFR_RNDN);
        mpfr_set_d(r19812, a, MPFR_RNDN);
        mpfr_div(r19813, r19809, r19812, MPFR_RNDN);
        mpfr_add(r19814, r19811, r19813, MPFR_RNDN);
        return mpfr_get_d(r19814, MPFR_RNDN);
}