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

char *name = "Difference of squares";

double f_if(float a, float b) {
        float r25979 = a;
        float r25980 = r25979 * r25979;
        float r25981 = b;
        float r25982 = r25981 * r25981;
        float r25983 = r25980 - r25982;
        return r25983;
}

double f_id(double a, double b) {
        double r25984 = a;
        double r25985 = r25984 * r25984;
        double r25986 = b;
        double r25987 = r25986 * r25986;
        double r25988 = r25985 - r25987;
        return r25988;
}


double f_of(float a, float b) {
        float r25989 = a;
        float r25990 = b;
        float r25991 = r25990 * r25990;
        float r25992 = -r25991;
        float r25993 = fma(r25989, r25989, r25992);
        float r25994 = -r25990;
        float r25995 = fma(r25994, r25990, r25991);
        float r25996 = r25993 + r25995;
        return r25996;
}

double f_od(double a, double b) {
        double r25997 = a;
        double r25998 = b;
        double r25999 = r25998 * r25998;
        double r26000 = -r25999;
        double r26001 = fma(r25997, r25997, r26000);
        double r26002 = -r25998;
        double r26003 = fma(r26002, r25998, r25999);
        double r26004 = r26001 + r26003;
        return r26004;
}

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 r26005, r26006, r26007, r26008, r26009;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(336);
        mpfr_init(r26005);
        mpfr_init(r26006);
        mpfr_init(r26007);
        mpfr_init(r26008);
        mpfr_init(r26009);
}

double f_im(double a, double b) {
        mpfr_set_d(r26005, a, MPFR_RNDN);
        mpfr_mul(r26006, r26005, r26005, MPFR_RNDN);
        mpfr_set_d(r26007, b, MPFR_RNDN);
        mpfr_mul(r26008, r26007, r26007, MPFR_RNDN);
        mpfr_sub(r26009, r26006, r26008, MPFR_RNDN);
        return mpfr_get_d(r26009, MPFR_RNDN);
}

static mpfr_t r26010, r26011, r26012, r26013, r26014, r26015, r26016, r26017;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(336);
        mpfr_init(r26010);
        mpfr_init(r26011);
        mpfr_init(r26012);
        mpfr_init(r26013);
        mpfr_init(r26014);
        mpfr_init(r26015);
        mpfr_init(r26016);
        mpfr_init(r26017);
}

double f_fm(double a, double b) {
        mpfr_set_d(r26010, a, MPFR_RNDN);
        mpfr_set_d(r26011, b, MPFR_RNDN);
        mpfr_mul(r26012, r26011, r26011, MPFR_RNDN);
        mpfr_neg(r26013, r26012, MPFR_RNDN);
        mpfr_fma(r26014, r26010, r26010, r26013, MPFR_RNDN);
        mpfr_neg(r26015, r26011, MPFR_RNDN);
        mpfr_fma(r26016, r26015, r26011, r26012, MPFR_RNDN);
        mpfr_add(r26017, r26014, r26016, MPFR_RNDN);
        return mpfr_get_d(r26017, MPFR_RNDN);
}

static mpfr_t r26018, r26019, r26020, r26021, r26022, r26023, r26024, r26025;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(336);
        mpfr_init(r26018);
        mpfr_init(r26019);
        mpfr_init(r26020);
        mpfr_init(r26021);
        mpfr_init(r26022);
        mpfr_init(r26023);
        mpfr_init(r26024);
        mpfr_init(r26025);
}

double f_dm(double a, double b) {
        mpfr_set_d(r26018, a, MPFR_RNDN);
        mpfr_set_d(r26019, b, MPFR_RNDN);
        mpfr_mul(r26020, r26019, r26019, MPFR_RNDN);
        mpfr_neg(r26021, r26020, MPFR_RNDN);
        mpfr_fma(r26022, r26018, r26018, r26021, MPFR_RNDN);
        mpfr_neg(r26023, r26019, MPFR_RNDN);
        mpfr_fma(r26024, r26023, r26019, r26020, MPFR_RNDN);
        mpfr_add(r26025, r26022, r26024, MPFR_RNDN);
        return mpfr_get_d(r26025, MPFR_RNDN);
}

