#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 r23774 = a;
        float r23775 = r23774 * r23774;
        float r23776 = b;
        float r23777 = r23776 * r23776;
        float r23778 = r23775 - r23777;
        return r23778;
}

double f_id(double a, double b) {
        double r23779 = a;
        double r23780 = r23779 * r23779;
        double r23781 = b;
        double r23782 = r23781 * r23781;
        double r23783 = r23780 - r23782;
        return r23783;
}


double f_of(float a, float b) {
        float r23784 = a;
        float r23785 = r23784 * r23784;
        float r23786 = b;
        float r23787 = r23786 * r23786;
        float r23788 = r23785 - r23787;
        return r23788;
}

double f_od(double a, double b) {
        double r23789 = a;
        double r23790 = r23789 * r23789;
        double r23791 = b;
        double r23792 = r23791 * r23791;
        double r23793 = r23790 - r23792;
        return r23793;
}

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 r23794, r23795, r23796, r23797, r23798;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r23794);
        mpfr_init(r23795);
        mpfr_init(r23796);
        mpfr_init(r23797);
        mpfr_init(r23798);
}

double f_im(double a, double b) {
        mpfr_set_d(r23794, a, MPFR_RNDN);
        mpfr_mul(r23795, r23794, r23794, MPFR_RNDN);
        mpfr_set_d(r23796, b, MPFR_RNDN);
        mpfr_mul(r23797, r23796, r23796, MPFR_RNDN);
        mpfr_sub(r23798, r23795, r23797, MPFR_RNDN);
        return mpfr_get_d(r23798, MPFR_RNDN);
}

static mpfr_t r23799, r23800, r23801, r23802, r23803;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r23799);
        mpfr_init(r23800);
        mpfr_init(r23801);
        mpfr_init(r23802);
        mpfr_init(r23803);
}

double f_fm(double a, double b) {
        mpfr_set_d(r23799, a, MPFR_RNDN);
        mpfr_mul(r23800, r23799, r23799, MPFR_RNDN);
        mpfr_set_d(r23801, b, MPFR_RNDN);
        mpfr_mul(r23802, r23801, r23801, MPFR_RNDN);
        mpfr_sub(r23803, r23800, r23802, MPFR_RNDN);
        return mpfr_get_d(r23803, MPFR_RNDN);
}

static mpfr_t r23804, r23805, r23806, r23807, r23808;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r23804);
        mpfr_init(r23805);
        mpfr_init(r23806);
        mpfr_init(r23807);
        mpfr_init(r23808);
}

double f_dm(double a, double b) {
        mpfr_set_d(r23804, a, MPFR_RNDN);
        mpfr_mul(r23805, r23804, r23804, MPFR_RNDN);
        mpfr_set_d(r23806, b, MPFR_RNDN);
        mpfr_mul(r23807, r23806, r23806, MPFR_RNDN);
        mpfr_sub(r23808, r23805, r23807, MPFR_RNDN);
        return mpfr_get_d(r23808, MPFR_RNDN);
}