#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 r23333 = x; float r23334 = y; float r23335 = z; float r23336 = r23334 / r23335; float r23337 = t; float r23338 = r23336 * r23337; float r23339 = r23338 / r23337; float r23340 = r23333 * r23339; return r23340; } double f_id(double x, double y, double z, double t) { double r23341 = x; double r23342 = y; double r23343 = z; double r23344 = r23342 / r23343; double r23345 = t; double r23346 = r23344 * r23345; double r23347 = r23346 / r23345; double r23348 = r23341 * r23347; return r23348; } double f_of(float x, float y, float z, float __attribute__((unused)) t) { float r23349 = z; float r23350 = y; float r23351 = r23349 / r23350; float r23352 = -2.1205953472489645e+260; bool r23353 = r23351 <= r23352; float r23354 = x; float r23355 = r23354 / r23349; float r23356 = 1; float r23357 = r23356 / r23350; float r23358 = r23355 / r23357; float r23359 = -2.928409658617734e-171; bool r23360 = r23351 <= r23359; float r23361 = r23354 / r23351; float r23362 = 2.0107945178521047e-195; bool r23363 = r23351 <= r23362; float r23364 = r23350 * r23354; float r23365 = r23364 / r23349; float r23366 = 1.7884319738416773e+213; bool r23367 = r23351 <= r23366; float r23368 = r23367 ? r23361 : r23358; float r23369 = r23363 ? r23365 : r23368; float r23370 = r23360 ? r23361 : r23369; float r23371 = r23353 ? r23358 : r23370; return r23371; } double f_od(double x, double y, double z, double __attribute__((unused)) t) { double r23372 = z; double r23373 = y; double r23374 = r23372 / r23373; double r23375 = -2.1205953472489645e+260; bool r23376 = r23374 <= r23375; double r23377 = x; double r23378 = r23377 / r23372; double r23379 = 1; double r23380 = r23379 / r23373; double r23381 = r23378 / r23380; double r23382 = -2.928409658617734e-171; bool r23383 = r23374 <= r23382; double r23384 = r23377 / r23374; double r23385 = 2.0107945178521047e-195; bool r23386 = r23374 <= r23385; double r23387 = r23373 * r23377; double r23388 = r23387 / r23372; double r23389 = 1.7884319738416773e+213; bool r23390 = r23374 <= r23389; double r23391 = r23390 ? r23384 : r23381; double r23392 = r23386 ? r23388 : r23391; double r23393 = r23383 ? r23384 : r23392; double r23394 = r23376 ? r23381 : r23393; return r23394; } 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 r23395, r23396, r23397, r23398, r23399, r23400, r23401, r23402; void setup_mpfr_f_im() { mpfr_set_default_prec(400); mpfr_init(r23395); mpfr_init(r23396); mpfr_init(r23397); mpfr_init(r23398); mpfr_init(r23399); mpfr_init(r23400); mpfr_init(r23401); mpfr_init(r23402); } double f_im(double x, double y, double z, double t) { mpfr_set_d(r23395, x, MPFR_RNDN); mpfr_set_d(r23396, y, MPFR_RNDN); mpfr_set_d(r23397, z, MPFR_RNDN); mpfr_div(r23398, r23396, r23397, MPFR_RNDN); mpfr_set_d(r23399, t, MPFR_RNDN); mpfr_mul(r23400, r23398, r23399, MPFR_RNDN); mpfr_div(r23401, r23400, r23399, MPFR_RNDN); mpfr_mul(r23402, r23395, r23401, MPFR_RNDN); return mpfr_get_d(r23402, MPFR_RNDN); } static mpfr_t r23403, r23404, r23405, r23406, r23407, r23408, r23409, r23410, r23411, r23412, r23413, r23414, r23415, r23416, r23417, r23418, r23419, r23420, r23421, r23422, r23423, r23424, r23425; void setup_mpfr_f_fm() { mpfr_set_default_prec(400); mpfr_init(r23403); mpfr_init(r23404); mpfr_init(r23405); mpfr_init_set_str(r23406, "-2.1205953472489645e+260", 10, MPFR_RNDN); mpfr_init(r23407); mpfr_init(r23408); mpfr_init(r23409); mpfr_init_set_str(r23410, "1", 10, MPFR_RNDN); mpfr_init(r23411); mpfr_init(r23412); mpfr_init_set_str(r23413, "-2.928409658617734e-171", 10, MPFR_RNDN); mpfr_init(r23414); mpfr_init(r23415); mpfr_init_set_str(r23416, "2.0107945178521047e-195", 10, MPFR_RNDN); mpfr_init(r23417); mpfr_init(r23418); mpfr_init(r23419); mpfr_init_set_str(r23420, "1.7884319738416773e+213", 10, MPFR_RNDN); mpfr_init(r23421); mpfr_init(r23422); mpfr_init(r23423); mpfr_init(r23424); mpfr_init(r23425); } double f_fm(double x, double y, double z, double __attribute__((unused)) t) { mpfr_set_d(r23403, z, MPFR_RNDN); mpfr_set_d(r23404, y, MPFR_RNDN); mpfr_div(r23405, r23403, r23404, MPFR_RNDN); ; mpfr_set_si(r23407, mpfr_cmp(r23405, r23406) <= 0, MPFR_RNDN); mpfr_set_d(r23408, x, MPFR_RNDN); mpfr_div(r23409, r23408, r23403, MPFR_RNDN); ; mpfr_div(r23411, r23410, r23404, MPFR_RNDN); mpfr_div(r23412, r23409, r23411, MPFR_RNDN); ; mpfr_set_si(r23414, mpfr_cmp(r23405, r23413) <= 0, MPFR_RNDN); mpfr_div(r23415, r23408, r23405, MPFR_RNDN); ; mpfr_set_si(r23417, mpfr_cmp(r23405, r23416) <= 0, MPFR_RNDN); mpfr_mul(r23418, r23404, r23408, MPFR_RNDN); mpfr_div(r23419, r23418, r23403, MPFR_RNDN); ; mpfr_set_si(r23421, mpfr_cmp(r23405, r23420) <= 0, MPFR_RNDN); if (mpfr_get_si(r23421, MPFR_RNDN)) { mpfr_set(r23422, r23415, MPFR_RNDN); } else { mpfr_set(r23422, r23412, MPFR_RNDN); }; if (mpfr_get_si(r23417, MPFR_RNDN)) { mpfr_set(r23423, r23419, MPFR_RNDN); } else { mpfr_set(r23423, r23422, MPFR_RNDN); }; if (mpfr_get_si(r23414, MPFR_RNDN)) { mpfr_set(r23424, r23415, MPFR_RNDN); } else { mpfr_set(r23424, r23423, MPFR_RNDN); }; if (mpfr_get_si(r23407, MPFR_RNDN)) { mpfr_set(r23425, r23412, MPFR_RNDN); } else { mpfr_set(r23425, r23424, MPFR_RNDN); }; return mpfr_get_d(r23425, MPFR_RNDN); } static mpfr_t r23426, r23427, r23428, r23429, r23430, r23431, r23432, r23433, r23434, r23435, r23436, r23437, r23438, r23439, r23440, r23441, r23442, r23443, r23444, r23445, r23446, r23447, r23448; void setup_mpfr_f_dm() { mpfr_set_default_prec(400); mpfr_init(r23426); mpfr_init(r23427); mpfr_init(r23428); mpfr_init_set_str(r23429, "-2.1205953472489645e+260", 10, MPFR_RNDN); mpfr_init(r23430); mpfr_init(r23431); mpfr_init(r23432); mpfr_init_set_str(r23433, "1", 10, MPFR_RNDN); mpfr_init(r23434); mpfr_init(r23435); mpfr_init_set_str(r23436, "-2.928409658617734e-171", 10, MPFR_RNDN); mpfr_init(r23437); mpfr_init(r23438); mpfr_init_set_str(r23439, "2.0107945178521047e-195", 10, MPFR_RNDN); mpfr_init(r23440); mpfr_init(r23441); mpfr_init(r23442); mpfr_init_set_str(r23443, "1.7884319738416773e+213", 10, MPFR_RNDN); mpfr_init(r23444); mpfr_init(r23445); mpfr_init(r23446); mpfr_init(r23447); mpfr_init(r23448); } double f_dm(double x, double y, double z, double __attribute__((unused)) t) { mpfr_set_d(r23426, z, MPFR_RNDN); mpfr_set_d(r23427, y, MPFR_RNDN); mpfr_div(r23428, r23426, r23427, MPFR_RNDN); ; mpfr_set_si(r23430, mpfr_cmp(r23428, r23429) <= 0, MPFR_RNDN); mpfr_set_d(r23431, x, MPFR_RNDN); mpfr_div(r23432, r23431, r23426, MPFR_RNDN); ; mpfr_div(r23434, r23433, r23427, MPFR_RNDN); mpfr_div(r23435, r23432, r23434, MPFR_RNDN); ; mpfr_set_si(r23437, mpfr_cmp(r23428, r23436) <= 0, MPFR_RNDN); mpfr_div(r23438, r23431, r23428, MPFR_RNDN); ; mpfr_set_si(r23440, mpfr_cmp(r23428, r23439) <= 0, MPFR_RNDN); mpfr_mul(r23441, r23427, r23431, MPFR_RNDN); mpfr_div(r23442, r23441, r23426, MPFR_RNDN); ; mpfr_set_si(r23444, mpfr_cmp(r23428, r23443) <= 0, MPFR_RNDN); if (mpfr_get_si(r23444, MPFR_RNDN)) { mpfr_set(r23445, r23438, MPFR_RNDN); } else { mpfr_set(r23445, r23435, MPFR_RNDN); }; if (mpfr_get_si(r23440, MPFR_RNDN)) { mpfr_set(r23446, r23442, MPFR_RNDN); } else { mpfr_set(r23446, r23445, MPFR_RNDN); }; if (mpfr_get_si(r23437, MPFR_RNDN)) { mpfr_set(r23447, r23438, MPFR_RNDN); } else { mpfr_set(r23447, r23446, MPFR_RNDN); }; if (mpfr_get_si(r23430, MPFR_RNDN)) { mpfr_set(r23448, r23435, MPFR_RNDN); } else { mpfr_set(r23448, r23447, MPFR_RNDN); }; return mpfr_get_d(r23448, MPFR_RNDN); }