#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 r26139 = e;
        float r26140 = d;
        float r26141 = r26139 + r26140;
        float r26142 = c;
        float r26143 = r26141 + r26142;
        float r26144 = b;
        float r26145 = r26143 + r26144;
        float r26146 = a;
        float r26147 = r26145 + r26146;
        return r26147;
}

double f_id(double a, double b, double c, double d, double e) {
        double r26148 = e;
        double r26149 = d;
        double r26150 = r26148 + r26149;
        double r26151 = c;
        double r26152 = r26150 + r26151;
        double r26153 = b;
        double r26154 = r26152 + r26153;
        double r26155 = a;
        double r26156 = r26154 + r26155;
        return r26156;
}


double f_of(float a, float b, float c, float d, float e) {
        float r26157 = e;
        float r26158 = d;
        float r26159 = r26157 + r26158;
        float r26160 = c;
        float r26161 = r26159 + r26160;
        float r26162 = b;
        float r26163 = r26161 + r26162;
        float r26164 = a;
        float r26165 = r26163 + r26164;
        return r26165;
}

double f_od(double a, double b, double c, double d, double e) {
        double r26166 = e;
        double r26167 = d;
        double r26168 = r26166 + r26167;
        double r26169 = c;
        double r26170 = r26168 + r26169;
        double r26171 = b;
        double r26172 = r26170 + r26171;
        double r26173 = a;
        double r26174 = r26172 + r26173;
        return r26174;
}

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 r26175, r26176, r26177, r26178, r26179, r26180, r26181, r26182, r26183;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(336);
        mpfr_init(r26175);
        mpfr_init(r26176);
        mpfr_init(r26177);
        mpfr_init(r26178);
        mpfr_init(r26179);
        mpfr_init(r26180);
        mpfr_init(r26181);
        mpfr_init(r26182);
        mpfr_init(r26183);
}

double f_im(double a, double b, double c, double d, double e) {
        mpfr_set_d(r26175, e, MPFR_RNDN);
        mpfr_set_d(r26176, d, MPFR_RNDN);
        mpfr_add(r26177, r26175, r26176, MPFR_RNDN);
        mpfr_set_d(r26178, c, MPFR_RNDN);
        mpfr_add(r26179, r26177, r26178, MPFR_RNDN);
        mpfr_set_d(r26180, b, MPFR_RNDN);
        mpfr_add(r26181, r26179, r26180, MPFR_RNDN);
        mpfr_set_d(r26182, a, MPFR_RNDN);
        mpfr_add(r26183, r26181, r26182, MPFR_RNDN);
        return mpfr_get_d(r26183, MPFR_RNDN);
}

static mpfr_t r26184, r26185, r26186, r26187, r26188, r26189, r26190, r26191, r26192;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(336);
        mpfr_init(r26184);
        mpfr_init(r26185);
        mpfr_init(r26186);
        mpfr_init(r26187);
        mpfr_init(r26188);
        mpfr_init(r26189);
        mpfr_init(r26190);
        mpfr_init(r26191);
        mpfr_init(r26192);
}

double f_fm(double a, double b, double c, double d, double e) {
        mpfr_set_d(r26184, e, MPFR_RNDN);
        mpfr_set_d(r26185, d, MPFR_RNDN);
        mpfr_add(r26186, r26184, r26185, MPFR_RNDN);
        mpfr_set_d(r26187, c, MPFR_RNDN);
        mpfr_add(r26188, r26186, r26187, MPFR_RNDN);
        mpfr_set_d(r26189, b, MPFR_RNDN);
        mpfr_add(r26190, r26188, r26189, MPFR_RNDN);
        mpfr_set_d(r26191, a, MPFR_RNDN);
        mpfr_add(r26192, r26190, r26191, MPFR_RNDN);
        return mpfr_get_d(r26192, MPFR_RNDN);
}

static mpfr_t r26193, r26194, r26195, r26196, r26197, r26198, r26199, r26200, r26201;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(336);
        mpfr_init(r26193);
        mpfr_init(r26194);
        mpfr_init(r26195);
        mpfr_init(r26196);
        mpfr_init(r26197);
        mpfr_init(r26198);
        mpfr_init(r26199);
        mpfr_init(r26200);
        mpfr_init(r26201);
}

double f_dm(double a, double b, double c, double d, double e) {
        mpfr_set_d(r26193, e, MPFR_RNDN);
        mpfr_set_d(r26194, d, MPFR_RNDN);
        mpfr_add(r26195, r26193, r26194, MPFR_RNDN);
        mpfr_set_d(r26196, c, MPFR_RNDN);
        mpfr_add(r26197, r26195, r26196, MPFR_RNDN);
        mpfr_set_d(r26198, b, MPFR_RNDN);
        mpfr_add(r26199, r26197, r26198, MPFR_RNDN);
        mpfr_set_d(r26200, a, MPFR_RNDN);
        mpfr_add(r26201, r26199, r26200, MPFR_RNDN);
        return mpfr_get_d(r26201, MPFR_RNDN);
}