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

char *name = "Numeric.SpecFunctions:logGamma from math-functions-0.1.5.2";

double f_if(float x, float y, float z, float t, float a, float b, float c, float i) {
        float r16157 = x;
        float r16158 = y;
        float r16159 = r16157 * r16158;
        float r16160 = z;
        float r16161 = r16159 + r16160;
        float r16162 = r16161 * r16158;
        float r16163 = 27464.763671875f;
        float r16164 = r16162 + r16163;
        float r16165 = r16164 * r16158;
        float r16166 = 230661.515625f;
        float r16167 = r16165 + r16166;
        float r16168 = r16167 * r16158;
        float r16169 = t;
        float r16170 = r16168 + r16169;
        float r16171 = a;
        float r16172 = r16158 + r16171;
        float r16173 = r16172 * r16158;
        float r16174 = b;
        float r16175 = r16173 + r16174;
        float r16176 = r16175 * r16158;
        float r16177 = c;
        float r16178 = r16176 + r16177;
        float r16179 = r16178 * r16158;
        float r16180 = i;
        float r16181 = r16179 + r16180;
        float r16182 = r16170 / r16181;
        return r16182;
}

double f_id(double x, double y, double z, double t, double a, double b, double c, double i) {
        double r16183 = x;
        double r16184 = y;
        double r16185 = r16183 * r16184;
        double r16186 = z;
        double r16187 = r16185 + r16186;
        double r16188 = r16187 * r16184;
        double r16189 = 27464.763671875;
        double r16190 = r16188 + r16189;
        double r16191 = r16190 * r16184;
        double r16192 = 230661.515625;
        double r16193 = r16191 + r16192;
        double r16194 = r16193 * r16184;
        double r16195 = t;
        double r16196 = r16194 + r16195;
        double r16197 = a;
        double r16198 = r16184 + r16197;
        double r16199 = r16198 * r16184;
        double r16200 = b;
        double r16201 = r16199 + r16200;
        double r16202 = r16201 * r16184;
        double r16203 = c;
        double r16204 = r16202 + r16203;
        double r16205 = r16204 * r16184;
        double r16206 = i;
        double r16207 = r16205 + r16206;
        double r16208 = r16196 / r16207;
        return r16208;
}


double f_of(float x, float y, float z, float t, float a, float b, float c, float i) {
        float r16209 = y;
        float r16210 = x;
        float r16211 = z;
        float r16212 = fma(r16209, r16210, r16211);
        float r16213 = r16209 * r16209;
        float r16214 = 27464.763671875f;
        float r16215 = 230661.515625f;
        float r16216 = fma(r16209, r16214, r16215);
        float r16217 = fma(r16212, r16213, r16216);
        float r16218 = t;
        float r16219 = fma(r16217, r16209, r16218);
        float r16220 = a;
        float r16221 = r16209 + r16220;
        float r16222 = b;
        float r16223 = fma(r16221, r16209, r16222);
        float r16224 = c;
        float r16225 = i;
        float r16226 = fma(r16209, r16224, r16225);
        float r16227 = fma(r16213, r16223, r16226);
        float r16228 = r16219 / r16227;
        float r16229 = cbrt(r16228);
        float r16230 = 3.0f;
        float r16231 = pow(r16229, r16230);
        return r16231;
}

double f_od(double x, double y, double z, double t, double a, double b, double c, double i) {
        double r16232 = y;
        double r16233 = x;
        double r16234 = z;
        double r16235 = fma(r16232, r16233, r16234);
        double r16236 = r16232 * r16232;
        double r16237 = 27464.763671875;
        double r16238 = 230661.515625;
        double r16239 = fma(r16232, r16237, r16238);
        double r16240 = fma(r16235, r16236, r16239);
        double r16241 = t;
        double r16242 = fma(r16240, r16232, r16241);
        double r16243 = a;
        double r16244 = r16232 + r16243;
        double r16245 = b;
        double r16246 = fma(r16244, r16232, r16245);
        double r16247 = c;
        double r16248 = i;
        double r16249 = fma(r16232, r16247, r16248);
        double r16250 = fma(r16236, r16246, r16249);
        double r16251 = r16242 / r16250;
        double r16252 = cbrt(r16251);
        double r16253 = 3.0;
        double r16254 = pow(r16252, r16253);
        return r16254;
}

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 r16255, r16256, r16257, r16258, r16259, r16260, r16261, r16262, r16263, r16264, r16265, r16266, r16267, r16268, r16269, r16270, r16271, r16272, r16273, r16274, r16275, r16276, r16277, r16278, r16279, r16280;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init(r16255);
        mpfr_init(r16256);
        mpfr_init(r16257);
        mpfr_init(r16258);
        mpfr_init(r16259);
        mpfr_init(r16260);
        mpfr_init_set_str(r16261, "27464.7644705", 10, MPFR_RNDN);
        mpfr_init(r16262);
        mpfr_init(r16263);
        mpfr_init_set_str(r16264, "230661.510616", 10, MPFR_RNDN);
        mpfr_init(r16265);
        mpfr_init(r16266);
        mpfr_init(r16267);
        mpfr_init(r16268);
        mpfr_init(r16269);
        mpfr_init(r16270);
        mpfr_init(r16271);
        mpfr_init(r16272);
        mpfr_init(r16273);
        mpfr_init(r16274);
        mpfr_init(r16275);
        mpfr_init(r16276);
        mpfr_init(r16277);
        mpfr_init(r16278);
        mpfr_init(r16279);
        mpfr_init(r16280);
}

double f_im(double x, double y, double z, double t, double a, double b, double c, double i) {
        mpfr_set_d(r16255, x, MPFR_RNDN);
        mpfr_set_d(r16256, y, MPFR_RNDN);
        mpfr_mul(r16257, r16255, r16256, MPFR_RNDN);
        mpfr_set_d(r16258, z, MPFR_RNDN);
        mpfr_add(r16259, r16257, r16258, MPFR_RNDN);
        mpfr_mul(r16260, r16259, r16256, MPFR_RNDN);
        ;
        mpfr_add(r16262, r16260, r16261, MPFR_RNDN);
        mpfr_mul(r16263, r16262, r16256, MPFR_RNDN);
        ;
        mpfr_add(r16265, r16263, r16264, MPFR_RNDN);
        mpfr_mul(r16266, r16265, r16256, MPFR_RNDN);
        mpfr_set_d(r16267, t, MPFR_RNDN);
        mpfr_add(r16268, r16266, r16267, MPFR_RNDN);
        mpfr_set_d(r16269, a, MPFR_RNDN);
        mpfr_add(r16270, r16256, r16269, MPFR_RNDN);
        mpfr_mul(r16271, r16270, r16256, MPFR_RNDN);
        mpfr_set_d(r16272, b, MPFR_RNDN);
        mpfr_add(r16273, r16271, r16272, MPFR_RNDN);
        mpfr_mul(r16274, r16273, r16256, MPFR_RNDN);
        mpfr_set_d(r16275, c, MPFR_RNDN);
        mpfr_add(r16276, r16274, r16275, MPFR_RNDN);
        mpfr_mul(r16277, r16276, r16256, MPFR_RNDN);
        mpfr_set_d(r16278, i, MPFR_RNDN);
        mpfr_add(r16279, r16277, r16278, MPFR_RNDN);
        mpfr_div(r16280, r16268, r16279, MPFR_RNDN);
        return mpfr_get_d(r16280, MPFR_RNDN);
}

static mpfr_t r16281, r16282, r16283, r16284, r16285, r16286, r16287, r16288, r16289, r16290, r16291, r16292, r16293, r16294, r16295, r16296, r16297, r16298, r16299, r16300, r16301, r16302, r16303;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r16281);
        mpfr_init(r16282);
        mpfr_init(r16283);
        mpfr_init(r16284);
        mpfr_init(r16285);
        mpfr_init_set_str(r16286, "27464.7644705", 10, MPFR_RNDN);
        mpfr_init_set_str(r16287, "230661.510616", 10, MPFR_RNDN);
        mpfr_init(r16288);
        mpfr_init(r16289);
        mpfr_init(r16290);
        mpfr_init(r16291);
        mpfr_init(r16292);
        mpfr_init(r16293);
        mpfr_init(r16294);
        mpfr_init(r16295);
        mpfr_init(r16296);
        mpfr_init(r16297);
        mpfr_init(r16298);
        mpfr_init(r16299);
        mpfr_init(r16300);
        mpfr_init(r16301);
        mpfr_init_set_str(r16302, "3", 10, MPFR_RNDN);
        mpfr_init(r16303);
}

double f_fm(double x, double y, double z, double t, double a, double b, double c, double i) {
        mpfr_set_d(r16281, y, MPFR_RNDN);
        mpfr_set_d(r16282, x, MPFR_RNDN);
        mpfr_set_d(r16283, z, MPFR_RNDN);
        mpfr_fma(r16284, r16281, r16282, r16283, MPFR_RNDN);
        mpfr_sqr(r16285, r16281, MPFR_RNDN);
        ;
        ;
        mpfr_fma(r16288, r16281, r16286, r16287, MPFR_RNDN);
        mpfr_fma(r16289, r16284, r16285, r16288, MPFR_RNDN);
        mpfr_set_d(r16290, t, MPFR_RNDN);
        mpfr_fma(r16291, r16289, r16281, r16290, MPFR_RNDN);
        mpfr_set_d(r16292, a, MPFR_RNDN);
        mpfr_add(r16293, r16281, r16292, MPFR_RNDN);
        mpfr_set_d(r16294, b, MPFR_RNDN);
        mpfr_fma(r16295, r16293, r16281, r16294, MPFR_RNDN);
        mpfr_set_d(r16296, c, MPFR_RNDN);
        mpfr_set_d(r16297, i, MPFR_RNDN);
        mpfr_fma(r16298, r16281, r16296, r16297, MPFR_RNDN);
        mpfr_fma(r16299, r16285, r16295, r16298, MPFR_RNDN);
        mpfr_div(r16300, r16291, r16299, MPFR_RNDN);
        mpfr_cbrt(r16301, r16300, MPFR_RNDN);
        ;
        mpfr_pow(r16303, r16301, r16302, MPFR_RNDN);
        return mpfr_get_d(r16303, MPFR_RNDN);
}

static mpfr_t r16304, r16305, r16306, r16307, r16308, r16309, r16310, r16311, r16312, r16313, r16314, r16315, r16316, r16317, r16318, r16319, r16320, r16321, r16322, r16323, r16324, r16325, r16326;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r16304);
        mpfr_init(r16305);
        mpfr_init(r16306);
        mpfr_init(r16307);
        mpfr_init(r16308);
        mpfr_init_set_str(r16309, "27464.7644705", 10, MPFR_RNDN);
        mpfr_init_set_str(r16310, "230661.510616", 10, MPFR_RNDN);
        mpfr_init(r16311);
        mpfr_init(r16312);
        mpfr_init(r16313);
        mpfr_init(r16314);
        mpfr_init(r16315);
        mpfr_init(r16316);
        mpfr_init(r16317);
        mpfr_init(r16318);
        mpfr_init(r16319);
        mpfr_init(r16320);
        mpfr_init(r16321);
        mpfr_init(r16322);
        mpfr_init(r16323);
        mpfr_init(r16324);
        mpfr_init_set_str(r16325, "3", 10, MPFR_RNDN);
        mpfr_init(r16326);
}

double f_dm(double x, double y, double z, double t, double a, double b, double c, double i) {
        mpfr_set_d(r16304, y, MPFR_RNDN);
        mpfr_set_d(r16305, x, MPFR_RNDN);
        mpfr_set_d(r16306, z, MPFR_RNDN);
        mpfr_fma(r16307, r16304, r16305, r16306, MPFR_RNDN);
        mpfr_sqr(r16308, r16304, MPFR_RNDN);
        ;
        ;
        mpfr_fma(r16311, r16304, r16309, r16310, MPFR_RNDN);
        mpfr_fma(r16312, r16307, r16308, r16311, MPFR_RNDN);
        mpfr_set_d(r16313, t, MPFR_RNDN);
        mpfr_fma(r16314, r16312, r16304, r16313, MPFR_RNDN);
        mpfr_set_d(r16315, a, MPFR_RNDN);
        mpfr_add(r16316, r16304, r16315, MPFR_RNDN);
        mpfr_set_d(r16317, b, MPFR_RNDN);
        mpfr_fma(r16318, r16316, r16304, r16317, MPFR_RNDN);
        mpfr_set_d(r16319, c, MPFR_RNDN);
        mpfr_set_d(r16320, i, MPFR_RNDN);
        mpfr_fma(r16321, r16304, r16319, r16320, MPFR_RNDN);
        mpfr_fma(r16322, r16308, r16318, r16321, MPFR_RNDN);
        mpfr_div(r16323, r16314, r16322, MPFR_RNDN);
        mpfr_cbrt(r16324, r16323, MPFR_RNDN);
        ;
        mpfr_pow(r16326, r16324, r16325, MPFR_RNDN);
        return mpfr_get_d(r16326, MPFR_RNDN);
}