#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 r26052 = a;
        float r26053 = b;
        float r26054 = r26052 + r26053;
        float r26055 = r26054 * r26054;
        return r26055;
}

double f_id(double a, double b) {
        double r26056 = a;
        double r26057 = b;
        double r26058 = r26056 + r26057;
        double r26059 = r26058 * r26058;
        return r26059;
}


double f_of(float a, float b) {
        float r26060 = a;
        float r26061 = b;
        float r26062 = r26060 + r26061;
        float r26063 = r26062 * r26062;
        return r26063;
}

double f_od(double a, double b) {
        double r26064 = a;
        double r26065 = b;
        double r26066 = r26064 + r26065;
        double r26067 = r26066 * r26066;
        return r26067;
}

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 r26068, r26069, r26070, r26071;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(336);
        mpfr_init(r26068);
        mpfr_init(r26069);
        mpfr_init(r26070);
        mpfr_init(r26071);
}

double f_im(double a, double b) {
        mpfr_set_d(r26068, a, MPFR_RNDN);
        mpfr_set_d(r26069, b, MPFR_RNDN);
        mpfr_add(r26070, r26068, r26069, MPFR_RNDN);
        mpfr_mul(r26071, r26070, r26070, MPFR_RNDN);
        return mpfr_get_d(r26071, MPFR_RNDN);
}

static mpfr_t r26072, r26073, r26074, r26075;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(336);
        mpfr_init(r26072);
        mpfr_init(r26073);
        mpfr_init(r26074);
        mpfr_init(r26075);
}

double f_fm(double a, double b) {
        mpfr_set_d(r26072, a, MPFR_RNDN);
        mpfr_set_d(r26073, b, MPFR_RNDN);
        mpfr_add(r26074, r26072, r26073, MPFR_RNDN);
        mpfr_mul(r26075, r26074, r26074, MPFR_RNDN);
        return mpfr_get_d(r26075, MPFR_RNDN);
}

static mpfr_t r26076, r26077, r26078, r26079;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(336);
        mpfr_init(r26076);
        mpfr_init(r26077);
        mpfr_init(r26078);
        mpfr_init(r26079);
}

double f_dm(double a, double b) {
        mpfr_set_d(r26076, a, MPFR_RNDN);
        mpfr_set_d(r26077, b, MPFR_RNDN);
        mpfr_add(r26078, r26076, r26077, MPFR_RNDN);
        mpfr_mul(r26079, r26078, r26078, MPFR_RNDN);
        return mpfr_get_d(r26079, MPFR_RNDN);
}