#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 r26654 = x;
        float r26655 = 18.0;
        float r26656 = r26654 * r26655;
        float r26657 = y;
        float r26658 = r26656 * r26657;
        float r26659 = z;
        float r26660 = r26658 * r26659;
        float r26661 = t;
        float r26662 = r26660 * r26661;
        float r26663 = a;
        float r26664 = 4.0;
        float r26665 = r26663 * r26664;
        float r26666 = r26665 * r26661;
        float r26667 = r26662 - r26666;
        float r26668 = b;
        float r26669 = c;
        float r26670 = r26668 * r26669;
        float r26671 = r26667 + r26670;
        float r26672 = r26654 * r26664;
        float r26673 = i;
        float r26674 = r26672 * r26673;
        float r26675 = r26671 - r26674;
        float r26676 = j;
        float r26677 = 27.0;
        float r26678 = r26676 * r26677;
        float r26679 = k;
        float r26680 = r26678 * r26679;
        float r26681 = r26675 - r26680;
        return r26681;
}

double f_id(double x, double y, double z, double t, double a, double b, double c, double i, double j, double k) {
        double r26682 = x;
        double r26683 = 18.0;
        double r26684 = r26682 * r26683;
        double r26685 = y;
        double r26686 = r26684 * r26685;
        double r26687 = z;
        double r26688 = r26686 * r26687;
        double r26689 = t;
        double r26690 = r26688 * r26689;
        double r26691 = a;
        double r26692 = 4.0;
        double r26693 = r26691 * r26692;
        double r26694 = r26693 * r26689;
        double r26695 = r26690 - r26694;
        double r26696 = b;
        double r26697 = c;
        double r26698 = r26696 * r26697;
        double r26699 = r26695 + r26698;
        double r26700 = r26682 * r26692;
        double r26701 = i;
        double r26702 = r26700 * r26701;
        double r26703 = r26699 - r26702;
        double r26704 = j;
        double r26705 = 27.0;
        double r26706 = r26704 * r26705;
        double r26707 = k;
        double r26708 = r26706 * r26707;
        double r26709 = r26703 - r26708;
        return r26709;
}


double f_of(float x, float y, float z, float t, float a, float b, float c, float i, float j, float k) {
        float r26710 = 18.0;
        float r26711 = y;
        float r26712 = x;
        float r26713 = r26711 * r26712;
        float r26714 = z;
        float r26715 = t;
        float r26716 = r26714 * r26715;
        float r26717 = r26713 * r26716;
        float r26718 = b;
        float r26719 = c;
        float r26720 = r26718 * r26719;
        float r26721 = fma(r26710, r26717, r26720);
        float r26722 = a;
        float r26723 = i;
        float r26724 = r26723 * r26712;
        float r26725 = fma(r26715, r26722, r26724);
        float r26726 = 4.0;
        float r26727 = j;
        float r26728 = k;
        float r26729 = r26727 * r26728;
        float r26730 = 27.0;
        float r26731 = r26729 * r26730;
        float r26732 = fma(r26725, r26726, r26731);
        float r26733 = r26721 - r26732;
        float r26734 = -5.520878218001742e+307;
        bool r26735 = r26733 <= r26734;
        float r26736 = r26714 * r26712;
        float r26737 = r26710 * r26711;
        float r26738 = r26736 * r26737;
        float r26739 = fma(r26715, r26738, r26720);
        float r26740 = fma(r26722, r26715, r26724);
        float r26741 = fma(r26726, r26740, r26731);
        float r26742 = r26739 - r26741;
        float r26743 = 9.839584885668652e+306;
        bool r26744 = r26733 <= r26743;
        float r26745 = r26744 ? r26733 : r26742;
        float r26746 = r26735 ? r26742 : r26745;
        return r26746;
}

double f_od(double x, double y, double z, double t, double a, double b, double c, double i, double j, double k) {
        double r26747 = 18.0;
        double r26748 = y;
        double r26749 = x;
        double r26750 = r26748 * r26749;
        double r26751 = z;
        double r26752 = t;
        double r26753 = r26751 * r26752;
        double r26754 = r26750 * r26753;
        double r26755 = b;
        double r26756 = c;
        double r26757 = r26755 * r26756;
        double r26758 = fma(r26747, r26754, r26757);
        double r26759 = a;
        double r26760 = i;
        double r26761 = r26760 * r26749;
        double r26762 = fma(r26752, r26759, r26761);
        double r26763 = 4.0;
        double r26764 = j;
        double r26765 = k;
        double r26766 = r26764 * r26765;
        double r26767 = 27.0;
        double r26768 = r26766 * r26767;
        double r26769 = fma(r26762, r26763, r26768);
        double r26770 = r26758 - r26769;
        double r26771 = -5.520878218001742e+307;
        bool r26772 = r26770 <= r26771;
        double r26773 = r26751 * r26749;
        double r26774 = r26747 * r26748;
        double r26775 = r26773 * r26774;
        double r26776 = fma(r26752, r26775, r26757);
        double r26777 = fma(r26759, r26752, r26761);
        double r26778 = fma(r26763, r26777, r26768);
        double r26779 = r26776 - r26778;
        double r26780 = 9.839584885668652e+306;
        bool r26781 = r26770 <= r26780;
        double r26782 = r26781 ? r26770 : r26779;
        double r26783 = r26772 ? r26779 : r26782;
        return r26783;
}

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 r26784, r26785, r26786, r26787, r26788, r26789, r26790, r26791, r26792, r26793, r26794, r26795, r26796, r26797, r26798, r26799, r26800, r26801, r26802, r26803, r26804, r26805, r26806, r26807, r26808, r26809, r26810, r26811;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(592);
        mpfr_init(r26784);
        mpfr_init_set_str(r26785, "18.0", 10, MPFR_RNDN);
        mpfr_init(r26786);
        mpfr_init(r26787);
        mpfr_init(r26788);
        mpfr_init(r26789);
        mpfr_init(r26790);
        mpfr_init(r26791);
        mpfr_init(r26792);
        mpfr_init(r26793);
        mpfr_init_set_str(r26794, "4.0", 10, MPFR_RNDN);
        mpfr_init(r26795);
        mpfr_init(r26796);
        mpfr_init(r26797);
        mpfr_init(r26798);
        mpfr_init(r26799);
        mpfr_init(r26800);
        mpfr_init(r26801);
        mpfr_init(r26802);
        mpfr_init(r26803);
        mpfr_init(r26804);
        mpfr_init(r26805);
        mpfr_init(r26806);
        mpfr_init_set_str(r26807, "27.0", 10, MPFR_RNDN);
        mpfr_init(r26808);
        mpfr_init(r26809);
        mpfr_init(r26810);
        mpfr_init(r26811);
}

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(r26784, x, MPFR_RNDN);
        ;
        mpfr_mul(r26786, r26784, r26785, MPFR_RNDN);
        mpfr_set_d(r26787, y, MPFR_RNDN);
        mpfr_mul(r26788, r26786, r26787, MPFR_RNDN);
        mpfr_set_d(r26789, z, MPFR_RNDN);
        mpfr_mul(r26790, r26788, r26789, MPFR_RNDN);
        mpfr_set_d(r26791, t, MPFR_RNDN);
        mpfr_mul(r26792, r26790, r26791, MPFR_RNDN);
        mpfr_set_d(r26793, a, MPFR_RNDN);
        ;
        mpfr_mul(r26795, r26793, r26794, MPFR_RNDN);
        mpfr_mul(r26796, r26795, r26791, MPFR_RNDN);
        mpfr_sub(r26797, r26792, r26796, MPFR_RNDN);
        mpfr_set_d(r26798, b, MPFR_RNDN);
        mpfr_set_d(r26799, c, MPFR_RNDN);
        mpfr_mul(r26800, r26798, r26799, MPFR_RNDN);
        mpfr_add(r26801, r26797, r26800, MPFR_RNDN);
        mpfr_mul(r26802, r26784, r26794, MPFR_RNDN);
        mpfr_set_d(r26803, i, MPFR_RNDN);
        mpfr_mul(r26804, r26802, r26803, MPFR_RNDN);
        mpfr_sub(r26805, r26801, r26804, MPFR_RNDN);
        mpfr_set_d(r26806, j, MPFR_RNDN);
        ;
        mpfr_mul(r26808, r26806, r26807, MPFR_RNDN);
        mpfr_set_d(r26809, k, MPFR_RNDN);
        mpfr_mul(r26810, r26808, r26809, MPFR_RNDN);
        mpfr_sub(r26811, r26805, r26810, MPFR_RNDN);
        return mpfr_get_d(r26811, MPFR_RNDN);
}

static mpfr_t r26812, r26813, r26814, r26815, r26816, r26817, r26818, r26819, r26820, r26821, r26822, r26823, r26824, r26825, r26826, r26827, r26828, r26829, r26830, r26831, r26832, r26833, r26834, r26835, r26836, r26837, r26838, r26839, r26840, r26841, r26842, r26843, r26844, r26845, r26846, r26847, r26848;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(592);
        mpfr_init_set_str(r26812, "18.0", 10, MPFR_RNDN);
        mpfr_init(r26813);
        mpfr_init(r26814);
        mpfr_init(r26815);
        mpfr_init(r26816);
        mpfr_init(r26817);
        mpfr_init(r26818);
        mpfr_init(r26819);
        mpfr_init(r26820);
        mpfr_init(r26821);
        mpfr_init(r26822);
        mpfr_init(r26823);
        mpfr_init(r26824);
        mpfr_init(r26825);
        mpfr_init(r26826);
        mpfr_init(r26827);
        mpfr_init_set_str(r26828, "4.0", 10, MPFR_RNDN);
        mpfr_init(r26829);
        mpfr_init(r26830);
        mpfr_init(r26831);
        mpfr_init_set_str(r26832, "27.0", 10, MPFR_RNDN);
        mpfr_init(r26833);
        mpfr_init(r26834);
        mpfr_init(r26835);
        mpfr_init_set_str(r26836, "-5.520878218001742e+307", 10, MPFR_RNDN);
        mpfr_init(r26837);
        mpfr_init(r26838);
        mpfr_init(r26839);
        mpfr_init(r26840);
        mpfr_init(r26841);
        mpfr_init(r26842);
        mpfr_init(r26843);
        mpfr_init(r26844);
        mpfr_init_set_str(r26845, "9.839584885668652e+306", 10, MPFR_RNDN);
        mpfr_init(r26846);
        mpfr_init(r26847);
        mpfr_init(r26848);
}

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(r26813, y, MPFR_RNDN);
        mpfr_set_d(r26814, x, MPFR_RNDN);
        mpfr_mul(r26815, r26813, r26814, MPFR_RNDN);
        mpfr_set_d(r26816, z, MPFR_RNDN);
        mpfr_set_d(r26817, t, MPFR_RNDN);
        mpfr_mul(r26818, r26816, r26817, MPFR_RNDN);
        mpfr_mul(r26819, r26815, r26818, MPFR_RNDN);
        mpfr_set_d(r26820, b, MPFR_RNDN);
        mpfr_set_d(r26821, c, MPFR_RNDN);
        mpfr_mul(r26822, r26820, r26821, MPFR_RNDN);
        mpfr_fma(r26823, r26812, r26819, r26822, MPFR_RNDN);
        mpfr_set_d(r26824, a, MPFR_RNDN);
        mpfr_set_d(r26825, i, MPFR_RNDN);
        mpfr_mul(r26826, r26825, r26814, MPFR_RNDN);
        mpfr_fma(r26827, r26817, r26824, r26826, MPFR_RNDN);
        ;
        mpfr_set_d(r26829, j, MPFR_RNDN);
        mpfr_set_d(r26830, k, MPFR_RNDN);
        mpfr_mul(r26831, r26829, r26830, MPFR_RNDN);
        ;
        mpfr_mul(r26833, r26831, r26832, MPFR_RNDN);
        mpfr_fma(r26834, r26827, r26828, r26833, MPFR_RNDN);
        mpfr_sub(r26835, r26823, r26834, MPFR_RNDN);
        ;
        mpfr_set_si(r26837, mpfr_cmp(r26835, r26836) <= 0, MPFR_RNDN);
        mpfr_mul(r26838, r26816, r26814, MPFR_RNDN);
        mpfr_mul(r26839, r26812, r26813, MPFR_RNDN);
        mpfr_mul(r26840, r26838, r26839, MPFR_RNDN);
        mpfr_fma(r26841, r26817, r26840, r26822, MPFR_RNDN);
        mpfr_fma(r26842, r26824, r26817, r26826, MPFR_RNDN);
        mpfr_fma(r26843, r26828, r26842, r26833, MPFR_RNDN);
        mpfr_sub(r26844, r26841, r26843, MPFR_RNDN);
        ;
        mpfr_set_si(r26846, mpfr_cmp(r26835, r26845) <= 0, MPFR_RNDN);
        if (mpfr_get_si(r26846, MPFR_RNDN)) { mpfr_set(r26847, r26835, MPFR_RNDN); } else { mpfr_set(r26847, r26844, MPFR_RNDN); };
        if (mpfr_get_si(r26837, MPFR_RNDN)) { mpfr_set(r26848, r26844, MPFR_RNDN); } else { mpfr_set(r26848, r26847, MPFR_RNDN); };
        return mpfr_get_d(r26848, MPFR_RNDN);
}

static mpfr_t r26849, r26850, r26851, r26852, r26853, r26854, r26855, r26856, r26857, r26858, r26859, r26860, r26861, r26862, r26863, r26864, r26865, r26866, r26867, r26868, r26869, r26870, r26871, r26872, r26873, r26874, r26875, r26876, r26877, r26878, r26879, r26880, r26881, r26882, r26883, r26884, r26885;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(592);
        mpfr_init_set_str(r26849, "18.0", 10, MPFR_RNDN);
        mpfr_init(r26850);
        mpfr_init(r26851);
        mpfr_init(r26852);
        mpfr_init(r26853);
        mpfr_init(r26854);
        mpfr_init(r26855);
        mpfr_init(r26856);
        mpfr_init(r26857);
        mpfr_init(r26858);
        mpfr_init(r26859);
        mpfr_init(r26860);
        mpfr_init(r26861);
        mpfr_init(r26862);
        mpfr_init(r26863);
        mpfr_init(r26864);
        mpfr_init_set_str(r26865, "4.0", 10, MPFR_RNDN);
        mpfr_init(r26866);
        mpfr_init(r26867);
        mpfr_init(r26868);
        mpfr_init_set_str(r26869, "27.0", 10, MPFR_RNDN);
        mpfr_init(r26870);
        mpfr_init(r26871);
        mpfr_init(r26872);
        mpfr_init_set_str(r26873, "-5.520878218001742e+307", 10, MPFR_RNDN);
        mpfr_init(r26874);
        mpfr_init(r26875);
        mpfr_init(r26876);
        mpfr_init(r26877);
        mpfr_init(r26878);
        mpfr_init(r26879);
        mpfr_init(r26880);
        mpfr_init(r26881);
        mpfr_init_set_str(r26882, "9.839584885668652e+306", 10, MPFR_RNDN);
        mpfr_init(r26883);
        mpfr_init(r26884);
        mpfr_init(r26885);
}

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(r26850, y, MPFR_RNDN);
        mpfr_set_d(r26851, x, MPFR_RNDN);
        mpfr_mul(r26852, r26850, r26851, MPFR_RNDN);
        mpfr_set_d(r26853, z, MPFR_RNDN);
        mpfr_set_d(r26854, t, MPFR_RNDN);
        mpfr_mul(r26855, r26853, r26854, MPFR_RNDN);
        mpfr_mul(r26856, r26852, r26855, MPFR_RNDN);
        mpfr_set_d(r26857, b, MPFR_RNDN);
        mpfr_set_d(r26858, c, MPFR_RNDN);
        mpfr_mul(r26859, r26857, r26858, MPFR_RNDN);
        mpfr_fma(r26860, r26849, r26856, r26859, MPFR_RNDN);
        mpfr_set_d(r26861, a, MPFR_RNDN);
        mpfr_set_d(r26862, i, MPFR_RNDN);
        mpfr_mul(r26863, r26862, r26851, MPFR_RNDN);
        mpfr_fma(r26864, r26854, r26861, r26863, MPFR_RNDN);
        ;
        mpfr_set_d(r26866, j, MPFR_RNDN);
        mpfr_set_d(r26867, k, MPFR_RNDN);
        mpfr_mul(r26868, r26866, r26867, MPFR_RNDN);
        ;
        mpfr_mul(r26870, r26868, r26869, MPFR_RNDN);
        mpfr_fma(r26871, r26864, r26865, r26870, MPFR_RNDN);
        mpfr_sub(r26872, r26860, r26871, MPFR_RNDN);
        ;
        mpfr_set_si(r26874, mpfr_cmp(r26872, r26873) <= 0, MPFR_RNDN);
        mpfr_mul(r26875, r26853, r26851, MPFR_RNDN);
        mpfr_mul(r26876, r26849, r26850, MPFR_RNDN);
        mpfr_mul(r26877, r26875, r26876, MPFR_RNDN);
        mpfr_fma(r26878, r26854, r26877, r26859, MPFR_RNDN);
        mpfr_fma(r26879, r26861, r26854, r26863, MPFR_RNDN);
        mpfr_fma(r26880, r26865, r26879, r26870, MPFR_RNDN);
        mpfr_sub(r26881, r26878, r26880, MPFR_RNDN);
        ;
        mpfr_set_si(r26883, mpfr_cmp(r26872, r26882) <= 0, MPFR_RNDN);
        if (mpfr_get_si(r26883, MPFR_RNDN)) { mpfr_set(r26884, r26872, MPFR_RNDN); } else { mpfr_set(r26884, r26881, MPFR_RNDN); };
        if (mpfr_get_si(r26874, MPFR_RNDN)) { mpfr_set(r26885, r26881, MPFR_RNDN); } else { mpfr_set(r26885, r26884, MPFR_RNDN); };
        return mpfr_get_d(r26885, MPFR_RNDN);
}