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

char *name = "Diagrams.Segment:$catParam from diagrams-lib-1.3.0.3, A";

double f_if(float x, float y) {
        float r55232 = x;
        float r55233 = 3.0;
        float r55234 = r55232 * r55233;
        float r55235 = r55234 * r55232;
        float r55236 = y;
        float r55237 = r55235 * r55236;
        return r55237;
}

double f_id(double x, double y) {
        double r55238 = x;
        double r55239 = 3.0;
        double r55240 = r55238 * r55239;
        double r55241 = r55240 * r55238;
        double r55242 = y;
        double r55243 = r55241 * r55242;
        return r55243;
}


double f_of(float x, float y) {
        float r55244 = x;
        float r55245 = 3.0;
        float r55246 = y;
        float r55247 = r55244 * r55246;
        float r55248 = r55245 * r55247;
        float r55249 = r55244 * r55248;
        return r55249;
}

double f_od(double x, double y) {
        double r55250 = x;
        double r55251 = 3.0;
        double r55252 = y;
        double r55253 = r55250 * r55252;
        double r55254 = r55251 * r55253;
        double r55255 = r55250 * r55254;
        return r55255;
}

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 r55256, r55257, r55258, r55259, r55260, r55261;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r55256);
        mpfr_init_set_str(r55257, "3.0", 10, MPFR_RNDN);
        mpfr_init(r55258);
        mpfr_init(r55259);
        mpfr_init(r55260);
        mpfr_init(r55261);
}

double f_im(double x, double y) {
        mpfr_set_d(r55256, x, MPFR_RNDN);
        ;
        mpfr_mul(r55258, r55256, r55257, MPFR_RNDN);
        mpfr_mul(r55259, r55258, r55256, MPFR_RNDN);
        mpfr_set_d(r55260, y, MPFR_RNDN);
        mpfr_mul(r55261, r55259, r55260, MPFR_RNDN);
        return mpfr_get_d(r55261, MPFR_RNDN);
}

static mpfr_t r55262, r55263, r55264, r55265, r55266, r55267;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r55262);
        mpfr_init_set_str(r55263, "3.0", 10, MPFR_RNDN);
        mpfr_init(r55264);
        mpfr_init(r55265);
        mpfr_init(r55266);
        mpfr_init(r55267);
}

double f_fm(double x, double y) {
        mpfr_set_d(r55262, x, MPFR_RNDN);
        ;
        mpfr_set_d(r55264, y, MPFR_RNDN);
        mpfr_mul(r55265, r55262, r55264, MPFR_RNDN);
        mpfr_mul(r55266, r55263, r55265, MPFR_RNDN);
        mpfr_mul(r55267, r55262, r55266, MPFR_RNDN);
        return mpfr_get_d(r55267, MPFR_RNDN);
}

static mpfr_t r55268, r55269, r55270, r55271, r55272, r55273;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r55268);
        mpfr_init_set_str(r55269, "3.0", 10, MPFR_RNDN);
        mpfr_init(r55270);
        mpfr_init(r55271);
        mpfr_init(r55272);
        mpfr_init(r55273);
}

double f_dm(double x, double y) {
        mpfr_set_d(r55268, x, MPFR_RNDN);
        ;
        mpfr_set_d(r55270, y, MPFR_RNDN);
        mpfr_mul(r55271, r55268, r55270, MPFR_RNDN);
        mpfr_mul(r55272, r55269, r55271, MPFR_RNDN);
        mpfr_mul(r55273, r55268, r55272, MPFR_RNDN);
        return mpfr_get_d(r55273, MPFR_RNDN);
}