#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 r26133 = e;
        float r26134 = d;
        float r26135 = r26133 + r26134;
        float r26136 = c;
        float r26137 = r26135 + r26136;
        float r26138 = b;
        float r26139 = r26137 + r26138;
        float r26140 = a;
        float r26141 = r26139 + r26140;
        return r26141;
}

double f_id(double a, double b, double c, double d, double e) {
        double r26142 = e;
        double r26143 = d;
        double r26144 = r26142 + r26143;
        double r26145 = c;
        double r26146 = r26144 + r26145;
        double r26147 = b;
        double r26148 = r26146 + r26147;
        double r26149 = a;
        double r26150 = r26148 + r26149;
        return r26150;
}


double f_of(float a, float b, float c, float d, float e) {
        float r26151 = e;
        float r26152 = d;
        float r26153 = c;
        float r26154 = r26152 + r26153;
        float r26155 = r26151 + r26154;
        float r26156 = b;
        float r26157 = r26155 + r26156;
        float r26158 = a;
        float r26159 = r26157 + r26158;
        return r26159;
}

double f_od(double a, double b, double c, double d, double e) {
        double r26160 = e;
        double r26161 = d;
        double r26162 = c;
        double r26163 = r26161 + r26162;
        double r26164 = r26160 + r26163;
        double r26165 = b;
        double r26166 = r26164 + r26165;
        double r26167 = a;
        double r26168 = r26166 + r26167;
        return r26168;
}

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 r26169, r26170, r26171, r26172, r26173, r26174, r26175, r26176, r26177;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(336);
        mpfr_init(r26169);
        mpfr_init(r26170);
        mpfr_init(r26171);
        mpfr_init(r26172);
        mpfr_init(r26173);
        mpfr_init(r26174);
        mpfr_init(r26175);
        mpfr_init(r26176);
        mpfr_init(r26177);
}

double f_im(double a, double b, double c, double d, double e) {
        mpfr_set_d(r26169, e, MPFR_RNDN);
        mpfr_set_d(r26170, d, MPFR_RNDN);
        mpfr_add(r26171, r26169, r26170, MPFR_RNDN);
        mpfr_set_d(r26172, c, MPFR_RNDN);
        mpfr_add(r26173, r26171, r26172, MPFR_RNDN);
        mpfr_set_d(r26174, b, MPFR_RNDN);
        mpfr_add(r26175, r26173, r26174, MPFR_RNDN);
        mpfr_set_d(r26176, a, MPFR_RNDN);
        mpfr_add(r26177, r26175, r26176, MPFR_RNDN);
        return mpfr_get_d(r26177, MPFR_RNDN);
}

static mpfr_t r26178, r26179, r26180, r26181, r26182, r26183, r26184, r26185, r26186;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(336);
        mpfr_init(r26178);
        mpfr_init(r26179);
        mpfr_init(r26180);
        mpfr_init(r26181);
        mpfr_init(r26182);
        mpfr_init(r26183);
        mpfr_init(r26184);
        mpfr_init(r26185);
        mpfr_init(r26186);
}

double f_fm(double a, double b, double c, double d, double e) {
        mpfr_set_d(r26178, e, MPFR_RNDN);
        mpfr_set_d(r26179, d, MPFR_RNDN);
        mpfr_set_d(r26180, c, MPFR_RNDN);
        mpfr_add(r26181, r26179, r26180, MPFR_RNDN);
        mpfr_add(r26182, r26178, r26181, MPFR_RNDN);
        mpfr_set_d(r26183, b, MPFR_RNDN);
        mpfr_add(r26184, r26182, r26183, MPFR_RNDN);
        mpfr_set_d(r26185, a, MPFR_RNDN);
        mpfr_add(r26186, r26184, r26185, MPFR_RNDN);
        return mpfr_get_d(r26186, MPFR_RNDN);
}

static mpfr_t r26187, r26188, r26189, r26190, r26191, r26192, r26193, r26194, r26195;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(336);
        mpfr_init(r26187);
        mpfr_init(r26188);
        mpfr_init(r26189);
        mpfr_init(r26190);
        mpfr_init(r26191);
        mpfr_init(r26192);
        mpfr_init(r26193);
        mpfr_init(r26194);
        mpfr_init(r26195);
}

double f_dm(double a, double b, double c, double d, double e) {
        mpfr_set_d(r26187, e, MPFR_RNDN);
        mpfr_set_d(r26188, d, MPFR_RNDN);
        mpfr_set_d(r26189, c, MPFR_RNDN);
        mpfr_add(r26190, r26188, r26189, MPFR_RNDN);
        mpfr_add(r26191, r26187, r26190, MPFR_RNDN);
        mpfr_set_d(r26192, b, MPFR_RNDN);
        mpfr_add(r26193, r26191, r26192, MPFR_RNDN);
        mpfr_set_d(r26194, a, MPFR_RNDN);
        mpfr_add(r26195, r26193, r26194, MPFR_RNDN);
        return mpfr_get_d(r26195, MPFR_RNDN);
}