#include #include #include #include #include char *name = "NMSE problem 3.2.1, positive"; double f_if(float a, float b_2F2, float c) { float r15427 = b_2F2; float r15428 = -r15427; float r15429 = r15427 * r15427; float r15430 = a; float r15431 = c; float r15432 = r15430 * r15431; float r15433 = r15429 - r15432; float r15434 = sqrt(r15433); float r15435 = r15428 + r15434; float r15436 = r15435 / r15430; return r15436; } double f_id(double a, double b_2F2, double c) { double r15437 = b_2F2; double r15438 = -r15437; double r15439 = r15437 * r15437; double r15440 = a; double r15441 = c; double r15442 = r15440 * r15441; double r15443 = r15439 - r15442; double r15444 = sqrt(r15443); double r15445 = r15438 + r15444; double r15446 = r15445 / r15440; return r15446; } double f_of(float a, float b_2F2, float c) { float r15447 = b_2F2; float r15448 = -5.215706425974793e+89f; bool r15449 = r15447 <= r15448; float r15450 = 0.5f; float r15451 = c; float r15452 = r15447 / r15451; float r15453 = r15450 / r15452; float r15454 = a; float r15455 = r15447 / r15454; float r15456 = 2.0f; float r15457 = r15455 * r15456; float r15458 = r15453 - r15457; float r15459 = 3.664277580957564e-136f; bool r15460 = r15447 <= r15459; float r15461 = -r15447; float r15462 = r15447 * r15447; float r15463 = r15454 * r15451; float r15464 = r15462 - r15463; float r15465 = sqrt(r15464); float r15466 = r15461 + r15465; float r15467 = 1.0f; float r15468 = r15467 / r15454; float r15469 = r15466 * r15468; float r15470 = 2.993431952201985e+83f; bool r15471 = r15447 <= r15470; float r15472 = r15447 * r15447; float r15473 = r15451 * r15454; float r15474 = r15472 - r15473; float r15475 = sqrt(r15474); float r15476 = r15461 - r15475; float r15477 = r15451 / r15476; float r15478 = cbrt(r15477); float r15479 = r15478 * (r15478 * r15478); float r15480 = -0.5f; float r15481 = r15467 * r15480; float r15482 = r15451 / r15447; float r15483 = r15481 * r15482; float r15484 = r15471 ? r15479 : r15483; float r15485 = r15460 ? r15469 : r15484; float r15486 = r15449 ? r15458 : r15485; return r15486; } double f_od(double a, double b_2F2, double c) { double r15487 = b_2F2; double r15488 = -5.215706425974793e+89; bool r15489 = r15487 <= r15488; double r15490 = 0.5; double r15491 = c; double r15492 = r15487 / r15491; double r15493 = r15490 / r15492; double r15494 = a; double r15495 = r15487 / r15494; double r15496 = 2.0; double r15497 = r15495 * r15496; double r15498 = r15493 - r15497; double r15499 = 3.664277580957564e-136; bool r15500 = r15487 <= r15499; double r15501 = -r15487; double r15502 = r15487 * r15487; double r15503 = r15494 * r15491; double r15504 = r15502 - r15503; double r15505 = sqrt(r15504); double r15506 = r15501 + r15505; double r15507 = 1.0; double r15508 = r15507 / r15494; double r15509 = r15506 * r15508; double r15510 = 2.993431952201985e+83; bool r15511 = r15487 <= r15510; double r15512 = r15487 * r15487; double r15513 = r15491 * r15494; double r15514 = r15512 - r15513; double r15515 = sqrt(r15514); double r15516 = r15501 - r15515; double r15517 = r15491 / r15516; double r15518 = cbrt(r15517); double r15519 = r15518 * (r15518 * r15518); double r15520 = -0.5; double r15521 = r15507 * r15520; double r15522 = r15491 / r15487; double r15523 = r15521 * r15522; double r15524 = r15511 ? r15519 : r15523; double r15525 = r15500 ? r15509 : r15524; double r15526 = r15489 ? r15498 : r15525; return r15526; } 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 r15527, r15528, r15529, r15530, r15531, r15532, r15533, r15534, r15535, r15536; void setup_mpfr_f_im() { mpfr_set_default_prec(144); mpfr_init(r15527); mpfr_init(r15528); mpfr_init(r15529); mpfr_init(r15530); mpfr_init(r15531); mpfr_init(r15532); mpfr_init(r15533); mpfr_init(r15534); mpfr_init(r15535); mpfr_init(r15536); } double f_im(double a, double b_2F2, double c) { mpfr_set_d(r15527, b_2F2, MPFR_RNDN); mpfr_neg(r15528, r15527, MPFR_RNDN); mpfr_sqr(r15529, r15527, MPFR_RNDN); mpfr_set_d(r15530, a, MPFR_RNDN); mpfr_set_d(r15531, c, MPFR_RNDN); mpfr_mul(r15532, r15530, r15531, MPFR_RNDN); mpfr_sub(r15533, r15529, r15532, MPFR_RNDN); mpfr_sqrt(r15534, r15533, MPFR_RNDN); mpfr_add(r15535, r15528, r15534, MPFR_RNDN); mpfr_div(r15536, r15535, r15530, MPFR_RNDN); return mpfr_get_d(r15536, MPFR_RNDN); } static mpfr_t r15537, r15538, r15539, r15540, r15541, r15542, r15543, r15544, r15545, r15546, r15547, r15548, r15549, r15550, r15551, r15552, r15553, r15554, r15555, r15556, r15557, r15558, r15559, r15560, r15561, r15562, r15563, r15564, r15565, r15566, r15567, r15568, r15569, r15570, r15571, r15572, r15573, r15574, r15575, r15576; void setup_mpfr_f_fm() { mpfr_set_default_prec(144); mpfr_init(r15537); mpfr_init_set_str(r15538, "-5.215706425974793e+89", 10, MPFR_RNDN); mpfr_init(r15539); mpfr_init_set_str(r15540, "1/2", 10, MPFR_RNDN); mpfr_init(r15541); mpfr_init(r15542); mpfr_init(r15543); mpfr_init(r15544); mpfr_init(r15545); mpfr_init_set_str(r15546, "2", 10, MPFR_RNDN); mpfr_init(r15547); mpfr_init(r15548); mpfr_init_set_str(r15549, "3.664277580957564e-136", 10, MPFR_RNDN); mpfr_init(r15550); mpfr_init(r15551); mpfr_init(r15552); mpfr_init(r15553); mpfr_init(r15554); mpfr_init(r15555); mpfr_init(r15556); mpfr_init_set_str(r15557, "1", 10, MPFR_RNDN); mpfr_init(r15558); mpfr_init(r15559); mpfr_init_set_str(r15560, "2.993431952201985e+83", 10, MPFR_RNDN); mpfr_init(r15561); mpfr_init(r15562); mpfr_init(r15563); mpfr_init(r15564); mpfr_init(r15565); mpfr_init(r15566); mpfr_init(r15567); mpfr_init(r15568); mpfr_init(r15569); mpfr_init_set_str(r15570, "-1/2", 10, MPFR_RNDN); mpfr_init(r15571); mpfr_init(r15572); mpfr_init(r15573); mpfr_init(r15574); mpfr_init(r15575); mpfr_init(r15576); } double f_fm(double a, double b_2F2, double c) { mpfr_set_d(r15537, b_2F2, MPFR_RNDN); ; mpfr_set_si(r15539, mpfr_cmp(r15537, r15538) <= 0, MPFR_RNDN); ; mpfr_set_d(r15541, c, MPFR_RNDN); mpfr_div(r15542, r15537, r15541, MPFR_RNDN); mpfr_div(r15543, r15540, r15542, MPFR_RNDN); mpfr_set_d(r15544, a, MPFR_RNDN); mpfr_div(r15545, r15537, r15544, MPFR_RNDN); ; mpfr_mul(r15547, r15545, r15546, MPFR_RNDN); mpfr_sub(r15548, r15543, r15547, MPFR_RNDN); ; mpfr_set_si(r15550, mpfr_cmp(r15537, r15549) <= 0, MPFR_RNDN); mpfr_neg(r15551, r15537, MPFR_RNDN); mpfr_sqr(r15552, r15537, MPFR_RNDN); mpfr_mul(r15553, r15544, r15541, MPFR_RNDN); mpfr_sub(r15554, r15552, r15553, MPFR_RNDN); mpfr_sqrt(r15555, r15554, MPFR_RNDN); mpfr_add(r15556, r15551, r15555, MPFR_RNDN); ; mpfr_div(r15558, r15557, r15544, MPFR_RNDN); mpfr_mul(r15559, r15556, r15558, MPFR_RNDN); ; mpfr_set_si(r15561, mpfr_cmp(r15537, r15560) <= 0, MPFR_RNDN); mpfr_mul(r15562, r15537, r15537, MPFR_RNDN); mpfr_mul(r15563, r15541, r15544, MPFR_RNDN); mpfr_sub(r15564, r15562, r15563, MPFR_RNDN); mpfr_sqrt(r15565, r15564, MPFR_RNDN); mpfr_sub(r15566, r15551, r15565, MPFR_RNDN); mpfr_div(r15567, r15541, r15566, MPFR_RNDN); mpfr_cbrt(r15568, r15567, MPFR_RNDN); mpfr_mul(r15569, r15568, r15568, MPFR_RNDN); mpfr_mul(r15569, r15569, r15568, MPFR_RNDN); ; mpfr_mul(r15571, r15557, r15570, MPFR_RNDN); mpfr_div(r15572, r15541, r15537, MPFR_RNDN); mpfr_mul(r15573, r15571, r15572, MPFR_RNDN); if (mpfr_get_si(r15561, MPFR_RNDN)) { mpfr_set(r15574, r15569, MPFR_RNDN); } else { mpfr_set(r15574, r15573, MPFR_RNDN); }; if (mpfr_get_si(r15550, MPFR_RNDN)) { mpfr_set(r15575, r15559, MPFR_RNDN); } else { mpfr_set(r15575, r15574, MPFR_RNDN); }; if (mpfr_get_si(r15539, MPFR_RNDN)) { mpfr_set(r15576, r15548, MPFR_RNDN); } else { mpfr_set(r15576, r15575, MPFR_RNDN); }; return mpfr_get_d(r15576, MPFR_RNDN); } static mpfr_t r15577, r15578, r15579, r15580, r15581, r15582, r15583, r15584, r15585, r15586, r15587, r15588, r15589, r15590, r15591, r15592, r15593, r15594, r15595, r15596, r15597, r15598, r15599, r15600, r15601, r15602, r15603, r15604, r15605, r15606, r15607, r15608, r15609, r15610, r15611, r15612, r15613, r15614, r15615, r15616; void setup_mpfr_f_dm() { mpfr_set_default_prec(144); mpfr_init(r15577); mpfr_init_set_str(r15578, "-5.215706425974793e+89", 10, MPFR_RNDN); mpfr_init(r15579); mpfr_init_set_str(r15580, "1/2", 10, MPFR_RNDN); mpfr_init(r15581); mpfr_init(r15582); mpfr_init(r15583); mpfr_init(r15584); mpfr_init(r15585); mpfr_init_set_str(r15586, "2", 10, MPFR_RNDN); mpfr_init(r15587); mpfr_init(r15588); mpfr_init_set_str(r15589, "3.664277580957564e-136", 10, MPFR_RNDN); mpfr_init(r15590); mpfr_init(r15591); mpfr_init(r15592); mpfr_init(r15593); mpfr_init(r15594); mpfr_init(r15595); mpfr_init(r15596); mpfr_init_set_str(r15597, "1", 10, MPFR_RNDN); mpfr_init(r15598); mpfr_init(r15599); mpfr_init_set_str(r15600, "2.993431952201985e+83", 10, MPFR_RNDN); mpfr_init(r15601); mpfr_init(r15602); mpfr_init(r15603); mpfr_init(r15604); mpfr_init(r15605); mpfr_init(r15606); mpfr_init(r15607); mpfr_init(r15608); mpfr_init(r15609); mpfr_init_set_str(r15610, "-1/2", 10, MPFR_RNDN); mpfr_init(r15611); mpfr_init(r15612); mpfr_init(r15613); mpfr_init(r15614); mpfr_init(r15615); mpfr_init(r15616); } double f_dm(double a, double b_2F2, double c) { mpfr_set_d(r15577, b_2F2, MPFR_RNDN); ; mpfr_set_si(r15579, mpfr_cmp(r15577, r15578) <= 0, MPFR_RNDN); ; mpfr_set_d(r15581, c, MPFR_RNDN); mpfr_div(r15582, r15577, r15581, MPFR_RNDN); mpfr_div(r15583, r15580, r15582, MPFR_RNDN); mpfr_set_d(r15584, a, MPFR_RNDN); mpfr_div(r15585, r15577, r15584, MPFR_RNDN); ; mpfr_mul(r15587, r15585, r15586, MPFR_RNDN); mpfr_sub(r15588, r15583, r15587, MPFR_RNDN); ; mpfr_set_si(r15590, mpfr_cmp(r15577, r15589) <= 0, MPFR_RNDN); mpfr_neg(r15591, r15577, MPFR_RNDN); mpfr_sqr(r15592, r15577, MPFR_RNDN); mpfr_mul(r15593, r15584, r15581, MPFR_RNDN); mpfr_sub(r15594, r15592, r15593, MPFR_RNDN); mpfr_sqrt(r15595, r15594, MPFR_RNDN); mpfr_add(r15596, r15591, r15595, MPFR_RNDN); ; mpfr_div(r15598, r15597, r15584, MPFR_RNDN); mpfr_mul(r15599, r15596, r15598, MPFR_RNDN); ; mpfr_set_si(r15601, mpfr_cmp(r15577, r15600) <= 0, MPFR_RNDN); mpfr_mul(r15602, r15577, r15577, MPFR_RNDN); mpfr_mul(r15603, r15581, r15584, MPFR_RNDN); mpfr_sub(r15604, r15602, r15603, MPFR_RNDN); mpfr_sqrt(r15605, r15604, MPFR_RNDN); mpfr_sub(r15606, r15591, r15605, MPFR_RNDN); mpfr_div(r15607, r15581, r15606, MPFR_RNDN); mpfr_cbrt(r15608, r15607, MPFR_RNDN); mpfr_mul(r15609, r15608, r15608, MPFR_RNDN); mpfr_mul(r15609, r15609, r15608, MPFR_RNDN); ; mpfr_mul(r15611, r15597, r15610, MPFR_RNDN); mpfr_div(r15612, r15581, r15577, MPFR_RNDN); mpfr_mul(r15613, r15611, r15612, MPFR_RNDN); if (mpfr_get_si(r15601, MPFR_RNDN)) { mpfr_set(r15614, r15609, MPFR_RNDN); } else { mpfr_set(r15614, r15613, MPFR_RNDN); }; if (mpfr_get_si(r15590, MPFR_RNDN)) { mpfr_set(r15615, r15599, MPFR_RNDN); } else { mpfr_set(r15615, r15614, MPFR_RNDN); }; if (mpfr_get_si(r15579, MPFR_RNDN)) { mpfr_set(r15616, r15588, MPFR_RNDN); } else { mpfr_set(r15616, r15615, MPFR_RNDN); }; return mpfr_get_d(r15616, MPFR_RNDN); }