#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 r26839 = g;
        float r26840 = 2;
        float r26841 = a;
        float r26842 = r26840 * r26841;
        float r26843 = r26839 / r26842;
        float r26844 = cbrt(r26843);
        return r26844;
}

double f_id(double g, double a) {
        double r26845 = g;
        double r26846 = 2;
        double r26847 = a;
        double r26848 = r26846 * r26847;
        double r26849 = r26845 / r26848;
        double r26850 = cbrt(r26849);
        return r26850;
}


double f_of(float g, float a) {
        float r26851 = g;
        float r26852 = cbrt(r26851);
        float r26853 = 2;
        float r26854 = a;
        float r26855 = r26853 * r26854;
        float r26856 = cbrt(r26855);
        float r26857 = r26852 / r26856;
        return r26857;
}

double f_od(double g, double a) {
        double r26858 = g;
        double r26859 = cbrt(r26858);
        double r26860 = 2;
        double r26861 = a;
        double r26862 = r26860 * r26861;
        double r26863 = cbrt(r26862);
        double r26864 = r26859 / r26863;
        return r26864;
}

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 r26865, r26866, r26867, r26868, r26869, r26870;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(592);
        mpfr_init(r26865);
        mpfr_init_set_str(r26866, "2", 10, MPFR_RNDN);
        mpfr_init(r26867);
        mpfr_init(r26868);
        mpfr_init(r26869);
        mpfr_init(r26870);
}

double f_im(double g, double a) {
        mpfr_set_d(r26865, g, MPFR_RNDN);
        ;
        mpfr_set_d(r26867, a, MPFR_RNDN);
        mpfr_mul(r26868, r26866, r26867, MPFR_RNDN);
        mpfr_div(r26869, r26865, r26868, MPFR_RNDN);
        mpfr_cbrt(r26870, r26869, MPFR_RNDN);
        return mpfr_get_d(r26870, MPFR_RNDN);
}

static mpfr_t r26871, r26872, r26873, r26874, r26875, r26876, r26877;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(592);
        mpfr_init(r26871);
        mpfr_init(r26872);
        mpfr_init_set_str(r26873, "2", 10, MPFR_RNDN);
        mpfr_init(r26874);
        mpfr_init(r26875);
        mpfr_init(r26876);
        mpfr_init(r26877);
}

double f_fm(double g, double a) {
        mpfr_set_d(r26871, g, MPFR_RNDN);
        mpfr_cbrt(r26872, r26871, MPFR_RNDN);
        ;
        mpfr_set_d(r26874, a, MPFR_RNDN);
        mpfr_mul(r26875, r26873, r26874, MPFR_RNDN);
        mpfr_cbrt(r26876, r26875, MPFR_RNDN);
        mpfr_div(r26877, r26872, r26876, MPFR_RNDN);
        return mpfr_get_d(r26877, MPFR_RNDN);
}

static mpfr_t r26878, r26879, r26880, r26881, r26882, r26883, r26884;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(592);
        mpfr_init(r26878);
        mpfr_init(r26879);
        mpfr_init_set_str(r26880, "2", 10, MPFR_RNDN);
        mpfr_init(r26881);
        mpfr_init(r26882);
        mpfr_init(r26883);
        mpfr_init(r26884);
}

double f_dm(double g, double a) {
        mpfr_set_d(r26878, g, MPFR_RNDN);
        mpfr_cbrt(r26879, r26878, MPFR_RNDN);
        ;
        mpfr_set_d(r26881, a, MPFR_RNDN);
        mpfr_mul(r26882, r26880, r26881, MPFR_RNDN);
        mpfr_cbrt(r26883, r26882, MPFR_RNDN);
        mpfr_div(r26884, r26879, r26883, MPFR_RNDN);
        return mpfr_get_d(r26884, MPFR_RNDN);
}