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

char *name = "Diagrams.Solve.Polynomial:cubForm  from diagrams-solve-0.1";

double f_if(float x, float y, float z, float t, float a, float b, float c, float i, float j, float k) {
        float r9978 = x;
        float r9979 = 18.0f;
        float r9980 = r9978 * r9979;
        float r9981 = y;
        float r9982 = r9980 * r9981;
        float r9983 = z;
        float r9984 = r9982 * r9983;
        float r9985 = t;
        float r9986 = r9984 * r9985;
        float r9987 = a;
        float r9988 = 4.0f;
        float r9989 = r9987 * r9988;
        float r9990 = r9989 * r9985;
        float r9991 = r9986 - r9990;
        float r9992 = b;
        float r9993 = c;
        float r9994 = r9992 * r9993;
        float r9995 = r9991 + r9994;
        float r9996 = r9978 * r9988;
        float r9997 = i;
        float r9998 = r9996 * r9997;
        float r9999 = r9995 - r9998;
        float r10000 = j;
        float r10001 = 27.0f;
        float r10002 = r10000 * r10001;
        float r10003 = k;
        float r10004 = r10002 * r10003;
        float r10005 = r9999 - r10004;
        return r10005;
}

double f_id(double x, double y, double z, double t, double a, double b, double c, double i, double j, double k) {
        double r10006 = x;
        double r10007 = 18.0;
        double r10008 = r10006 * r10007;
        double r10009 = y;
        double r10010 = r10008 * r10009;
        double r10011 = z;
        double r10012 = r10010 * r10011;
        double r10013 = t;
        double r10014 = r10012 * r10013;
        double r10015 = a;
        double r10016 = 4.0;
        double r10017 = r10015 * r10016;
        double r10018 = r10017 * r10013;
        double r10019 = r10014 - r10018;
        double r10020 = b;
        double r10021 = c;
        double r10022 = r10020 * r10021;
        double r10023 = r10019 + r10022;
        double r10024 = r10006 * r10016;
        double r10025 = i;
        double r10026 = r10024 * r10025;
        double r10027 = r10023 - r10026;
        double r10028 = j;
        double r10029 = 27.0;
        double r10030 = r10028 * r10029;
        double r10031 = k;
        double r10032 = r10030 * r10031;
        double r10033 = r10027 - r10032;
        return r10033;
}


double f_of(float x, float y, float z, float t, float a, float b, float c, float i, float j, float k) {
        float r10034 = 18.0f;
        float r10035 = t;
        float r10036 = r10034 * r10035;
        float r10037 = x;
        float r10038 = z;
        float r10039 = r10037 * r10038;
        float r10040 = y;
        float r10041 = r10039 * r10040;
        float r10042 = a;
        float r10043 = 4.0f;
        float r10044 = r10042 * r10043;
        float r10045 = -r10035;
        float r10046 = c;
        float r10047 = b;
        float r10048 = r10046 * r10047;
        float r10049 = fma(r10044, r10045, r10048);
        float r10050 = fma(r10036, r10041, r10049);
        float r10051 = k;
        float r10052 = j;
        float r10053 = r10051 * r10052;
        float r10054 = 27.0f;
        float r10055 = i;
        float r10056 = r10043 * r10037;
        float r10057 = r10055 * r10056;
        float r10058 = fma(r10053, r10054, r10057);
        float r10059 = r10050 - r10058;
        float r10060 = -6.521498081460163e+302f;
        bool r10061 = r10059 <= r10060;
        float r10062 = r10037 * r10034;
        float r10063 = r10040 * r10035;
        float r10064 = r10062 * r10063;
        float r10065 = fma(r10064, r10038, r10049);
        float r10066 = r10054 * r10052;
        float r10067 = fma(r10066, r10051, r10057);
        float r10068 = r10065 - r10067;
        float r10069 = 2.129683746951944e+305f;
        bool r10070 = r10059 <= r10069;
        float r10071 = r10035 * r10038;
        float r10072 = r10040 * r10071;
        float r10073 = fma(r10072, r10062, r10049);
        float r10074 = r10073 - r10058;
        float r10075 = r10070 ? r10059 : r10074;
        float r10076 = r10061 ? r10068 : r10075;
        return r10076;
}

double f_od(double x, double y, double z, double t, double a, double b, double c, double i, double j, double k) {
        double r10077 = 18.0;
        double r10078 = t;
        double r10079 = r10077 * r10078;
        double r10080 = x;
        double r10081 = z;
        double r10082 = r10080 * r10081;
        double r10083 = y;
        double r10084 = r10082 * r10083;
        double r10085 = a;
        double r10086 = 4.0;
        double r10087 = r10085 * r10086;
        double r10088 = -r10078;
        double r10089 = c;
        double r10090 = b;
        double r10091 = r10089 * r10090;
        double r10092 = fma(r10087, r10088, r10091);
        double r10093 = fma(r10079, r10084, r10092);
        double r10094 = k;
        double r10095 = j;
        double r10096 = r10094 * r10095;
        double r10097 = 27.0;
        double r10098 = i;
        double r10099 = r10086 * r10080;
        double r10100 = r10098 * r10099;
        double r10101 = fma(r10096, r10097, r10100);
        double r10102 = r10093 - r10101;
        double r10103 = -6.521498081460163e+302;
        bool r10104 = r10102 <= r10103;
        double r10105 = r10080 * r10077;
        double r10106 = r10083 * r10078;
        double r10107 = r10105 * r10106;
        double r10108 = fma(r10107, r10081, r10092);
        double r10109 = r10097 * r10095;
        double r10110 = fma(r10109, r10094, r10100);
        double r10111 = r10108 - r10110;
        double r10112 = 2.129683746951944e+305;
        bool r10113 = r10102 <= r10112;
        double r10114 = r10078 * r10081;
        double r10115 = r10083 * r10114;
        double r10116 = fma(r10115, r10105, r10092);
        double r10117 = r10116 - r10101;
        double r10118 = r10113 ? r10102 : r10117;
        double r10119 = r10104 ? r10111 : r10118;
        return r10119;
}

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 r10120, r10121, r10122, r10123, r10124, r10125, r10126, r10127, r10128, r10129, r10130, r10131, r10132, r10133, r10134, r10135, r10136, r10137, r10138, r10139, r10140, r10141, r10142, r10143, r10144, r10145, r10146, r10147;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(592);
        mpfr_init(r10120);
        mpfr_init_set_str(r10121, "18.0", 10, MPFR_RNDN);
        mpfr_init(r10122);
        mpfr_init(r10123);
        mpfr_init(r10124);
        mpfr_init(r10125);
        mpfr_init(r10126);
        mpfr_init(r10127);
        mpfr_init(r10128);
        mpfr_init(r10129);
        mpfr_init_set_str(r10130, "4.0", 10, MPFR_RNDN);
        mpfr_init(r10131);
        mpfr_init(r10132);
        mpfr_init(r10133);
        mpfr_init(r10134);
        mpfr_init(r10135);
        mpfr_init(r10136);
        mpfr_init(r10137);
        mpfr_init(r10138);
        mpfr_init(r10139);
        mpfr_init(r10140);
        mpfr_init(r10141);
        mpfr_init(r10142);
        mpfr_init_set_str(r10143, "27.0", 10, MPFR_RNDN);
        mpfr_init(r10144);
        mpfr_init(r10145);
        mpfr_init(r10146);
        mpfr_init(r10147);
}

double f_im(double x, double y, double z, double t, double a, double b, double c, double i, double j, double k) {
        mpfr_set_d(r10120, x, MPFR_RNDN);
        ;
        mpfr_mul(r10122, r10120, r10121, MPFR_RNDN);
        mpfr_set_d(r10123, y, MPFR_RNDN);
        mpfr_mul(r10124, r10122, r10123, MPFR_RNDN);
        mpfr_set_d(r10125, z, MPFR_RNDN);
        mpfr_mul(r10126, r10124, r10125, MPFR_RNDN);
        mpfr_set_d(r10127, t, MPFR_RNDN);
        mpfr_mul(r10128, r10126, r10127, MPFR_RNDN);
        mpfr_set_d(r10129, a, MPFR_RNDN);
        ;
        mpfr_mul(r10131, r10129, r10130, MPFR_RNDN);
        mpfr_mul(r10132, r10131, r10127, MPFR_RNDN);
        mpfr_sub(r10133, r10128, r10132, MPFR_RNDN);
        mpfr_set_d(r10134, b, MPFR_RNDN);
        mpfr_set_d(r10135, c, MPFR_RNDN);
        mpfr_mul(r10136, r10134, r10135, MPFR_RNDN);
        mpfr_add(r10137, r10133, r10136, MPFR_RNDN);
        mpfr_mul(r10138, r10120, r10130, MPFR_RNDN);
        mpfr_set_d(r10139, i, MPFR_RNDN);
        mpfr_mul(r10140, r10138, r10139, MPFR_RNDN);
        mpfr_sub(r10141, r10137, r10140, MPFR_RNDN);
        mpfr_set_d(r10142, j, MPFR_RNDN);
        ;
        mpfr_mul(r10144, r10142, r10143, MPFR_RNDN);
        mpfr_set_d(r10145, k, MPFR_RNDN);
        mpfr_mul(r10146, r10144, r10145, MPFR_RNDN);
        mpfr_sub(r10147, r10141, r10146, MPFR_RNDN);
        return mpfr_get_d(r10147, MPFR_RNDN);
}

static mpfr_t r10148, r10149, r10150, r10151, r10152, r10153, r10154, r10155, r10156, r10157, r10158, r10159, r10160, r10161, r10162, r10163, r10164, r10165, r10166, r10167, r10168, r10169, r10170, r10171, r10172, r10173, r10174, r10175, r10176, r10177, r10178, r10179, r10180, r10181, r10182, r10183, r10184, r10185, r10186, r10187, r10188, r10189, r10190;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(592);
        mpfr_init_set_str(r10148, "18.0", 10, MPFR_RNDN);
        mpfr_init(r10149);
        mpfr_init(r10150);
        mpfr_init(r10151);
        mpfr_init(r10152);
        mpfr_init(r10153);
        mpfr_init(r10154);
        mpfr_init(r10155);
        mpfr_init(r10156);
        mpfr_init_set_str(r10157, "4.0", 10, MPFR_RNDN);
        mpfr_init(r10158);
        mpfr_init(r10159);
        mpfr_init(r10160);
        mpfr_init(r10161);
        mpfr_init(r10162);
        mpfr_init(r10163);
        mpfr_init(r10164);
        mpfr_init(r10165);
        mpfr_init(r10166);
        mpfr_init(r10167);
        mpfr_init_set_str(r10168, "27.0", 10, MPFR_RNDN);
        mpfr_init(r10169);
        mpfr_init(r10170);
        mpfr_init(r10171);
        mpfr_init(r10172);
        mpfr_init(r10173);
        mpfr_init_set_str(r10174, "-6.521498081460163e+302", 10, MPFR_RNDN);
        mpfr_init(r10175);
        mpfr_init(r10176);
        mpfr_init(r10177);
        mpfr_init(r10178);
        mpfr_init(r10179);
        mpfr_init(r10180);
        mpfr_init(r10181);
        mpfr_init(r10182);
        mpfr_init_set_str(r10183, "2.129683746951944e+305", 10, MPFR_RNDN);
        mpfr_init(r10184);
        mpfr_init(r10185);
        mpfr_init(r10186);
        mpfr_init(r10187);
        mpfr_init(r10188);
        mpfr_init(r10189);
        mpfr_init(r10190);
}

double f_fm(double x, double y, double z, double t, double a, double b, double c, double i, double j, double k) {
        ;
        mpfr_set_d(r10149, t, MPFR_RNDN);
        mpfr_mul(r10150, r10148, r10149, MPFR_RNDN);
        mpfr_set_d(r10151, x, MPFR_RNDN);
        mpfr_set_d(r10152, z, MPFR_RNDN);
        mpfr_mul(r10153, r10151, r10152, MPFR_RNDN);
        mpfr_set_d(r10154, y, MPFR_RNDN);
        mpfr_mul(r10155, r10153, r10154, MPFR_RNDN);
        mpfr_set_d(r10156, a, MPFR_RNDN);
        ;
        mpfr_mul(r10158, r10156, r10157, MPFR_RNDN);
        mpfr_neg(r10159, r10149, MPFR_RNDN);
        mpfr_set_d(r10160, c, MPFR_RNDN);
        mpfr_set_d(r10161, b, MPFR_RNDN);
        mpfr_mul(r10162, r10160, r10161, MPFR_RNDN);
        mpfr_fma(r10163, r10158, r10159, r10162, MPFR_RNDN);
        mpfr_fma(r10164, r10150, r10155, r10163, MPFR_RNDN);
        mpfr_set_d(r10165, k, MPFR_RNDN);
        mpfr_set_d(r10166, j, MPFR_RNDN);
        mpfr_mul(r10167, r10165, r10166, MPFR_RNDN);
        ;
        mpfr_set_d(r10169, i, MPFR_RNDN);
        mpfr_mul(r10170, r10157, r10151, MPFR_RNDN);
        mpfr_mul(r10171, r10169, r10170, MPFR_RNDN);
        mpfr_fma(r10172, r10167, r10168, r10171, MPFR_RNDN);
        mpfr_sub(r10173, r10164, r10172, MPFR_RNDN);
        ;
        mpfr_set_si(r10175, mpfr_cmp(r10173, r10174) <= 0, MPFR_RNDN);
        mpfr_mul(r10176, r10151, r10148, MPFR_RNDN);
        mpfr_mul(r10177, r10154, r10149, MPFR_RNDN);
        mpfr_mul(r10178, r10176, r10177, MPFR_RNDN);
        mpfr_fma(r10179, r10178, r10152, r10163, MPFR_RNDN);
        mpfr_mul(r10180, r10168, r10166, MPFR_RNDN);
        mpfr_fma(r10181, r10180, r10165, r10171, MPFR_RNDN);
        mpfr_sub(r10182, r10179, r10181, MPFR_RNDN);
        ;
        mpfr_set_si(r10184, mpfr_cmp(r10173, r10183) <= 0, MPFR_RNDN);
        mpfr_mul(r10185, r10149, r10152, MPFR_RNDN);
        mpfr_mul(r10186, r10154, r10185, MPFR_RNDN);
        mpfr_fma(r10187, r10186, r10176, r10163, MPFR_RNDN);
        mpfr_sub(r10188, r10187, r10172, MPFR_RNDN);
        if (mpfr_get_si(r10184, MPFR_RNDN)) { mpfr_set(r10189, r10173, MPFR_RNDN); } else { mpfr_set(r10189, r10188, MPFR_RNDN); };
        if (mpfr_get_si(r10175, MPFR_RNDN)) { mpfr_set(r10190, r10182, MPFR_RNDN); } else { mpfr_set(r10190, r10189, MPFR_RNDN); };
        return mpfr_get_d(r10190, MPFR_RNDN);
}

static mpfr_t r10191, r10192, r10193, r10194, r10195, r10196, r10197, r10198, r10199, r10200, r10201, r10202, r10203, r10204, r10205, r10206, r10207, r10208, r10209, r10210, r10211, r10212, r10213, r10214, r10215, r10216, r10217, r10218, r10219, r10220, r10221, r10222, r10223, r10224, r10225, r10226, r10227, r10228, r10229, r10230, r10231, r10232, r10233;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(592);
        mpfr_init_set_str(r10191, "18.0", 10, MPFR_RNDN);
        mpfr_init(r10192);
        mpfr_init(r10193);
        mpfr_init(r10194);
        mpfr_init(r10195);
        mpfr_init(r10196);
        mpfr_init(r10197);
        mpfr_init(r10198);
        mpfr_init(r10199);
        mpfr_init_set_str(r10200, "4.0", 10, MPFR_RNDN);
        mpfr_init(r10201);
        mpfr_init(r10202);
        mpfr_init(r10203);
        mpfr_init(r10204);
        mpfr_init(r10205);
        mpfr_init(r10206);
        mpfr_init(r10207);
        mpfr_init(r10208);
        mpfr_init(r10209);
        mpfr_init(r10210);
        mpfr_init_set_str(r10211, "27.0", 10, MPFR_RNDN);
        mpfr_init(r10212);
        mpfr_init(r10213);
        mpfr_init(r10214);
        mpfr_init(r10215);
        mpfr_init(r10216);
        mpfr_init_set_str(r10217, "-6.521498081460163e+302", 10, MPFR_RNDN);
        mpfr_init(r10218);
        mpfr_init(r10219);
        mpfr_init(r10220);
        mpfr_init(r10221);
        mpfr_init(r10222);
        mpfr_init(r10223);
        mpfr_init(r10224);
        mpfr_init(r10225);
        mpfr_init_set_str(r10226, "2.129683746951944e+305", 10, MPFR_RNDN);
        mpfr_init(r10227);
        mpfr_init(r10228);
        mpfr_init(r10229);
        mpfr_init(r10230);
        mpfr_init(r10231);
        mpfr_init(r10232);
        mpfr_init(r10233);
}

double f_dm(double x, double y, double z, double t, double a, double b, double c, double i, double j, double k) {
        ;
        mpfr_set_d(r10192, t, MPFR_RNDN);
        mpfr_mul(r10193, r10191, r10192, MPFR_RNDN);
        mpfr_set_d(r10194, x, MPFR_RNDN);
        mpfr_set_d(r10195, z, MPFR_RNDN);
        mpfr_mul(r10196, r10194, r10195, MPFR_RNDN);
        mpfr_set_d(r10197, y, MPFR_RNDN);
        mpfr_mul(r10198, r10196, r10197, MPFR_RNDN);
        mpfr_set_d(r10199, a, MPFR_RNDN);
        ;
        mpfr_mul(r10201, r10199, r10200, MPFR_RNDN);
        mpfr_neg(r10202, r10192, MPFR_RNDN);
        mpfr_set_d(r10203, c, MPFR_RNDN);
        mpfr_set_d(r10204, b, MPFR_RNDN);
        mpfr_mul(r10205, r10203, r10204, MPFR_RNDN);
        mpfr_fma(r10206, r10201, r10202, r10205, MPFR_RNDN);
        mpfr_fma(r10207, r10193, r10198, r10206, MPFR_RNDN);
        mpfr_set_d(r10208, k, MPFR_RNDN);
        mpfr_set_d(r10209, j, MPFR_RNDN);
        mpfr_mul(r10210, r10208, r10209, MPFR_RNDN);
        ;
        mpfr_set_d(r10212, i, MPFR_RNDN);
        mpfr_mul(r10213, r10200, r10194, MPFR_RNDN);
        mpfr_mul(r10214, r10212, r10213, MPFR_RNDN);
        mpfr_fma(r10215, r10210, r10211, r10214, MPFR_RNDN);
        mpfr_sub(r10216, r10207, r10215, MPFR_RNDN);
        ;
        mpfr_set_si(r10218, mpfr_cmp(r10216, r10217) <= 0, MPFR_RNDN);
        mpfr_mul(r10219, r10194, r10191, MPFR_RNDN);
        mpfr_mul(r10220, r10197, r10192, MPFR_RNDN);
        mpfr_mul(r10221, r10219, r10220, MPFR_RNDN);
        mpfr_fma(r10222, r10221, r10195, r10206, MPFR_RNDN);
        mpfr_mul(r10223, r10211, r10209, MPFR_RNDN);
        mpfr_fma(r10224, r10223, r10208, r10214, MPFR_RNDN);
        mpfr_sub(r10225, r10222, r10224, MPFR_RNDN);
        ;
        mpfr_set_si(r10227, mpfr_cmp(r10216, r10226) <= 0, MPFR_RNDN);
        mpfr_mul(r10228, r10192, r10195, MPFR_RNDN);
        mpfr_mul(r10229, r10197, r10228, MPFR_RNDN);
        mpfr_fma(r10230, r10229, r10219, r10206, MPFR_RNDN);
        mpfr_sub(r10231, r10230, r10215, MPFR_RNDN);
        if (mpfr_get_si(r10227, MPFR_RNDN)) { mpfr_set(r10232, r10216, MPFR_RNDN); } else { mpfr_set(r10232, r10231, MPFR_RNDN); };
        if (mpfr_get_si(r10218, MPFR_RNDN)) { mpfr_set(r10233, r10225, MPFR_RNDN); } else { mpfr_set(r10233, r10232, MPFR_RNDN); };
        return mpfr_get_d(r10233, MPFR_RNDN);
}