#include #include #include #include #include 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 r17593 = x; float r17594 = y; float r17595 = z; float r17596 = r17594 / r17595; float r17597 = t; float r17598 = r17596 * r17597; float r17599 = r17598 / r17597; float r17600 = r17593 * r17599; return r17600; } double f_id(double x, double y, double z, double t) { double r17601 = x; double r17602 = y; double r17603 = z; double r17604 = r17602 / r17603; double r17605 = t; double r17606 = r17604 * r17605; double r17607 = r17606 / r17605; double r17608 = r17601 * r17607; return r17608; } double f_of(float x, float y, float z, float t) { float r17609 = y; float r17610 = z; float r17611 = r17609 / r17610; float r17612 = t; float r17613 = r17611 * r17612; float r17614 = r17613 / r17612; float r17615 = -7.649489573286008e+294f; bool r17616 = r17614 <= r17615; float r17617 = x; float r17618 = r17609 * r17617; float r17619 = r17618 / r17610; float r17620 = -2.1685809384863297e-122f; bool r17621 = r17614 <= r17620; float r17622 = r17617 * r17611; float r17623 = 1.0225686435761804e-235f; bool r17624 = r17614 <= r17623; float r17625 = 5.699221756597515e+179f; bool r17626 = r17614 <= r17625; float r17627 = r17610 / r17617; float r17628 = r17609 / r17627; float r17629 = r17626 ? r17622 : r17628; float r17630 = r17624 ? r17619 : r17629; float r17631 = r17621 ? r17622 : r17630; float r17632 = r17616 ? r17619 : r17631; return r17632; } double f_od(double x, double y, double z, double t) { double r17633 = y; double r17634 = z; double r17635 = r17633 / r17634; double r17636 = t; double r17637 = r17635 * r17636; double r17638 = r17637 / r17636; double r17639 = -7.649489573286008e+294; bool r17640 = r17638 <= r17639; double r17641 = x; double r17642 = r17633 * r17641; double r17643 = r17642 / r17634; double r17644 = -2.1685809384863297e-122; bool r17645 = r17638 <= r17644; double r17646 = r17641 * r17635; double r17647 = 1.0225686435761804e-235; bool r17648 = r17638 <= r17647; double r17649 = 5.699221756597515e+179; bool r17650 = r17638 <= r17649; double r17651 = r17634 / r17641; double r17652 = r17633 / r17651; double r17653 = r17650 ? r17646 : r17652; double r17654 = r17648 ? r17643 : r17653; double r17655 = r17645 ? r17646 : r17654; double r17656 = r17640 ? r17643 : 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; 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, "-7.649489573286008e+294", 10, MPFR_RNDN); mpfr_init(r17672); mpfr_init(r17673); mpfr_init(r17674); mpfr_init(r17675); mpfr_init_set_str(r17676, "-2.1685809384863297e-122", 10, MPFR_RNDN); mpfr_init(r17677); mpfr_init(r17678); mpfr_init_set_str(r17679, "1.0225686435761804e-235", 10, MPFR_RNDN); mpfr_init(r17680); mpfr_init_set_str(r17681, "5.699221756597515e+179", 10, MPFR_RNDN); mpfr_init(r17682); mpfr_init(r17683); mpfr_init(r17684); mpfr_init(r17685); mpfr_init(r17686); mpfr_init(r17687); mpfr_init(r17688); } 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_mul(r17674, r17665, r17673, MPFR_RNDN); mpfr_div(r17675, r17674, r17666, 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_set_si(r17682, mpfr_cmp(r17670, r17681) <= 0, MPFR_RNDN); mpfr_div(r17683, r17666, r17673, MPFR_RNDN); mpfr_div(r17684, r17665, r17683, MPFR_RNDN); if (mpfr_get_si(r17682, MPFR_RNDN)) { mpfr_set(r17685, r17678, MPFR_RNDN); } else { mpfr_set(r17685, r17684, MPFR_RNDN); }; if (mpfr_get_si(r17680, MPFR_RNDN)) { mpfr_set(r17686, r17675, MPFR_RNDN); } else { mpfr_set(r17686, r17685, MPFR_RNDN); }; if (mpfr_get_si(r17677, MPFR_RNDN)) { mpfr_set(r17687, r17678, MPFR_RNDN); } else { mpfr_set(r17687, r17686, MPFR_RNDN); }; if (mpfr_get_si(r17672, MPFR_RNDN)) { mpfr_set(r17688, r17675, MPFR_RNDN); } else { mpfr_set(r17688, r17687, MPFR_RNDN); }; return mpfr_get_d(r17688, MPFR_RNDN); } static mpfr_t r17689, r17690, r17691, r17692, r17693, r17694, r17695, r17696, r17697, r17698, r17699, r17700, r17701, r17702, r17703, r17704, r17705, r17706, r17707, r17708, r17709, r17710, r17711, r17712; void setup_mpfr_f_dm() { mpfr_set_default_prec(144); mpfr_init(r17689); mpfr_init(r17690); mpfr_init(r17691); mpfr_init(r17692); mpfr_init(r17693); mpfr_init(r17694); mpfr_init_set_str(r17695, "-7.649489573286008e+294", 10, MPFR_RNDN); mpfr_init(r17696); mpfr_init(r17697); mpfr_init(r17698); mpfr_init(r17699); mpfr_init_set_str(r17700, "-2.1685809384863297e-122", 10, MPFR_RNDN); mpfr_init(r17701); mpfr_init(r17702); mpfr_init_set_str(r17703, "1.0225686435761804e-235", 10, MPFR_RNDN); mpfr_init(r17704); mpfr_init_set_str(r17705, "5.699221756597515e+179", 10, MPFR_RNDN); mpfr_init(r17706); mpfr_init(r17707); mpfr_init(r17708); mpfr_init(r17709); mpfr_init(r17710); mpfr_init(r17711); mpfr_init(r17712); } double f_dm(double x, double y, double z, double t) { mpfr_set_d(r17689, y, MPFR_RNDN); mpfr_set_d(r17690, z, MPFR_RNDN); mpfr_div(r17691, r17689, r17690, MPFR_RNDN); mpfr_set_d(r17692, t, MPFR_RNDN); mpfr_mul(r17693, r17691, r17692, MPFR_RNDN); mpfr_div(r17694, r17693, r17692, MPFR_RNDN); ; mpfr_set_si(r17696, mpfr_cmp(r17694, r17695) <= 0, MPFR_RNDN); mpfr_set_d(r17697, x, MPFR_RNDN); mpfr_mul(r17698, r17689, r17697, MPFR_RNDN); mpfr_div(r17699, r17698, r17690, MPFR_RNDN); ; mpfr_set_si(r17701, mpfr_cmp(r17694, r17700) <= 0, MPFR_RNDN); mpfr_mul(r17702, r17697, r17691, MPFR_RNDN); ; mpfr_set_si(r17704, mpfr_cmp(r17694, r17703) <= 0, MPFR_RNDN); ; mpfr_set_si(r17706, mpfr_cmp(r17694, r17705) <= 0, MPFR_RNDN); mpfr_div(r17707, r17690, r17697, MPFR_RNDN); mpfr_div(r17708, r17689, r17707, MPFR_RNDN); if (mpfr_get_si(r17706, MPFR_RNDN)) { mpfr_set(r17709, r17702, MPFR_RNDN); } else { mpfr_set(r17709, r17708, MPFR_RNDN); }; if (mpfr_get_si(r17704, MPFR_RNDN)) { mpfr_set(r17710, r17699, MPFR_RNDN); } else { mpfr_set(r17710, r17709, MPFR_RNDN); }; if (mpfr_get_si(r17701, MPFR_RNDN)) { mpfr_set(r17711, r17702, MPFR_RNDN); } else { mpfr_set(r17711, r17710, MPFR_RNDN); }; if (mpfr_get_si(r17696, MPFR_RNDN)) { mpfr_set(r17712, r17699, MPFR_RNDN); } else { mpfr_set(r17712, r17711, MPFR_RNDN); }; return mpfr_get_d(r17712, MPFR_RNDN); }