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

char *name = "NMSE problem 3.4.5";

double f_if(float x) {
        float r14875 = x;
        float r14876 = sin(r14875);
        float r14877 = r14875 - r14876;
        float r14878 = tan(r14875);
        float r14879 = r14875 - r14878;
        float r14880 = r14877 / r14879;
        return r14880;
}

double f_id(double x) {
        double r14881 = x;
        double r14882 = sin(r14881);
        double r14883 = r14881 - r14882;
        double r14884 = tan(r14881);
        double r14885 = r14881 - r14884;
        double r14886 = r14883 / r14885;
        return r14886;
}


double f_of(float x) {
        float r14887 = x;
        float r14888 = -0.05906668305397034f;
        bool r14889 = r14887 <= r14888;
        float r14890 = sin(r14887);
        float r14891 = r14887 - r14890;
        float r14892 = tan(r14887);
        float r14893 = r14887 - r14892;
        float r14894 = r14891 / r14893;
        float r14895 = 1.2336446046829224f;
        bool r14896 = r14887 <= r14895;
        float r14897 = 0.22499999403953552f;
        float r14898 = r14887 * r14887;
        float r14899 = r14897 * r14898;
        float r14900 = 0.009642857126891613f;
        float r14901 = 4.0f;
        float r14902 = pow(r14887, r14901);
        float r14903 = r14900 * r14902;
        float r14904 = 0.5f;
        float r14905 = r14903 + r14904;
        float r14906 = r14899 - r14905;
        float r14907 = r14896 ? r14906 : r14894;
        float r14908 = r14889 ? r14894 : r14907;
        return r14908;
}

double f_od(double x) {
        double r14909 = x;
        double r14910 = -0.05906668305397034;
        bool r14911 = r14909 <= r14910;
        double r14912 = sin(r14909);
        double r14913 = r14909 - r14912;
        double r14914 = tan(r14909);
        double r14915 = r14909 - r14914;
        double r14916 = r14913 / r14915;
        double r14917 = 1.2336446046829224;
        bool r14918 = r14909 <= r14917;
        double r14919 = 0.22499999403953552;
        double r14920 = r14909 * r14909;
        double r14921 = r14919 * r14920;
        double r14922 = 0.009642857126891613;
        double r14923 = 4.0;
        double r14924 = pow(r14909, r14923);
        double r14925 = r14922 * r14924;
        double r14926 = 0.5;
        double r14927 = r14925 + r14926;
        double r14928 = r14921 - r14927;
        double r14929 = r14918 ? r14928 : r14916;
        double r14930 = r14911 ? r14916 : r14929;
        return r14930;
}

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 r14931, r14932, r14933, r14934, r14935, r14936;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init(r14931);
        mpfr_init(r14932);
        mpfr_init(r14933);
        mpfr_init(r14934);
        mpfr_init(r14935);
        mpfr_init(r14936);
}

double f_im(double x) {
        mpfr_set_d(r14931, x, MPFR_RNDN);
        mpfr_sin(r14932, r14931, MPFR_RNDN);
        mpfr_sub(r14933, r14931, r14932, MPFR_RNDN);
        mpfr_tan(r14934, r14931, MPFR_RNDN);
        mpfr_sub(r14935, r14931, r14934, MPFR_RNDN);
        mpfr_div(r14936, r14933, r14935, MPFR_RNDN);
        return mpfr_get_d(r14936, MPFR_RNDN);
}

static mpfr_t r14937, r14938, r14939, r14940, r14941, r14942, r14943, r14944, r14945, r14946, r14947, r14948, r14949, r14950, r14951, r14952, r14953, r14954, r14955, r14956, r14957, r14958;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r14937);
        mpfr_init_set_str(r14938, "-0.059066683f0", 10, MPFR_RNDN);
        mpfr_init(r14939);
        mpfr_init(r14940);
        mpfr_init(r14941);
        mpfr_init(r14942);
        mpfr_init(r14943);
        mpfr_init(r14944);
        mpfr_init_set_str(r14945, "1.2336446f0", 10, MPFR_RNDN);
        mpfr_init(r14946);
        mpfr_init_set_str(r14947, "9/40", 10, MPFR_RNDN);
        mpfr_init(r14948);
        mpfr_init(r14949);
        mpfr_init_set_str(r14950, "27/2800", 10, MPFR_RNDN);
        mpfr_init_set_str(r14951, "4", 10, MPFR_RNDN);
        mpfr_init(r14952);
        mpfr_init(r14953);
        mpfr_init_set_str(r14954, "1/2", 10, MPFR_RNDN);
        mpfr_init(r14955);
        mpfr_init(r14956);
        mpfr_init(r14957);
        mpfr_init(r14958);
}

double f_fm(double x) {
        mpfr_set_d(r14937, x, MPFR_RNDN);
        ;
        mpfr_set_si(r14939, mpfr_cmp(r14937, r14938) <= 0, MPFR_RNDN);
        mpfr_sin(r14940, r14937, MPFR_RNDN);
        mpfr_sub(r14941, r14937, r14940, MPFR_RNDN);
        mpfr_tan(r14942, r14937, MPFR_RNDN);
        mpfr_sub(r14943, r14937, r14942, MPFR_RNDN);
        mpfr_div(r14944, r14941, r14943, MPFR_RNDN);
        ;
        mpfr_set_si(r14946, mpfr_cmp(r14937, r14945) <= 0, MPFR_RNDN);
        ;
        mpfr_sqr(r14948, r14937, MPFR_RNDN);
        mpfr_mul(r14949, r14947, r14948, MPFR_RNDN);
        ;
        ;
        mpfr_pow(r14952, r14937, r14951, MPFR_RNDN);
        mpfr_mul(r14953, r14950, r14952, MPFR_RNDN);
        ;
        mpfr_add(r14955, r14953, r14954, MPFR_RNDN);
        mpfr_sub(r14956, r14949, r14955, MPFR_RNDN);
        if (mpfr_get_si(r14946, MPFR_RNDN)) { mpfr_set(r14957, r14956, MPFR_RNDN); } else { mpfr_set(r14957, r14944, MPFR_RNDN); };
        if (mpfr_get_si(r14939, MPFR_RNDN)) { mpfr_set(r14958, r14944, MPFR_RNDN); } else { mpfr_set(r14958, r14957, MPFR_RNDN); };
        return mpfr_get_d(r14958, MPFR_RNDN);
}

static mpfr_t r14959, r14960, r14961, r14962, r14963, r14964, r14965, r14966, r14967, r14968, r14969, r14970, r14971, r14972, r14973, r14974, r14975, r14976, r14977, r14978, r14979, r14980;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r14959);
        mpfr_init_set_str(r14960, "-0.059066683f0", 10, MPFR_RNDN);
        mpfr_init(r14961);
        mpfr_init(r14962);
        mpfr_init(r14963);
        mpfr_init(r14964);
        mpfr_init(r14965);
        mpfr_init(r14966);
        mpfr_init_set_str(r14967, "1.2336446f0", 10, MPFR_RNDN);
        mpfr_init(r14968);
        mpfr_init_set_str(r14969, "9/40", 10, MPFR_RNDN);
        mpfr_init(r14970);
        mpfr_init(r14971);
        mpfr_init_set_str(r14972, "27/2800", 10, MPFR_RNDN);
        mpfr_init_set_str(r14973, "4", 10, MPFR_RNDN);
        mpfr_init(r14974);
        mpfr_init(r14975);
        mpfr_init_set_str(r14976, "1/2", 10, MPFR_RNDN);
        mpfr_init(r14977);
        mpfr_init(r14978);
        mpfr_init(r14979);
        mpfr_init(r14980);
}

double f_dm(double x) {
        mpfr_set_d(r14959, x, MPFR_RNDN);
        ;
        mpfr_set_si(r14961, mpfr_cmp(r14959, r14960) <= 0, MPFR_RNDN);
        mpfr_sin(r14962, r14959, MPFR_RNDN);
        mpfr_sub(r14963, r14959, r14962, MPFR_RNDN);
        mpfr_tan(r14964, r14959, MPFR_RNDN);
        mpfr_sub(r14965, r14959, r14964, MPFR_RNDN);
        mpfr_div(r14966, r14963, r14965, MPFR_RNDN);
        ;
        mpfr_set_si(r14968, mpfr_cmp(r14959, r14967) <= 0, MPFR_RNDN);
        ;
        mpfr_sqr(r14970, r14959, MPFR_RNDN);
        mpfr_mul(r14971, r14969, r14970, MPFR_RNDN);
        ;
        ;
        mpfr_pow(r14974, r14959, r14973, MPFR_RNDN);
        mpfr_mul(r14975, r14972, r14974, MPFR_RNDN);
        ;
        mpfr_add(r14977, r14975, r14976, MPFR_RNDN);
        mpfr_sub(r14978, r14971, r14977, MPFR_RNDN);
        if (mpfr_get_si(r14968, MPFR_RNDN)) { mpfr_set(r14979, r14978, MPFR_RNDN); } else { mpfr_set(r14979, r14966, MPFR_RNDN); };
        if (mpfr_get_si(r14961, MPFR_RNDN)) { mpfr_set(r14980, r14966, MPFR_RNDN); } else { mpfr_set(r14980, r14979, MPFR_RNDN); };
        return mpfr_get_d(r14980, MPFR_RNDN);
}

