#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 r24896 = x; float r24897 = y; float r24898 = z; float r24899 = r24897 / r24898; float r24900 = t; float r24901 = r24899 * r24900; float r24902 = r24901 / r24900; float r24903 = r24896 * r24902; return r24903; } double f_id(double x, double y, double z, double t) { double r24904 = x; double r24905 = y; double r24906 = z; double r24907 = r24905 / r24906; double r24908 = t; double r24909 = r24907 * r24908; double r24910 = r24909 / r24908; double r24911 = r24904 * r24910; return r24911; } double f_of(float x, float y, float z, float t) { float r24912 = x; float r24913 = y; float r24914 = r24912 * r24913; float r24915 = -inf.0; bool r24916 = r24914 <= r24915; float r24917 = z; float r24918 = r24913 / r24917; float r24919 = t; float r24920 = r24918 * r24919; float r24921 = r24920 / r24919; float r24922 = r24912 * r24921; float r24923 = -4.5164478497014764e-274; bool r24924 = r24914 <= r24923; float r24925 = r24914 / r24917; float r24926 = 6.6426518701512256e-248; bool r24927 = r24914 <= r24926; float r24928 = r24912 * r24918; float r24929 = 5.3560873381746105e+101; bool r24930 = r24914 <= r24929; float r24931 = r24930 ? r24925 : r24928; float r24932 = r24927 ? r24928 : r24931; float r24933 = r24924 ? r24925 : r24932; float r24934 = r24916 ? r24922 : r24933; return r24934; } double f_od(double x, double y, double z, double t) { double r24935 = x; double r24936 = y; double r24937 = r24935 * r24936; double r24938 = -inf.0; bool r24939 = r24937 <= r24938; double r24940 = z; double r24941 = r24936 / r24940; double r24942 = t; double r24943 = r24941 * r24942; double r24944 = r24943 / r24942; double r24945 = r24935 * r24944; double r24946 = -4.5164478497014764e-274; bool r24947 = r24937 <= r24946; double r24948 = r24937 / r24940; double r24949 = 6.6426518701512256e-248; bool r24950 = r24937 <= r24949; double r24951 = r24935 * r24941; double r24952 = 5.3560873381746105e+101; bool r24953 = r24937 <= r24952; double r24954 = r24953 ? r24948 : r24951; double r24955 = r24950 ? r24951 : r24954; double r24956 = r24947 ? r24948 : r24955; double r24957 = r24939 ? r24945 : r24956; return r24957; } 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 r24958, r24959, r24960, r24961, r24962, r24963, r24964, r24965; void setup_mpfr_f_im() { mpfr_set_default_prec(400); mpfr_init(r24958); mpfr_init(r24959); mpfr_init(r24960); mpfr_init(r24961); mpfr_init(r24962); mpfr_init(r24963); mpfr_init(r24964); mpfr_init(r24965); } double f_im(double x, double y, double z, double t) { mpfr_set_d(r24958, x, MPFR_RNDN); mpfr_set_d(r24959, y, MPFR_RNDN); mpfr_set_d(r24960, z, MPFR_RNDN); mpfr_div(r24961, r24959, r24960, MPFR_RNDN); mpfr_set_d(r24962, t, MPFR_RNDN); mpfr_mul(r24963, r24961, r24962, MPFR_RNDN); mpfr_div(r24964, r24963, r24962, MPFR_RNDN); mpfr_mul(r24965, r24958, r24964, MPFR_RNDN); return mpfr_get_d(r24965, MPFR_RNDN); } static mpfr_t r24966, r24967, r24968, r24969, r24970, r24971, r24972, r24973, r24974, r24975, r24976, r24977, r24978, r24979, r24980, r24981, r24982, r24983, r24984, r24985, r24986, r24987, r24988; void setup_mpfr_f_fm() { mpfr_set_default_prec(400); mpfr_init(r24966); mpfr_init(r24967); mpfr_init(r24968); mpfr_init_set_str(r24969, "-inf.0", 10, MPFR_RNDN); mpfr_init(r24970); mpfr_init(r24971); mpfr_init(r24972); mpfr_init(r24973); mpfr_init(r24974); mpfr_init(r24975); mpfr_init(r24976); mpfr_init_set_str(r24977, "-4.5164478497014764e-274", 10, MPFR_RNDN); mpfr_init(r24978); mpfr_init(r24979); mpfr_init_set_str(r24980, "6.6426518701512256e-248", 10, MPFR_RNDN); mpfr_init(r24981); mpfr_init(r24982); mpfr_init_set_str(r24983, "5.3560873381746105e+101", 10, MPFR_RNDN); mpfr_init(r24984); mpfr_init(r24985); mpfr_init(r24986); mpfr_init(r24987); mpfr_init(r24988); } double f_fm(double x, double y, double z, double t) { mpfr_set_d(r24966, x, MPFR_RNDN); mpfr_set_d(r24967, y, MPFR_RNDN); mpfr_mul(r24968, r24966, r24967, MPFR_RNDN); ; mpfr_set_si(r24970, mpfr_cmp(r24968, r24969) <= 0, MPFR_RNDN); mpfr_set_d(r24971, z, MPFR_RNDN); mpfr_div(r24972, r24967, r24971, MPFR_RNDN); mpfr_set_d(r24973, t, MPFR_RNDN); mpfr_mul(r24974, r24972, r24973, MPFR_RNDN); mpfr_div(r24975, r24974, r24973, MPFR_RNDN); mpfr_mul(r24976, r24966, r24975, MPFR_RNDN); ; mpfr_set_si(r24978, mpfr_cmp(r24968, r24977) <= 0, MPFR_RNDN); mpfr_div(r24979, r24968, r24971, MPFR_RNDN); ; mpfr_set_si(r24981, mpfr_cmp(r24968, r24980) <= 0, MPFR_RNDN); mpfr_mul(r24982, r24966, r24972, MPFR_RNDN); ; mpfr_set_si(r24984, mpfr_cmp(r24968, r24983) <= 0, MPFR_RNDN); if (mpfr_get_si(r24984, MPFR_RNDN)) { mpfr_set(r24985, r24979, MPFR_RNDN); } else { mpfr_set(r24985, r24982, MPFR_RNDN); }; if (mpfr_get_si(r24981, MPFR_RNDN)) { mpfr_set(r24986, r24982, MPFR_RNDN); } else { mpfr_set(r24986, r24985, MPFR_RNDN); }; if (mpfr_get_si(r24978, MPFR_RNDN)) { mpfr_set(r24987, r24979, MPFR_RNDN); } else { mpfr_set(r24987, r24986, MPFR_RNDN); }; if (mpfr_get_si(r24970, MPFR_RNDN)) { mpfr_set(r24988, r24976, MPFR_RNDN); } else { mpfr_set(r24988, r24987, MPFR_RNDN); }; return mpfr_get_d(r24988, MPFR_RNDN); } static mpfr_t r24989, r24990, r24991, r24992, r24993, r24994, r24995, r24996, r24997, r24998, r24999, r25000, r25001, r25002, r25003, r25004, r25005, r25006, r25007, r25008, r25009, r25010, r25011; void setup_mpfr_f_dm() { mpfr_set_default_prec(400); mpfr_init(r24989); mpfr_init(r24990); mpfr_init(r24991); mpfr_init_set_str(r24992, "-inf.0", 10, MPFR_RNDN); mpfr_init(r24993); mpfr_init(r24994); mpfr_init(r24995); mpfr_init(r24996); mpfr_init(r24997); mpfr_init(r24998); mpfr_init(r24999); mpfr_init_set_str(r25000, "-4.5164478497014764e-274", 10, MPFR_RNDN); mpfr_init(r25001); mpfr_init(r25002); mpfr_init_set_str(r25003, "6.6426518701512256e-248", 10, MPFR_RNDN); mpfr_init(r25004); mpfr_init(r25005); mpfr_init_set_str(r25006, "5.3560873381746105e+101", 10, MPFR_RNDN); mpfr_init(r25007); mpfr_init(r25008); mpfr_init(r25009); mpfr_init(r25010); mpfr_init(r25011); } double f_dm(double x, double y, double z, double t) { mpfr_set_d(r24989, x, MPFR_RNDN); mpfr_set_d(r24990, y, MPFR_RNDN); mpfr_mul(r24991, r24989, r24990, MPFR_RNDN); ; mpfr_set_si(r24993, mpfr_cmp(r24991, r24992) <= 0, MPFR_RNDN); mpfr_set_d(r24994, z, MPFR_RNDN); mpfr_div(r24995, r24990, r24994, MPFR_RNDN); mpfr_set_d(r24996, t, MPFR_RNDN); mpfr_mul(r24997, r24995, r24996, MPFR_RNDN); mpfr_div(r24998, r24997, r24996, MPFR_RNDN); mpfr_mul(r24999, r24989, r24998, MPFR_RNDN); ; mpfr_set_si(r25001, mpfr_cmp(r24991, r25000) <= 0, MPFR_RNDN); mpfr_div(r25002, r24991, r24994, MPFR_RNDN); ; mpfr_set_si(r25004, mpfr_cmp(r24991, r25003) <= 0, MPFR_RNDN); mpfr_mul(r25005, r24989, r24995, MPFR_RNDN); ; mpfr_set_si(r25007, mpfr_cmp(r24991, r25006) <= 0, MPFR_RNDN); if (mpfr_get_si(r25007, MPFR_RNDN)) { mpfr_set(r25008, r25002, MPFR_RNDN); } else { mpfr_set(r25008, r25005, MPFR_RNDN); }; if (mpfr_get_si(r25004, MPFR_RNDN)) { mpfr_set(r25009, r25005, MPFR_RNDN); } else { mpfr_set(r25009, r25008, MPFR_RNDN); }; if (mpfr_get_si(r25001, MPFR_RNDN)) { mpfr_set(r25010, r25002, MPFR_RNDN); } else { mpfr_set(r25010, r25009, MPFR_RNDN); }; if (mpfr_get_si(r24993, MPFR_RNDN)) { mpfr_set(r25011, r24999, MPFR_RNDN); } else { mpfr_set(r25011, r25010, MPFR_RNDN); }; return mpfr_get_d(r25011, MPFR_RNDN); }