#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 r17775 = x; float r17776 = y; float r17777 = z; float r17778 = r17776 / r17777; float r17779 = t; float r17780 = r17778 * r17779; float r17781 = r17780 / r17779; float r17782 = r17775 * r17781; return r17782; } double f_id(double x, double y, double z, double t) { double r17783 = x; double r17784 = y; double r17785 = z; double r17786 = r17784 / r17785; double r17787 = t; double r17788 = r17786 * r17787; double r17789 = r17788 / r17787; double r17790 = r17783 * r17789; return r17790; } double f_of(float x, float y, float z, float t) { float r17791 = y; float r17792 = z; float r17793 = r17791 / r17792; float r17794 = t; float r17795 = r17793 * r17794; float r17796 = r17795 / r17794; float r17797 = -1.981822314854173e-301f; bool r17798 = r17796 <= r17797; float r17799 = x; float r17800 = r17799 * r17793; float r17801 = 3.707558976003304e-304f; bool r17802 = r17796 <= r17801; float r17803 = r17799 * r17791; float r17804 = 1.0f; float r17805 = r17804 / r17792; float r17806 = r17803 * r17805; float r17807 = 3.3305262352552325e+148f; bool r17808 = r17796 <= r17807; float r17809 = r17804 * (r17804 * r17804); float r17810 = r17792 / r17791; float r17811 = r17799 / r17810; float r17812 = r17809 * r17811; float r17813 = r17808 ? r17812 : r17806; float r17814 = r17802 ? r17806 : r17813; float r17815 = r17798 ? r17800 : r17814; return r17815; } double f_od(double x, double y, double z, double t) { double r17816 = y; double r17817 = z; double r17818 = r17816 / r17817; double r17819 = t; double r17820 = r17818 * r17819; double r17821 = r17820 / r17819; double r17822 = -1.981822314854173e-301; bool r17823 = r17821 <= r17822; double r17824 = x; double r17825 = r17824 * r17818; double r17826 = 3.707558976003304e-304; bool r17827 = r17821 <= r17826; double r17828 = r17824 * r17816; double r17829 = 1.0; double r17830 = r17829 / r17817; double r17831 = r17828 * r17830; double r17832 = 3.3305262352552325e+148; bool r17833 = r17821 <= r17832; double r17834 = r17829 * (r17829 * r17829); double r17835 = r17817 / r17816; double r17836 = r17824 / r17835; double r17837 = r17834 * r17836; double r17838 = r17833 ? r17837 : r17831; double r17839 = r17827 ? r17831 : r17838; double r17840 = r17823 ? r17825 : r17839; return r17840; } 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 r17841, r17842, r17843, r17844, r17845, r17846, r17847, r17848; void setup_mpfr_f_im() { mpfr_set_default_prec(144); mpfr_init(r17841); mpfr_init(r17842); mpfr_init(r17843); mpfr_init(r17844); mpfr_init(r17845); mpfr_init(r17846); mpfr_init(r17847); mpfr_init(r17848); } double f_im(double x, double y, double z, double t) { mpfr_set_d(r17841, x, MPFR_RNDN); mpfr_set_d(r17842, y, MPFR_RNDN); mpfr_set_d(r17843, z, MPFR_RNDN); mpfr_div(r17844, r17842, r17843, MPFR_RNDN); mpfr_set_d(r17845, t, MPFR_RNDN); mpfr_mul(r17846, r17844, r17845, MPFR_RNDN); mpfr_div(r17847, r17846, r17845, MPFR_RNDN); mpfr_mul(r17848, r17841, r17847, MPFR_RNDN); return mpfr_get_d(r17848, MPFR_RNDN); } static mpfr_t r17849, r17850, r17851, r17852, r17853, r17854, r17855, r17856, r17857, r17858, r17859, r17860, r17861, r17862, r17863, r17864, r17865, r17866, r17867, r17868, r17869, r17870, r17871, r17872, r17873; void setup_mpfr_f_fm() { mpfr_set_default_prec(144); mpfr_init(r17849); mpfr_init(r17850); mpfr_init(r17851); mpfr_init(r17852); mpfr_init(r17853); mpfr_init(r17854); mpfr_init_set_str(r17855, "-1.981822314854173e-301", 10, MPFR_RNDN); mpfr_init(r17856); mpfr_init(r17857); mpfr_init(r17858); mpfr_init_set_str(r17859, "3.707558976003304e-304", 10, MPFR_RNDN); mpfr_init(r17860); mpfr_init(r17861); mpfr_init_set_str(r17862, "1", 10, MPFR_RNDN); mpfr_init(r17863); mpfr_init(r17864); mpfr_init_set_str(r17865, "3.3305262352552325e+148", 10, MPFR_RNDN); mpfr_init(r17866); mpfr_init(r17867); mpfr_init(r17868); mpfr_init(r17869); mpfr_init(r17870); mpfr_init(r17871); mpfr_init(r17872); mpfr_init(r17873); } double f_fm(double x, double y, double z, double t) { mpfr_set_d(r17849, y, MPFR_RNDN); mpfr_set_d(r17850, z, MPFR_RNDN); mpfr_div(r17851, r17849, r17850, MPFR_RNDN); mpfr_set_d(r17852, t, MPFR_RNDN); mpfr_mul(r17853, r17851, r17852, MPFR_RNDN); mpfr_div(r17854, r17853, r17852, MPFR_RNDN); ; mpfr_set_si(r17856, mpfr_cmp(r17854, r17855) <= 0, MPFR_RNDN); mpfr_set_d(r17857, x, MPFR_RNDN); mpfr_mul(r17858, r17857, r17851, MPFR_RNDN); ; mpfr_set_si(r17860, mpfr_cmp(r17854, r17859) <= 0, MPFR_RNDN); mpfr_mul(r17861, r17857, r17849, MPFR_RNDN); ; mpfr_div(r17863, r17862, r17850, MPFR_RNDN); mpfr_mul(r17864, r17861, r17863, MPFR_RNDN); ; mpfr_set_si(r17866, mpfr_cmp(r17854, r17865) <= 0, MPFR_RNDN); mpfr_mul(r17867, r17862, r17862, MPFR_RNDN); mpfr_mul(r17867, r17867, r17862, MPFR_RNDN); mpfr_div(r17868, r17850, r17849, MPFR_RNDN); mpfr_div(r17869, r17857, r17868, MPFR_RNDN); mpfr_mul(r17870, r17867, r17869, MPFR_RNDN); if (mpfr_get_si(r17866, MPFR_RNDN)) { mpfr_set(r17871, r17870, MPFR_RNDN); } else { mpfr_set(r17871, r17864, MPFR_RNDN); }; if (mpfr_get_si(r17860, MPFR_RNDN)) { mpfr_set(r17872, r17864, MPFR_RNDN); } else { mpfr_set(r17872, r17871, MPFR_RNDN); }; if (mpfr_get_si(r17856, MPFR_RNDN)) { mpfr_set(r17873, r17858, MPFR_RNDN); } else { mpfr_set(r17873, r17872, MPFR_RNDN); }; return mpfr_get_d(r17873, MPFR_RNDN); } static mpfr_t r17874, r17875, r17876, r17877, r17878, r17879, r17880, r17881, r17882, r17883, r17884, r17885, r17886, r17887, r17888, r17889, r17890, r17891, r17892, r17893, r17894, r17895, r17896, r17897, r17898; void setup_mpfr_f_dm() { mpfr_set_default_prec(144); mpfr_init(r17874); mpfr_init(r17875); mpfr_init(r17876); mpfr_init(r17877); mpfr_init(r17878); mpfr_init(r17879); mpfr_init_set_str(r17880, "-1.981822314854173e-301", 10, MPFR_RNDN); mpfr_init(r17881); mpfr_init(r17882); mpfr_init(r17883); mpfr_init_set_str(r17884, "3.707558976003304e-304", 10, MPFR_RNDN); mpfr_init(r17885); mpfr_init(r17886); mpfr_init_set_str(r17887, "1", 10, MPFR_RNDN); mpfr_init(r17888); mpfr_init(r17889); mpfr_init_set_str(r17890, "3.3305262352552325e+148", 10, MPFR_RNDN); mpfr_init(r17891); mpfr_init(r17892); mpfr_init(r17893); mpfr_init(r17894); mpfr_init(r17895); mpfr_init(r17896); mpfr_init(r17897); mpfr_init(r17898); } double f_dm(double x, double y, double z, double t) { mpfr_set_d(r17874, y, MPFR_RNDN); mpfr_set_d(r17875, z, MPFR_RNDN); mpfr_div(r17876, r17874, r17875, MPFR_RNDN); mpfr_set_d(r17877, t, MPFR_RNDN); mpfr_mul(r17878, r17876, r17877, MPFR_RNDN); mpfr_div(r17879, r17878, r17877, MPFR_RNDN); ; mpfr_set_si(r17881, mpfr_cmp(r17879, r17880) <= 0, MPFR_RNDN); mpfr_set_d(r17882, x, MPFR_RNDN); mpfr_mul(r17883, r17882, r17876, MPFR_RNDN); ; mpfr_set_si(r17885, mpfr_cmp(r17879, r17884) <= 0, MPFR_RNDN); mpfr_mul(r17886, r17882, r17874, MPFR_RNDN); ; mpfr_div(r17888, r17887, r17875, MPFR_RNDN); mpfr_mul(r17889, r17886, r17888, MPFR_RNDN); ; mpfr_set_si(r17891, mpfr_cmp(r17879, r17890) <= 0, MPFR_RNDN); mpfr_mul(r17892, r17887, r17887, MPFR_RNDN); mpfr_mul(r17892, r17892, r17887, MPFR_RNDN); mpfr_div(r17893, r17875, r17874, MPFR_RNDN); mpfr_div(r17894, r17882, r17893, MPFR_RNDN); mpfr_mul(r17895, r17892, r17894, MPFR_RNDN); if (mpfr_get_si(r17891, MPFR_RNDN)) { mpfr_set(r17896, r17895, MPFR_RNDN); } else { mpfr_set(r17896, r17889, MPFR_RNDN); }; if (mpfr_get_si(r17885, MPFR_RNDN)) { mpfr_set(r17897, r17889, MPFR_RNDN); } else { mpfr_set(r17897, r17896, MPFR_RNDN); }; if (mpfr_get_si(r17881, MPFR_RNDN)) { mpfr_set(r17898, r17883, MPFR_RNDN); } else { mpfr_set(r17898, r17897, MPFR_RNDN); }; return mpfr_get_d(r17898, MPFR_RNDN); }