#include #include #include #include #include char *name = "triangle2"; double f_if(float a, float b, float c) { float r19973 = a; float r19974 = b; float r19975 = r19973 + r19974; float r19976 = c; float r19977 = r19975 + r19976; float r19978 = 2.0f; float r19979 = r19977 / r19978; float r19980 = r19979 - r19973; float r19981 = r19979 * r19980; float r19982 = r19979 - r19974; float r19983 = r19981 * r19982; float r19984 = r19979 - r19976; float r19985 = r19983 * r19984; float r19986 = sqrt(r19985); return r19986; } double f_id(double a, double b, double c) { double r19987 = a; double r19988 = b; double r19989 = r19987 + r19988; double r19990 = c; double r19991 = r19989 + r19990; double r19992 = 2.0; double r19993 = r19991 / r19992; double r19994 = r19993 - r19987; double r19995 = r19993 * r19994; double r19996 = r19993 - r19988; double r19997 = r19995 * r19996; double r19998 = r19993 - r19990; double r19999 = r19997 * r19998; double r20000 = sqrt(r19999); return r20000; } double f_of(float a, float b, float c) { float r20001 = 0.5f; float r20002 = r20001 * r20001; float r20003 = c; float r20004 = a; float r20005 = r20003 - r20004; float r20006 = b; float r20007 = r20005 + r20006; float r20008 = r20002 * r20007; float r20009 = r20004 - r20003; float r20010 = r20006 + r20009; float r20011 = r20004 - r20006; float r20012 = r20011 + r20003; float r20013 = r20010 * r20012; float r20014 = r20004 + r20003; float r20015 = r20006 + r20014; float r20016 = 2.0f; float r20017 = r20016 / r20001; float r20018 = r20015 / r20017; float r20019 = r20013 * r20018; float r20020 = r20008 * r20019; float r20021 = sqrt(r20020); return r20021; } double f_od(double a, double b, double c) { double r20022 = 0.5; double r20023 = r20022 * r20022; double r20024 = c; double r20025 = a; double r20026 = r20024 - r20025; double r20027 = b; double r20028 = r20026 + r20027; double r20029 = r20023 * r20028; double r20030 = r20025 - r20024; double r20031 = r20027 + r20030; double r20032 = r20025 - r20027; double r20033 = r20032 + r20024; double r20034 = r20031 * r20033; double r20035 = r20025 + r20024; double r20036 = r20027 + r20035; double r20037 = 2.0; double r20038 = r20037 / r20022; double r20039 = r20036 / r20038; double r20040 = r20034 * r20039; double r20041 = r20029 * r20040; double r20042 = sqrt(r20041); return r20042; } 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 r20043, r20044, r20045, r20046, r20047, r20048, r20049, r20050, r20051, r20052, r20053, r20054, r20055, r20056; void setup_mpfr_f_im() { mpfr_set_default_prec(400); mpfr_init(r20043); mpfr_init(r20044); mpfr_init(r20045); mpfr_init(r20046); mpfr_init(r20047); mpfr_init_set_str(r20048, "2", 10, MPFR_RNDN); mpfr_init(r20049); mpfr_init(r20050); mpfr_init(r20051); mpfr_init(r20052); mpfr_init(r20053); mpfr_init(r20054); mpfr_init(r20055); mpfr_init(r20056); } double f_im(double a, double b, double c) { mpfr_set_d(r20043, a, MPFR_RNDN); mpfr_set_d(r20044, b, MPFR_RNDN); mpfr_add(r20045, r20043, r20044, MPFR_RNDN); mpfr_set_d(r20046, c, MPFR_RNDN); mpfr_add(r20047, r20045, r20046, MPFR_RNDN); ; mpfr_div(r20049, r20047, r20048, MPFR_RNDN); mpfr_sub(r20050, r20049, r20043, MPFR_RNDN); mpfr_mul(r20051, r20049, r20050, MPFR_RNDN); mpfr_sub(r20052, r20049, r20044, MPFR_RNDN); mpfr_mul(r20053, r20051, r20052, MPFR_RNDN); mpfr_sub(r20054, r20049, r20046, MPFR_RNDN); mpfr_mul(r20055, r20053, r20054, MPFR_RNDN); mpfr_sqrt(r20056, r20055, MPFR_RNDN); return mpfr_get_d(r20056, MPFR_RNDN); } static mpfr_t r20057, r20058, r20059, r20060, r20061, r20062, r20063, r20064, r20065, r20066, r20067, r20068, r20069, r20070, r20071, r20072, r20073, r20074, r20075, r20076, r20077; void setup_mpfr_f_fm() { mpfr_set_default_prec(400); mpfr_init_set_str(r20057, "1/2", 10, MPFR_RNDN); mpfr_init(r20058); mpfr_init(r20059); mpfr_init(r20060); mpfr_init(r20061); mpfr_init(r20062); mpfr_init(r20063); mpfr_init(r20064); mpfr_init(r20065); mpfr_init(r20066); mpfr_init(r20067); mpfr_init(r20068); mpfr_init(r20069); mpfr_init(r20070); mpfr_init(r20071); mpfr_init_set_str(r20072, "2", 10, MPFR_RNDN); mpfr_init(r20073); mpfr_init(r20074); mpfr_init(r20075); mpfr_init(r20076); mpfr_init(r20077); } double f_fm(double a, double b, double c) { ; mpfr_mul(r20058, r20057, r20057, MPFR_RNDN); mpfr_set_d(r20059, c, MPFR_RNDN); mpfr_set_d(r20060, a, MPFR_RNDN); mpfr_sub(r20061, r20059, r20060, MPFR_RNDN); mpfr_set_d(r20062, b, MPFR_RNDN); mpfr_add(r20063, r20061, r20062, MPFR_RNDN); mpfr_mul(r20064, r20058, r20063, MPFR_RNDN); mpfr_sub(r20065, r20060, r20059, MPFR_RNDN); mpfr_add(r20066, r20062, r20065, MPFR_RNDN); mpfr_sub(r20067, r20060, r20062, MPFR_RNDN); mpfr_add(r20068, r20067, r20059, MPFR_RNDN); mpfr_mul(r20069, r20066, r20068, MPFR_RNDN); mpfr_add(r20070, r20060, r20059, MPFR_RNDN); mpfr_add(r20071, r20062, r20070, MPFR_RNDN); ; mpfr_div(r20073, r20072, r20057, MPFR_RNDN); mpfr_div(r20074, r20071, r20073, MPFR_RNDN); mpfr_mul(r20075, r20069, r20074, MPFR_RNDN); mpfr_mul(r20076, r20064, r20075, MPFR_RNDN); mpfr_sqrt(r20077, r20076, MPFR_RNDN); return mpfr_get_d(r20077, MPFR_RNDN); } static mpfr_t r20078, r20079, r20080, r20081, r20082, r20083, r20084, r20085, r20086, r20087, r20088, r20089, r20090, r20091, r20092, r20093, r20094, r20095, r20096, r20097, r20098; void setup_mpfr_f_dm() { mpfr_set_default_prec(400); mpfr_init_set_str(r20078, "1/2", 10, MPFR_RNDN); mpfr_init(r20079); mpfr_init(r20080); mpfr_init(r20081); mpfr_init(r20082); mpfr_init(r20083); mpfr_init(r20084); mpfr_init(r20085); mpfr_init(r20086); mpfr_init(r20087); mpfr_init(r20088); mpfr_init(r20089); mpfr_init(r20090); mpfr_init(r20091); mpfr_init(r20092); mpfr_init_set_str(r20093, "2", 10, MPFR_RNDN); mpfr_init(r20094); mpfr_init(r20095); mpfr_init(r20096); mpfr_init(r20097); mpfr_init(r20098); } double f_dm(double a, double b, double c) { ; mpfr_mul(r20079, r20078, r20078, MPFR_RNDN); mpfr_set_d(r20080, c, MPFR_RNDN); mpfr_set_d(r20081, a, MPFR_RNDN); mpfr_sub(r20082, r20080, r20081, MPFR_RNDN); mpfr_set_d(r20083, b, MPFR_RNDN); mpfr_add(r20084, r20082, r20083, MPFR_RNDN); mpfr_mul(r20085, r20079, r20084, MPFR_RNDN); mpfr_sub(r20086, r20081, r20080, MPFR_RNDN); mpfr_add(r20087, r20083, r20086, MPFR_RNDN); mpfr_sub(r20088, r20081, r20083, MPFR_RNDN); mpfr_add(r20089, r20088, r20080, MPFR_RNDN); mpfr_mul(r20090, r20087, r20089, MPFR_RNDN); mpfr_add(r20091, r20081, r20080, MPFR_RNDN); mpfr_add(r20092, r20083, r20091, MPFR_RNDN); ; mpfr_div(r20094, r20093, r20078, MPFR_RNDN); mpfr_div(r20095, r20092, r20094, MPFR_RNDN); mpfr_mul(r20096, r20090, r20095, MPFR_RNDN); mpfr_mul(r20097, r20085, r20096, MPFR_RNDN); mpfr_sqrt(r20098, r20097, MPFR_RNDN); return mpfr_get_d(r20098, MPFR_RNDN); }