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

char *name = "Expression 1, p15";

double f_if(float a, float b, float c, float d, float e) {
        float r20346 = e;
        float r20347 = d;
        float r20348 = r20346 + r20347;
        float r20349 = c;
        float r20350 = r20348 + r20349;
        float r20351 = b;
        float r20352 = r20350 + r20351;
        float r20353 = a;
        float r20354 = r20352 + r20353;
        return r20354;
}

double f_id(double a, double b, double c, double d, double e) {
        double r20355 = e;
        double r20356 = d;
        double r20357 = r20355 + r20356;
        double r20358 = c;
        double r20359 = r20357 + r20358;
        double r20360 = b;
        double r20361 = r20359 + r20360;
        double r20362 = a;
        double r20363 = r20361 + r20362;
        return r20363;
}


double f_of(float a, float b, float c, float d, float e) {
        float r20364 = e;
        float r20365 = c;
        float r20366 = r20364 + r20365;
        float r20367 = a;
        float r20368 = b;
        float r20369 = d;
        float r20370 = r20368 + r20369;
        float r20371 = r20367 + r20370;
        float r20372 = r20366 + r20371;
        float r20373 = exp(r20372);
        float r20374 = log(r20373);
        return r20374;
}

double f_od(double a, double b, double c, double d, double e) {
        double r20375 = e;
        double r20376 = c;
        double r20377 = r20375 + r20376;
        double r20378 = a;
        double r20379 = b;
        double r20380 = d;
        double r20381 = r20379 + r20380;
        double r20382 = r20378 + r20381;
        double r20383 = r20377 + r20382;
        double r20384 = exp(r20383);
        double r20385 = log(r20384);
        return r20385;
}

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 r20386, r20387, r20388, r20389, r20390, r20391, r20392, r20393, r20394;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r20386);
        mpfr_init(r20387);
        mpfr_init(r20388);
        mpfr_init(r20389);
        mpfr_init(r20390);
        mpfr_init(r20391);
        mpfr_init(r20392);
        mpfr_init(r20393);
        mpfr_init(r20394);
}

double f_im(double a, double b, double c, double d, double e) {
        mpfr_set_d(r20386, e, MPFR_RNDN);
        mpfr_set_d(r20387, d, MPFR_RNDN);
        mpfr_add(r20388, r20386, r20387, MPFR_RNDN);
        mpfr_set_d(r20389, c, MPFR_RNDN);
        mpfr_add(r20390, r20388, r20389, MPFR_RNDN);
        mpfr_set_d(r20391, b, MPFR_RNDN);
        mpfr_add(r20392, r20390, r20391, MPFR_RNDN);
        mpfr_set_d(r20393, a, MPFR_RNDN);
        mpfr_add(r20394, r20392, r20393, MPFR_RNDN);
        return mpfr_get_d(r20394, MPFR_RNDN);
}

static mpfr_t r20395, r20396, r20397, r20398, r20399, r20400, r20401, r20402, r20403, r20404, r20405;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r20395);
        mpfr_init(r20396);
        mpfr_init(r20397);
        mpfr_init(r20398);
        mpfr_init(r20399);
        mpfr_init(r20400);
        mpfr_init(r20401);
        mpfr_init(r20402);
        mpfr_init(r20403);
        mpfr_init(r20404);
        mpfr_init(r20405);
}

double f_fm(double a, double b, double c, double d, double e) {
        mpfr_set_d(r20395, e, MPFR_RNDN);
        mpfr_set_d(r20396, c, MPFR_RNDN);
        mpfr_add(r20397, r20395, r20396, MPFR_RNDN);
        mpfr_set_d(r20398, a, MPFR_RNDN);
        mpfr_set_d(r20399, b, MPFR_RNDN);
        mpfr_set_d(r20400, d, MPFR_RNDN);
        mpfr_add(r20401, r20399, r20400, MPFR_RNDN);
        mpfr_add(r20402, r20398, r20401, MPFR_RNDN);
        mpfr_add(r20403, r20397, r20402, MPFR_RNDN);
        mpfr_exp(r20404, r20403, MPFR_RNDN);
        mpfr_log(r20405, r20404, MPFR_RNDN);
        return mpfr_get_d(r20405, MPFR_RNDN);
}

static mpfr_t r20406, r20407, r20408, r20409, r20410, r20411, r20412, r20413, r20414, r20415, r20416;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r20406);
        mpfr_init(r20407);
        mpfr_init(r20408);
        mpfr_init(r20409);
        mpfr_init(r20410);
        mpfr_init(r20411);
        mpfr_init(r20412);
        mpfr_init(r20413);
        mpfr_init(r20414);
        mpfr_init(r20415);
        mpfr_init(r20416);
}

double f_dm(double a, double b, double c, double d, double e) {
        mpfr_set_d(r20406, e, MPFR_RNDN);
        mpfr_set_d(r20407, c, MPFR_RNDN);
        mpfr_add(r20408, r20406, r20407, MPFR_RNDN);
        mpfr_set_d(r20409, a, MPFR_RNDN);
        mpfr_set_d(r20410, b, MPFR_RNDN);
        mpfr_set_d(r20411, d, MPFR_RNDN);
        mpfr_add(r20412, r20410, r20411, MPFR_RNDN);
        mpfr_add(r20413, r20409, r20412, MPFR_RNDN);
        mpfr_add(r20414, r20408, r20413, MPFR_RNDN);
        mpfr_exp(r20415, r20414, MPFR_RNDN);
        mpfr_log(r20416, r20415, MPFR_RNDN);
        return mpfr_get_d(r20416, MPFR_RNDN);
}

