#include <tgmath.h>
#include <gmp.h>
#include <mpfr.h>
#include <stdio.h>
#include <stdbool.h>

char *name = "3frac (problem 3.3.3)";

double f_if(float x) {
        float r21620 = 1;
        float r21621 = x;
        float r21622 = r21621 + r21620;
        float r21623 = r21620 / r21622;
        float r21624 = 2;
        float r21625 = r21624 / r21621;
        float r21626 = r21623 - r21625;
        float r21627 = r21621 - r21620;
        float r21628 = r21620 / r21627;
        float r21629 = r21626 + r21628;
        return r21629;
}

double f_id(double x) {
        double r21630 = 1;
        double r21631 = x;
        double r21632 = r21631 + r21630;
        double r21633 = r21630 / r21632;
        double r21634 = 2;
        double r21635 = r21634 / r21631;
        double r21636 = r21633 - r21635;
        double r21637 = r21631 - r21630;
        double r21638 = r21630 / r21637;
        double r21639 = r21636 + r21638;
        return r21639;
}


double f_of(float x) {
        float r21640 = x;
        float r21641 = -1.9413080042549844;
        bool r21642 = r21640 <= r21641;
        float r21643 = 2;
        float r21644 = 7;
        float r21645 = pow(r21640, r21644);
        float r21646 = r21643 / r21645;
        float r21647 = 5;
        float r21648 = pow(r21640, r21647);
        float r21649 = r21643 / r21648;
        float r21650 = r21646 + r21649;
        float r21651 = r21643 / r21640;
        float r21652 = r21640 * r21640;
        float r21653 = r21651 / r21652;
        float r21654 = r21650 + r21653;
        float r21655 = 15009.386462352013;
        bool r21656 = r21640 <= r21655;
        float r21657 = 1;
        float r21658 = r21640 + r21657;
        float r21659 = r21657 / r21658;
        float r21660 = r21659 - r21651;
        float r21661 = r21640 - r21657;
        float r21662 = r21657 / r21661;
        float r21663 = r21660 + r21662;
        float r21664 = r21656 ? r21663 : r21654;
        float r21665 = r21642 ? r21654 : r21664;
        return r21665;
}

double f_od(double x) {
        double r21666 = x;
        double r21667 = -1.9413080042549844;
        bool r21668 = r21666 <= r21667;
        double r21669 = 2;
        double r21670 = 7;
        double r21671 = pow(r21666, r21670);
        double r21672 = r21669 / r21671;
        double r21673 = 5;
        double r21674 = pow(r21666, r21673);
        double r21675 = r21669 / r21674;
        double r21676 = r21672 + r21675;
        double r21677 = r21669 / r21666;
        double r21678 = r21666 * r21666;
        double r21679 = r21677 / r21678;
        double r21680 = r21676 + r21679;
        double r21681 = 15009.386462352013;
        bool r21682 = r21666 <= r21681;
        double r21683 = 1;
        double r21684 = r21666 + r21683;
        double r21685 = r21683 / r21684;
        double r21686 = r21685 - r21677;
        double r21687 = r21666 - r21683;
        double r21688 = r21683 / r21687;
        double r21689 = r21686 + r21688;
        double r21690 = r21682 ? r21689 : r21680;
        double r21691 = r21668 ? r21680 : r21690;
        return r21691;
}

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 r21692, r21693, r21694, r21695, r21696, r21697, r21698, r21699, r21700, r21701;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(1168);
        mpfr_init_set_str(r21692, "1", 10, MPFR_RNDN);
        mpfr_init(r21693);
        mpfr_init(r21694);
        mpfr_init(r21695);
        mpfr_init_set_str(r21696, "2", 10, MPFR_RNDN);
        mpfr_init(r21697);
        mpfr_init(r21698);
        mpfr_init(r21699);
        mpfr_init(r21700);
        mpfr_init(r21701);
}

double f_im(double x) {
        ;
        mpfr_set_d(r21693, x, MPFR_RNDN);
        mpfr_add(r21694, r21693, r21692, MPFR_RNDN);
        mpfr_div(r21695, r21692, r21694, MPFR_RNDN);
        ;
        mpfr_div(r21697, r21696, r21693, MPFR_RNDN);
        mpfr_sub(r21698, r21695, r21697, MPFR_RNDN);
        mpfr_sub(r21699, r21693, r21692, MPFR_RNDN);
        mpfr_div(r21700, r21692, r21699, MPFR_RNDN);
        mpfr_add(r21701, r21698, r21700, MPFR_RNDN);
        return mpfr_get_d(r21701, MPFR_RNDN);
}

static mpfr_t r21702, r21703, r21704, r21705, r21706, r21707, r21708, r21709, r21710, r21711, r21712, r21713, r21714, r21715, r21716, r21717, r21718, r21719, r21720, r21721, r21722, r21723, r21724, r21725, r21726, r21727;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(1168);
        mpfr_init(r21702);
        mpfr_init_set_str(r21703, "-1.9413080042549844", 10, MPFR_RNDN);
        mpfr_init(r21704);
        mpfr_init_set_str(r21705, "2", 10, MPFR_RNDN);
        mpfr_init_set_str(r21706, "7", 10, MPFR_RNDN);
        mpfr_init(r21707);
        mpfr_init(r21708);
        mpfr_init_set_str(r21709, "5", 10, MPFR_RNDN);
        mpfr_init(r21710);
        mpfr_init(r21711);
        mpfr_init(r21712);
        mpfr_init(r21713);
        mpfr_init(r21714);
        mpfr_init(r21715);
        mpfr_init(r21716);
        mpfr_init_set_str(r21717, "15009.386462352013", 10, MPFR_RNDN);
        mpfr_init(r21718);
        mpfr_init_set_str(r21719, "1", 10, MPFR_RNDN);
        mpfr_init(r21720);
        mpfr_init(r21721);
        mpfr_init(r21722);
        mpfr_init(r21723);
        mpfr_init(r21724);
        mpfr_init(r21725);
        mpfr_init(r21726);
        mpfr_init(r21727);
}

double f_fm(double x) {
        mpfr_set_d(r21702, x, MPFR_RNDN);
        ;
        mpfr_set_si(r21704, mpfr_cmp(r21702, r21703) <= 0, MPFR_RNDN);
        ;
        ;
        mpfr_pow(r21707, r21702, r21706, MPFR_RNDN);
        mpfr_div(r21708, r21705, r21707, MPFR_RNDN);
        ;
        mpfr_pow(r21710, r21702, r21709, MPFR_RNDN);
        mpfr_div(r21711, r21705, r21710, MPFR_RNDN);
        mpfr_add(r21712, r21708, r21711, MPFR_RNDN);
        mpfr_div(r21713, r21705, r21702, MPFR_RNDN);
        mpfr_mul(r21714, r21702, r21702, MPFR_RNDN);
        mpfr_div(r21715, r21713, r21714, MPFR_RNDN);
        mpfr_add(r21716, r21712, r21715, MPFR_RNDN);
        ;
        mpfr_set_si(r21718, mpfr_cmp(r21702, r21717) <= 0, MPFR_RNDN);
        ;
        mpfr_add(r21720, r21702, r21719, MPFR_RNDN);
        mpfr_div(r21721, r21719, r21720, MPFR_RNDN);
        mpfr_sub(r21722, r21721, r21713, MPFR_RNDN);
        mpfr_sub(r21723, r21702, r21719, MPFR_RNDN);
        mpfr_div(r21724, r21719, r21723, MPFR_RNDN);
        mpfr_add(r21725, r21722, r21724, MPFR_RNDN);
        if (mpfr_get_si(r21718, MPFR_RNDN)) { mpfr_set(r21726, r21725, MPFR_RNDN); } else { mpfr_set(r21726, r21716, MPFR_RNDN); };
        if (mpfr_get_si(r21704, MPFR_RNDN)) { mpfr_set(r21727, r21716, MPFR_RNDN); } else { mpfr_set(r21727, r21726, MPFR_RNDN); };
        return mpfr_get_d(r21727, MPFR_RNDN);
}

static mpfr_t r21728, r21729, r21730, r21731, r21732, r21733, r21734, r21735, r21736, r21737, r21738, r21739, r21740, r21741, r21742, r21743, r21744, r21745, r21746, r21747, r21748, r21749, r21750, r21751, r21752, r21753;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(1168);
        mpfr_init(r21728);
        mpfr_init_set_str(r21729, "-1.9413080042549844", 10, MPFR_RNDN);
        mpfr_init(r21730);
        mpfr_init_set_str(r21731, "2", 10, MPFR_RNDN);
        mpfr_init_set_str(r21732, "7", 10, MPFR_RNDN);
        mpfr_init(r21733);
        mpfr_init(r21734);
        mpfr_init_set_str(r21735, "5", 10, MPFR_RNDN);
        mpfr_init(r21736);
        mpfr_init(r21737);
        mpfr_init(r21738);
        mpfr_init(r21739);
        mpfr_init(r21740);
        mpfr_init(r21741);
        mpfr_init(r21742);
        mpfr_init_set_str(r21743, "15009.386462352013", 10, MPFR_RNDN);
        mpfr_init(r21744);
        mpfr_init_set_str(r21745, "1", 10, MPFR_RNDN);
        mpfr_init(r21746);
        mpfr_init(r21747);
        mpfr_init(r21748);
        mpfr_init(r21749);
        mpfr_init(r21750);
        mpfr_init(r21751);
        mpfr_init(r21752);
        mpfr_init(r21753);
}

double f_dm(double x) {
        mpfr_set_d(r21728, x, MPFR_RNDN);
        ;
        mpfr_set_si(r21730, mpfr_cmp(r21728, r21729) <= 0, MPFR_RNDN);
        ;
        ;
        mpfr_pow(r21733, r21728, r21732, MPFR_RNDN);
        mpfr_div(r21734, r21731, r21733, MPFR_RNDN);
        ;
        mpfr_pow(r21736, r21728, r21735, MPFR_RNDN);
        mpfr_div(r21737, r21731, r21736, MPFR_RNDN);
        mpfr_add(r21738, r21734, r21737, MPFR_RNDN);
        mpfr_div(r21739, r21731, r21728, MPFR_RNDN);
        mpfr_mul(r21740, r21728, r21728, MPFR_RNDN);
        mpfr_div(r21741, r21739, r21740, MPFR_RNDN);
        mpfr_add(r21742, r21738, r21741, MPFR_RNDN);
        ;
        mpfr_set_si(r21744, mpfr_cmp(r21728, r21743) <= 0, MPFR_RNDN);
        ;
        mpfr_add(r21746, r21728, r21745, MPFR_RNDN);
        mpfr_div(r21747, r21745, r21746, MPFR_RNDN);
        mpfr_sub(r21748, r21747, r21739, MPFR_RNDN);
        mpfr_sub(r21749, r21728, r21745, MPFR_RNDN);
        mpfr_div(r21750, r21745, r21749, MPFR_RNDN);
        mpfr_add(r21751, r21748, r21750, MPFR_RNDN);
        if (mpfr_get_si(r21744, MPFR_RNDN)) { mpfr_set(r21752, r21751, MPFR_RNDN); } else { mpfr_set(r21752, r21742, MPFR_RNDN); };
        if (mpfr_get_si(r21730, MPFR_RNDN)) { mpfr_set(r21753, r21742, MPFR_RNDN); } else { mpfr_set(r21753, r21752, MPFR_RNDN); };
        return mpfr_get_d(r21753, MPFR_RNDN);
}