#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 r18910 = d1;
        float r18911 = 3.0f;
        float r18912 = r18910 * r18911;
        float r18913 = d2;
        float r18914 = r18910 * r18913;
        float r18915 = r18912 + r18914;
        float r18916 = d3;
        float r18917 = r18910 * r18916;
        float r18918 = r18915 + r18917;
        return r18918;
}

double f_id(double d1, double d2, double d3) {
        double r18919 = d1;
        double r18920 = 3.0;
        double r18921 = r18919 * r18920;
        double r18922 = d2;
        double r18923 = r18919 * r18922;
        double r18924 = r18921 + r18923;
        double r18925 = d3;
        double r18926 = r18919 * r18925;
        double r18927 = r18924 + r18926;
        return r18927;
}


double f_of(float d1, float d2, float d3) {
        float r18928 = d1;
        float r18929 = d3;
        float r18930 = 3.0f;
        float r18931 = r18929 + r18930;
        float r18932 = d2;
        float r18933 = r18928 * r18932;
        float r18934 = fma(r18928, r18931, r18933);
        return r18934;
}

double f_od(double d1, double d2, double d3) {
        double r18935 = d1;
        double r18936 = d3;
        double r18937 = 3.0;
        double r18938 = r18936 + r18937;
        double r18939 = d2;
        double r18940 = r18935 * r18939;
        double r18941 = fma(r18935, r18938, r18940);
        return r18941;
}

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 r18942, r18943, r18944, r18945, r18946, r18947, r18948, r18949, r18950;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init(r18942);
        mpfr_init_set_str(r18943, "3", 10, MPFR_RNDN);
        mpfr_init(r18944);
        mpfr_init(r18945);
        mpfr_init(r18946);
        mpfr_init(r18947);
        mpfr_init(r18948);
        mpfr_init(r18949);
        mpfr_init(r18950);
}

double f_im(double d1, double d2, double d3) {
        mpfr_set_d(r18942, d1, MPFR_RNDN);
        ;
        mpfr_mul(r18944, r18942, r18943, MPFR_RNDN);
        mpfr_set_d(r18945, d2, MPFR_RNDN);
        mpfr_mul(r18946, r18942, r18945, MPFR_RNDN);
        mpfr_add(r18947, r18944, r18946, MPFR_RNDN);
        mpfr_set_d(r18948, d3, MPFR_RNDN);
        mpfr_mul(r18949, r18942, r18948, MPFR_RNDN);
        mpfr_add(r18950, r18947, r18949, MPFR_RNDN);
        return mpfr_get_d(r18950, MPFR_RNDN);
}

static mpfr_t r18951, r18952, r18953, r18954, r18955, r18956, r18957;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r18951);
        mpfr_init(r18952);
        mpfr_init_set_str(r18953, "3", 10, MPFR_RNDN);
        mpfr_init(r18954);
        mpfr_init(r18955);
        mpfr_init(r18956);
        mpfr_init(r18957);
}

double f_fm(double d1, double d2, double d3) {
        mpfr_set_d(r18951, d1, MPFR_RNDN);
        mpfr_set_d(r18952, d3, MPFR_RNDN);
        ;
        mpfr_add(r18954, r18952, r18953, MPFR_RNDN);
        mpfr_set_d(r18955, d2, MPFR_RNDN);
        mpfr_mul(r18956, r18951, r18955, MPFR_RNDN);
        mpfr_fma(r18957, r18951, r18954, r18956, MPFR_RNDN);
        return mpfr_get_d(r18957, MPFR_RNDN);
}

static mpfr_t r18958, r18959, r18960, r18961, r18962, r18963, r18964;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r18958);
        mpfr_init(r18959);
        mpfr_init_set_str(r18960, "3", 10, MPFR_RNDN);
        mpfr_init(r18961);
        mpfr_init(r18962);
        mpfr_init(r18963);
        mpfr_init(r18964);
}

double f_dm(double d1, double d2, double d3) {
        mpfr_set_d(r18958, d1, MPFR_RNDN);
        mpfr_set_d(r18959, d3, MPFR_RNDN);
        ;
        mpfr_add(r18961, r18959, r18960, MPFR_RNDN);
        mpfr_set_d(r18962, d2, MPFR_RNDN);
        mpfr_mul(r18963, r18958, r18962, MPFR_RNDN);
        mpfr_fma(r18964, r18958, r18961, r18963, MPFR_RNDN);
        return mpfr_get_d(r18964, MPFR_RNDN);
}

