#include #include #include #include #include char *name = "NMSE problem 3.3.5"; double f_if(float x, float eps) { float r15123 = x; float r15124 = eps; float r15125 = r15123 + r15124; float r15126 = cos(r15125); float r15127 = cos(r15123); float r15128 = r15126 - r15127; return r15128; } double f_id(double x, double eps) { double r15129 = x; double r15130 = eps; double r15131 = r15129 + r15130; double r15132 = cos(r15131); double r15133 = cos(r15129); double r15134 = r15132 - r15133; return r15134; } double f_of(float x, float eps) { float r15135 = eps; float r15136 = -0.003593724686652422f; bool r15137 = r15135 <= r15136; float r15138 = cos(r15135); float r15139 = x; float r15140 = cos(r15139); float r15141 = r15138 * r15140; float r15142 = r15141 * (r15141 * r15141); float r15143 = sin(r15139); float r15144 = sin(r15135); float r15145 = r15143 * r15144; float r15146 = r15145 * (r15145 * r15145); float r15147 = r15142 - r15146; float r15148 = r15147 * r15147; float r15149 = r15140 * r15138; float r15150 = r15149 * r15149; float r15151 = r15145 * r15145; float r15152 = r15149 * r15145; float r15153 = r15151 + r15152; float r15154 = r15150 + r15153; float r15155 = r15154 * r15154; float r15156 = r15148 / r15155; float r15157 = r15140 * r15140; float r15158 = r15156 - r15157; float r15159 = fma(r15138, r15140, r15140); float r15160 = r15144 * r15143; float r15161 = r15159 - r15160; float r15162 = r15158 / r15161; float r15163 = 0.3662590980529785f; bool r15164 = r15135 <= r15163; float r15165 = r15143 * r15143; float r15166 = r15135 * r15135; float r15167 = 1.3333333730697632f; float r15168 = r15135 * r15167; float r15169 = r15143 * r15168; float r15170 = r15140 * r15166; float r15171 = r15169 * r15170; float r15172 = fma(r15165, r15166, r15171); float r15173 = 2.0f; float r15174 = r15143 * r15173; float r15175 = fma(r15140, r15135, r15174); float r15176 = r15135 * r15140; float r15177 = r15175 * r15176; float r15178 = r15172 - r15177; float r15179 = r15178 / r15161; float r15180 = r15164 ? r15179 : r15162; float r15181 = r15137 ? r15162 : r15180; return r15181; } double f_od(double x, double eps) { double r15182 = eps; double r15183 = -0.003593724686652422; bool r15184 = r15182 <= r15183; double r15185 = cos(r15182); double r15186 = x; double r15187 = cos(r15186); double r15188 = r15185 * r15187; double r15189 = r15188 * (r15188 * r15188); double r15190 = sin(r15186); double r15191 = sin(r15182); double r15192 = r15190 * r15191; double r15193 = r15192 * (r15192 * r15192); double r15194 = r15189 - r15193; double r15195 = r15194 * r15194; double r15196 = r15187 * r15185; double r15197 = r15196 * r15196; double r15198 = r15192 * r15192; double r15199 = r15196 * r15192; double r15200 = r15198 + r15199; double r15201 = r15197 + r15200; double r15202 = r15201 * r15201; double r15203 = r15195 / r15202; double r15204 = r15187 * r15187; double r15205 = r15203 - r15204; double r15206 = fma(r15185, r15187, r15187); double r15207 = r15191 * r15190; double r15208 = r15206 - r15207; double r15209 = r15205 / r15208; double r15210 = 0.3662590980529785; bool r15211 = r15182 <= r15210; double r15212 = r15190 * r15190; double r15213 = r15182 * r15182; double r15214 = 1.3333333730697632; double r15215 = r15182 * r15214; double r15216 = r15190 * r15215; double r15217 = r15187 * r15213; double r15218 = r15216 * r15217; double r15219 = fma(r15212, r15213, r15218); double r15220 = 2.0; double r15221 = r15190 * r15220; double r15222 = fma(r15187, r15182, r15221); double r15223 = r15182 * r15187; double r15224 = r15222 * r15223; double r15225 = r15219 - r15224; double r15226 = r15225 / r15208; double r15227 = r15211 ? r15226 : r15209; double r15228 = r15184 ? r15209 : r15227; return r15228; } 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 r15229, r15230, r15231, r15232, r15233, r15234; void setup_mpfr_f_im() { mpfr_set_default_prec(144); mpfr_init(r15229); mpfr_init(r15230); mpfr_init(r15231); mpfr_init(r15232); mpfr_init(r15233); mpfr_init(r15234); } double f_im(double x, double eps) { mpfr_set_d(r15229, x, MPFR_RNDN); mpfr_set_d(r15230, eps, MPFR_RNDN); mpfr_add(r15231, r15229, r15230, MPFR_RNDN); mpfr_cos(r15232, r15231, MPFR_RNDN); mpfr_cos(r15233, r15229, MPFR_RNDN); mpfr_sub(r15234, r15232, r15233, MPFR_RNDN); return mpfr_get_d(r15234, MPFR_RNDN); } static mpfr_t r15235, r15236, r15237, r15238, 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, r15265, r15266, r15267, r15268, r15269, r15270, r15271, r15272, r15273, r15274, r15275, r15276, r15277, r15278, r15279, r15280, r15281; void setup_mpfr_f_fm() { mpfr_set_default_prec(144); mpfr_init(r15235); mpfr_init_set_str(r15236, "-0.0035937247f0", 10, MPFR_RNDN); mpfr_init(r15237); mpfr_init(r15238); mpfr_init(r15239); mpfr_init(r15240); 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(r15253); mpfr_init(r15254); 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_set_str(r15263, "0.3662591f0", 10, MPFR_RNDN); mpfr_init(r15264); mpfr_init(r15265); mpfr_init(r15266); mpfr_init_set_str(r15267, "4/3", 10, MPFR_RNDN); mpfr_init(r15268); mpfr_init(r15269); mpfr_init(r15270); mpfr_init(r15271); mpfr_init(r15272); mpfr_init_set_str(r15273, "2", 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); } double f_fm(double x, double eps) { mpfr_set_d(r15235, eps, MPFR_RNDN); ; mpfr_set_si(r15237, mpfr_cmp(r15235, r15236) <= 0, MPFR_RNDN); mpfr_cos(r15238, r15235, MPFR_RNDN); mpfr_set_d(r15239, x, MPFR_RNDN); mpfr_cos(r15240, r15239, MPFR_RNDN); mpfr_mul(r15241, r15238, r15240, MPFR_RNDN); mpfr_mul(r15242, r15241, r15241, MPFR_RNDN); mpfr_mul(r15242, r15242, r15241, MPFR_RNDN); mpfr_sin(r15243, r15239, MPFR_RNDN); mpfr_sin(r15244, r15235, MPFR_RNDN); mpfr_mul(r15245, r15243, r15244, MPFR_RNDN); mpfr_mul(r15246, r15245, r15245, MPFR_RNDN); mpfr_mul(r15246, r15246, r15245, MPFR_RNDN); mpfr_sub(r15247, r15242, r15246, MPFR_RNDN); mpfr_sqr(r15248, r15247, MPFR_RNDN); mpfr_mul(r15249, r15240, r15238, MPFR_RNDN); mpfr_sqr(r15250, r15249, MPFR_RNDN); mpfr_sqr(r15251, r15245, MPFR_RNDN); mpfr_mul(r15252, r15249, r15245, MPFR_RNDN); mpfr_add(r15253, r15251, r15252, MPFR_RNDN); mpfr_add(r15254, r15250, r15253, MPFR_RNDN); mpfr_sqr(r15255, r15254, MPFR_RNDN); mpfr_div(r15256, r15248, r15255, MPFR_RNDN); mpfr_sqr(r15257, r15240, MPFR_RNDN); mpfr_sub(r15258, r15256, r15257, MPFR_RNDN); mpfr_fma(r15259, r15238, r15240, r15240, MPFR_RNDN); mpfr_mul(r15260, r15244, r15243, MPFR_RNDN); mpfr_sub(r15261, r15259, r15260, MPFR_RNDN); mpfr_div(r15262, r15258, r15261, MPFR_RNDN); ; mpfr_set_si(r15264, mpfr_cmp(r15235, r15263) <= 0, MPFR_RNDN); mpfr_mul(r15265, r15243, r15243, MPFR_RNDN); mpfr_mul(r15266, r15235, r15235, MPFR_RNDN); ; mpfr_mul(r15268, r15235, r15267, MPFR_RNDN); mpfr_mul(r15269, r15243, r15268, MPFR_RNDN); mpfr_mul(r15270, r15240, r15266, MPFR_RNDN); mpfr_mul(r15271, r15269, r15270, MPFR_RNDN); mpfr_fma(r15272, r15265, r15266, r15271, MPFR_RNDN); ; mpfr_mul(r15274, r15243, r15273, MPFR_RNDN); mpfr_fma(r15275, r15240, r15235, r15274, MPFR_RNDN); mpfr_mul(r15276, r15235, r15240, MPFR_RNDN); mpfr_mul(r15277, r15275, r15276, MPFR_RNDN); mpfr_sub(r15278, r15272, r15277, MPFR_RNDN); mpfr_div(r15279, r15278, r15261, MPFR_RNDN); if (mpfr_get_si(r15264, MPFR_RNDN)) { mpfr_set(r15280, r15279, MPFR_RNDN); } else { mpfr_set(r15280, r15262, MPFR_RNDN); }; if (mpfr_get_si(r15237, MPFR_RNDN)) { mpfr_set(r15281, r15262, MPFR_RNDN); } else { mpfr_set(r15281, r15280, MPFR_RNDN); }; return mpfr_get_d(r15281, MPFR_RNDN); } static mpfr_t r15282, r15283, r15284, r15285, r15286, r15287, r15288, r15289, r15290, r15291, r15292, r15293, r15294, r15295, r15296, r15297, r15298, r15299, r15300, r15301, r15302, r15303, r15304, r15305, r15306, r15307, r15308, r15309, r15310, r15311, r15312, r15313, r15314, r15315, r15316, r15317, r15318, r15319, r15320, r15321, r15322, r15323, r15324, r15325, r15326, r15327, r15328; void setup_mpfr_f_dm() { mpfr_set_default_prec(144); mpfr_init(r15282); mpfr_init_set_str(r15283, "-0.0035937247f0", 10, MPFR_RNDN); mpfr_init(r15284); mpfr_init(r15285); mpfr_init(r15286); mpfr_init(r15287); mpfr_init(r15288); mpfr_init(r15289); mpfr_init(r15290); mpfr_init(r15291); mpfr_init(r15292); mpfr_init(r15293); mpfr_init(r15294); mpfr_init(r15295); mpfr_init(r15296); mpfr_init(r15297); mpfr_init(r15298); mpfr_init(r15299); mpfr_init(r15300); mpfr_init(r15301); mpfr_init(r15302); mpfr_init(r15303); mpfr_init(r15304); mpfr_init(r15305); mpfr_init(r15306); mpfr_init(r15307); mpfr_init(r15308); mpfr_init(r15309); mpfr_init_set_str(r15310, "0.3662591f0", 10, MPFR_RNDN); mpfr_init(r15311); mpfr_init(r15312); mpfr_init(r15313); mpfr_init_set_str(r15314, "4/3", 10, MPFR_RNDN); mpfr_init(r15315); mpfr_init(r15316); mpfr_init(r15317); mpfr_init(r15318); mpfr_init(r15319); mpfr_init_set_str(r15320, "2", 10, MPFR_RNDN); mpfr_init(r15321); mpfr_init(r15322); mpfr_init(r15323); mpfr_init(r15324); mpfr_init(r15325); mpfr_init(r15326); mpfr_init(r15327); mpfr_init(r15328); } double f_dm(double x, double eps) { mpfr_set_d(r15282, eps, MPFR_RNDN); ; mpfr_set_si(r15284, mpfr_cmp(r15282, r15283) <= 0, MPFR_RNDN); mpfr_cos(r15285, r15282, MPFR_RNDN); mpfr_set_d(r15286, x, MPFR_RNDN); mpfr_cos(r15287, r15286, MPFR_RNDN); mpfr_mul(r15288, r15285, r15287, MPFR_RNDN); mpfr_mul(r15289, r15288, r15288, MPFR_RNDN); mpfr_mul(r15289, r15289, r15288, MPFR_RNDN); mpfr_sin(r15290, r15286, MPFR_RNDN); mpfr_sin(r15291, r15282, MPFR_RNDN); mpfr_mul(r15292, r15290, r15291, MPFR_RNDN); mpfr_mul(r15293, r15292, r15292, MPFR_RNDN); mpfr_mul(r15293, r15293, r15292, MPFR_RNDN); mpfr_sub(r15294, r15289, r15293, MPFR_RNDN); mpfr_sqr(r15295, r15294, MPFR_RNDN); mpfr_mul(r15296, r15287, r15285, MPFR_RNDN); mpfr_sqr(r15297, r15296, MPFR_RNDN); mpfr_sqr(r15298, r15292, MPFR_RNDN); mpfr_mul(r15299, r15296, r15292, MPFR_RNDN); mpfr_add(r15300, r15298, r15299, MPFR_RNDN); mpfr_add(r15301, r15297, r15300, MPFR_RNDN); mpfr_sqr(r15302, r15301, MPFR_RNDN); mpfr_div(r15303, r15295, r15302, MPFR_RNDN); mpfr_sqr(r15304, r15287, MPFR_RNDN); mpfr_sub(r15305, r15303, r15304, MPFR_RNDN); mpfr_fma(r15306, r15285, r15287, r15287, MPFR_RNDN); mpfr_mul(r15307, r15291, r15290, MPFR_RNDN); mpfr_sub(r15308, r15306, r15307, MPFR_RNDN); mpfr_div(r15309, r15305, r15308, MPFR_RNDN); ; mpfr_set_si(r15311, mpfr_cmp(r15282, r15310) <= 0, MPFR_RNDN); mpfr_mul(r15312, r15290, r15290, MPFR_RNDN); mpfr_mul(r15313, r15282, r15282, MPFR_RNDN); ; mpfr_mul(r15315, r15282, r15314, MPFR_RNDN); mpfr_mul(r15316, r15290, r15315, MPFR_RNDN); mpfr_mul(r15317, r15287, r15313, MPFR_RNDN); mpfr_mul(r15318, r15316, r15317, MPFR_RNDN); mpfr_fma(r15319, r15312, r15313, r15318, MPFR_RNDN); ; mpfr_mul(r15321, r15290, r15320, MPFR_RNDN); mpfr_fma(r15322, r15287, r15282, r15321, MPFR_RNDN); mpfr_mul(r15323, r15282, r15287, MPFR_RNDN); mpfr_mul(r15324, r15322, r15323, MPFR_RNDN); mpfr_sub(r15325, r15319, r15324, MPFR_RNDN); mpfr_div(r15326, r15325, r15308, MPFR_RNDN); if (mpfr_get_si(r15311, MPFR_RNDN)) { mpfr_set(r15327, r15326, MPFR_RNDN); } else { mpfr_set(r15327, r15309, MPFR_RNDN); }; if (mpfr_get_si(r15284, MPFR_RNDN)) { mpfr_set(r15328, r15309, MPFR_RNDN); } else { mpfr_set(r15328, r15327, MPFR_RNDN); }; return mpfr_get_d(r15328, MPFR_RNDN); }