#include #include #include #include #include char *name = "NMSE problem 3.3.5"; double f_if(float x, float eps) { float r15143 = x; float r15144 = eps; float r15145 = r15143 + r15144; float r15146 = cos(r15145); float r15147 = cos(r15143); float r15148 = r15146 - r15147; return r15148; } double f_id(double x, double eps) { double r15149 = x; double r15150 = eps; double r15151 = r15149 + r15150; double r15152 = cos(r15151); double r15153 = cos(r15149); double r15154 = r15152 - r15153; return r15154; } double f_of(float x, float eps) { float r15155 = eps; float r15156 = -2.232723228482482e-12f; bool r15157 = r15155 <= r15156; float r15158 = x; float r15159 = cos(r15158); float r15160 = cos(r15155); float r15161 = r15159 * r15160; float r15162 = sin(r15158); float r15163 = sin(r15155); float r15164 = r15162 * r15163; float r15165 = log1p(r15164); float r15166 = expm1(r15165); float r15167 = r15161 - r15166; float r15168 = r15167 - r15159; float r15169 = 5.906184364389485e-18f; bool r15170 = r15155 <= r15169; float r15171 = 0.16666666666666666f; float r15172 = r15155 * r15171; float r15173 = r15158 * (r15158 * r15158); float r15174 = r15172 * r15173; float r15175 = 0.5f; float r15176 = fma(r15175, r15155, r15158); float r15177 = r15155 * r15176; float r15178 = r15174 - r15177; float r15179 = r15170 ? r15178 : r15168; float r15180 = r15157 ? r15168 : r15179; return r15180; } double f_od(double x, double eps) { double r15181 = eps; double r15182 = -2.232723228482482e-12; bool r15183 = r15181 <= r15182; double r15184 = x; double r15185 = cos(r15184); double r15186 = cos(r15181); double r15187 = r15185 * r15186; double r15188 = sin(r15184); double r15189 = sin(r15181); double r15190 = r15188 * r15189; double r15191 = log1p(r15190); double r15192 = expm1(r15191); double r15193 = r15187 - r15192; double r15194 = r15193 - r15185; double r15195 = 5.906184364389485e-18; bool r15196 = r15181 <= r15195; double r15197 = 0.16666666666666666; double r15198 = r15181 * r15197; double r15199 = r15184 * (r15184 * r15184); double r15200 = r15198 * r15199; double r15201 = 0.5; double r15202 = fma(r15201, r15181, r15184); double r15203 = r15181 * r15202; double r15204 = r15200 - r15203; double r15205 = r15196 ? r15204 : r15194; double r15206 = r15183 ? r15194 : r15205; return r15206; } 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 r15207, r15208, r15209, r15210, r15211, r15212; void setup_mpfr_f_im() { mpfr_set_default_prec(144); mpfr_init(r15207); mpfr_init(r15208); mpfr_init(r15209); mpfr_init(r15210); mpfr_init(r15211); mpfr_init(r15212); } double f_im(double x, double eps) { mpfr_set_d(r15207, x, MPFR_RNDN); mpfr_set_d(r15208, eps, MPFR_RNDN); mpfr_add(r15209, r15207, r15208, MPFR_RNDN); mpfr_cos(r15210, r15209, MPFR_RNDN); mpfr_cos(r15211, r15207, MPFR_RNDN); mpfr_sub(r15212, r15210, r15211, MPFR_RNDN); return mpfr_get_d(r15212, MPFR_RNDN); } static mpfr_t r15213, r15214, r15215, r15216, r15217, r15218, r15219, r15220, r15221, r15222, r15223, r15224, r15225, r15226, r15227, r15228, r15229, r15230, r15231, r15232, r15233, r15234, r15235, r15236, r15237, r15238; void setup_mpfr_f_fm() { mpfr_set_default_prec(144); mpfr_init(r15213); mpfr_init_set_str(r15214, "-2.232723228482482e-12", 10, MPFR_RNDN); mpfr_init(r15215); mpfr_init(r15216); mpfr_init(r15217); mpfr_init(r15218); mpfr_init(r15219); mpfr_init(r15220); mpfr_init(r15221); mpfr_init(r15222); mpfr_init(r15223); mpfr_init(r15224); mpfr_init(r15225); mpfr_init(r15226); mpfr_init_set_str(r15227, "5.906184364389485e-18", 10, MPFR_RNDN); mpfr_init(r15228); mpfr_init_set_str(r15229, "1/6", 10, MPFR_RNDN); mpfr_init(r15230); mpfr_init(r15231); mpfr_init(r15232); mpfr_init_set_str(r15233, "1/2", 10, MPFR_RNDN); mpfr_init(r15234); mpfr_init(r15235); mpfr_init(r15236); mpfr_init(r15237); mpfr_init(r15238); } double f_fm(double x, double eps) { mpfr_set_d(r15213, eps, MPFR_RNDN); ; mpfr_set_si(r15215, mpfr_cmp(r15213, r15214) <= 0, MPFR_RNDN); mpfr_set_d(r15216, x, MPFR_RNDN); mpfr_cos(r15217, r15216, MPFR_RNDN); mpfr_cos(r15218, r15213, MPFR_RNDN); mpfr_mul(r15219, r15217, r15218, MPFR_RNDN); mpfr_sin(r15220, r15216, MPFR_RNDN); mpfr_sin(r15221, r15213, MPFR_RNDN); mpfr_mul(r15222, r15220, r15221, MPFR_RNDN); mpfr_log1p(r15223, r15222, MPFR_RNDN); mpfr_expm1(r15224, r15223, MPFR_RNDN); mpfr_sub(r15225, r15219, r15224, MPFR_RNDN); mpfr_sub(r15226, r15225, r15217, MPFR_RNDN); ; mpfr_set_si(r15228, mpfr_cmp(r15213, r15227) <= 0, MPFR_RNDN); ; mpfr_mul(r15230, r15213, r15229, MPFR_RNDN); mpfr_mul(r15231, r15216, r15216, MPFR_RNDN); mpfr_mul(r15231, r15231, r15216, MPFR_RNDN); mpfr_mul(r15232, r15230, r15231, MPFR_RNDN); ; mpfr_fma(r15234, r15233, r15213, r15216, MPFR_RNDN); mpfr_mul(r15235, r15213, r15234, MPFR_RNDN); mpfr_sub(r15236, r15232, r15235, MPFR_RNDN); if (mpfr_get_si(r15228, MPFR_RNDN)) { mpfr_set(r15237, r15236, MPFR_RNDN); } else { mpfr_set(r15237, r15226, MPFR_RNDN); }; if (mpfr_get_si(r15215, MPFR_RNDN)) { mpfr_set(r15238, r15226, MPFR_RNDN); } else { mpfr_set(r15238, r15237, MPFR_RNDN); }; return mpfr_get_d(r15238, MPFR_RNDN); } static mpfr_t r15239, r15240, r15241, r15242, r15243, r15244, r15245, r15246, r15247, r15248, r15249, r15250, r15251, r15252, r15253, r15254, r15255, r15256, r15257, r15258, r15259, r15260, r15261, r15262, r15263, r15264; void setup_mpfr_f_dm() { mpfr_set_default_prec(144); mpfr_init(r15239); mpfr_init_set_str(r15240, "-2.232723228482482e-12", 10, MPFR_RNDN); mpfr_init(r15241); mpfr_init(r15242); mpfr_init(r15243); mpfr_init(r15244); mpfr_init(r15245); mpfr_init(r15246); mpfr_init(r15247); mpfr_init(r15248); mpfr_init(r15249); mpfr_init(r15250); mpfr_init(r15251); mpfr_init(r15252); mpfr_init_set_str(r15253, "5.906184364389485e-18", 10, MPFR_RNDN); mpfr_init(r15254); mpfr_init_set_str(r15255, "1/6", 10, MPFR_RNDN); mpfr_init(r15256); mpfr_init(r15257); mpfr_init(r15258); mpfr_init_set_str(r15259, "1/2", 10, MPFR_RNDN); mpfr_init(r15260); mpfr_init(r15261); mpfr_init(r15262); mpfr_init(r15263); mpfr_init(r15264); } double f_dm(double x, double eps) { mpfr_set_d(r15239, eps, MPFR_RNDN); ; mpfr_set_si(r15241, mpfr_cmp(r15239, r15240) <= 0, MPFR_RNDN); mpfr_set_d(r15242, x, MPFR_RNDN); mpfr_cos(r15243, r15242, MPFR_RNDN); mpfr_cos(r15244, r15239, MPFR_RNDN); mpfr_mul(r15245, r15243, r15244, MPFR_RNDN); mpfr_sin(r15246, r15242, MPFR_RNDN); mpfr_sin(r15247, r15239, MPFR_RNDN); mpfr_mul(r15248, r15246, r15247, MPFR_RNDN); mpfr_log1p(r15249, r15248, MPFR_RNDN); mpfr_expm1(r15250, r15249, MPFR_RNDN); mpfr_sub(r15251, r15245, r15250, MPFR_RNDN); mpfr_sub(r15252, r15251, r15243, MPFR_RNDN); ; mpfr_set_si(r15254, mpfr_cmp(r15239, r15253) <= 0, MPFR_RNDN); ; mpfr_mul(r15256, r15239, r15255, MPFR_RNDN); mpfr_mul(r15257, r15242, r15242, MPFR_RNDN); mpfr_mul(r15257, r15257, r15242, MPFR_RNDN); mpfr_mul(r15258, r15256, r15257, MPFR_RNDN); ; mpfr_fma(r15260, r15259, r15239, r15242, MPFR_RNDN); mpfr_mul(r15261, r15239, r15260, MPFR_RNDN); mpfr_sub(r15262, r15258, r15261, MPFR_RNDN); if (mpfr_get_si(r15254, MPFR_RNDN)) { mpfr_set(r15263, r15262, MPFR_RNDN); } else { mpfr_set(r15263, r15252, MPFR_RNDN); }; if (mpfr_get_si(r15241, MPFR_RNDN)) { mpfr_set(r15264, r15252, MPFR_RNDN); } else { mpfr_set(r15264, r15263, MPFR_RNDN); }; return mpfr_get_d(r15264, MPFR_RNDN); }