#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 r24240 = x; float r24241 = y; float r24242 = z; float r24243 = r24241 / r24242; float r24244 = t; float r24245 = r24243 * r24244; float r24246 = r24245 / r24244; float r24247 = r24240 * r24246; return r24247; } double f_id(double x, double y, double z, double t) { double r24248 = x; double r24249 = y; double r24250 = z; double r24251 = r24249 / r24250; double r24252 = t; double r24253 = r24251 * r24252; double r24254 = r24253 / r24252; double r24255 = r24248 * r24254; return r24255; } double f_of(float x, float y, float z, float __attribute__((unused)) t) { float r24256 = y; float r24257 = x; float r24258 = r24256 * r24257; float r24259 = -8.848462821600082e+285; bool r24260 = r24258 <= r24259; float r24261 = z; float r24262 = r24257 / r24261; float r24263 = r24262 * r24256; float r24264 = -3.3843264108827247e-246; bool r24265 = r24258 <= r24264; float r24266 = r24258 / r24261; float r24267 = 1.1669627146910484e-213; bool r24268 = r24258 <= r24267; float r24269 = 7.861310228265737e+86; bool r24270 = r24258 <= r24269; float r24271 = +inf.0; bool r24272 = r24258 <= r24271; float r24273 = r24261 / r24256; float r24274 = r24257 / r24273; float r24275 = r24272 ? r24274 : r24274; float r24276 = r24270 ? r24266 : r24275; float r24277 = r24268 ? r24263 : r24276; float r24278 = r24265 ? r24266 : r24277; float r24279 = r24260 ? r24263 : r24278; return r24279; } double f_od(double x, double y, double z, double __attribute__((unused)) t) { double r24280 = y; double r24281 = x; double r24282 = r24280 * r24281; double r24283 = -8.848462821600082e+285; bool r24284 = r24282 <= r24283; double r24285 = z; double r24286 = r24281 / r24285; double r24287 = r24286 * r24280; double r24288 = -3.3843264108827247e-246; bool r24289 = r24282 <= r24288; double r24290 = r24282 / r24285; double r24291 = 1.1669627146910484e-213; bool r24292 = r24282 <= r24291; double r24293 = 7.861310228265737e+86; bool r24294 = r24282 <= r24293; double r24295 = +inf.0; bool r24296 = r24282 <= r24295; double r24297 = r24285 / r24280; double r24298 = r24281 / r24297; double r24299 = r24296 ? r24298 : r24298; double r24300 = r24294 ? r24290 : r24299; double r24301 = r24292 ? r24287 : r24300; double r24302 = r24289 ? r24290 : r24301; double r24303 = r24284 ? r24287 : r24302; return r24303; } 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 r24304, r24305, r24306, r24307, r24308, r24309, r24310, r24311; void setup_mpfr_f_im() { mpfr_set_default_prec(400); mpfr_init(r24304); mpfr_init(r24305); mpfr_init(r24306); mpfr_init(r24307); mpfr_init(r24308); mpfr_init(r24309); mpfr_init(r24310); mpfr_init(r24311); } double f_im(double x, double y, double z, double t) { mpfr_set_d(r24304, x, MPFR_RNDN); mpfr_set_d(r24305, y, MPFR_RNDN); mpfr_set_d(r24306, z, MPFR_RNDN); mpfr_div(r24307, r24305, r24306, MPFR_RNDN); mpfr_set_d(r24308, t, MPFR_RNDN); mpfr_mul(r24309, r24307, r24308, MPFR_RNDN); mpfr_div(r24310, r24309, r24308, MPFR_RNDN); mpfr_mul(r24311, r24304, r24310, MPFR_RNDN); return mpfr_get_d(r24311, MPFR_RNDN); } static mpfr_t r24312, r24313, r24314, r24315, r24316, r24317, r24318, r24319, r24320, r24321, r24322, r24323, r24324, r24325, r24326, r24327, r24328, r24329, r24330, r24331, r24332, r24333, r24334, r24335; void setup_mpfr_f_fm() { mpfr_set_default_prec(400); mpfr_init(r24312); mpfr_init(r24313); mpfr_init(r24314); mpfr_init_set_str(r24315, "-8.848462821600082e+285", 10, MPFR_RNDN); mpfr_init(r24316); mpfr_init(r24317); mpfr_init(r24318); mpfr_init(r24319); mpfr_init_set_str(r24320, "-3.3843264108827247e-246", 10, MPFR_RNDN); mpfr_init(r24321); mpfr_init(r24322); mpfr_init_set_str(r24323, "1.1669627146910484e-213", 10, MPFR_RNDN); mpfr_init(r24324); mpfr_init_set_str(r24325, "7.861310228265737e+86", 10, MPFR_RNDN); mpfr_init(r24326); mpfr_init_set_str(r24327, "+inf.0", 10, MPFR_RNDN); mpfr_init(r24328); mpfr_init(r24329); mpfr_init(r24330); mpfr_init(r24331); mpfr_init(r24332); mpfr_init(r24333); mpfr_init(r24334); mpfr_init(r24335); } double f_fm(double x, double y, double z, double __attribute__((unused)) t) { mpfr_set_d(r24312, y, MPFR_RNDN); mpfr_set_d(r24313, x, MPFR_RNDN); mpfr_mul(r24314, r24312, r24313, MPFR_RNDN); ; mpfr_set_si(r24316, mpfr_cmp(r24314, r24315) <= 0, MPFR_RNDN); mpfr_set_d(r24317, z, MPFR_RNDN); mpfr_div(r24318, r24313, r24317, MPFR_RNDN); mpfr_mul(r24319, r24318, r24312, MPFR_RNDN); ; mpfr_set_si(r24321, mpfr_cmp(r24314, r24320) <= 0, MPFR_RNDN); mpfr_div(r24322, r24314, r24317, MPFR_RNDN); ; mpfr_set_si(r24324, mpfr_cmp(r24314, r24323) <= 0, MPFR_RNDN); ; mpfr_set_si(r24326, mpfr_cmp(r24314, r24325) <= 0, MPFR_RNDN); ; mpfr_set_si(r24328, mpfr_cmp(r24314, r24327) <= 0, MPFR_RNDN); mpfr_div(r24329, r24317, r24312, MPFR_RNDN); mpfr_div(r24330, r24313, r24329, MPFR_RNDN); if (mpfr_get_si(r24328, MPFR_RNDN)) { mpfr_set(r24331, r24330, MPFR_RNDN); } else { mpfr_set(r24331, r24330, MPFR_RNDN); }; if (mpfr_get_si(r24326, MPFR_RNDN)) { mpfr_set(r24332, r24322, MPFR_RNDN); } else { mpfr_set(r24332, r24331, MPFR_RNDN); }; if (mpfr_get_si(r24324, MPFR_RNDN)) { mpfr_set(r24333, r24319, MPFR_RNDN); } else { mpfr_set(r24333, r24332, MPFR_RNDN); }; if (mpfr_get_si(r24321, MPFR_RNDN)) { mpfr_set(r24334, r24322, MPFR_RNDN); } else { mpfr_set(r24334, r24333, MPFR_RNDN); }; if (mpfr_get_si(r24316, MPFR_RNDN)) { mpfr_set(r24335, r24319, MPFR_RNDN); } else { mpfr_set(r24335, r24334, MPFR_RNDN); }; return mpfr_get_d(r24335, MPFR_RNDN); } static mpfr_t r24336, r24337, r24338, r24339, r24340, r24341, r24342, r24343, r24344, r24345, r24346, r24347, r24348, r24349, r24350, r24351, r24352, r24353, r24354, r24355, r24356, r24357, r24358, r24359; void setup_mpfr_f_dm() { mpfr_set_default_prec(400); mpfr_init(r24336); mpfr_init(r24337); mpfr_init(r24338); mpfr_init_set_str(r24339, "-8.848462821600082e+285", 10, MPFR_RNDN); mpfr_init(r24340); mpfr_init(r24341); mpfr_init(r24342); mpfr_init(r24343); mpfr_init_set_str(r24344, "-3.3843264108827247e-246", 10, MPFR_RNDN); mpfr_init(r24345); mpfr_init(r24346); mpfr_init_set_str(r24347, "1.1669627146910484e-213", 10, MPFR_RNDN); mpfr_init(r24348); mpfr_init_set_str(r24349, "7.861310228265737e+86", 10, MPFR_RNDN); mpfr_init(r24350); mpfr_init_set_str(r24351, "+inf.0", 10, MPFR_RNDN); mpfr_init(r24352); mpfr_init(r24353); mpfr_init(r24354); mpfr_init(r24355); mpfr_init(r24356); mpfr_init(r24357); mpfr_init(r24358); mpfr_init(r24359); } double f_dm(double x, double y, double z, double __attribute__((unused)) t) { mpfr_set_d(r24336, y, MPFR_RNDN); mpfr_set_d(r24337, x, MPFR_RNDN); mpfr_mul(r24338, r24336, r24337, MPFR_RNDN); ; mpfr_set_si(r24340, mpfr_cmp(r24338, r24339) <= 0, MPFR_RNDN); mpfr_set_d(r24341, z, MPFR_RNDN); mpfr_div(r24342, r24337, r24341, MPFR_RNDN); mpfr_mul(r24343, r24342, r24336, MPFR_RNDN); ; mpfr_set_si(r24345, mpfr_cmp(r24338, r24344) <= 0, MPFR_RNDN); mpfr_div(r24346, r24338, r24341, MPFR_RNDN); ; mpfr_set_si(r24348, mpfr_cmp(r24338, r24347) <= 0, MPFR_RNDN); ; mpfr_set_si(r24350, mpfr_cmp(r24338, r24349) <= 0, MPFR_RNDN); ; mpfr_set_si(r24352, mpfr_cmp(r24338, r24351) <= 0, MPFR_RNDN); mpfr_div(r24353, r24341, r24336, MPFR_RNDN); mpfr_div(r24354, r24337, r24353, MPFR_RNDN); if (mpfr_get_si(r24352, MPFR_RNDN)) { mpfr_set(r24355, r24354, MPFR_RNDN); } else { mpfr_set(r24355, r24354, MPFR_RNDN); }; if (mpfr_get_si(r24350, MPFR_RNDN)) { mpfr_set(r24356, r24346, MPFR_RNDN); } else { mpfr_set(r24356, r24355, MPFR_RNDN); }; if (mpfr_get_si(r24348, MPFR_RNDN)) { mpfr_set(r24357, r24343, MPFR_RNDN); } else { mpfr_set(r24357, r24356, MPFR_RNDN); }; if (mpfr_get_si(r24345, MPFR_RNDN)) { mpfr_set(r24358, r24346, MPFR_RNDN); } else { mpfr_set(r24358, r24357, MPFR_RNDN); }; if (mpfr_get_si(r24340, MPFR_RNDN)) { mpfr_set(r24359, r24343, MPFR_RNDN); } else { mpfr_set(r24359, r24358, MPFR_RNDN); }; return mpfr_get_d(r24359, MPFR_RNDN); }