#include #include #include #include #include char *name = "Rosa's TurbineBenchmark"; double f_if(float v, float w, float r) { float r20484 = 3; float r20485 = 2; float r20486 = r; float r20487 = r20486 * r20486; float r20488 = r20485 / r20487; float r20489 = r20484 + r20488; float r20490 = 0.125; float r20491 = v; float r20492 = r20485 * r20491; float r20493 = r20484 - r20492; float r20494 = r20490 * r20493; float r20495 = w; float r20496 = r20495 * r20495; float r20497 = r20496 * r20486; float r20498 = r20497 * r20486; float r20499 = r20494 * r20498; float r20500 = 1; float r20501 = r20500 - r20491; float r20502 = r20499 / r20501; float r20503 = r20489 - r20502; float r20504 = 4.5; float r20505 = r20503 - r20504; return r20505; } double f_id(double v, double w, double r) { double r20506 = 3; double r20507 = 2; double r20508 = r; double r20509 = r20508 * r20508; double r20510 = r20507 / r20509; double r20511 = r20506 + r20510; double r20512 = 0.125; double r20513 = v; double r20514 = r20507 * r20513; double r20515 = r20506 - r20514; double r20516 = r20512 * r20515; double r20517 = w; double r20518 = r20517 * r20517; double r20519 = r20518 * r20508; double r20520 = r20519 * r20508; double r20521 = r20516 * r20520; double r20522 = 1; double r20523 = r20522 - r20513; double r20524 = r20521 / r20523; double r20525 = r20511 - r20524; double r20526 = 4.5; double r20527 = r20525 - r20526; return r20527; } double f_of(float v, float w, float r) { float r20528 = 2; float r20529 = r; float r20530 = r20528 / r20529; float r20531 = r20530 / r20529; float r20532 = 3; float r20533 = r20531 + r20532; float r20534 = 0.125; float r20535 = 1; float r20536 = v; float r20537 = r20535 - r20536; float r20538 = r20534 / r20537; float r20539 = r20532 - r20536; float r20540 = r20539 - r20536; float r20541 = r20538 * r20540; float r20542 = w; float r20543 = r20542 * r20529; float r20544 = r20543 * r20543; float r20545 = 4.5; float r20546 = fma(r20541, r20544, r20545); float r20547 = r20533 - r20546; return r20547; } double f_od(double v, double w, double r) { double r20548 = 2; double r20549 = r; double r20550 = r20548 / r20549; double r20551 = r20550 / r20549; double r20552 = 3; double r20553 = r20551 + r20552; double r20554 = 0.125; double r20555 = 1; double r20556 = v; double r20557 = r20555 - r20556; double r20558 = r20554 / r20557; double r20559 = r20552 - r20556; double r20560 = r20559 - r20556; double r20561 = r20558 * r20560; double r20562 = w; double r20563 = r20562 * r20549; double r20564 = r20563 * r20563; double r20565 = 4.5; double r20566 = fma(r20561, r20564, r20565); double r20567 = r20553 - r20566; return r20567; } 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 r20568, r20569, r20570, r20571, r20572, r20573, r20574, r20575, r20576, r20577, r20578, r20579, r20580, r20581, r20582, r20583, r20584, r20585, r20586, r20587, r20588, r20589; void setup_mpfr_f_im() { mpfr_set_default_prec(400); mpfr_init_set_str(r20568, "3", 10, MPFR_RNDN); mpfr_init_set_str(r20569, "2", 10, MPFR_RNDN); mpfr_init(r20570); mpfr_init(r20571); mpfr_init(r20572); mpfr_init(r20573); mpfr_init_set_str(r20574, "0.125", 10, MPFR_RNDN); mpfr_init(r20575); mpfr_init(r20576); mpfr_init(r20577); mpfr_init(r20578); mpfr_init(r20579); mpfr_init(r20580); mpfr_init(r20581); mpfr_init(r20582); mpfr_init(r20583); mpfr_init_set_str(r20584, "1", 10, MPFR_RNDN); mpfr_init(r20585); mpfr_init(r20586); mpfr_init(r20587); mpfr_init_set_str(r20588, "4.5", 10, MPFR_RNDN); mpfr_init(r20589); } double f_im(double v, double w, double r) { ; ; mpfr_set_d(r20570, r, MPFR_RNDN); mpfr_mul(r20571, r20570, r20570, MPFR_RNDN); mpfr_div(r20572, r20569, r20571, MPFR_RNDN); mpfr_add(r20573, r20568, r20572, MPFR_RNDN); ; mpfr_set_d(r20575, v, MPFR_RNDN); mpfr_mul(r20576, r20569, r20575, MPFR_RNDN); mpfr_sub(r20577, r20568, r20576, MPFR_RNDN); mpfr_mul(r20578, r20574, r20577, MPFR_RNDN); mpfr_set_d(r20579, w, MPFR_RNDN); mpfr_mul(r20580, r20579, r20579, MPFR_RNDN); mpfr_mul(r20581, r20580, r20570, MPFR_RNDN); mpfr_mul(r20582, r20581, r20570, MPFR_RNDN); mpfr_mul(r20583, r20578, r20582, MPFR_RNDN); ; mpfr_sub(r20585, r20584, r20575, MPFR_RNDN); mpfr_div(r20586, r20583, r20585, MPFR_RNDN); mpfr_sub(r20587, r20573, r20586, MPFR_RNDN); ; mpfr_sub(r20589, r20587, r20588, MPFR_RNDN); return mpfr_get_d(r20589, MPFR_RNDN); } static mpfr_t r20590, r20591, r20592, r20593, r20594, r20595, r20596, r20597, r20598, r20599, r20600, r20601, r20602, r20603, r20604, r20605, r20606, r20607, r20608, r20609; void setup_mpfr_f_fm() { mpfr_set_default_prec(400); mpfr_init_set_str(r20590, "2", 10, MPFR_RNDN); mpfr_init(r20591); mpfr_init(r20592); mpfr_init(r20593); mpfr_init_set_str(r20594, "3", 10, MPFR_RNDN); mpfr_init(r20595); mpfr_init_set_str(r20596, "0.125", 10, MPFR_RNDN); mpfr_init_set_str(r20597, "1", 10, MPFR_RNDN); mpfr_init(r20598); mpfr_init(r20599); mpfr_init(r20600); mpfr_init(r20601); mpfr_init(r20602); mpfr_init(r20603); mpfr_init(r20604); mpfr_init(r20605); mpfr_init(r20606); mpfr_init_set_str(r20607, "4.5", 10, MPFR_RNDN); mpfr_init(r20608); mpfr_init(r20609); } double f_fm(double v, double w, double r) { ; mpfr_set_d(r20591, r, MPFR_RNDN); mpfr_div(r20592, r20590, r20591, MPFR_RNDN); mpfr_div(r20593, r20592, r20591, MPFR_RNDN); ; mpfr_add(r20595, r20593, r20594, MPFR_RNDN); ; ; mpfr_set_d(r20598, v, MPFR_RNDN); mpfr_sub(r20599, r20597, r20598, MPFR_RNDN); mpfr_div(r20600, r20596, r20599, MPFR_RNDN); mpfr_sub(r20601, r20594, r20598, MPFR_RNDN); mpfr_sub(r20602, r20601, r20598, MPFR_RNDN); mpfr_mul(r20603, r20600, r20602, MPFR_RNDN); mpfr_set_d(r20604, w, MPFR_RNDN); mpfr_mul(r20605, r20604, r20591, MPFR_RNDN); mpfr_mul(r20606, r20605, r20605, MPFR_RNDN); ; mpfr_fma(r20608, r20603, r20606, r20607, MPFR_RNDN); mpfr_sub(r20609, r20595, r20608, MPFR_RNDN); return mpfr_get_d(r20609, MPFR_RNDN); } static mpfr_t r20610, r20611, r20612, r20613, r20614, r20615, r20616, r20617, r20618, r20619, r20620, r20621, r20622, r20623, r20624, r20625, r20626, r20627, r20628, r20629; void setup_mpfr_f_dm() { mpfr_set_default_prec(400); mpfr_init_set_str(r20610, "2", 10, MPFR_RNDN); mpfr_init(r20611); mpfr_init(r20612); mpfr_init(r20613); mpfr_init_set_str(r20614, "3", 10, MPFR_RNDN); mpfr_init(r20615); mpfr_init_set_str(r20616, "0.125", 10, MPFR_RNDN); mpfr_init_set_str(r20617, "1", 10, MPFR_RNDN); mpfr_init(r20618); mpfr_init(r20619); mpfr_init(r20620); mpfr_init(r20621); mpfr_init(r20622); mpfr_init(r20623); mpfr_init(r20624); mpfr_init(r20625); mpfr_init(r20626); mpfr_init_set_str(r20627, "4.5", 10, MPFR_RNDN); mpfr_init(r20628); mpfr_init(r20629); } double f_dm(double v, double w, double r) { ; mpfr_set_d(r20611, r, MPFR_RNDN); mpfr_div(r20612, r20610, r20611, MPFR_RNDN); mpfr_div(r20613, r20612, r20611, MPFR_RNDN); ; mpfr_add(r20615, r20613, r20614, MPFR_RNDN); ; ; mpfr_set_d(r20618, v, MPFR_RNDN); mpfr_sub(r20619, r20617, r20618, MPFR_RNDN); mpfr_div(r20620, r20616, r20619, MPFR_RNDN); mpfr_sub(r20621, r20614, r20618, MPFR_RNDN); mpfr_sub(r20622, r20621, r20618, MPFR_RNDN); mpfr_mul(r20623, r20620, r20622, MPFR_RNDN); mpfr_set_d(r20624, w, MPFR_RNDN); mpfr_mul(r20625, r20624, r20611, MPFR_RNDN); mpfr_mul(r20626, r20625, r20625, MPFR_RNDN); ; mpfr_fma(r20628, r20623, r20626, r20627, MPFR_RNDN); mpfr_sub(r20629, r20615, r20628, MPFR_RNDN); return mpfr_get_d(r20629, MPFR_RNDN); }