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

char *name = "2-ancestry mixing, zero discriminant";

double f_if(float g, float a) {
        float r26998 = g;
        float r26999 = 2;
        float r27000 = a;
        float r27001 = r26999 * r27000;
        float r27002 = r26998 / r27001;
        float r27003 = cbrt(r27002);
        return r27003;
}

double f_id(double g, double a) {
        double r27004 = g;
        double r27005 = 2;
        double r27006 = a;
        double r27007 = r27005 * r27006;
        double r27008 = r27004 / r27007;
        double r27009 = cbrt(r27008);
        return r27009;
}


double f_of(float g, float a) {
        float r27010 = g;
        float r27011 = cbrt(r27010);
        float r27012 = -1/2;
        float r27013 = cbrt(r27012);
        float r27014 = cbrt(r27013);
        float r27015 = r27014 * r27014;
        float r27016 = r27011 * r27015;
        float r27017 = r27016 * r27014;
        float r27018 = -1;
        float r27019 = a;
        float r27020 = r27018 / r27019;
        float r27021 = cbrt(r27020);
        float r27022 = r27017 * r27021;
        return r27022;
}

double f_od(double g, double a) {
        double r27023 = g;
        double r27024 = cbrt(r27023);
        double r27025 = -1/2;
        double r27026 = cbrt(r27025);
        double r27027 = cbrt(r27026);
        double r27028 = r27027 * r27027;
        double r27029 = r27024 * r27028;
        double r27030 = r27029 * r27027;
        double r27031 = -1;
        double r27032 = a;
        double r27033 = r27031 / r27032;
        double r27034 = cbrt(r27033);
        double r27035 = r27030 * r27034;
        return r27035;
}

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 r27036, r27037, r27038, r27039, r27040, r27041;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(592);
        mpfr_init(r27036);
        mpfr_init_set_str(r27037, "2", 10, MPFR_RNDN);
        mpfr_init(r27038);
        mpfr_init(r27039);
        mpfr_init(r27040);
        mpfr_init(r27041);
}

double f_im(double g, double a) {
        mpfr_set_d(r27036, g, MPFR_RNDN);
        ;
        mpfr_set_d(r27038, a, MPFR_RNDN);
        mpfr_mul(r27039, r27037, r27038, MPFR_RNDN);
        mpfr_div(r27040, r27036, r27039, MPFR_RNDN);
        mpfr_cbrt(r27041, r27040, MPFR_RNDN);
        return mpfr_get_d(r27041, MPFR_RNDN);
}

static mpfr_t r27042, r27043, r27044, r27045, r27046, r27047, r27048, r27049, r27050, r27051, r27052, r27053, r27054;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(592);
        mpfr_init(r27042);
        mpfr_init(r27043);
        mpfr_init_set_str(r27044, "-1/2", 10, MPFR_RNDN);
        mpfr_init(r27045);
        mpfr_init(r27046);
        mpfr_init(r27047);
        mpfr_init(r27048);
        mpfr_init(r27049);
        mpfr_init_set_str(r27050, "-1", 10, MPFR_RNDN);
        mpfr_init(r27051);
        mpfr_init(r27052);
        mpfr_init(r27053);
        mpfr_init(r27054);
}

double f_fm(double g, double a) {
        mpfr_set_d(r27042, g, MPFR_RNDN);
        mpfr_cbrt(r27043, r27042, MPFR_RNDN);
        ;
        mpfr_cbrt(r27045, r27044, MPFR_RNDN);
        mpfr_cbrt(r27046, r27045, MPFR_RNDN);
        mpfr_mul(r27047, r27046, r27046, MPFR_RNDN);
        mpfr_mul(r27048, r27043, r27047, MPFR_RNDN);
        mpfr_mul(r27049, r27048, r27046, MPFR_RNDN);
        ;
        mpfr_set_d(r27051, a, MPFR_RNDN);
        mpfr_div(r27052, r27050, r27051, MPFR_RNDN);
        mpfr_cbrt(r27053, r27052, MPFR_RNDN);
        mpfr_mul(r27054, r27049, r27053, MPFR_RNDN);
        return mpfr_get_d(r27054, MPFR_RNDN);
}

static mpfr_t r27055, r27056, r27057, r27058, r27059, r27060, r27061, r27062, r27063, r27064, r27065, r27066, r27067;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(592);
        mpfr_init(r27055);
        mpfr_init(r27056);
        mpfr_init_set_str(r27057, "-1/2", 10, MPFR_RNDN);
        mpfr_init(r27058);
        mpfr_init(r27059);
        mpfr_init(r27060);
        mpfr_init(r27061);
        mpfr_init(r27062);
        mpfr_init_set_str(r27063, "-1", 10, MPFR_RNDN);
        mpfr_init(r27064);
        mpfr_init(r27065);
        mpfr_init(r27066);
        mpfr_init(r27067);
}

double f_dm(double g, double a) {
        mpfr_set_d(r27055, g, MPFR_RNDN);
        mpfr_cbrt(r27056, r27055, MPFR_RNDN);
        ;
        mpfr_cbrt(r27058, r27057, MPFR_RNDN);
        mpfr_cbrt(r27059, r27058, MPFR_RNDN);
        mpfr_mul(r27060, r27059, r27059, MPFR_RNDN);
        mpfr_mul(r27061, r27056, r27060, MPFR_RNDN);
        mpfr_mul(r27062, r27061, r27059, MPFR_RNDN);
        ;
        mpfr_set_d(r27064, a, MPFR_RNDN);
        mpfr_div(r27065, r27063, r27064, MPFR_RNDN);
        mpfr_cbrt(r27066, r27065, MPFR_RNDN);
        mpfr_mul(r27067, r27062, r27066, MPFR_RNDN);
        return mpfr_get_d(r27067, MPFR_RNDN);
}