#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 r17667 = x; float r17668 = y; float r17669 = z; float r17670 = r17668 / r17669; float r17671 = t; float r17672 = r17670 * r17671; float r17673 = r17672 / r17671; float r17674 = r17667 * r17673; return r17674; } double f_id(double x, double y, double z, double t) { double r17675 = x; double r17676 = y; double r17677 = z; double r17678 = r17676 / r17677; double r17679 = t; double r17680 = r17678 * r17679; double r17681 = r17680 / r17679; double r17682 = r17675 * r17681; return r17682; } double f_of(float x, float y, float z, float t) { float r17683 = y; float r17684 = z; float r17685 = r17683 / r17684; float r17686 = t; float r17687 = r17685 * r17686; float r17688 = r17687 / r17686; float r17689 = -2.2972485982671698e+247f; bool r17690 = r17688 <= r17689; float r17691 = x; float r17692 = r17683 * r17691; float r17693 = r17692 / r17684; float r17694 = -5.702347864289633e-193f; bool r17695 = r17688 <= r17694; float r17696 = r17691 * r17685; float r17697 = -0.0f; bool r17698 = r17688 <= r17697; float r17699 = r17684 / r17691; float r17700 = r17683 / r17699; float r17701 = 2.1028395862205026e+287f; bool r17702 = r17688 <= r17701; float r17703 = r17702 ? r17696 : r17700; float r17704 = r17698 ? r17700 : r17703; float r17705 = r17695 ? r17696 : r17704; float r17706 = r17690 ? r17693 : r17705; return r17706; } double f_od(double x, double y, double z, double t) { double r17707 = y; double r17708 = z; double r17709 = r17707 / r17708; double r17710 = t; double r17711 = r17709 * r17710; double r17712 = r17711 / r17710; double r17713 = -2.2972485982671698e+247; bool r17714 = r17712 <= r17713; double r17715 = x; double r17716 = r17707 * r17715; double r17717 = r17716 / r17708; double r17718 = -5.702347864289633e-193; bool r17719 = r17712 <= r17718; double r17720 = r17715 * r17709; double r17721 = -0.0; bool r17722 = r17712 <= r17721; double r17723 = r17708 / r17715; double r17724 = r17707 / r17723; double r17725 = 2.1028395862205026e+287; bool r17726 = r17712 <= r17725; double r17727 = r17726 ? r17720 : r17724; double r17728 = r17722 ? r17724 : r17727; double r17729 = r17719 ? r17720 : r17728; double r17730 = r17714 ? r17717 : r17729; return r17730; } 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 r17731, r17732, r17733, r17734, r17735, r17736, r17737, r17738; void setup_mpfr_f_im() { mpfr_set_default_prec(144); mpfr_init(r17731); mpfr_init(r17732); mpfr_init(r17733); mpfr_init(r17734); mpfr_init(r17735); mpfr_init(r17736); mpfr_init(r17737); mpfr_init(r17738); } double f_im(double x, double y, double z, double t) { mpfr_set_d(r17731, x, MPFR_RNDN); mpfr_set_d(r17732, y, MPFR_RNDN); mpfr_set_d(r17733, z, MPFR_RNDN); mpfr_div(r17734, r17732, r17733, MPFR_RNDN); mpfr_set_d(r17735, t, MPFR_RNDN); mpfr_mul(r17736, r17734, r17735, MPFR_RNDN); mpfr_div(r17737, r17736, r17735, MPFR_RNDN); mpfr_mul(r17738, r17731, r17737, MPFR_RNDN); return mpfr_get_d(r17738, MPFR_RNDN); } static mpfr_t r17739, r17740, r17741, r17742, r17743, r17744, r17745, r17746, r17747, r17748, r17749, r17750, r17751, r17752, r17753, r17754, r17755, r17756, r17757, r17758, r17759, r17760, r17761, r17762; void setup_mpfr_f_fm() { mpfr_set_default_prec(144); mpfr_init(r17739); mpfr_init(r17740); mpfr_init(r17741); mpfr_init(r17742); mpfr_init(r17743); mpfr_init(r17744); mpfr_init_set_str(r17745, "-2.2972485982671698e+247", 10, MPFR_RNDN); mpfr_init(r17746); mpfr_init(r17747); mpfr_init(r17748); mpfr_init(r17749); mpfr_init_set_str(r17750, "-5.702347864289633e-193", 10, MPFR_RNDN); mpfr_init(r17751); mpfr_init(r17752); mpfr_init_set_str(r17753, "-0.0", 10, MPFR_RNDN); mpfr_init(r17754); mpfr_init(r17755); mpfr_init(r17756); mpfr_init_set_str(r17757, "2.1028395862205026e+287", 10, MPFR_RNDN); mpfr_init(r17758); mpfr_init(r17759); mpfr_init(r17760); mpfr_init(r17761); mpfr_init(r17762); } double f_fm(double x, double y, double z, double t) { mpfr_set_d(r17739, y, MPFR_RNDN); mpfr_set_d(r17740, z, MPFR_RNDN); mpfr_div(r17741, r17739, r17740, MPFR_RNDN); mpfr_set_d(r17742, t, MPFR_RNDN); mpfr_mul(r17743, r17741, r17742, MPFR_RNDN); mpfr_div(r17744, r17743, r17742, MPFR_RNDN); ; mpfr_set_si(r17746, mpfr_cmp(r17744, r17745) <= 0, MPFR_RNDN); mpfr_set_d(r17747, x, MPFR_RNDN); mpfr_mul(r17748, r17739, r17747, MPFR_RNDN); mpfr_div(r17749, r17748, r17740, MPFR_RNDN); ; mpfr_set_si(r17751, mpfr_cmp(r17744, r17750) <= 0, MPFR_RNDN); mpfr_mul(r17752, r17747, r17741, MPFR_RNDN); ; mpfr_set_si(r17754, mpfr_cmp(r17744, r17753) <= 0, MPFR_RNDN); mpfr_div(r17755, r17740, r17747, MPFR_RNDN); mpfr_div(r17756, r17739, r17755, MPFR_RNDN); ; mpfr_set_si(r17758, mpfr_cmp(r17744, r17757) <= 0, MPFR_RNDN); if (mpfr_get_si(r17758, MPFR_RNDN)) { mpfr_set(r17759, r17752, MPFR_RNDN); } else { mpfr_set(r17759, r17756, MPFR_RNDN); }; if (mpfr_get_si(r17754, MPFR_RNDN)) { mpfr_set(r17760, r17756, MPFR_RNDN); } else { mpfr_set(r17760, r17759, MPFR_RNDN); }; if (mpfr_get_si(r17751, MPFR_RNDN)) { mpfr_set(r17761, r17752, MPFR_RNDN); } else { mpfr_set(r17761, r17760, MPFR_RNDN); }; if (mpfr_get_si(r17746, MPFR_RNDN)) { mpfr_set(r17762, r17749, MPFR_RNDN); } else { mpfr_set(r17762, r17761, MPFR_RNDN); }; return mpfr_get_d(r17762, MPFR_RNDN); } static mpfr_t r17763, r17764, r17765, r17766, r17767, r17768, r17769, r17770, r17771, r17772, r17773, r17774, r17775, r17776, r17777, r17778, r17779, r17780, r17781, r17782, r17783, r17784, r17785, r17786; void setup_mpfr_f_dm() { mpfr_set_default_prec(144); mpfr_init(r17763); mpfr_init(r17764); mpfr_init(r17765); mpfr_init(r17766); mpfr_init(r17767); mpfr_init(r17768); mpfr_init_set_str(r17769, "-2.2972485982671698e+247", 10, MPFR_RNDN); mpfr_init(r17770); mpfr_init(r17771); mpfr_init(r17772); mpfr_init(r17773); mpfr_init_set_str(r17774, "-5.702347864289633e-193", 10, MPFR_RNDN); mpfr_init(r17775); mpfr_init(r17776); mpfr_init_set_str(r17777, "-0.0", 10, MPFR_RNDN); mpfr_init(r17778); mpfr_init(r17779); mpfr_init(r17780); mpfr_init_set_str(r17781, "2.1028395862205026e+287", 10, MPFR_RNDN); mpfr_init(r17782); mpfr_init(r17783); mpfr_init(r17784); mpfr_init(r17785); mpfr_init(r17786); } double f_dm(double x, double y, double z, double t) { mpfr_set_d(r17763, y, MPFR_RNDN); mpfr_set_d(r17764, z, MPFR_RNDN); mpfr_div(r17765, r17763, r17764, MPFR_RNDN); mpfr_set_d(r17766, t, MPFR_RNDN); mpfr_mul(r17767, r17765, r17766, MPFR_RNDN); mpfr_div(r17768, r17767, r17766, MPFR_RNDN); ; mpfr_set_si(r17770, mpfr_cmp(r17768, r17769) <= 0, MPFR_RNDN); mpfr_set_d(r17771, x, MPFR_RNDN); mpfr_mul(r17772, r17763, r17771, MPFR_RNDN); mpfr_div(r17773, r17772, r17764, MPFR_RNDN); ; mpfr_set_si(r17775, mpfr_cmp(r17768, r17774) <= 0, MPFR_RNDN); mpfr_mul(r17776, r17771, r17765, MPFR_RNDN); ; mpfr_set_si(r17778, mpfr_cmp(r17768, r17777) <= 0, MPFR_RNDN); mpfr_div(r17779, r17764, r17771, MPFR_RNDN); mpfr_div(r17780, r17763, r17779, MPFR_RNDN); ; mpfr_set_si(r17782, mpfr_cmp(r17768, r17781) <= 0, MPFR_RNDN); if (mpfr_get_si(r17782, MPFR_RNDN)) { mpfr_set(r17783, r17776, MPFR_RNDN); } else { mpfr_set(r17783, r17780, MPFR_RNDN); }; if (mpfr_get_si(r17778, MPFR_RNDN)) { mpfr_set(r17784, r17780, MPFR_RNDN); } else { mpfr_set(r17784, r17783, MPFR_RNDN); }; if (mpfr_get_si(r17775, MPFR_RNDN)) { mpfr_set(r17785, r17776, MPFR_RNDN); } else { mpfr_set(r17785, r17784, MPFR_RNDN); }; if (mpfr_get_si(r17770, MPFR_RNDN)) { mpfr_set(r17786, r17773, MPFR_RNDN); } else { mpfr_set(r17786, r17785, MPFR_RNDN); }; return mpfr_get_d(r17786, MPFR_RNDN); }