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

char *name = "FastMath test3";

double f_if(float d1, float d2, float d3) {
        float r20374 = d1;
        float r20375 = 3.0f;
        float r20376 = r20374 * r20375;
        float r20377 = d2;
        float r20378 = r20374 * r20377;
        float r20379 = r20376 + r20378;
        float r20380 = d3;
        float r20381 = r20374 * r20380;
        float r20382 = r20379 + r20381;
        return r20382;
}

double f_id(double d1, double d2, double d3) {
        double r20383 = d1;
        double r20384 = 3.0;
        double r20385 = r20383 * r20384;
        double r20386 = d2;
        double r20387 = r20383 * r20386;
        double r20388 = r20385 + r20387;
        double r20389 = d3;
        double r20390 = r20383 * r20389;
        double r20391 = r20388 + r20390;
        return r20391;
}


double f_of(float d1, float d2, float d3) {
        float r20392 = d1;
        float r20393 = 3.0f;
        float r20394 = d2;
        float r20395 = r20393 + r20394;
        float r20396 = r20392 * r20395;
        float r20397 = d3;
        float r20398 = r20392 * r20397;
        float r20399 = r20396 + r20398;
        return r20399;
}

double f_od(double d1, double d2, double d3) {
        double r20400 = d1;
        double r20401 = 3.0;
        double r20402 = d2;
        double r20403 = r20401 + r20402;
        double r20404 = r20400 * r20403;
        double r20405 = d3;
        double r20406 = r20400 * r20405;
        double r20407 = r20404 + r20406;
        return r20407;
}

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 r20408, r20409, r20410, r20411, r20412, r20413, r20414, r20415, r20416;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init(r20408);
        mpfr_init_set_str(r20409, "3", 10, MPFR_RNDN);
        mpfr_init(r20410);
        mpfr_init(r20411);
        mpfr_init(r20412);
        mpfr_init(r20413);
        mpfr_init(r20414);
        mpfr_init(r20415);
        mpfr_init(r20416);
}

double f_im(double d1, double d2, double d3) {
        mpfr_set_d(r20408, d1, MPFR_RNDN);
        ;
        mpfr_mul(r20410, r20408, r20409, MPFR_RNDN);
        mpfr_set_d(r20411, d2, MPFR_RNDN);
        mpfr_mul(r20412, r20408, r20411, MPFR_RNDN);
        mpfr_add(r20413, r20410, r20412, MPFR_RNDN);
        mpfr_set_d(r20414, d3, MPFR_RNDN);
        mpfr_mul(r20415, r20408, r20414, MPFR_RNDN);
        mpfr_add(r20416, r20413, r20415, MPFR_RNDN);
        return mpfr_get_d(r20416, MPFR_RNDN);
}

static mpfr_t r20417, r20418, r20419, r20420, r20421, r20422, r20423, r20424;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r20417);
        mpfr_init_set_str(r20418, "3", 10, MPFR_RNDN);
        mpfr_init(r20419);
        mpfr_init(r20420);
        mpfr_init(r20421);
        mpfr_init(r20422);
        mpfr_init(r20423);
        mpfr_init(r20424);
}

double f_fm(double d1, double d2, double d3) {
        mpfr_set_d(r20417, d1, MPFR_RNDN);
        ;
        mpfr_set_d(r20419, d2, MPFR_RNDN);
        mpfr_add(r20420, r20418, r20419, MPFR_RNDN);
        mpfr_mul(r20421, r20417, r20420, MPFR_RNDN);
        mpfr_set_d(r20422, d3, MPFR_RNDN);
        mpfr_mul(r20423, r20417, r20422, MPFR_RNDN);
        mpfr_add(r20424, r20421, r20423, MPFR_RNDN);
        return mpfr_get_d(r20424, MPFR_RNDN);
}

static mpfr_t r20425, r20426, r20427, r20428, r20429, r20430, r20431, r20432;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r20425);
        mpfr_init_set_str(r20426, "3", 10, MPFR_RNDN);
        mpfr_init(r20427);
        mpfr_init(r20428);
        mpfr_init(r20429);
        mpfr_init(r20430);
        mpfr_init(r20431);
        mpfr_init(r20432);
}

double f_dm(double d1, double d2, double d3) {
        mpfr_set_d(r20425, d1, MPFR_RNDN);
        ;
        mpfr_set_d(r20427, d2, MPFR_RNDN);
        mpfr_add(r20428, r20426, r20427, MPFR_RNDN);
        mpfr_mul(r20429, r20425, r20428, MPFR_RNDN);
        mpfr_set_d(r20430, d3, MPFR_RNDN);
        mpfr_mul(r20431, r20425, r20430, MPFR_RNDN);
        mpfr_add(r20432, r20429, r20431, MPFR_RNDN);
        return mpfr_get_d(r20432, MPFR_RNDN);
}