#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 r17585 = x;
        float r17586 = y;
        float r17587 = z;
        float r17588 = r17586 / r17587;
        float r17589 = t;
        float r17590 = r17588 * r17589;
        float r17591 = r17590 / r17589;
        float r17592 = r17585 * r17591;
        return r17592;
}

double f_id(double x, double y, double z, double t) {
        double r17593 = x;
        double r17594 = y;
        double r17595 = z;
        double r17596 = r17594 / r17595;
        double r17597 = t;
        double r17598 = r17596 * r17597;
        double r17599 = r17598 / r17597;
        double r17600 = r17593 * r17599;
        return r17600;
}


double f_of(float x, float y, float z, float t) {
        float r17601 = y;
        float r17602 = z;
        float r17603 = r17601 / r17602;
        float r17604 = t;
        float r17605 = r17603 * r17604;
        float r17606 = r17605 / r17604;
        float r17607 = -4.1645037768149377e+126f;
        bool r17608 = r17606 <= r17607;
        float r17609 = x;
        float r17610 = r17602 / r17609;
        float r17611 = r17601 / r17610;
        float r17612 = -2.614651003440401e-106f;
        bool r17613 = r17606 <= r17612;
        float r17614 = r17609 * r17603;
        float r17615 = 5.0034931106344e-315f;
        bool r17616 = r17606 <= r17615;
        float r17617 = r17609 * r17601;
        float r17618 = 1.0f;
        float r17619 = r17618 / r17602;
        float r17620 = r17617 * r17619;
        float r17621 = 7.9228011707214e+218f;
        bool r17622 = r17606 <= r17621;
        float r17623 = r17601 * r17609;
        float r17624 = r17623 / r17602;
        float r17625 = r17622 ? r17614 : r17624;
        float r17626 = r17616 ? r17620 : r17625;
        float r17627 = r17613 ? r17614 : r17626;
        float r17628 = r17608 ? r17611 : r17627;
        return r17628;
}

double f_od(double x, double y, double z, double t) {
        double r17629 = y;
        double r17630 = z;
        double r17631 = r17629 / r17630;
        double r17632 = t;
        double r17633 = r17631 * r17632;
        double r17634 = r17633 / r17632;
        double r17635 = -4.1645037768149377e+126;
        bool r17636 = r17634 <= r17635;
        double r17637 = x;
        double r17638 = r17630 / r17637;
        double r17639 = r17629 / r17638;
        double r17640 = -2.614651003440401e-106;
        bool r17641 = r17634 <= r17640;
        double r17642 = r17637 * r17631;
        double r17643 = 5.0034931106344e-315;
        bool r17644 = r17634 <= r17643;
        double r17645 = r17637 * r17629;
        double r17646 = 1.0;
        double r17647 = r17646 / r17630;
        double r17648 = r17645 * r17647;
        double r17649 = 7.9228011707214e+218;
        bool r17650 = r17634 <= r17649;
        double r17651 = r17629 * r17637;
        double r17652 = r17651 / r17630;
        double r17653 = r17650 ? r17642 : r17652;
        double r17654 = r17644 ? r17648 : r17653;
        double r17655 = r17641 ? r17642 : r17654;
        double r17656 = r17636 ? r17639 : r17655;
        return r17656;
}

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 r17657, r17658, r17659, r17660, r17661, r17662, r17663, r17664;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init(r17657);
        mpfr_init(r17658);
        mpfr_init(r17659);
        mpfr_init(r17660);
        mpfr_init(r17661);
        mpfr_init(r17662);
        mpfr_init(r17663);
        mpfr_init(r17664);
}

double f_im(double x, double y, double z, double t) {
        mpfr_set_d(r17657, x, MPFR_RNDN);
        mpfr_set_d(r17658, y, MPFR_RNDN);
        mpfr_set_d(r17659, z, MPFR_RNDN);
        mpfr_div(r17660, r17658, r17659, MPFR_RNDN);
        mpfr_set_d(r17661, t, MPFR_RNDN);
        mpfr_mul(r17662, r17660, r17661, MPFR_RNDN);
        mpfr_div(r17663, r17662, r17661, MPFR_RNDN);
        mpfr_mul(r17664, r17657, r17663, MPFR_RNDN);
        return mpfr_get_d(r17664, MPFR_RNDN);
}

static mpfr_t r17665, r17666, r17667, r17668, r17669, r17670, r17671, r17672, r17673, r17674, r17675, r17676, r17677, r17678, r17679, r17680, r17681, r17682, r17683, r17684, r17685, r17686, r17687, r17688, r17689, r17690, r17691, r17692;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r17665);
        mpfr_init(r17666);
        mpfr_init(r17667);
        mpfr_init(r17668);
        mpfr_init(r17669);
        mpfr_init(r17670);
        mpfr_init_set_str(r17671, "-4.1645037768149377e+126", 10, MPFR_RNDN);
        mpfr_init(r17672);
        mpfr_init(r17673);
        mpfr_init(r17674);
        mpfr_init(r17675);
        mpfr_init_set_str(r17676, "-2.614651003440401e-106", 10, MPFR_RNDN);
        mpfr_init(r17677);
        mpfr_init(r17678);
        mpfr_init_set_str(r17679, "5.0034931106344e-315", 10, MPFR_RNDN);
        mpfr_init(r17680);
        mpfr_init(r17681);
        mpfr_init_set_str(r17682, "1", 10, MPFR_RNDN);
        mpfr_init(r17683);
        mpfr_init(r17684);
        mpfr_init_set_str(r17685, "7.9228011707214e+218", 10, MPFR_RNDN);
        mpfr_init(r17686);
        mpfr_init(r17687);
        mpfr_init(r17688);
        mpfr_init(r17689);
        mpfr_init(r17690);
        mpfr_init(r17691);
        mpfr_init(r17692);
}

double f_fm(double x, double y, double z, double t) {
        mpfr_set_d(r17665, y, MPFR_RNDN);
        mpfr_set_d(r17666, z, MPFR_RNDN);
        mpfr_div(r17667, r17665, r17666, MPFR_RNDN);
        mpfr_set_d(r17668, t, MPFR_RNDN);
        mpfr_mul(r17669, r17667, r17668, MPFR_RNDN);
        mpfr_div(r17670, r17669, r17668, MPFR_RNDN);
        ;
        mpfr_set_si(r17672, mpfr_cmp(r17670, r17671) <= 0, MPFR_RNDN);
        mpfr_set_d(r17673, x, MPFR_RNDN);
        mpfr_div(r17674, r17666, r17673, MPFR_RNDN);
        mpfr_div(r17675, r17665, r17674, MPFR_RNDN);
        ;
        mpfr_set_si(r17677, mpfr_cmp(r17670, r17676) <= 0, MPFR_RNDN);
        mpfr_mul(r17678, r17673, r17667, MPFR_RNDN);
        ;
        mpfr_set_si(r17680, mpfr_cmp(r17670, r17679) <= 0, MPFR_RNDN);
        mpfr_mul(r17681, r17673, r17665, MPFR_RNDN);
        ;
        mpfr_div(r17683, r17682, r17666, MPFR_RNDN);
        mpfr_mul(r17684, r17681, r17683, MPFR_RNDN);
        ;
        mpfr_set_si(r17686, mpfr_cmp(r17670, r17685) <= 0, MPFR_RNDN);
        mpfr_mul(r17687, r17665, r17673, MPFR_RNDN);
        mpfr_div(r17688, r17687, r17666, MPFR_RNDN);
        if (mpfr_get_si(r17686, MPFR_RNDN)) { mpfr_set(r17689, r17678, MPFR_RNDN); } else { mpfr_set(r17689, r17688, MPFR_RNDN); };
        if (mpfr_get_si(r17680, MPFR_RNDN)) { mpfr_set(r17690, r17684, MPFR_RNDN); } else { mpfr_set(r17690, r17689, MPFR_RNDN); };
        if (mpfr_get_si(r17677, MPFR_RNDN)) { mpfr_set(r17691, r17678, MPFR_RNDN); } else { mpfr_set(r17691, r17690, MPFR_RNDN); };
        if (mpfr_get_si(r17672, MPFR_RNDN)) { mpfr_set(r17692, r17675, MPFR_RNDN); } else { mpfr_set(r17692, r17691, MPFR_RNDN); };
        return mpfr_get_d(r17692, MPFR_RNDN);
}

static mpfr_t r17693, r17694, r17695, r17696, r17697, r17698, r17699, r17700, r17701, r17702, r17703, r17704, r17705, r17706, r17707, r17708, r17709, r17710, r17711, r17712, r17713, r17714, r17715, r17716, r17717, r17718, r17719, r17720;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r17693);
        mpfr_init(r17694);
        mpfr_init(r17695);
        mpfr_init(r17696);
        mpfr_init(r17697);
        mpfr_init(r17698);
        mpfr_init_set_str(r17699, "-4.1645037768149377e+126", 10, MPFR_RNDN);
        mpfr_init(r17700);
        mpfr_init(r17701);
        mpfr_init(r17702);
        mpfr_init(r17703);
        mpfr_init_set_str(r17704, "-2.614651003440401e-106", 10, MPFR_RNDN);
        mpfr_init(r17705);
        mpfr_init(r17706);
        mpfr_init_set_str(r17707, "5.0034931106344e-315", 10, MPFR_RNDN);
        mpfr_init(r17708);
        mpfr_init(r17709);
        mpfr_init_set_str(r17710, "1", 10, MPFR_RNDN);
        mpfr_init(r17711);
        mpfr_init(r17712);
        mpfr_init_set_str(r17713, "7.9228011707214e+218", 10, MPFR_RNDN);
        mpfr_init(r17714);
        mpfr_init(r17715);
        mpfr_init(r17716);
        mpfr_init(r17717);
        mpfr_init(r17718);
        mpfr_init(r17719);
        mpfr_init(r17720);
}

double f_dm(double x, double y, double z, double t) {
        mpfr_set_d(r17693, y, MPFR_RNDN);
        mpfr_set_d(r17694, z, MPFR_RNDN);
        mpfr_div(r17695, r17693, r17694, MPFR_RNDN);
        mpfr_set_d(r17696, t, MPFR_RNDN);
        mpfr_mul(r17697, r17695, r17696, MPFR_RNDN);
        mpfr_div(r17698, r17697, r17696, MPFR_RNDN);
        ;
        mpfr_set_si(r17700, mpfr_cmp(r17698, r17699) <= 0, MPFR_RNDN);
        mpfr_set_d(r17701, x, MPFR_RNDN);
        mpfr_div(r17702, r17694, r17701, MPFR_RNDN);
        mpfr_div(r17703, r17693, r17702, MPFR_RNDN);
        ;
        mpfr_set_si(r17705, mpfr_cmp(r17698, r17704) <= 0, MPFR_RNDN);
        mpfr_mul(r17706, r17701, r17695, MPFR_RNDN);
        ;
        mpfr_set_si(r17708, mpfr_cmp(r17698, r17707) <= 0, MPFR_RNDN);
        mpfr_mul(r17709, r17701, r17693, MPFR_RNDN);
        ;
        mpfr_div(r17711, r17710, r17694, MPFR_RNDN);
        mpfr_mul(r17712, r17709, r17711, MPFR_RNDN);
        ;
        mpfr_set_si(r17714, mpfr_cmp(r17698, r17713) <= 0, MPFR_RNDN);
        mpfr_mul(r17715, r17693, r17701, MPFR_RNDN);
        mpfr_div(r17716, r17715, r17694, MPFR_RNDN);
        if (mpfr_get_si(r17714, MPFR_RNDN)) { mpfr_set(r17717, r17706, MPFR_RNDN); } else { mpfr_set(r17717, r17716, MPFR_RNDN); };
        if (mpfr_get_si(r17708, MPFR_RNDN)) { mpfr_set(r17718, r17712, MPFR_RNDN); } else { mpfr_set(r17718, r17717, MPFR_RNDN); };
        if (mpfr_get_si(r17705, MPFR_RNDN)) { mpfr_set(r17719, r17706, MPFR_RNDN); } else { mpfr_set(r17719, r17718, MPFR_RNDN); };
        if (mpfr_get_si(r17700, MPFR_RNDN)) { mpfr_set(r17720, r17703, MPFR_RNDN); } else { mpfr_set(r17720, r17719, MPFR_RNDN); };
        return mpfr_get_d(r17720, MPFR_RNDN);
}

