#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 r26073 = a;
        float r26074 = r26073 * r26073;
        float r26075 = b;
        float r26076 = r26075 * r26075;
        float r26077 = r26074 - r26076;
        return r26077;
}

double f_id(double a, double b) {
        double r26078 = a;
        double r26079 = r26078 * r26078;
        double r26080 = b;
        double r26081 = r26080 * r26080;
        double r26082 = r26079 - r26081;
        return r26082;
}


double f_of(float a, float b) {
        float r26083 = a;
        float r26084 = b;
        float r26085 = r26084 * r26084;
        float r26086 = -r26085;
        float r26087 = fma(r26083, r26083, r26086);
        float r26088 = -r26084;
        float r26089 = fma(r26088, r26084, r26085);
        float r26090 = r26087 + r26089;
        return r26090;
}

double f_od(double a, double b) {
        double r26091 = a;
        double r26092 = b;
        double r26093 = r26092 * r26092;
        double r26094 = -r26093;
        double r26095 = fma(r26091, r26091, r26094);
        double r26096 = -r26092;
        double r26097 = fma(r26096, r26092, r26093);
        double r26098 = r26095 + r26097;
        return r26098;
}

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 r26099, r26100, r26101, r26102, r26103;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(592);
        mpfr_init(r26099);
        mpfr_init(r26100);
        mpfr_init(r26101);
        mpfr_init(r26102);
        mpfr_init(r26103);
}

double f_im(double a, double b) {
        mpfr_set_d(r26099, a, MPFR_RNDN);
        mpfr_mul(r26100, r26099, r26099, MPFR_RNDN);
        mpfr_set_d(r26101, b, MPFR_RNDN);
        mpfr_mul(r26102, r26101, r26101, MPFR_RNDN);
        mpfr_sub(r26103, r26100, r26102, MPFR_RNDN);
        return mpfr_get_d(r26103, MPFR_RNDN);
}

static mpfr_t r26104, r26105, r26106, r26107, r26108, r26109, r26110, r26111;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(592);
        mpfr_init(r26104);
        mpfr_init(r26105);
        mpfr_init(r26106);
        mpfr_init(r26107);
        mpfr_init(r26108);
        mpfr_init(r26109);
        mpfr_init(r26110);
        mpfr_init(r26111);
}

double f_fm(double a, double b) {
        mpfr_set_d(r26104, a, MPFR_RNDN);
        mpfr_set_d(r26105, b, MPFR_RNDN);
        mpfr_mul(r26106, r26105, r26105, MPFR_RNDN);
        mpfr_neg(r26107, r26106, MPFR_RNDN);
        mpfr_fma(r26108, r26104, r26104, r26107, MPFR_RNDN);
        mpfr_neg(r26109, r26105, MPFR_RNDN);
        mpfr_fma(r26110, r26109, r26105, r26106, MPFR_RNDN);
        mpfr_add(r26111, r26108, r26110, MPFR_RNDN);
        return mpfr_get_d(r26111, MPFR_RNDN);
}

static mpfr_t r26112, r26113, r26114, r26115, r26116, r26117, r26118, r26119;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(592);
        mpfr_init(r26112);
        mpfr_init(r26113);
        mpfr_init(r26114);
        mpfr_init(r26115);
        mpfr_init(r26116);
        mpfr_init(r26117);
        mpfr_init(r26118);
        mpfr_init(r26119);
}

double f_dm(double a, double b) {
        mpfr_set_d(r26112, a, MPFR_RNDN);
        mpfr_set_d(r26113, b, MPFR_RNDN);
        mpfr_mul(r26114, r26113, r26113, MPFR_RNDN);
        mpfr_neg(r26115, r26114, MPFR_RNDN);
        mpfr_fma(r26116, r26112, r26112, r26115, MPFR_RNDN);
        mpfr_neg(r26117, r26113, MPFR_RNDN);
        mpfr_fma(r26118, r26117, r26113, r26114, MPFR_RNDN);
        mpfr_add(r26119, r26116, r26118, MPFR_RNDN);
        return mpfr_get_d(r26119, MPFR_RNDN);
}