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

char *name = "FastMath dist";

double f_if(float d1, float d2, float d3) {
        float r25474 = d1;
        float r25475 = d2;
        float r25476 = r25474 * r25475;
        float r25477 = d3;
        float r25478 = r25474 * r25477;
        float r25479 = r25476 + r25478;
        return r25479;
}

double f_id(double d1, double d2, double d3) {
        double r25480 = d1;
        double r25481 = d2;
        double r25482 = r25480 * r25481;
        double r25483 = d3;
        double r25484 = r25480 * r25483;
        double r25485 = r25482 + r25484;
        return r25485;
}


double f_of(float d1, float d2, float d3) {
        float r25486 = d1;
        float r25487 = d2;
        float r25488 = r25486 * r25487;
        float r25489 = d3;
        float r25490 = r25486 * r25489;
        float r25491 = r25488 + r25490;
        return r25491;
}

double f_od(double d1, double d2, double d3) {
        double r25492 = d1;
        double r25493 = d2;
        double r25494 = r25492 * r25493;
        double r25495 = d3;
        double r25496 = r25492 * r25495;
        double r25497 = r25494 + r25496;
        return r25497;
}

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 r25498, r25499, r25500, r25501, r25502, r25503;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r25498);
        mpfr_init(r25499);
        mpfr_init(r25500);
        mpfr_init(r25501);
        mpfr_init(r25502);
        mpfr_init(r25503);
}

double f_im(double d1, double d2, double d3) {
        mpfr_set_d(r25498, d1, MPFR_RNDN);
        mpfr_set_d(r25499, d2, MPFR_RNDN);
        mpfr_mul(r25500, r25498, r25499, MPFR_RNDN);
        mpfr_set_d(r25501, d3, MPFR_RNDN);
        mpfr_mul(r25502, r25498, r25501, MPFR_RNDN);
        mpfr_add(r25503, r25500, r25502, MPFR_RNDN);
        return mpfr_get_d(r25503, MPFR_RNDN);
}

static mpfr_t r25504, r25505, r25506, r25507, r25508, r25509;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r25504);
        mpfr_init(r25505);
        mpfr_init(r25506);
        mpfr_init(r25507);
        mpfr_init(r25508);
        mpfr_init(r25509);
}

double f_fm(double d1, double d2, double d3) {
        mpfr_set_d(r25504, d1, MPFR_RNDN);
        mpfr_set_d(r25505, d2, MPFR_RNDN);
        mpfr_mul(r25506, r25504, r25505, MPFR_RNDN);
        mpfr_set_d(r25507, d3, MPFR_RNDN);
        mpfr_mul(r25508, r25504, r25507, MPFR_RNDN);
        mpfr_add(r25509, r25506, r25508, MPFR_RNDN);
        return mpfr_get_d(r25509, MPFR_RNDN);
}

static mpfr_t r25510, r25511, r25512, r25513, r25514, r25515;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r25510);
        mpfr_init(r25511);
        mpfr_init(r25512);
        mpfr_init(r25513);
        mpfr_init(r25514);
        mpfr_init(r25515);
}

double f_dm(double d1, double d2, double d3) {
        mpfr_set_d(r25510, d1, MPFR_RNDN);
        mpfr_set_d(r25511, d2, MPFR_RNDN);
        mpfr_mul(r25512, r25510, r25511, MPFR_RNDN);
        mpfr_set_d(r25513, d3, MPFR_RNDN);
        mpfr_mul(r25514, r25510, r25513, MPFR_RNDN);
        mpfr_add(r25515, r25512, r25514, MPFR_RNDN);
        return mpfr_get_d(r25515, MPFR_RNDN);
}

