#include #include #include #include #include char *name = "NMSE p42, positive"; double f_if(float a, float b, float c) { float r15858 = b; float r15859 = -r15858; float r15860 = r15858 * r15858; float r15861 = 4.0f; float r15862 = a; float r15863 = c; float r15864 = r15862 * r15863; float r15865 = r15861 * r15864; float r15866 = r15860 - r15865; float r15867 = sqrt(r15866); float r15868 = r15859 + r15867; float r15869 = 2.0f; float r15870 = r15869 * r15862; float r15871 = r15868 / r15870; return r15871; } double f_id(double a, double b, double c) { double r15872 = b; double r15873 = -r15872; double r15874 = r15872 * r15872; double r15875 = 4.0; double r15876 = a; double r15877 = c; double r15878 = r15876 * r15877; double r15879 = r15875 * r15878; double r15880 = r15874 - r15879; double r15881 = sqrt(r15880); double r15882 = r15873 + r15881; double r15883 = 2.0; double r15884 = r15883 * r15876; double r15885 = r15882 / r15884; return r15885; } double f_of(float a, float b, float c) { float r15886 = c; float r15887 = 4.0f; float r15888 = a; float r15889 = r15887 * r15888; float r15890 = r15886 * r15889; float r15891 = b; float r15892 = -r15891; float r15893 = r15891 * r15891; float r15894 = r15888 * r15886; float r15895 = r15887 * r15894; float r15896 = r15893 - r15895; float r15897 = sqrt(r15896); float r15898 = r15892 - r15897; float r15899 = r15890 / r15898; float r15900 = 2.0f; float r15901 = r15900 * r15888; float r15902 = r15899 / r15901; return r15902; } double f_od(double a, double b, double c) { double r15903 = c; double r15904 = 4.0; double r15905 = a; double r15906 = r15904 * r15905; double r15907 = r15903 * r15906; double r15908 = b; double r15909 = -r15908; double r15910 = r15908 * r15908; double r15911 = r15905 * r15903; double r15912 = r15904 * r15911; double r15913 = r15910 - r15912; double r15914 = sqrt(r15913); double r15915 = r15909 - r15914; double r15916 = r15907 / r15915; double r15917 = 2.0; double r15918 = r15917 * r15905; double r15919 = r15916 / r15918; return r15919; } 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 r15920, r15921, r15922, r15923, r15924, r15925, r15926, r15927, r15928, r15929, r15930, r15931, r15932, r15933; void setup_mpfr_f_im() { mpfr_set_default_prec(144); mpfr_init(r15920); mpfr_init(r15921); mpfr_init(r15922); mpfr_init_set_str(r15923, "4", 10, MPFR_RNDN); mpfr_init(r15924); mpfr_init(r15925); mpfr_init(r15926); mpfr_init(r15927); mpfr_init(r15928); mpfr_init(r15929); mpfr_init(r15930); mpfr_init_set_str(r15931, "2", 10, MPFR_RNDN); mpfr_init(r15932); mpfr_init(r15933); } double f_im(double a, double b, double c) { mpfr_set_d(r15920, b, MPFR_RNDN); mpfr_neg(r15921, r15920, MPFR_RNDN); mpfr_sqr(r15922, r15920, MPFR_RNDN); ; mpfr_set_d(r15924, a, MPFR_RNDN); mpfr_set_d(r15925, c, MPFR_RNDN); mpfr_mul(r15926, r15924, r15925, MPFR_RNDN); mpfr_mul(r15927, r15923, r15926, MPFR_RNDN); mpfr_sub(r15928, r15922, r15927, MPFR_RNDN); mpfr_sqrt(r15929, r15928, MPFR_RNDN); mpfr_add(r15930, r15921, r15929, MPFR_RNDN); ; mpfr_mul(r15932, r15931, r15924, MPFR_RNDN); mpfr_div(r15933, r15930, r15932, MPFR_RNDN); return mpfr_get_d(r15933, MPFR_RNDN); } static mpfr_t r15934, r15935, r15936, r15937, r15938, r15939, r15940, r15941, r15942, r15943, r15944, r15945, r15946, r15947, r15948, r15949, r15950; void setup_mpfr_f_fm() { mpfr_set_default_prec(144); mpfr_init(r15934); mpfr_init_set_str(r15935, "4", 10, MPFR_RNDN); mpfr_init(r15936); mpfr_init(r15937); mpfr_init(r15938); mpfr_init(r15939); mpfr_init(r15940); mpfr_init(r15941); mpfr_init(r15942); mpfr_init(r15943); mpfr_init(r15944); mpfr_init(r15945); mpfr_init(r15946); mpfr_init(r15947); mpfr_init_set_str(r15948, "2", 10, MPFR_RNDN); mpfr_init(r15949); mpfr_init(r15950); } double f_fm(double a, double b, double c) { mpfr_set_d(r15934, c, MPFR_RNDN); ; mpfr_set_d(r15936, a, MPFR_RNDN); mpfr_mul(r15937, r15935, r15936, MPFR_RNDN); mpfr_mul(r15938, r15934, r15937, MPFR_RNDN); mpfr_set_d(r15939, b, MPFR_RNDN); mpfr_neg(r15940, r15939, MPFR_RNDN); mpfr_sqr(r15941, r15939, MPFR_RNDN); mpfr_mul(r15942, r15936, r15934, MPFR_RNDN); mpfr_mul(r15943, r15935, r15942, MPFR_RNDN); mpfr_sub(r15944, r15941, r15943, MPFR_RNDN); mpfr_sqrt(r15945, r15944, MPFR_RNDN); mpfr_sub(r15946, r15940, r15945, MPFR_RNDN); mpfr_div(r15947, r15938, r15946, MPFR_RNDN); ; mpfr_mul(r15949, r15948, r15936, MPFR_RNDN); mpfr_div(r15950, r15947, r15949, MPFR_RNDN); return mpfr_get_d(r15950, MPFR_RNDN); } static mpfr_t r15951, r15952, r15953, r15954, r15955, r15956, r15957, r15958, r15959, r15960, r15961, r15962, r15963, r15964, r15965, r15966, r15967; void setup_mpfr_f_dm() { mpfr_set_default_prec(144); mpfr_init(r15951); mpfr_init_set_str(r15952, "4", 10, MPFR_RNDN); mpfr_init(r15953); mpfr_init(r15954); mpfr_init(r15955); mpfr_init(r15956); mpfr_init(r15957); mpfr_init(r15958); mpfr_init(r15959); mpfr_init(r15960); mpfr_init(r15961); mpfr_init(r15962); mpfr_init(r15963); mpfr_init(r15964); mpfr_init_set_str(r15965, "2", 10, MPFR_RNDN); mpfr_init(r15966); mpfr_init(r15967); } double f_dm(double a, double b, double c) { mpfr_set_d(r15951, c, MPFR_RNDN); ; mpfr_set_d(r15953, a, MPFR_RNDN); mpfr_mul(r15954, r15952, r15953, MPFR_RNDN); mpfr_mul(r15955, r15951, r15954, MPFR_RNDN); mpfr_set_d(r15956, b, MPFR_RNDN); mpfr_neg(r15957, r15956, MPFR_RNDN); mpfr_sqr(r15958, r15956, MPFR_RNDN); mpfr_mul(r15959, r15953, r15951, MPFR_RNDN); mpfr_mul(r15960, r15952, r15959, MPFR_RNDN); mpfr_sub(r15961, r15958, r15960, MPFR_RNDN); mpfr_sqrt(r15962, r15961, MPFR_RNDN); mpfr_sub(r15963, r15957, r15962, MPFR_RNDN); mpfr_div(r15964, r15955, r15963, MPFR_RNDN); ; mpfr_mul(r15966, r15965, r15953, MPFR_RNDN); mpfr_div(r15967, r15964, r15966, MPFR_RNDN); return mpfr_get_d(r15967, MPFR_RNDN); }