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

char *name = "Graphics.Rendering.Chart.Backend.Diagrams:calcFontMetrics from Chart-diagrams-1.5.1";

double f_if(float x, float y, float z, float t) {
        float r17742 = x;
        float r17743 = y;
        float r17744 = z;
        float r17745 = r17743 / r17744;
        float r17746 = t;
        float r17747 = r17745 * r17746;
        float r17748 = r17747 / r17746;
        float r17749 = r17742 * r17748;
        return r17749;
}

double f_id(double x, double y, double z, double t) {
        double r17750 = x;
        double r17751 = y;
        double r17752 = z;
        double r17753 = r17751 / r17752;
        double r17754 = t;
        double r17755 = r17753 * r17754;
        double r17756 = r17755 / r17754;
        double r17757 = r17750 * r17756;
        return r17757;
}


double f_of(float x, float y, float z, float __attribute__((unused)) t) {
        float r17758 = y;
        float r17759 = z;
        float r17760 = x;
        float r17761 = r17759 / r17760;
        float r17762 = r17758 / r17761;
        float r17763 = cbrt(r17762);
        float r17764 = r17763 * (r17763 * r17763);
        return r17764;
}

double f_od(double x, double y, double z, double __attribute__((unused)) t) {
        double r17765 = y;
        double r17766 = z;
        double r17767 = x;
        double r17768 = r17766 / r17767;
        double r17769 = r17765 / r17768;
        double r17770 = cbrt(r17769);
        double r17771 = r17770 * (r17770 * r17770);
        return r17771;
}

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 r17772, r17773, r17774, r17775, r17776, r17777, r17778, r17779;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init(r17772);
        mpfr_init(r17773);
        mpfr_init(r17774);
        mpfr_init(r17775);
        mpfr_init(r17776);
        mpfr_init(r17777);
        mpfr_init(r17778);
        mpfr_init(r17779);
}

double f_im(double x, double y, double z, double t) {
        mpfr_set_d(r17772, x, MPFR_RNDN);
        mpfr_set_d(r17773, y, MPFR_RNDN);
        mpfr_set_d(r17774, z, MPFR_RNDN);
        mpfr_div(r17775, r17773, r17774, MPFR_RNDN);
        mpfr_set_d(r17776, t, MPFR_RNDN);
        mpfr_mul(r17777, r17775, r17776, MPFR_RNDN);
        mpfr_div(r17778, r17777, r17776, MPFR_RNDN);
        mpfr_mul(r17779, r17772, r17778, MPFR_RNDN);
        return mpfr_get_d(r17779, MPFR_RNDN);
}

static mpfr_t r17780, r17781, r17782, r17783, r17784, r17785, r17786;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r17780);
        mpfr_init(r17781);
        mpfr_init(r17782);
        mpfr_init(r17783);
        mpfr_init(r17784);
        mpfr_init(r17785);
        mpfr_init(r17786);
}

double f_fm(double x, double y, double z, double __attribute__((unused)) t) {
        mpfr_set_d(r17780, y, MPFR_RNDN);
        mpfr_set_d(r17781, z, MPFR_RNDN);
        mpfr_set_d(r17782, x, MPFR_RNDN);
        mpfr_div(r17783, r17781, r17782, MPFR_RNDN);
        mpfr_div(r17784, r17780, r17783, MPFR_RNDN);
        mpfr_cbrt(r17785, r17784, MPFR_RNDN);
        mpfr_mul(r17786, r17785, r17785, MPFR_RNDN); mpfr_mul(r17786, r17786, r17785, MPFR_RNDN);
        return mpfr_get_d(r17786, MPFR_RNDN);
}

static mpfr_t r17787, r17788, r17789, r17790, r17791, r17792, r17793;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r17787);
        mpfr_init(r17788);
        mpfr_init(r17789);
        mpfr_init(r17790);
        mpfr_init(r17791);
        mpfr_init(r17792);
        mpfr_init(r17793);
}

double f_dm(double x, double y, double z, double __attribute__((unused)) t) {
        mpfr_set_d(r17787, y, MPFR_RNDN);
        mpfr_set_d(r17788, z, MPFR_RNDN);
        mpfr_set_d(r17789, x, MPFR_RNDN);
        mpfr_div(r17790, r17788, r17789, MPFR_RNDN);
        mpfr_div(r17791, r17787, r17790, MPFR_RNDN);
        mpfr_cbrt(r17792, r17791, MPFR_RNDN);
        mpfr_mul(r17793, r17792, r17792, MPFR_RNDN); mpfr_mul(r17793, r17793, r17792, MPFR_RNDN);
        return mpfr_get_d(r17793, MPFR_RNDN);
}