#include #include #include #include #include char *name = "NMSE problem 3.3.4"; double f_if(float x) { float r15189 = x; float r15190 = 1.0f; float r15191 = r15189 + r15190; float r15192 = 3.0f; float r15193 = r15190 / r15192; float r15194 = pow(r15191, r15193); float r15195 = pow(r15189, r15193); float r15196 = r15194 - r15195; return r15196; } double f_id(double x) { double r15197 = x; double r15198 = 1.0; double r15199 = r15197 + r15198; double r15200 = 3.0; double r15201 = r15198 / r15200; double r15202 = pow(r15199, r15201); double r15203 = pow(r15197, r15201); double r15204 = r15202 - r15203; return r15204; } double f_of(float x) { float r15205 = x; float r15206 = 1.0f; float r15207 = r15205 + r15206; float r15208 = 3.0f; float r15209 = r15206 / r15208; float r15210 = pow(r15207, r15209); float r15211 = r15210 * (r15210 * r15210); float r15212 = pow(r15205, r15209); float r15213 = r15212 * (r15212 * r15212); float r15214 = r15211 - r15213; float r15215 = r15210 * r15210; float r15216 = log(r15205); float r15217 = r15216 / r15208; float r15218 = exp(r15217); float r15219 = r15218 * r15218; float r15220 = r15210 * r15212; float r15221 = r15219 + r15220; float r15222 = r15215 + r15221; float r15223 = r15214 / r15222; return r15223; } double f_od(double x) { double r15224 = x; double r15225 = 1.0; double r15226 = r15224 + r15225; double r15227 = 3.0; double r15228 = r15225 / r15227; double r15229 = pow(r15226, r15228); double r15230 = r15229 * (r15229 * r15229); double r15231 = pow(r15224, r15228); double r15232 = r15231 * (r15231 * r15231); double r15233 = r15230 - r15232; double r15234 = r15229 * r15229; double r15235 = log(r15224); double r15236 = r15235 / r15227; double r15237 = exp(r15236); double r15238 = r15237 * r15237; double r15239 = r15229 * r15231; double r15240 = r15238 + r15239; double r15241 = r15234 + r15240; double r15242 = r15233 / r15241; return r15242; } 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 r15243, r15244, r15245, r15246, r15247, r15248, r15249, r15250; void setup_mpfr_f_im() { mpfr_set_default_prec(144); mpfr_init(r15243); mpfr_init_set_str(r15244, "1", 10, MPFR_RNDN); mpfr_init(r15245); mpfr_init_set_str(r15246, "3", 10, MPFR_RNDN); mpfr_init(r15247); mpfr_init(r15248); mpfr_init(r15249); mpfr_init(r15250); } double f_im(double x) { mpfr_set_d(r15243, x, MPFR_RNDN); ; mpfr_add(r15245, r15243, r15244, MPFR_RNDN); ; mpfr_div(r15247, r15244, r15246, MPFR_RNDN); mpfr_pow(r15248, r15245, r15247, MPFR_RNDN); mpfr_pow(r15249, r15243, r15247, MPFR_RNDN); mpfr_sub(r15250, r15248, r15249, MPFR_RNDN); return mpfr_get_d(r15250, MPFR_RNDN); } static mpfr_t r15251, r15252, r15253, r15254, r15255, r15256, r15257, r15258, r15259, r15260, r15261, r15262, r15263, r15264, r15265, r15266, r15267, r15268, r15269; void setup_mpfr_f_fm() { mpfr_set_default_prec(144); mpfr_init(r15251); mpfr_init_set_str(r15252, "1", 10, MPFR_RNDN); mpfr_init(r15253); mpfr_init_set_str(r15254, "3", 10, MPFR_RNDN); mpfr_init(r15255); mpfr_init(r15256); mpfr_init(r15257); mpfr_init(r15258); mpfr_init(r15259); mpfr_init(r15260); mpfr_init(r15261); mpfr_init(r15262); mpfr_init(r15263); mpfr_init(r15264); mpfr_init(r15265); mpfr_init(r15266); mpfr_init(r15267); mpfr_init(r15268); mpfr_init(r15269); } double f_fm(double x) { mpfr_set_d(r15251, x, MPFR_RNDN); ; mpfr_add(r15253, r15251, r15252, MPFR_RNDN); ; mpfr_div(r15255, r15252, r15254, MPFR_RNDN); mpfr_pow(r15256, r15253, r15255, MPFR_RNDN); mpfr_mul(r15257, r15256, r15256, MPFR_RNDN); mpfr_mul(r15257, r15257, r15256, MPFR_RNDN); mpfr_pow(r15258, r15251, r15255, MPFR_RNDN); mpfr_mul(r15259, r15258, r15258, MPFR_RNDN); mpfr_mul(r15259, r15259, r15258, MPFR_RNDN); mpfr_sub(r15260, r15257, r15259, MPFR_RNDN); mpfr_sqr(r15261, r15256, MPFR_RNDN); mpfr_log(r15262, r15251, MPFR_RNDN); mpfr_div(r15263, r15262, r15254, MPFR_RNDN); mpfr_exp(r15264, r15263, MPFR_RNDN); mpfr_sqr(r15265, r15264, MPFR_RNDN); mpfr_mul(r15266, r15256, r15258, MPFR_RNDN); mpfr_add(r15267, r15265, r15266, MPFR_RNDN); mpfr_add(r15268, r15261, r15267, MPFR_RNDN); mpfr_div(r15269, r15260, r15268, MPFR_RNDN); return mpfr_get_d(r15269, MPFR_RNDN); } static mpfr_t r15270, r15271, r15272, r15273, r15274, r15275, r15276, r15277, r15278, r15279, r15280, r15281, r15282, r15283, r15284, r15285, r15286, r15287, r15288; void setup_mpfr_f_dm() { mpfr_set_default_prec(144); mpfr_init(r15270); mpfr_init_set_str(r15271, "1", 10, MPFR_RNDN); mpfr_init(r15272); mpfr_init_set_str(r15273, "3", 10, MPFR_RNDN); mpfr_init(r15274); mpfr_init(r15275); mpfr_init(r15276); mpfr_init(r15277); mpfr_init(r15278); mpfr_init(r15279); mpfr_init(r15280); mpfr_init(r15281); mpfr_init(r15282); mpfr_init(r15283); mpfr_init(r15284); mpfr_init(r15285); mpfr_init(r15286); mpfr_init(r15287); mpfr_init(r15288); } double f_dm(double x) { mpfr_set_d(r15270, x, MPFR_RNDN); ; mpfr_add(r15272, r15270, r15271, MPFR_RNDN); ; mpfr_div(r15274, r15271, r15273, MPFR_RNDN); mpfr_pow(r15275, r15272, r15274, MPFR_RNDN); mpfr_mul(r15276, r15275, r15275, MPFR_RNDN); mpfr_mul(r15276, r15276, r15275, MPFR_RNDN); mpfr_pow(r15277, r15270, r15274, MPFR_RNDN); mpfr_mul(r15278, r15277, r15277, MPFR_RNDN); mpfr_mul(r15278, r15278, r15277, MPFR_RNDN); mpfr_sub(r15279, r15276, r15278, MPFR_RNDN); mpfr_sqr(r15280, r15275, MPFR_RNDN); mpfr_log(r15281, r15270, MPFR_RNDN); mpfr_div(r15282, r15281, r15273, MPFR_RNDN); mpfr_exp(r15283, r15282, MPFR_RNDN); mpfr_sqr(r15284, r15283, MPFR_RNDN); mpfr_mul(r15285, r15275, r15277, MPFR_RNDN); mpfr_add(r15286, r15284, r15285, MPFR_RNDN); mpfr_add(r15287, r15280, r15286, MPFR_RNDN); mpfr_div(r15288, r15279, r15287, MPFR_RNDN); return mpfr_get_d(r15288, MPFR_RNDN); }