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

char *name = "Quotient of products";

double f_if(float a1, float a2, float b1, float b2) {
        float r24714 = a1;
        float r24715 = a2;
        float r24716 = r24714 * r24715;
        float r24717 = b1;
        float r24718 = b2;
        float r24719 = r24717 * r24718;
        float r24720 = r24716 / r24719;
        return r24720;
}

double f_id(double a1, double a2, double b1, double b2) {
        double r24721 = a1;
        double r24722 = a2;
        double r24723 = r24721 * r24722;
        double r24724 = b1;
        double r24725 = b2;
        double r24726 = r24724 * r24725;
        double r24727 = r24723 / r24726;
        return r24727;
}


double f_of(float a1, float a2, float b1, float b2) {
        float r24728 = a1;
        float r24729 = b1;
        float r24730 = r24728 / r24729;
        float r24731 = a2;
        float r24732 = r24730 * r24731;
        float r24733 = 1;
        float r24734 = b2;
        float r24735 = r24733 / r24734;
        float r24736 = r24732 * r24735;
        float r24737 = -inf.0;
        bool r24738 = r24736 <= r24737;
        float r24739 = r24731 / r24734;
        float r24740 = r24728 * r24739;
        float r24741 = r24740 / r24729;
        float r24742 = -9.8813129168249e-324;
        bool r24743 = r24736 <= r24742;
        float r24744 = 8.8931816251424e-323;
        bool r24745 = r24736 <= r24744;
        float r24746 = r24731 / r24729;
        float r24747 = r24746 / r24734;
        float r24748 = r24728 * r24747;
        float r24749 = 7.738380838434884e+272;
        bool r24750 = r24736 <= r24749;
        float r24751 = r24728 * r24731;
        float r24752 = r24729 * r24734;
        float r24753 = r24733 / r24752;
        float r24754 = r24751 * r24753;
        float r24755 = r24750 ? r24736 : r24754;
        float r24756 = r24745 ? r24748 : r24755;
        float r24757 = r24743 ? r24736 : r24756;
        float r24758 = r24738 ? r24741 : r24757;
        return r24758;
}

double f_od(double a1, double a2, double b1, double b2) {
        double r24759 = a1;
        double r24760 = b1;
        double r24761 = r24759 / r24760;
        double r24762 = a2;
        double r24763 = r24761 * r24762;
        double r24764 = 1;
        double r24765 = b2;
        double r24766 = r24764 / r24765;
        double r24767 = r24763 * r24766;
        double r24768 = -inf.0;
        bool r24769 = r24767 <= r24768;
        double r24770 = r24762 / r24765;
        double r24771 = r24759 * r24770;
        double r24772 = r24771 / r24760;
        double r24773 = -9.8813129168249e-324;
        bool r24774 = r24767 <= r24773;
        double r24775 = 8.8931816251424e-323;
        bool r24776 = r24767 <= r24775;
        double r24777 = r24762 / r24760;
        double r24778 = r24777 / r24765;
        double r24779 = r24759 * r24778;
        double r24780 = 7.738380838434884e+272;
        bool r24781 = r24767 <= r24780;
        double r24782 = r24759 * r24762;
        double r24783 = r24760 * r24765;
        double r24784 = r24764 / r24783;
        double r24785 = r24782 * r24784;
        double r24786 = r24781 ? r24767 : r24785;
        double r24787 = r24776 ? r24779 : r24786;
        double r24788 = r24774 ? r24767 : r24787;
        double r24789 = r24769 ? r24772 : r24788;
        return r24789;
}

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 r24790, r24791, r24792, r24793, r24794, r24795, r24796;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(592);
        mpfr_init(r24790);
        mpfr_init(r24791);
        mpfr_init(r24792);
        mpfr_init(r24793);
        mpfr_init(r24794);
        mpfr_init(r24795);
        mpfr_init(r24796);
}

double f_im(double a1, double a2, double b1, double b2) {
        mpfr_set_d(r24790, a1, MPFR_RNDN);
        mpfr_set_d(r24791, a2, MPFR_RNDN);
        mpfr_mul(r24792, r24790, r24791, MPFR_RNDN);
        mpfr_set_d(r24793, b1, MPFR_RNDN);
        mpfr_set_d(r24794, b2, MPFR_RNDN);
        mpfr_mul(r24795, r24793, r24794, MPFR_RNDN);
        mpfr_div(r24796, r24792, r24795, MPFR_RNDN);
        return mpfr_get_d(r24796, MPFR_RNDN);
}

static mpfr_t r24797, r24798, r24799, r24800, r24801, r24802, r24803, r24804, r24805, r24806, r24807, r24808, r24809, r24810, r24811, r24812, r24813, r24814, r24815, r24816, r24817, r24818, r24819, r24820, r24821, r24822, r24823, r24824, r24825, r24826, r24827;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(592);
        mpfr_init(r24797);
        mpfr_init(r24798);
        mpfr_init(r24799);
        mpfr_init(r24800);
        mpfr_init(r24801);
        mpfr_init_set_str(r24802, "1", 10, MPFR_RNDN);
        mpfr_init(r24803);
        mpfr_init(r24804);
        mpfr_init(r24805);
        mpfr_init_set_str(r24806, "-inf.0", 10, MPFR_RNDN);
        mpfr_init(r24807);
        mpfr_init(r24808);
        mpfr_init(r24809);
        mpfr_init(r24810);
        mpfr_init_set_str(r24811, "-9.8813129168249e-324", 10, MPFR_RNDN);
        mpfr_init(r24812);
        mpfr_init_set_str(r24813, "8.8931816251424e-323", 10, MPFR_RNDN);
        mpfr_init(r24814);
        mpfr_init(r24815);
        mpfr_init(r24816);
        mpfr_init(r24817);
        mpfr_init_set_str(r24818, "7.738380838434884e+272", 10, MPFR_RNDN);
        mpfr_init(r24819);
        mpfr_init(r24820);
        mpfr_init(r24821);
        mpfr_init(r24822);
        mpfr_init(r24823);
        mpfr_init(r24824);
        mpfr_init(r24825);
        mpfr_init(r24826);
        mpfr_init(r24827);
}

double f_fm(double a1, double a2, double b1, double b2) {
        mpfr_set_d(r24797, a1, MPFR_RNDN);
        mpfr_set_d(r24798, b1, MPFR_RNDN);
        mpfr_div(r24799, r24797, r24798, MPFR_RNDN);
        mpfr_set_d(r24800, a2, MPFR_RNDN);
        mpfr_mul(r24801, r24799, r24800, MPFR_RNDN);
        ;
        mpfr_set_d(r24803, b2, MPFR_RNDN);
        mpfr_div(r24804, r24802, r24803, MPFR_RNDN);
        mpfr_mul(r24805, r24801, r24804, MPFR_RNDN);
        ;
        mpfr_set_si(r24807, mpfr_cmp(r24805, r24806) <= 0, MPFR_RNDN);
        mpfr_div(r24808, r24800, r24803, MPFR_RNDN);
        mpfr_mul(r24809, r24797, r24808, MPFR_RNDN);
        mpfr_div(r24810, r24809, r24798, MPFR_RNDN);
        ;
        mpfr_set_si(r24812, mpfr_cmp(r24805, r24811) <= 0, MPFR_RNDN);
        ;
        mpfr_set_si(r24814, mpfr_cmp(r24805, r24813) <= 0, MPFR_RNDN);
        mpfr_div(r24815, r24800, r24798, MPFR_RNDN);
        mpfr_div(r24816, r24815, r24803, MPFR_RNDN);
        mpfr_mul(r24817, r24797, r24816, MPFR_RNDN);
        ;
        mpfr_set_si(r24819, mpfr_cmp(r24805, r24818) <= 0, MPFR_RNDN);
        mpfr_mul(r24820, r24797, r24800, MPFR_RNDN);
        mpfr_mul(r24821, r24798, r24803, MPFR_RNDN);
        mpfr_div(r24822, r24802, r24821, MPFR_RNDN);
        mpfr_mul(r24823, r24820, r24822, MPFR_RNDN);
        if (mpfr_get_si(r24819, MPFR_RNDN)) { mpfr_set(r24824, r24805, MPFR_RNDN); } else { mpfr_set(r24824, r24823, MPFR_RNDN); };
        if (mpfr_get_si(r24814, MPFR_RNDN)) { mpfr_set(r24825, r24817, MPFR_RNDN); } else { mpfr_set(r24825, r24824, MPFR_RNDN); };
        if (mpfr_get_si(r24812, MPFR_RNDN)) { mpfr_set(r24826, r24805, MPFR_RNDN); } else { mpfr_set(r24826, r24825, MPFR_RNDN); };
        if (mpfr_get_si(r24807, MPFR_RNDN)) { mpfr_set(r24827, r24810, MPFR_RNDN); } else { mpfr_set(r24827, r24826, MPFR_RNDN); };
        return mpfr_get_d(r24827, MPFR_RNDN);
}

static mpfr_t r24828, r24829, r24830, r24831, r24832, r24833, r24834, r24835, r24836, r24837, r24838, r24839, r24840, r24841, r24842, r24843, r24844, r24845, r24846, r24847, r24848, r24849, r24850, r24851, r24852, r24853, r24854, r24855, r24856, r24857, r24858;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(592);
        mpfr_init(r24828);
        mpfr_init(r24829);
        mpfr_init(r24830);
        mpfr_init(r24831);
        mpfr_init(r24832);
        mpfr_init_set_str(r24833, "1", 10, MPFR_RNDN);
        mpfr_init(r24834);
        mpfr_init(r24835);
        mpfr_init(r24836);
        mpfr_init_set_str(r24837, "-inf.0", 10, MPFR_RNDN);
        mpfr_init(r24838);
        mpfr_init(r24839);
        mpfr_init(r24840);
        mpfr_init(r24841);
        mpfr_init_set_str(r24842, "-9.8813129168249e-324", 10, MPFR_RNDN);
        mpfr_init(r24843);
        mpfr_init_set_str(r24844, "8.8931816251424e-323", 10, MPFR_RNDN);
        mpfr_init(r24845);
        mpfr_init(r24846);
        mpfr_init(r24847);
        mpfr_init(r24848);
        mpfr_init_set_str(r24849, "7.738380838434884e+272", 10, MPFR_RNDN);
        mpfr_init(r24850);
        mpfr_init(r24851);
        mpfr_init(r24852);
        mpfr_init(r24853);
        mpfr_init(r24854);
        mpfr_init(r24855);
        mpfr_init(r24856);
        mpfr_init(r24857);
        mpfr_init(r24858);
}

double f_dm(double a1, double a2, double b1, double b2) {
        mpfr_set_d(r24828, a1, MPFR_RNDN);
        mpfr_set_d(r24829, b1, MPFR_RNDN);
        mpfr_div(r24830, r24828, r24829, MPFR_RNDN);
        mpfr_set_d(r24831, a2, MPFR_RNDN);
        mpfr_mul(r24832, r24830, r24831, MPFR_RNDN);
        ;
        mpfr_set_d(r24834, b2, MPFR_RNDN);
        mpfr_div(r24835, r24833, r24834, MPFR_RNDN);
        mpfr_mul(r24836, r24832, r24835, MPFR_RNDN);
        ;
        mpfr_set_si(r24838, mpfr_cmp(r24836, r24837) <= 0, MPFR_RNDN);
        mpfr_div(r24839, r24831, r24834, MPFR_RNDN);
        mpfr_mul(r24840, r24828, r24839, MPFR_RNDN);
        mpfr_div(r24841, r24840, r24829, MPFR_RNDN);
        ;
        mpfr_set_si(r24843, mpfr_cmp(r24836, r24842) <= 0, MPFR_RNDN);
        ;
        mpfr_set_si(r24845, mpfr_cmp(r24836, r24844) <= 0, MPFR_RNDN);
        mpfr_div(r24846, r24831, r24829, MPFR_RNDN);
        mpfr_div(r24847, r24846, r24834, MPFR_RNDN);
        mpfr_mul(r24848, r24828, r24847, MPFR_RNDN);
        ;
        mpfr_set_si(r24850, mpfr_cmp(r24836, r24849) <= 0, MPFR_RNDN);
        mpfr_mul(r24851, r24828, r24831, MPFR_RNDN);
        mpfr_mul(r24852, r24829, r24834, MPFR_RNDN);
        mpfr_div(r24853, r24833, r24852, MPFR_RNDN);
        mpfr_mul(r24854, r24851, r24853, MPFR_RNDN);
        if (mpfr_get_si(r24850, MPFR_RNDN)) { mpfr_set(r24855, r24836, MPFR_RNDN); } else { mpfr_set(r24855, r24854, MPFR_RNDN); };
        if (mpfr_get_si(r24845, MPFR_RNDN)) { mpfr_set(r24856, r24848, MPFR_RNDN); } else { mpfr_set(r24856, r24855, MPFR_RNDN); };
        if (mpfr_get_si(r24843, MPFR_RNDN)) { mpfr_set(r24857, r24836, MPFR_RNDN); } else { mpfr_set(r24857, r24856, MPFR_RNDN); };
        if (mpfr_get_si(r24838, MPFR_RNDN)) { mpfr_set(r24858, r24841, MPFR_RNDN); } else { mpfr_set(r24858, r24857, MPFR_RNDN); };
        return mpfr_get_d(r24858, MPFR_RNDN);
}