#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 r27081 = x; float r27082 = y; float r27083 = z; float r27084 = r27082 / r27083; float r27085 = t; float r27086 = r27084 * r27085; float r27087 = r27086 / r27085; float r27088 = r27081 * r27087; return r27088; } double f_id(double x, double y, double z, double t) { double r27089 = x; double r27090 = y; double r27091 = z; double r27092 = r27090 / r27091; double r27093 = t; double r27094 = r27092 * r27093; double r27095 = r27094 / r27093; double r27096 = r27089 * r27095; return r27096; } double f_of(float x, float y, float z, float __attribute__((unused)) t) { float r27097 = y; float r27098 = z; float r27099 = r27097 / r27098; float r27100 = -1.2573367356121057e+274; bool r27101 = r27099 <= r27100; float r27102 = x; float r27103 = r27102 * r27097; float r27104 = r27103 / r27098; float r27105 = -1.0193322468821646e-217; bool r27106 = r27099 <= r27105; float r27107 = r27098 / r27097; float r27108 = r27102 / r27107; float r27109 = 1.473521041029e-315; bool r27110 = r27099 <= r27109; float r27111 = 1.776905063661063e+308; bool r27112 = r27099 <= r27111; float r27113 = r27099 * r27102; float r27114 = r27098 / r27102; float r27115 = r27097 / r27114; float r27116 = r27112 ? r27113 : r27115; float r27117 = r27110 ? r27104 : r27116; float r27118 = r27106 ? r27108 : r27117; float r27119 = r27101 ? r27104 : r27118; return r27119; } double f_od(double x, double y, double z, double __attribute__((unused)) t) { double r27120 = y; double r27121 = z; double r27122 = r27120 / r27121; double r27123 = -1.2573367356121057e+274; bool r27124 = r27122 <= r27123; double r27125 = x; double r27126 = r27125 * r27120; double r27127 = r27126 / r27121; double r27128 = -1.0193322468821646e-217; bool r27129 = r27122 <= r27128; double r27130 = r27121 / r27120; double r27131 = r27125 / r27130; double r27132 = 1.473521041029e-315; bool r27133 = r27122 <= r27132; double r27134 = 1.776905063661063e+308; bool r27135 = r27122 <= r27134; double r27136 = r27122 * r27125; double r27137 = r27121 / r27125; double r27138 = r27120 / r27137; double r27139 = r27135 ? r27136 : r27138; double r27140 = r27133 ? r27127 : r27139; double r27141 = r27129 ? r27131 : r27140; double r27142 = r27124 ? r27127 : r27141; return r27142; } 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 r27143, r27144, r27145, r27146, r27147, r27148, r27149, r27150; void setup_mpfr_f_im() { mpfr_set_default_prec(592); mpfr_init(r27143); mpfr_init(r27144); mpfr_init(r27145); mpfr_init(r27146); mpfr_init(r27147); mpfr_init(r27148); mpfr_init(r27149); mpfr_init(r27150); } double f_im(double x, double y, double z, double t) { mpfr_set_d(r27143, x, MPFR_RNDN); mpfr_set_d(r27144, y, MPFR_RNDN); mpfr_set_d(r27145, z, MPFR_RNDN); mpfr_div(r27146, r27144, r27145, MPFR_RNDN); mpfr_set_d(r27147, t, MPFR_RNDN); mpfr_mul(r27148, r27146, r27147, MPFR_RNDN); mpfr_div(r27149, r27148, r27147, MPFR_RNDN); mpfr_mul(r27150, r27143, r27149, MPFR_RNDN); return mpfr_get_d(r27150, MPFR_RNDN); } static mpfr_t r27151, r27152, r27153, r27154, r27155, r27156, r27157, r27158, r27159, r27160, r27161, r27162, r27163, r27164, r27165, r27166, r27167, r27168, r27169, r27170, r27171, r27172, r27173; void setup_mpfr_f_fm() { mpfr_set_default_prec(592); mpfr_init(r27151); mpfr_init(r27152); mpfr_init(r27153); mpfr_init_set_str(r27154, "-1.2573367356121057e+274", 10, MPFR_RNDN); mpfr_init(r27155); mpfr_init(r27156); mpfr_init(r27157); mpfr_init(r27158); mpfr_init_set_str(r27159, "-1.0193322468821646e-217", 10, MPFR_RNDN); mpfr_init(r27160); mpfr_init(r27161); mpfr_init(r27162); mpfr_init_set_str(r27163, "1.473521041029e-315", 10, MPFR_RNDN); mpfr_init(r27164); mpfr_init_set_str(r27165, "1.776905063661063e+308", 10, MPFR_RNDN); mpfr_init(r27166); mpfr_init(r27167); mpfr_init(r27168); mpfr_init(r27169); mpfr_init(r27170); mpfr_init(r27171); mpfr_init(r27172); mpfr_init(r27173); } double f_fm(double x, double y, double z, double __attribute__((unused)) t) { mpfr_set_d(r27151, y, MPFR_RNDN); mpfr_set_d(r27152, z, MPFR_RNDN); mpfr_div(r27153, r27151, r27152, MPFR_RNDN); ; mpfr_set_si(r27155, mpfr_cmp(r27153, r27154) <= 0, MPFR_RNDN); mpfr_set_d(r27156, x, MPFR_RNDN); mpfr_mul(r27157, r27156, r27151, MPFR_RNDN); mpfr_div(r27158, r27157, r27152, MPFR_RNDN); ; mpfr_set_si(r27160, mpfr_cmp(r27153, r27159) <= 0, MPFR_RNDN); mpfr_div(r27161, r27152, r27151, MPFR_RNDN); mpfr_div(r27162, r27156, r27161, MPFR_RNDN); ; mpfr_set_si(r27164, mpfr_cmp(r27153, r27163) <= 0, MPFR_RNDN); ; mpfr_set_si(r27166, mpfr_cmp(r27153, r27165) <= 0, MPFR_RNDN); mpfr_mul(r27167, r27153, r27156, MPFR_RNDN); mpfr_div(r27168, r27152, r27156, MPFR_RNDN); mpfr_div(r27169, r27151, r27168, MPFR_RNDN); if (mpfr_get_si(r27166, MPFR_RNDN)) { mpfr_set(r27170, r27167, MPFR_RNDN); } else { mpfr_set(r27170, r27169, MPFR_RNDN); }; if (mpfr_get_si(r27164, MPFR_RNDN)) { mpfr_set(r27171, r27158, MPFR_RNDN); } else { mpfr_set(r27171, r27170, MPFR_RNDN); }; if (mpfr_get_si(r27160, MPFR_RNDN)) { mpfr_set(r27172, r27162, MPFR_RNDN); } else { mpfr_set(r27172, r27171, MPFR_RNDN); }; if (mpfr_get_si(r27155, MPFR_RNDN)) { mpfr_set(r27173, r27158, MPFR_RNDN); } else { mpfr_set(r27173, r27172, MPFR_RNDN); }; return mpfr_get_d(r27173, MPFR_RNDN); } static mpfr_t r27174, r27175, r27176, r27177, r27178, r27179, r27180, r27181, r27182, r27183, r27184, r27185, r27186, r27187, r27188, r27189, r27190, r27191, r27192, r27193, r27194, r27195, r27196; void setup_mpfr_f_dm() { mpfr_set_default_prec(592); mpfr_init(r27174); mpfr_init(r27175); mpfr_init(r27176); mpfr_init_set_str(r27177, "-1.2573367356121057e+274", 10, MPFR_RNDN); mpfr_init(r27178); mpfr_init(r27179); mpfr_init(r27180); mpfr_init(r27181); mpfr_init_set_str(r27182, "-1.0193322468821646e-217", 10, MPFR_RNDN); mpfr_init(r27183); mpfr_init(r27184); mpfr_init(r27185); mpfr_init_set_str(r27186, "1.473521041029e-315", 10, MPFR_RNDN); mpfr_init(r27187); mpfr_init_set_str(r27188, "1.776905063661063e+308", 10, MPFR_RNDN); mpfr_init(r27189); mpfr_init(r27190); mpfr_init(r27191); mpfr_init(r27192); mpfr_init(r27193); mpfr_init(r27194); mpfr_init(r27195); mpfr_init(r27196); } double f_dm(double x, double y, double z, double __attribute__((unused)) t) { mpfr_set_d(r27174, y, MPFR_RNDN); mpfr_set_d(r27175, z, MPFR_RNDN); mpfr_div(r27176, r27174, r27175, MPFR_RNDN); ; mpfr_set_si(r27178, mpfr_cmp(r27176, r27177) <= 0, MPFR_RNDN); mpfr_set_d(r27179, x, MPFR_RNDN); mpfr_mul(r27180, r27179, r27174, MPFR_RNDN); mpfr_div(r27181, r27180, r27175, MPFR_RNDN); ; mpfr_set_si(r27183, mpfr_cmp(r27176, r27182) <= 0, MPFR_RNDN); mpfr_div(r27184, r27175, r27174, MPFR_RNDN); mpfr_div(r27185, r27179, r27184, MPFR_RNDN); ; mpfr_set_si(r27187, mpfr_cmp(r27176, r27186) <= 0, MPFR_RNDN); ; mpfr_set_si(r27189, mpfr_cmp(r27176, r27188) <= 0, MPFR_RNDN); mpfr_mul(r27190, r27176, r27179, MPFR_RNDN); mpfr_div(r27191, r27175, r27179, MPFR_RNDN); mpfr_div(r27192, r27174, r27191, MPFR_RNDN); if (mpfr_get_si(r27189, MPFR_RNDN)) { mpfr_set(r27193, r27190, MPFR_RNDN); } else { mpfr_set(r27193, r27192, MPFR_RNDN); }; if (mpfr_get_si(r27187, MPFR_RNDN)) { mpfr_set(r27194, r27181, MPFR_RNDN); } else { mpfr_set(r27194, r27193, MPFR_RNDN); }; if (mpfr_get_si(r27183, MPFR_RNDN)) { mpfr_set(r27195, r27185, MPFR_RNDN); } else { mpfr_set(r27195, r27194, MPFR_RNDN); }; if (mpfr_get_si(r27178, MPFR_RNDN)) { mpfr_set(r27196, r27181, MPFR_RNDN); } else { mpfr_set(r27196, r27195, MPFR_RNDN); }; return mpfr_get_d(r27196, MPFR_RNDN); }