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

char *name = "Diagrams.TwoD.Segment.Bernstein:evaluateBernstein from diagrams-lib-1.3.0.3";

double f_if(float x, float y, float z) {
        float r52029 = x;
        float r52030 = y;
        float r52031 = z;
        float r52032 = r52030 - r52031;
        float r52033 = 1.0;
        float r52034 = r52032 + r52033;
        float r52035 = r52029 * r52034;
        float r52036 = r52035 / r52031;
        return r52036;
}

double f_id(double x, double y, double z) {
        double r52037 = x;
        double r52038 = y;
        double r52039 = z;
        double r52040 = r52038 - r52039;
        double r52041 = 1.0;
        double r52042 = r52040 + r52041;
        double r52043 = r52037 * r52042;
        double r52044 = r52043 / r52039;
        return r52044;
}


double f_of(float x, float y, float z) {
        float r52045 = x;
        float r52046 = y;
        float r52047 = z;
        float r52048 = r52046 - r52047;
        float r52049 = 1.0;
        float r52050 = r52048 + r52049;
        float r52051 = r52045 * r52050;
        float r52052 = r52051 / r52047;
        float r52053 = -1.1669970660600162e+91;
        bool r52054 = r52052 <= r52053;
        float r52055 = r52045 / r52047;
        float r52056 = r52046 + r52049;
        float r52057 = r52055 * r52056;
        float r52058 = r52057 - r52045;
        float r52059 = 7.984324309740574e-37;
        bool r52060 = r52052 <= r52059;
        float r52061 = r52047 / r52050;
        float r52062 = r52045 / r52061;
        float r52063 = r52060 ? r52062 : r52058;
        float r52064 = r52054 ? r52058 : r52063;
        return r52064;
}

double f_od(double x, double y, double z) {
        double r52065 = x;
        double r52066 = y;
        double r52067 = z;
        double r52068 = r52066 - r52067;
        double r52069 = 1.0;
        double r52070 = r52068 + r52069;
        double r52071 = r52065 * r52070;
        double r52072 = r52071 / r52067;
        double r52073 = -1.1669970660600162e+91;
        bool r52074 = r52072 <= r52073;
        double r52075 = r52065 / r52067;
        double r52076 = r52066 + r52069;
        double r52077 = r52075 * r52076;
        double r52078 = r52077 - r52065;
        double r52079 = 7.984324309740574e-37;
        bool r52080 = r52072 <= r52079;
        double r52081 = r52067 / r52070;
        double r52082 = r52065 / r52081;
        double r52083 = r52080 ? r52082 : r52078;
        double r52084 = r52074 ? r52078 : r52083;
        return r52084;
}

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 r52085, r52086, r52087, r52088, r52089, r52090, r52091, r52092;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r52085);
        mpfr_init(r52086);
        mpfr_init(r52087);
        mpfr_init(r52088);
        mpfr_init_set_str(r52089, "1.0", 10, MPFR_RNDN);
        mpfr_init(r52090);
        mpfr_init(r52091);
        mpfr_init(r52092);
}

double f_im(double x, double y, double z) {
        mpfr_set_d(r52085, x, MPFR_RNDN);
        mpfr_set_d(r52086, y, MPFR_RNDN);
        mpfr_set_d(r52087, z, MPFR_RNDN);
        mpfr_sub(r52088, r52086, r52087, MPFR_RNDN);
        ;
        mpfr_add(r52090, r52088, r52089, MPFR_RNDN);
        mpfr_mul(r52091, r52085, r52090, MPFR_RNDN);
        mpfr_div(r52092, r52091, r52087, MPFR_RNDN);
        return mpfr_get_d(r52092, MPFR_RNDN);
}

static mpfr_t r52093, r52094, r52095, r52096, r52097, r52098, r52099, r52100, r52101, r52102, r52103, r52104, r52105, r52106, r52107, r52108, r52109, r52110, r52111, r52112;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r52093);
        mpfr_init(r52094);
        mpfr_init(r52095);
        mpfr_init(r52096);
        mpfr_init_set_str(r52097, "1.0", 10, MPFR_RNDN);
        mpfr_init(r52098);
        mpfr_init(r52099);
        mpfr_init(r52100);
        mpfr_init_set_str(r52101, "-1.1669970660600162e+91", 10, MPFR_RNDN);
        mpfr_init(r52102);
        mpfr_init(r52103);
        mpfr_init(r52104);
        mpfr_init(r52105);
        mpfr_init(r52106);
        mpfr_init_set_str(r52107, "7.984324309740574e-37", 10, MPFR_RNDN);
        mpfr_init(r52108);
        mpfr_init(r52109);
        mpfr_init(r52110);
        mpfr_init(r52111);
        mpfr_init(r52112);
}

double f_fm(double x, double y, double z) {
        mpfr_set_d(r52093, x, MPFR_RNDN);
        mpfr_set_d(r52094, y, MPFR_RNDN);
        mpfr_set_d(r52095, z, MPFR_RNDN);
        mpfr_sub(r52096, r52094, r52095, MPFR_RNDN);
        ;
        mpfr_add(r52098, r52096, r52097, MPFR_RNDN);
        mpfr_mul(r52099, r52093, r52098, MPFR_RNDN);
        mpfr_div(r52100, r52099, r52095, MPFR_RNDN);
        ;
        mpfr_set_si(r52102, mpfr_cmp(r52100, r52101) <= 0, MPFR_RNDN);
        mpfr_div(r52103, r52093, r52095, MPFR_RNDN);
        mpfr_add(r52104, r52094, r52097, MPFR_RNDN);
        mpfr_mul(r52105, r52103, r52104, MPFR_RNDN);
        mpfr_sub(r52106, r52105, r52093, MPFR_RNDN);
        ;
        mpfr_set_si(r52108, mpfr_cmp(r52100, r52107) <= 0, MPFR_RNDN);
        mpfr_div(r52109, r52095, r52098, MPFR_RNDN);
        mpfr_div(r52110, r52093, r52109, MPFR_RNDN);
        if (mpfr_get_si(r52108, MPFR_RNDN)) { mpfr_set(r52111, r52110, MPFR_RNDN); } else { mpfr_set(r52111, r52106, MPFR_RNDN); };
        if (mpfr_get_si(r52102, MPFR_RNDN)) { mpfr_set(r52112, r52106, MPFR_RNDN); } else { mpfr_set(r52112, r52111, MPFR_RNDN); };
        return mpfr_get_d(r52112, MPFR_RNDN);
}

static mpfr_t r52113, r52114, r52115, r52116, r52117, r52118, r52119, r52120, r52121, r52122, r52123, r52124, r52125, r52126, r52127, r52128, r52129, r52130, r52131, r52132;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r52113);
        mpfr_init(r52114);
        mpfr_init(r52115);
        mpfr_init(r52116);
        mpfr_init_set_str(r52117, "1.0", 10, MPFR_RNDN);
        mpfr_init(r52118);
        mpfr_init(r52119);
        mpfr_init(r52120);
        mpfr_init_set_str(r52121, "-1.1669970660600162e+91", 10, MPFR_RNDN);
        mpfr_init(r52122);
        mpfr_init(r52123);
        mpfr_init(r52124);
        mpfr_init(r52125);
        mpfr_init(r52126);
        mpfr_init_set_str(r52127, "7.984324309740574e-37", 10, MPFR_RNDN);
        mpfr_init(r52128);
        mpfr_init(r52129);
        mpfr_init(r52130);
        mpfr_init(r52131);
        mpfr_init(r52132);
}

double f_dm(double x, double y, double z) {
        mpfr_set_d(r52113, x, MPFR_RNDN);
        mpfr_set_d(r52114, y, MPFR_RNDN);
        mpfr_set_d(r52115, z, MPFR_RNDN);
        mpfr_sub(r52116, r52114, r52115, MPFR_RNDN);
        ;
        mpfr_add(r52118, r52116, r52117, MPFR_RNDN);
        mpfr_mul(r52119, r52113, r52118, MPFR_RNDN);
        mpfr_div(r52120, r52119, r52115, MPFR_RNDN);
        ;
        mpfr_set_si(r52122, mpfr_cmp(r52120, r52121) <= 0, MPFR_RNDN);
        mpfr_div(r52123, r52113, r52115, MPFR_RNDN);
        mpfr_add(r52124, r52114, r52117, MPFR_RNDN);
        mpfr_mul(r52125, r52123, r52124, MPFR_RNDN);
        mpfr_sub(r52126, r52125, r52113, MPFR_RNDN);
        ;
        mpfr_set_si(r52128, mpfr_cmp(r52120, r52127) <= 0, MPFR_RNDN);
        mpfr_div(r52129, r52115, r52118, MPFR_RNDN);
        mpfr_div(r52130, r52113, r52129, MPFR_RNDN);
        if (mpfr_get_si(r52128, MPFR_RNDN)) { mpfr_set(r52131, r52130, MPFR_RNDN); } else { mpfr_set(r52131, r52126, MPFR_RNDN); };
        if (mpfr_get_si(r52122, MPFR_RNDN)) { mpfr_set(r52132, r52126, MPFR_RNDN); } else { mpfr_set(r52132, r52131, MPFR_RNDN); };
        return mpfr_get_d(r52132, MPFR_RNDN);
}