#include #include #include #include #include char *name = "NMSE problem 3.3.5"; double f_if(float x, float eps) { float r15059 = x; float r15060 = eps; float r15061 = r15059 + r15060; float r15062 = cos(r15061); float r15063 = cos(r15059); float r15064 = r15062 - r15063; return r15064; } double f_id(double x, double eps) { double r15065 = x; double r15066 = eps; double r15067 = r15065 + r15066; double r15068 = cos(r15067); double r15069 = cos(r15065); double r15070 = r15068 - r15069; return r15070; } double f_of(float x, float eps) { float r15071 = eps; float r15072 = -1.9517137905822324e-10f; bool r15073 = r15071 <= r15072; float r15074 = cos(r15071); float r15075 = x; float r15076 = cos(r15075); float r15077 = r15074 * r15076; float r15078 = sin(r15071); float r15079 = sin(r15075); float r15080 = r15078 * r15079; float r15081 = r15077 - r15080; float r15082 = r15081 * (r15081 * r15081); float r15083 = r15076 * (r15076 * r15076); float r15084 = r15082 - r15083; float r15085 = fma(r15074, r15076, r15076); float r15086 = r15085 - r15080; float r15087 = r15076 * r15076; float r15088 = fma(r15081, r15086, r15087); float r15089 = r15084 / r15088; float r15090 = 0.0017607712652534246f; bool r15091 = r15071 <= r15090; float r15092 = 0.1666666716337204f; float r15093 = r15071 * r15092; float r15094 = r15075 * (r15075 * r15075); float r15095 = r15093 * r15094; float r15096 = 0.5f; float r15097 = fma(r15096, r15071, r15075); float r15098 = r15071 * r15097; float r15099 = r15095 - r15098; float r15100 = r15091 ? r15099 : r15089; float r15101 = r15073 ? r15089 : r15100; return r15101; } double f_od(double x, double eps) { double r15102 = eps; double r15103 = -1.9517137905822324e-10; bool r15104 = r15102 <= r15103; double r15105 = cos(r15102); double r15106 = x; double r15107 = cos(r15106); double r15108 = r15105 * r15107; double r15109 = sin(r15102); double r15110 = sin(r15106); double r15111 = r15109 * r15110; double r15112 = r15108 - r15111; double r15113 = r15112 * (r15112 * r15112); double r15114 = r15107 * (r15107 * r15107); double r15115 = r15113 - r15114; double r15116 = fma(r15105, r15107, r15107); double r15117 = r15116 - r15111; double r15118 = r15107 * r15107; double r15119 = fma(r15112, r15117, r15118); double r15120 = r15115 / r15119; double r15121 = 0.0017607712652534246; bool r15122 = r15102 <= r15121; double r15123 = 0.1666666716337204; double r15124 = r15102 * r15123; double r15125 = r15106 * (r15106 * r15106); double r15126 = r15124 * r15125; double r15127 = 0.5; double r15128 = fma(r15127, r15102, r15106); double r15129 = r15102 * r15128; double r15130 = r15126 - r15129; double r15131 = r15122 ? r15130 : r15120; double r15132 = r15104 ? r15120 : r15131; return r15132; } 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 r15133, r15134, r15135, r15136, r15137, r15138; void setup_mpfr_f_im() { mpfr_set_default_prec(144); mpfr_init(r15133); mpfr_init(r15134); mpfr_init(r15135); mpfr_init(r15136); mpfr_init(r15137); mpfr_init(r15138); } double f_im(double x, double eps) { mpfr_set_d(r15133, x, MPFR_RNDN); mpfr_set_d(r15134, eps, MPFR_RNDN); mpfr_add(r15135, r15133, r15134, MPFR_RNDN); mpfr_cos(r15136, r15135, MPFR_RNDN); mpfr_cos(r15137, r15133, MPFR_RNDN); mpfr_sub(r15138, r15136, r15137, MPFR_RNDN); return mpfr_get_d(r15138, MPFR_RNDN); } static mpfr_t r15139, r15140, r15141, r15142, r15143, r15144, r15145, r15146, r15147, r15148, r15149, r15150, r15151, r15152, r15153, r15154, r15155, r15156, r15157, r15158, r15159, r15160, r15161, r15162, r15163, r15164, r15165, r15166, r15167, r15168, r15169; void setup_mpfr_f_fm() { mpfr_set_default_prec(144); mpfr_init(r15139); mpfr_init_set_str(r15140, "-1.9517138f-10", 10, MPFR_RNDN); mpfr_init(r15141); mpfr_init(r15142); mpfr_init(r15143); mpfr_init(r15144); mpfr_init(r15145); mpfr_init(r15146); mpfr_init(r15147); mpfr_init(r15148); mpfr_init(r15149); mpfr_init(r15150); mpfr_init(r15151); mpfr_init(r15152); mpfr_init(r15153); mpfr_init(r15154); mpfr_init(r15155); mpfr_init(r15156); mpfr_init(r15157); mpfr_init_set_str(r15158, "0.0017607713f0", 10, MPFR_RNDN); mpfr_init(r15159); mpfr_init_set_str(r15160, "1/6", 10, MPFR_RNDN); mpfr_init(r15161); mpfr_init(r15162); mpfr_init(r15163); mpfr_init_set_str(r15164, "1/2", 10, MPFR_RNDN); mpfr_init(r15165); mpfr_init(r15166); mpfr_init(r15167); mpfr_init(r15168); mpfr_init(r15169); } double f_fm(double x, double eps) { mpfr_set_d(r15139, eps, MPFR_RNDN); ; mpfr_set_si(r15141, mpfr_cmp(r15139, r15140) <= 0, MPFR_RNDN); mpfr_cos(r15142, r15139, MPFR_RNDN); mpfr_set_d(r15143, x, MPFR_RNDN); mpfr_cos(r15144, r15143, MPFR_RNDN); mpfr_mul(r15145, r15142, r15144, MPFR_RNDN); mpfr_sin(r15146, r15139, MPFR_RNDN); mpfr_sin(r15147, r15143, MPFR_RNDN); mpfr_mul(r15148, r15146, r15147, MPFR_RNDN); mpfr_sub(r15149, r15145, r15148, MPFR_RNDN); mpfr_mul(r15150, r15149, r15149, MPFR_RNDN); mpfr_mul(r15150, r15150, r15149, MPFR_RNDN); mpfr_mul(r15151, r15144, r15144, MPFR_RNDN); mpfr_mul(r15151, r15151, r15144, MPFR_RNDN); mpfr_sub(r15152, r15150, r15151, MPFR_RNDN); mpfr_fma(r15153, r15142, r15144, r15144, MPFR_RNDN); mpfr_sub(r15154, r15153, r15148, MPFR_RNDN); mpfr_mul(r15155, r15144, r15144, MPFR_RNDN); mpfr_fma(r15156, r15149, r15154, r15155, MPFR_RNDN); mpfr_div(r15157, r15152, r15156, MPFR_RNDN); ; mpfr_set_si(r15159, mpfr_cmp(r15139, r15158) <= 0, MPFR_RNDN); ; mpfr_mul(r15161, r15139, r15160, MPFR_RNDN); mpfr_mul(r15162, r15143, r15143, MPFR_RNDN); mpfr_mul(r15162, r15162, r15143, MPFR_RNDN); mpfr_mul(r15163, r15161, r15162, MPFR_RNDN); ; mpfr_fma(r15165, r15164, r15139, r15143, MPFR_RNDN); mpfr_mul(r15166, r15139, r15165, MPFR_RNDN); mpfr_sub(r15167, r15163, r15166, MPFR_RNDN); if (mpfr_get_si(r15159, MPFR_RNDN)) { mpfr_set(r15168, r15167, MPFR_RNDN); } else { mpfr_set(r15168, r15157, MPFR_RNDN); }; if (mpfr_get_si(r15141, MPFR_RNDN)) { mpfr_set(r15169, r15157, MPFR_RNDN); } else { mpfr_set(r15169, r15168, MPFR_RNDN); }; return mpfr_get_d(r15169, MPFR_RNDN); } static mpfr_t r15170, r15171, r15172, r15173, r15174, r15175, r15176, r15177, r15178, r15179, r15180, r15181, r15182, r15183, r15184, r15185, r15186, r15187, r15188, r15189, r15190, r15191, r15192, r15193, r15194, r15195, r15196, r15197, r15198, r15199, r15200; void setup_mpfr_f_dm() { mpfr_set_default_prec(144); mpfr_init(r15170); mpfr_init_set_str(r15171, "-1.9517138f-10", 10, MPFR_RNDN); mpfr_init(r15172); mpfr_init(r15173); mpfr_init(r15174); mpfr_init(r15175); mpfr_init(r15176); mpfr_init(r15177); mpfr_init(r15178); mpfr_init(r15179); mpfr_init(r15180); mpfr_init(r15181); mpfr_init(r15182); mpfr_init(r15183); mpfr_init(r15184); mpfr_init(r15185); mpfr_init(r15186); mpfr_init(r15187); mpfr_init(r15188); mpfr_init_set_str(r15189, "0.0017607713f0", 10, MPFR_RNDN); mpfr_init(r15190); mpfr_init_set_str(r15191, "1/6", 10, MPFR_RNDN); mpfr_init(r15192); mpfr_init(r15193); mpfr_init(r15194); mpfr_init_set_str(r15195, "1/2", 10, MPFR_RNDN); mpfr_init(r15196); mpfr_init(r15197); mpfr_init(r15198); mpfr_init(r15199); mpfr_init(r15200); } double f_dm(double x, double eps) { mpfr_set_d(r15170, eps, MPFR_RNDN); ; mpfr_set_si(r15172, mpfr_cmp(r15170, r15171) <= 0, MPFR_RNDN); mpfr_cos(r15173, r15170, MPFR_RNDN); mpfr_set_d(r15174, x, MPFR_RNDN); mpfr_cos(r15175, r15174, MPFR_RNDN); mpfr_mul(r15176, r15173, r15175, MPFR_RNDN); mpfr_sin(r15177, r15170, MPFR_RNDN); mpfr_sin(r15178, r15174, MPFR_RNDN); mpfr_mul(r15179, r15177, r15178, MPFR_RNDN); mpfr_sub(r15180, r15176, r15179, MPFR_RNDN); mpfr_mul(r15181, r15180, r15180, MPFR_RNDN); mpfr_mul(r15181, r15181, r15180, MPFR_RNDN); mpfr_mul(r15182, r15175, r15175, MPFR_RNDN); mpfr_mul(r15182, r15182, r15175, MPFR_RNDN); mpfr_sub(r15183, r15181, r15182, MPFR_RNDN); mpfr_fma(r15184, r15173, r15175, r15175, MPFR_RNDN); mpfr_sub(r15185, r15184, r15179, MPFR_RNDN); mpfr_mul(r15186, r15175, r15175, MPFR_RNDN); mpfr_fma(r15187, r15180, r15185, r15186, MPFR_RNDN); mpfr_div(r15188, r15183, r15187, MPFR_RNDN); ; mpfr_set_si(r15190, mpfr_cmp(r15170, r15189) <= 0, MPFR_RNDN); ; mpfr_mul(r15192, r15170, r15191, MPFR_RNDN); mpfr_mul(r15193, r15174, r15174, MPFR_RNDN); mpfr_mul(r15193, r15193, r15174, MPFR_RNDN); mpfr_mul(r15194, r15192, r15193, MPFR_RNDN); ; mpfr_fma(r15196, r15195, r15170, r15174, MPFR_RNDN); mpfr_mul(r15197, r15170, r15196, MPFR_RNDN); mpfr_sub(r15198, r15194, r15197, MPFR_RNDN); if (mpfr_get_si(r15190, MPFR_RNDN)) { mpfr_set(r15199, r15198, MPFR_RNDN); } else { mpfr_set(r15199, r15188, MPFR_RNDN); }; if (mpfr_get_si(r15172, MPFR_RNDN)) { mpfr_set(r15200, r15188, MPFR_RNDN); } else { mpfr_set(r15200, r15199, MPFR_RNDN); }; return mpfr_get_d(r15200, MPFR_RNDN); }