#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 r24798 = a1;
        float r24799 = a2;
        float r24800 = r24798 * r24799;
        float r24801 = b1;
        float r24802 = b2;
        float r24803 = r24801 * r24802;
        float r24804 = r24800 / r24803;
        return r24804;
}

double f_id(double a1, double a2, double b1, double b2) {
        double r24805 = a1;
        double r24806 = a2;
        double r24807 = r24805 * r24806;
        double r24808 = b1;
        double r24809 = b2;
        double r24810 = r24808 * r24809;
        double r24811 = r24807 / r24810;
        return r24811;
}


double f_of(float a1, float a2, float b1, float b2) {
        float r24812 = a1;
        float r24813 = b1;
        float r24814 = r24812 / r24813;
        float r24815 = a2;
        float r24816 = r24814 * r24815;
        float r24817 = 1;
        float r24818 = b2;
        float r24819 = r24817 / r24818;
        float r24820 = r24816 * r24819;
        float r24821 = -inf.0;
        bool r24822 = r24820 <= r24821;
        float r24823 = r24815 / r24818;
        float r24824 = r24812 * r24823;
        float r24825 = r24824 / r24813;
        float r24826 = -9.8813129168249e-324;
        bool r24827 = r24820 <= r24826;
        float r24828 = 8.8931816251424e-323;
        bool r24829 = r24820 <= r24828;
        float r24830 = r24815 / r24813;
        float r24831 = r24830 / r24818;
        float r24832 = r24812 * r24831;
        float r24833 = 7.738380838434884e+272;
        bool r24834 = r24820 <= r24833;
        float r24835 = r24812 * r24815;
        float r24836 = r24813 * r24818;
        float r24837 = r24817 / r24836;
        float r24838 = r24835 * r24837;
        float r24839 = r24834 ? r24820 : r24838;
        float r24840 = r24829 ? r24832 : r24839;
        float r24841 = r24827 ? r24820 : r24840;
        float r24842 = r24822 ? r24825 : r24841;
        return r24842;
}

double f_od(double a1, double a2, double b1, double b2) {
        double r24843 = a1;
        double r24844 = b1;
        double r24845 = r24843 / r24844;
        double r24846 = a2;
        double r24847 = r24845 * r24846;
        double r24848 = 1;
        double r24849 = b2;
        double r24850 = r24848 / r24849;
        double r24851 = r24847 * r24850;
        double r24852 = -inf.0;
        bool r24853 = r24851 <= r24852;
        double r24854 = r24846 / r24849;
        double r24855 = r24843 * r24854;
        double r24856 = r24855 / r24844;
        double r24857 = -9.8813129168249e-324;
        bool r24858 = r24851 <= r24857;
        double r24859 = 8.8931816251424e-323;
        bool r24860 = r24851 <= r24859;
        double r24861 = r24846 / r24844;
        double r24862 = r24861 / r24849;
        double r24863 = r24843 * r24862;
        double r24864 = 7.738380838434884e+272;
        bool r24865 = r24851 <= r24864;
        double r24866 = r24843 * r24846;
        double r24867 = r24844 * r24849;
        double r24868 = r24848 / r24867;
        double r24869 = r24866 * r24868;
        double r24870 = r24865 ? r24851 : r24869;
        double r24871 = r24860 ? r24863 : r24870;
        double r24872 = r24858 ? r24851 : r24871;
        double r24873 = r24853 ? r24856 : r24872;
        return r24873;
}

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 r24874, r24875, r24876, r24877, r24878, r24879, r24880;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(592);
        mpfr_init(r24874);
        mpfr_init(r24875);
        mpfr_init(r24876);
        mpfr_init(r24877);
        mpfr_init(r24878);
        mpfr_init(r24879);
        mpfr_init(r24880);
}

double f_im(double a1, double a2, double b1, double b2) {
        mpfr_set_d(r24874, a1, MPFR_RNDN);
        mpfr_set_d(r24875, a2, MPFR_RNDN);
        mpfr_mul(r24876, r24874, r24875, MPFR_RNDN);
        mpfr_set_d(r24877, b1, MPFR_RNDN);
        mpfr_set_d(r24878, b2, MPFR_RNDN);
        mpfr_mul(r24879, r24877, r24878, MPFR_RNDN);
        mpfr_div(r24880, r24876, r24879, MPFR_RNDN);
        return mpfr_get_d(r24880, MPFR_RNDN);
}

static mpfr_t r24881, r24882, r24883, r24884, r24885, r24886, r24887, r24888, r24889, r24890, r24891, r24892, r24893, r24894, r24895, r24896, r24897, r24898, r24899, r24900, r24901, r24902, r24903, r24904, r24905, r24906, r24907, r24908, r24909, r24910, r24911;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(592);
        mpfr_init(r24881);
        mpfr_init(r24882);
        mpfr_init(r24883);
        mpfr_init(r24884);
        mpfr_init(r24885);
        mpfr_init_set_str(r24886, "1", 10, MPFR_RNDN);
        mpfr_init(r24887);
        mpfr_init(r24888);
        mpfr_init(r24889);
        mpfr_init_set_str(r24890, "-inf.0", 10, MPFR_RNDN);
        mpfr_init(r24891);
        mpfr_init(r24892);
        mpfr_init(r24893);
        mpfr_init(r24894);
        mpfr_init_set_str(r24895, "-9.8813129168249e-324", 10, MPFR_RNDN);
        mpfr_init(r24896);
        mpfr_init_set_str(r24897, "8.8931816251424e-323", 10, MPFR_RNDN);
        mpfr_init(r24898);
        mpfr_init(r24899);
        mpfr_init(r24900);
        mpfr_init(r24901);
        mpfr_init_set_str(r24902, "7.738380838434884e+272", 10, MPFR_RNDN);
        mpfr_init(r24903);
        mpfr_init(r24904);
        mpfr_init(r24905);
        mpfr_init(r24906);
        mpfr_init(r24907);
        mpfr_init(r24908);
        mpfr_init(r24909);
        mpfr_init(r24910);
        mpfr_init(r24911);
}

double f_fm(double a1, double a2, double b1, double b2) {
        mpfr_set_d(r24881, a1, MPFR_RNDN);
        mpfr_set_d(r24882, b1, MPFR_RNDN);
        mpfr_div(r24883, r24881, r24882, MPFR_RNDN);
        mpfr_set_d(r24884, a2, MPFR_RNDN);
        mpfr_mul(r24885, r24883, r24884, MPFR_RNDN);
        ;
        mpfr_set_d(r24887, b2, MPFR_RNDN);
        mpfr_div(r24888, r24886, r24887, MPFR_RNDN);
        mpfr_mul(r24889, r24885, r24888, MPFR_RNDN);
        ;
        mpfr_set_si(r24891, mpfr_cmp(r24889, r24890) <= 0, MPFR_RNDN);
        mpfr_div(r24892, r24884, r24887, MPFR_RNDN);
        mpfr_mul(r24893, r24881, r24892, MPFR_RNDN);
        mpfr_div(r24894, r24893, r24882, MPFR_RNDN);
        ;
        mpfr_set_si(r24896, mpfr_cmp(r24889, r24895) <= 0, MPFR_RNDN);
        ;
        mpfr_set_si(r24898, mpfr_cmp(r24889, r24897) <= 0, MPFR_RNDN);
        mpfr_div(r24899, r24884, r24882, MPFR_RNDN);
        mpfr_div(r24900, r24899, r24887, MPFR_RNDN);
        mpfr_mul(r24901, r24881, r24900, MPFR_RNDN);
        ;
        mpfr_set_si(r24903, mpfr_cmp(r24889, r24902) <= 0, MPFR_RNDN);
        mpfr_mul(r24904, r24881, r24884, MPFR_RNDN);
        mpfr_mul(r24905, r24882, r24887, MPFR_RNDN);
        mpfr_div(r24906, r24886, r24905, MPFR_RNDN);
        mpfr_mul(r24907, r24904, r24906, MPFR_RNDN);
        if (mpfr_get_si(r24903, MPFR_RNDN)) { mpfr_set(r24908, r24889, MPFR_RNDN); } else { mpfr_set(r24908, r24907, MPFR_RNDN); };
        if (mpfr_get_si(r24898, MPFR_RNDN)) { mpfr_set(r24909, r24901, MPFR_RNDN); } else { mpfr_set(r24909, r24908, MPFR_RNDN); };
        if (mpfr_get_si(r24896, MPFR_RNDN)) { mpfr_set(r24910, r24889, MPFR_RNDN); } else { mpfr_set(r24910, r24909, MPFR_RNDN); };
        if (mpfr_get_si(r24891, MPFR_RNDN)) { mpfr_set(r24911, r24894, MPFR_RNDN); } else { mpfr_set(r24911, r24910, MPFR_RNDN); };
        return mpfr_get_d(r24911, MPFR_RNDN);
}

static mpfr_t r24912, r24913, r24914, r24915, r24916, r24917, r24918, r24919, r24920, r24921, r24922, r24923, r24924, r24925, r24926, r24927, r24928, r24929, r24930, r24931, r24932, r24933, r24934, r24935, r24936, r24937, r24938, r24939, r24940, r24941, r24942;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(592);
        mpfr_init(r24912);
        mpfr_init(r24913);
        mpfr_init(r24914);
        mpfr_init(r24915);
        mpfr_init(r24916);
        mpfr_init_set_str(r24917, "1", 10, MPFR_RNDN);
        mpfr_init(r24918);
        mpfr_init(r24919);
        mpfr_init(r24920);
        mpfr_init_set_str(r24921, "-inf.0", 10, MPFR_RNDN);
        mpfr_init(r24922);
        mpfr_init(r24923);
        mpfr_init(r24924);
        mpfr_init(r24925);
        mpfr_init_set_str(r24926, "-9.8813129168249e-324", 10, MPFR_RNDN);
        mpfr_init(r24927);
        mpfr_init_set_str(r24928, "8.8931816251424e-323", 10, MPFR_RNDN);
        mpfr_init(r24929);
        mpfr_init(r24930);
        mpfr_init(r24931);
        mpfr_init(r24932);
        mpfr_init_set_str(r24933, "7.738380838434884e+272", 10, MPFR_RNDN);
        mpfr_init(r24934);
        mpfr_init(r24935);
        mpfr_init(r24936);
        mpfr_init(r24937);
        mpfr_init(r24938);
        mpfr_init(r24939);
        mpfr_init(r24940);
        mpfr_init(r24941);
        mpfr_init(r24942);
}

double f_dm(double a1, double a2, double b1, double b2) {
        mpfr_set_d(r24912, a1, MPFR_RNDN);
        mpfr_set_d(r24913, b1, MPFR_RNDN);
        mpfr_div(r24914, r24912, r24913, MPFR_RNDN);
        mpfr_set_d(r24915, a2, MPFR_RNDN);
        mpfr_mul(r24916, r24914, r24915, MPFR_RNDN);
        ;
        mpfr_set_d(r24918, b2, MPFR_RNDN);
        mpfr_div(r24919, r24917, r24918, MPFR_RNDN);
        mpfr_mul(r24920, r24916, r24919, MPFR_RNDN);
        ;
        mpfr_set_si(r24922, mpfr_cmp(r24920, r24921) <= 0, MPFR_RNDN);
        mpfr_div(r24923, r24915, r24918, MPFR_RNDN);
        mpfr_mul(r24924, r24912, r24923, MPFR_RNDN);
        mpfr_div(r24925, r24924, r24913, MPFR_RNDN);
        ;
        mpfr_set_si(r24927, mpfr_cmp(r24920, r24926) <= 0, MPFR_RNDN);
        ;
        mpfr_set_si(r24929, mpfr_cmp(r24920, r24928) <= 0, MPFR_RNDN);
        mpfr_div(r24930, r24915, r24913, MPFR_RNDN);
        mpfr_div(r24931, r24930, r24918, MPFR_RNDN);
        mpfr_mul(r24932, r24912, r24931, MPFR_RNDN);
        ;
        mpfr_set_si(r24934, mpfr_cmp(r24920, r24933) <= 0, MPFR_RNDN);
        mpfr_mul(r24935, r24912, r24915, MPFR_RNDN);
        mpfr_mul(r24936, r24913, r24918, MPFR_RNDN);
        mpfr_div(r24937, r24917, r24936, MPFR_RNDN);
        mpfr_mul(r24938, r24935, r24937, MPFR_RNDN);
        if (mpfr_get_si(r24934, MPFR_RNDN)) { mpfr_set(r24939, r24920, MPFR_RNDN); } else { mpfr_set(r24939, r24938, MPFR_RNDN); };
        if (mpfr_get_si(r24929, MPFR_RNDN)) { mpfr_set(r24940, r24932, MPFR_RNDN); } else { mpfr_set(r24940, r24939, MPFR_RNDN); };
        if (mpfr_get_si(r24927, MPFR_RNDN)) { mpfr_set(r24941, r24920, MPFR_RNDN); } else { mpfr_set(r24941, r24940, MPFR_RNDN); };
        if (mpfr_get_si(r24922, MPFR_RNDN)) { mpfr_set(r24942, r24925, MPFR_RNDN); } else { mpfr_set(r24942, r24941, MPFR_RNDN); };
        return mpfr_get_d(r24942, MPFR_RNDN);
}