#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 r10114 = eps;
        float r10115 = a;
        float r10116 = b;
        float r10117 = r10115 + r10116;
        float r10118 = r10117 * r10114;
        float r10119 = exp(r10118);
        float r10120 = 1.0f;
        float r10121 = r10119 - r10120;
        float r10122 = r10114 * r10121;
        float r10123 = r10115 * r10114;
        float r10124 = exp(r10123);
        float r10125 = r10124 - r10120;
        float r10126 = r10116 * r10114;
        float r10127 = exp(r10126);
        float r10128 = r10127 - r10120;
        float r10129 = r10125 * r10128;
        float r10130 = r10122 / r10129;
        return r10130;
}

double f_id(double a, double b, double eps) {
        double r10131 = eps;
        double r10132 = a;
        double r10133 = b;
        double r10134 = r10132 + r10133;
        double r10135 = r10134 * r10131;
        double r10136 = exp(r10135);
        double r10137 = 1.0;
        double r10138 = r10136 - r10137;
        double r10139 = r10131 * r10138;
        double r10140 = r10132 * r10131;
        double r10141 = exp(r10140);
        double r10142 = r10141 - r10137;
        double r10143 = r10133 * r10131;
        double r10144 = exp(r10143);
        double r10145 = r10144 - r10137;
        double r10146 = r10142 * r10145;
        double r10147 = r10139 / r10146;
        return r10147;
}


double f_of(float a, float b, float eps) {
        float r10148 = a;
        float r10149 = b;
        float r10150 = r10148 + r10149;
        float r10151 = eps;
        float r10152 = r10150 * r10151;
        float r10153 = exp(r10152);
        float r10154 = 1.0f;
        float r10155 = r10153 - r10154;
        float r10156 = r10155 * r10151;
        float r10157 = r10151 * r10149;
        float r10158 = exp(r10157);
        float r10159 = r10158 - r10154;
        float r10160 = r10151 * r10148;
        float r10161 = exp(r10160);
        float r10162 = r10161 - r10154;
        float r10163 = r10159 * r10162;
        float r10164 = r10156 / r10163;
        float r10165 = -4.717656556639609e-22f;
        bool r10166 = r10164 <= r10165;
        float r10167 = r10154 / r10149;
        float r10168 = r10154 / r10148;
        float r10169 = r10167 + r10168;
        float r10170 = 1.7817055403717436e+308f;
        bool r10171 = r10164 <= r10170;
        float r10172 = expm1(r10160);
        float r10173 = r10151 / r10172;
        float r10174 = expm1(r10152);
        float r10175 = expm1(r10157);
        float r10176 = r10174 / r10175;
        float r10177 = r10173 * r10176;
        float r10178 = r10171 ? r10177 : r10169;
        float r10179 = r10166 ? r10169 : r10178;
        return r10179;
}

double f_od(double a, double b, double eps) {
        double r10180 = a;
        double r10181 = b;
        double r10182 = r10180 + r10181;
        double r10183 = eps;
        double r10184 = r10182 * r10183;
        double r10185 = exp(r10184);
        double r10186 = 1.0;
        double r10187 = r10185 - r10186;
        double r10188 = r10187 * r10183;
        double r10189 = r10183 * r10181;
        double r10190 = exp(r10189);
        double r10191 = r10190 - r10186;
        double r10192 = r10183 * r10180;
        double r10193 = exp(r10192);
        double r10194 = r10193 - r10186;
        double r10195 = r10191 * r10194;
        double r10196 = r10188 / r10195;
        double r10197 = -4.717656556639609e-22;
        bool r10198 = r10196 <= r10197;
        double r10199 = r10186 / r10181;
        double r10200 = r10186 / r10180;
        double r10201 = r10199 + r10200;
        double r10202 = 1.7817055403717436e+308;
        bool r10203 = r10196 <= r10202;
        double r10204 = expm1(r10192);
        double r10205 = r10183 / r10204;
        double r10206 = expm1(r10184);
        double r10207 = expm1(r10189);
        double r10208 = r10206 / r10207;
        double r10209 = r10205 * r10208;
        double r10210 = r10203 ? r10209 : r10201;
        double r10211 = r10198 ? r10201 : r10210;
        return r10211;
}

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 r10212, r10213, r10214, r10215, r10216, r10217, r10218, r10219, r10220, r10221, r10222, r10223, r10224, r10225, r10226, r10227, r10228;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(2384);
        mpfr_init(r10212);
        mpfr_init(r10213);
        mpfr_init(r10214);
        mpfr_init(r10215);
        mpfr_init(r10216);
        mpfr_init(r10217);
        mpfr_init_set_str(r10218, "1", 10, MPFR_RNDN);
        mpfr_init(r10219);
        mpfr_init(r10220);
        mpfr_init(r10221);
        mpfr_init(r10222);
        mpfr_init(r10223);
        mpfr_init(r10224);
        mpfr_init(r10225);
        mpfr_init(r10226);
        mpfr_init(r10227);
        mpfr_init(r10228);
}

double f_im(double a, double b, double eps) {
        mpfr_set_d(r10212, eps, MPFR_RNDN);
        mpfr_set_d(r10213, a, MPFR_RNDN);
        mpfr_set_d(r10214, b, MPFR_RNDN);
        mpfr_add(r10215, r10213, r10214, MPFR_RNDN);
        mpfr_mul(r10216, r10215, r10212, MPFR_RNDN);
        mpfr_exp(r10217, r10216, MPFR_RNDN);
        ;
        mpfr_sub(r10219, r10217, r10218, MPFR_RNDN);
        mpfr_mul(r10220, r10212, r10219, MPFR_RNDN);
        mpfr_mul(r10221, r10213, r10212, MPFR_RNDN);
        mpfr_exp(r10222, r10221, MPFR_RNDN);
        mpfr_sub(r10223, r10222, r10218, MPFR_RNDN);
        mpfr_mul(r10224, r10214, r10212, MPFR_RNDN);
        mpfr_exp(r10225, r10224, MPFR_RNDN);
        mpfr_sub(r10226, r10225, r10218, MPFR_RNDN);
        mpfr_mul(r10227, r10223, r10226, MPFR_RNDN);
        mpfr_div(r10228, r10220, r10227, MPFR_RNDN);
        return mpfr_get_d(r10228, MPFR_RNDN);
}

static mpfr_t r10229, r10230, r10231, r10232, r10233, r10234, r10235, r10236, r10237, r10238, r10239, r10240, r10241, r10242, r10243, r10244, r10245, r10246, r10247, r10248, r10249, r10250, r10251, r10252, r10253, r10254, r10255, r10256, r10257, r10258, r10259, r10260;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(2384);
        mpfr_init(r10229);
        mpfr_init(r10230);
        mpfr_init(r10231);
        mpfr_init(r10232);
        mpfr_init(r10233);
        mpfr_init(r10234);
        mpfr_init_set_str(r10235, "1", 10, MPFR_RNDN);
        mpfr_init(r10236);
        mpfr_init(r10237);
        mpfr_init(r10238);
        mpfr_init(r10239);
        mpfr_init(r10240);
        mpfr_init(r10241);
        mpfr_init(r10242);
        mpfr_init(r10243);
        mpfr_init(r10244);
        mpfr_init(r10245);
        mpfr_init_set_str(r10246, "-4.717656556639609e-22", 10, MPFR_RNDN);
        mpfr_init(r10247);
        mpfr_init(r10248);
        mpfr_init(r10249);
        mpfr_init(r10250);
        mpfr_init_set_str(r10251, "1.7817055403717436e+308", 10, MPFR_RNDN);
        mpfr_init(r10252);
        mpfr_init(r10253);
        mpfr_init(r10254);
        mpfr_init(r10255);
        mpfr_init(r10256);
        mpfr_init(r10257);
        mpfr_init(r10258);
        mpfr_init(r10259);
        mpfr_init(r10260);
}

double f_fm(double a, double b, double eps) {
        mpfr_set_d(r10229, a, MPFR_RNDN);
        mpfr_set_d(r10230, b, MPFR_RNDN);
        mpfr_add(r10231, r10229, r10230, MPFR_RNDN);
        mpfr_set_d(r10232, eps, MPFR_RNDN);
        mpfr_mul(r10233, r10231, r10232, MPFR_RNDN);
        mpfr_exp(r10234, r10233, MPFR_RNDN);
        ;
        mpfr_sub(r10236, r10234, r10235, MPFR_RNDN);
        mpfr_mul(r10237, r10236, r10232, MPFR_RNDN);
        mpfr_mul(r10238, r10232, r10230, MPFR_RNDN);
        mpfr_exp(r10239, r10238, MPFR_RNDN);
        mpfr_sub(r10240, r10239, r10235, MPFR_RNDN);
        mpfr_mul(r10241, r10232, r10229, MPFR_RNDN);
        mpfr_exp(r10242, r10241, MPFR_RNDN);
        mpfr_sub(r10243, r10242, r10235, MPFR_RNDN);
        mpfr_mul(r10244, r10240, r10243, MPFR_RNDN);
        mpfr_div(r10245, r10237, r10244, MPFR_RNDN);
        ;
        mpfr_set_si(r10247, mpfr_cmp(r10245, r10246) <= 0, MPFR_RNDN);
        mpfr_div(r10248, r10235, r10230, MPFR_RNDN);
        mpfr_div(r10249, r10235, r10229, MPFR_RNDN);
        mpfr_add(r10250, r10248, r10249, MPFR_RNDN);
        ;
        mpfr_set_si(r10252, mpfr_cmp(r10245, r10251) <= 0, MPFR_RNDN);
        mpfr_expm1(r10253, r10241, MPFR_RNDN);
        mpfr_div(r10254, r10232, r10253, MPFR_RNDN);
        mpfr_expm1(r10255, r10233, MPFR_RNDN);
        mpfr_expm1(r10256, r10238, MPFR_RNDN);
        mpfr_div(r10257, r10255, r10256, MPFR_RNDN);
        mpfr_mul(r10258, r10254, r10257, MPFR_RNDN);
        if (mpfr_get_si(r10252, MPFR_RNDN)) { mpfr_set(r10259, r10258, MPFR_RNDN); } else { mpfr_set(r10259, r10250, MPFR_RNDN); };
        if (mpfr_get_si(r10247, MPFR_RNDN)) { mpfr_set(r10260, r10250, MPFR_RNDN); } else { mpfr_set(r10260, r10259, MPFR_RNDN); };
        return mpfr_get_d(r10260, MPFR_RNDN);
}

static mpfr_t r10261, r10262, r10263, r10264, r10265, r10266, r10267, r10268, r10269, r10270, r10271, r10272, r10273, r10274, r10275, r10276, r10277, r10278, r10279, r10280, r10281, r10282, r10283, r10284, r10285, r10286, r10287, r10288, r10289, r10290, r10291, r10292;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(2384);
        mpfr_init(r10261);
        mpfr_init(r10262);
        mpfr_init(r10263);
        mpfr_init(r10264);
        mpfr_init(r10265);
        mpfr_init(r10266);
        mpfr_init_set_str(r10267, "1", 10, MPFR_RNDN);
        mpfr_init(r10268);
        mpfr_init(r10269);
        mpfr_init(r10270);
        mpfr_init(r10271);
        mpfr_init(r10272);
        mpfr_init(r10273);
        mpfr_init(r10274);
        mpfr_init(r10275);
        mpfr_init(r10276);
        mpfr_init(r10277);
        mpfr_init_set_str(r10278, "-4.717656556639609e-22", 10, MPFR_RNDN);
        mpfr_init(r10279);
        mpfr_init(r10280);
        mpfr_init(r10281);
        mpfr_init(r10282);
        mpfr_init_set_str(r10283, "1.7817055403717436e+308", 10, MPFR_RNDN);
        mpfr_init(r10284);
        mpfr_init(r10285);
        mpfr_init(r10286);
        mpfr_init(r10287);
        mpfr_init(r10288);
        mpfr_init(r10289);
        mpfr_init(r10290);
        mpfr_init(r10291);
        mpfr_init(r10292);
}

double f_dm(double a, double b, double eps) {
        mpfr_set_d(r10261, a, MPFR_RNDN);
        mpfr_set_d(r10262, b, MPFR_RNDN);
        mpfr_add(r10263, r10261, r10262, MPFR_RNDN);
        mpfr_set_d(r10264, eps, MPFR_RNDN);
        mpfr_mul(r10265, r10263, r10264, MPFR_RNDN);
        mpfr_exp(r10266, r10265, MPFR_RNDN);
        ;
        mpfr_sub(r10268, r10266, r10267, MPFR_RNDN);
        mpfr_mul(r10269, r10268, r10264, MPFR_RNDN);
        mpfr_mul(r10270, r10264, r10262, MPFR_RNDN);
        mpfr_exp(r10271, r10270, MPFR_RNDN);
        mpfr_sub(r10272, r10271, r10267, MPFR_RNDN);
        mpfr_mul(r10273, r10264, r10261, MPFR_RNDN);
        mpfr_exp(r10274, r10273, MPFR_RNDN);
        mpfr_sub(r10275, r10274, r10267, MPFR_RNDN);
        mpfr_mul(r10276, r10272, r10275, MPFR_RNDN);
        mpfr_div(r10277, r10269, r10276, MPFR_RNDN);
        ;
        mpfr_set_si(r10279, mpfr_cmp(r10277, r10278) <= 0, MPFR_RNDN);
        mpfr_div(r10280, r10267, r10262, MPFR_RNDN);
        mpfr_div(r10281, r10267, r10261, MPFR_RNDN);
        mpfr_add(r10282, r10280, r10281, MPFR_RNDN);
        ;
        mpfr_set_si(r10284, mpfr_cmp(r10277, r10283) <= 0, MPFR_RNDN);
        mpfr_expm1(r10285, r10273, MPFR_RNDN);
        mpfr_div(r10286, r10264, r10285, MPFR_RNDN);
        mpfr_expm1(r10287, r10265, MPFR_RNDN);
        mpfr_expm1(r10288, r10270, MPFR_RNDN);
        mpfr_div(r10289, r10287, r10288, MPFR_RNDN);
        mpfr_mul(r10290, r10286, r10289, MPFR_RNDN);
        if (mpfr_get_si(r10284, MPFR_RNDN)) { mpfr_set(r10291, r10290, MPFR_RNDN); } else { mpfr_set(r10291, r10282, MPFR_RNDN); };
        if (mpfr_get_si(r10279, MPFR_RNDN)) { mpfr_set(r10292, r10282, MPFR_RNDN); } else { mpfr_set(r10292, r10291, MPFR_RNDN); };
        return mpfr_get_d(r10292, MPFR_RNDN);
}