#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 r19744 = eps;
        float r19745 = a;
        float r19746 = b;
        float r19747 = r19745 + r19746;
        float r19748 = r19747 * r19744;
        float r19749 = exp(r19748);
        float r19750 = 1.0f;
        float r19751 = r19749 - r19750;
        float r19752 = r19744 * r19751;
        float r19753 = r19745 * r19744;
        float r19754 = exp(r19753);
        float r19755 = r19754 - r19750;
        float r19756 = r19746 * r19744;
        float r19757 = exp(r19756);
        float r19758 = r19757 - r19750;
        float r19759 = r19755 * r19758;
        float r19760 = r19752 / r19759;
        return r19760;
}

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


double f_of(float a, float b, float __attribute__((unused)) eps) {
        float r19778 = 1.0f;
        float r19779 = b;
        float r19780 = r19778 / r19779;
        float r19781 = a;
        float r19782 = r19778 / r19781;
        float r19783 = r19780 + r19782;
        return r19783;
}

double f_od(double a, double b, double __attribute__((unused)) eps) {
        double r19784 = 1.0;
        double r19785 = b;
        double r19786 = r19784 / r19785;
        double r19787 = a;
        double r19788 = r19784 / r19787;
        double r19789 = r19786 + r19788;
        return r19789;
}

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 r19790, r19791, r19792, r19793, r19794, r19795, r19796, r19797, r19798, r19799, r19800, r19801, r19802, r19803, r19804, r19805, r19806;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(2448);
        mpfr_init(r19790);
        mpfr_init(r19791);
        mpfr_init(r19792);
        mpfr_init(r19793);
        mpfr_init(r19794);
        mpfr_init(r19795);
        mpfr_init_set_str(r19796, "1", 10, MPFR_RNDN);
        mpfr_init(r19797);
        mpfr_init(r19798);
        mpfr_init(r19799);
        mpfr_init(r19800);
        mpfr_init(r19801);
        mpfr_init(r19802);
        mpfr_init(r19803);
        mpfr_init(r19804);
        mpfr_init(r19805);
        mpfr_init(r19806);
}

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

static mpfr_t r19807, r19808, r19809, r19810, r19811, r19812;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(2448);
        mpfr_init_set_str(r19807, "1", 10, MPFR_RNDN);
        mpfr_init(r19808);
        mpfr_init(r19809);
        mpfr_init(r19810);
        mpfr_init(r19811);
        mpfr_init(r19812);
}

double f_fm(double a, double b, double __attribute__((unused)) eps) {
        ;
        mpfr_set_d(r19808, b, MPFR_RNDN);
        mpfr_div(r19809, r19807, r19808, MPFR_RNDN);
        mpfr_set_d(r19810, a, MPFR_RNDN);
        mpfr_div(r19811, r19807, r19810, MPFR_RNDN);
        mpfr_add(r19812, r19809, r19811, MPFR_RNDN);
        return mpfr_get_d(r19812, MPFR_RNDN);
}

static mpfr_t r19813, r19814, r19815, r19816, r19817, r19818;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(2448);
        mpfr_init_set_str(r19813, "1", 10, MPFR_RNDN);
        mpfr_init(r19814);
        mpfr_init(r19815);
        mpfr_init(r19816);
        mpfr_init(r19817);
        mpfr_init(r19818);
}

double f_dm(double a, double b, double __attribute__((unused)) eps) {
        ;
        mpfr_set_d(r19814, b, MPFR_RNDN);
        mpfr_div(r19815, r19813, r19814, MPFR_RNDN);
        mpfr_set_d(r19816, a, MPFR_RNDN);
        mpfr_div(r19817, r19813, r19816, MPFR_RNDN);
        mpfr_add(r19818, r19815, r19817, MPFR_RNDN);
        return mpfr_get_d(r19818, MPFR_RNDN);
}