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

char *name = "Expression 4, p15";

double f_if(float a, float b) {
        float r25757 = a;
        float r25758 = b;
        float r25759 = r25757 + r25758;
        float r25760 = r25759 * r25759;
        return r25760;
}

double f_id(double a, double b) {
        double r25761 = a;
        double r25762 = b;
        double r25763 = r25761 + r25762;
        double r25764 = r25763 * r25763;
        return r25764;
}


double f_of(float a, float b) {
        float r25765 = a;
        float r25766 = b;
        float r25767 = r25765 + r25766;
        float r25768 = r25767 * r25767;
        return r25768;
}

double f_od(double a, double b) {
        double r25769 = a;
        double r25770 = b;
        double r25771 = r25769 + r25770;
        double r25772 = r25771 * r25771;
        return r25772;
}

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 r25773, r25774, r25775, r25776;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(592);
        mpfr_init(r25773);
        mpfr_init(r25774);
        mpfr_init(r25775);
        mpfr_init(r25776);
}

double f_im(double a, double b) {
        mpfr_set_d(r25773, a, MPFR_RNDN);
        mpfr_set_d(r25774, b, MPFR_RNDN);
        mpfr_add(r25775, r25773, r25774, MPFR_RNDN);
        mpfr_mul(r25776, r25775, r25775, MPFR_RNDN);
        return mpfr_get_d(r25776, MPFR_RNDN);
}

static mpfr_t r25777, r25778, r25779, r25780;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(592);
        mpfr_init(r25777);
        mpfr_init(r25778);
        mpfr_init(r25779);
        mpfr_init(r25780);
}

double f_fm(double a, double b) {
        mpfr_set_d(r25777, a, MPFR_RNDN);
        mpfr_set_d(r25778, b, MPFR_RNDN);
        mpfr_add(r25779, r25777, r25778, MPFR_RNDN);
        mpfr_mul(r25780, r25779, r25779, MPFR_RNDN);
        return mpfr_get_d(r25780, MPFR_RNDN);
}

static mpfr_t r25781, r25782, r25783, r25784;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(592);
        mpfr_init(r25781);
        mpfr_init(r25782);
        mpfr_init(r25783);
        mpfr_init(r25784);
}

double f_dm(double a, double b) {
        mpfr_set_d(r25781, a, MPFR_RNDN);
        mpfr_set_d(r25782, b, MPFR_RNDN);
        mpfr_add(r25783, r25781, r25782, MPFR_RNDN);
        mpfr_mul(r25784, r25783, r25783, MPFR_RNDN);
        return mpfr_get_d(r25784, MPFR_RNDN);
}