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

char *name = "fabs fraction 2";

double f_if(float a, float b) {
        float r8543 = a;
        float r8544 = b;
        float r8545 = r8543 - r8544;
        float r8546 = fabs(r8545);
        float r8547 = 2;
        float r8548 = r8546 / r8547;
        return r8548;
}

double f_id(double a, double b) {
        double r8549 = a;
        double r8550 = b;
        double r8551 = r8549 - r8550;
        double r8552 = fabs(r8551);
        double r8553 = 2;
        double r8554 = r8552 / r8553;
        return r8554;
}


double f_of(float a, float b) {
        float r8555 = a;
        float r8556 = b;
        float r8557 = r8555 - r8556;
        float r8558 = fabs(r8557);
        float r8559 = 2;
        float r8560 = r8558 / r8559;
        return r8560;
}

double f_od(double a, double b) {
        double r8561 = a;
        double r8562 = b;
        double r8563 = r8561 - r8562;
        double r8564 = fabs(r8563);
        double r8565 = 2;
        double r8566 = r8564 / r8565;
        return r8566;
}

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 r8567, r8568, r8569, r8570, r8571, r8572;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(336);
        mpfr_init(r8567);
        mpfr_init(r8568);
        mpfr_init(r8569);
        mpfr_init(r8570);
        mpfr_init_set_str(r8571, "2", 10, MPFR_RNDN);
        mpfr_init(r8572);
}

double f_im(double a, double b) {
        mpfr_set_d(r8567, a, MPFR_RNDN);
        mpfr_set_d(r8568, b, MPFR_RNDN);
        mpfr_sub(r8569, r8567, r8568, MPFR_RNDN);
        mpfr_abs(r8570, r8569, MPFR_RNDN);
        ;
        mpfr_div(r8572, r8570, r8571, MPFR_RNDN);
        return mpfr_get_d(r8572, MPFR_RNDN);
}

static mpfr_t r8573, r8574, r8575, r8576, r8577, r8578;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(336);
        mpfr_init(r8573);
        mpfr_init(r8574);
        mpfr_init(r8575);
        mpfr_init(r8576);
        mpfr_init_set_str(r8577, "2", 10, MPFR_RNDN);
        mpfr_init(r8578);
}

double f_fm(double a, double b) {
        mpfr_set_d(r8573, a, MPFR_RNDN);
        mpfr_set_d(r8574, b, MPFR_RNDN);
        mpfr_sub(r8575, r8573, r8574, MPFR_RNDN);
        mpfr_abs(r8576, r8575, MPFR_RNDN);
        ;
        mpfr_div(r8578, r8576, r8577, MPFR_RNDN);
        return mpfr_get_d(r8578, MPFR_RNDN);
}

static mpfr_t r8579, r8580, r8581, r8582, r8583, r8584;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(336);
        mpfr_init(r8579);
        mpfr_init(r8580);
        mpfr_init(r8581);
        mpfr_init(r8582);
        mpfr_init_set_str(r8583, "2", 10, MPFR_RNDN);
        mpfr_init(r8584);
}

double f_dm(double a, double b) {
        mpfr_set_d(r8579, a, MPFR_RNDN);
        mpfr_set_d(r8580, b, MPFR_RNDN);
        mpfr_sub(r8581, r8579, r8580, MPFR_RNDN);
        mpfr_abs(r8582, r8581, MPFR_RNDN);
        ;
        mpfr_div(r8584, r8582, r8583, MPFR_RNDN);
        return mpfr_get_d(r8584, MPFR_RNDN);
}