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

char *name = "Complex division, imag part";

double f_if(float a, float b, float c, float d) {
        float r26644 = b;
        float r26645 = c;
        float r26646 = r26644 * r26645;
        float r26647 = a;
        float r26648 = d;
        float r26649 = r26647 * r26648;
        float r26650 = r26646 - r26649;
        float r26651 = r26645 * r26645;
        float r26652 = r26648 * r26648;
        float r26653 = r26651 + r26652;
        float r26654 = r26650 / r26653;
        return r26654;
}

double f_id(double a, double b, double c, double d) {
        double r26655 = b;
        double r26656 = c;
        double r26657 = r26655 * r26656;
        double r26658 = a;
        double r26659 = d;
        double r26660 = r26658 * r26659;
        double r26661 = r26657 - r26660;
        double r26662 = r26656 * r26656;
        double r26663 = r26659 * r26659;
        double r26664 = r26662 + r26663;
        double r26665 = r26661 / r26664;
        return r26665;
}


double f_of(float a, float b, float c, float d) {
        float r26666 = c;
        float r26667 = -2.2149249625222455e+181;
        bool r26668 = r26666 <= r26667;
        float r26669 = b;
        float r26670 = -r26669;
        float r26671 = d;
        float r26672 = hypot(r26666, r26671);
        float r26673 = r26670 / r26672;
        float r26674 = 2.143387036101042e+85;
        bool r26675 = r26666 <= r26674;
        float r26676 = 1;
        float r26677 = r26676 / r26672;
        float r26678 = r26666 * r26669;
        float r26679 = a;
        float r26680 = r26679 * r26671;
        float r26681 = r26678 - r26680;
        float r26682 = r26681 / r26672;
        float r26683 = r26677 * r26682;
        float r26684 = r26669 / r26672;
        float r26685 = r26675 ? r26683 : r26684;
        float r26686 = r26668 ? r26673 : r26685;
        return r26686;
}

double f_od(double a, double b, double c, double d) {
        double r26687 = c;
        double r26688 = -2.2149249625222455e+181;
        bool r26689 = r26687 <= r26688;
        double r26690 = b;
        double r26691 = -r26690;
        double r26692 = d;
        double r26693 = hypot(r26687, r26692);
        double r26694 = r26691 / r26693;
        double r26695 = 2.143387036101042e+85;
        bool r26696 = r26687 <= r26695;
        double r26697 = 1;
        double r26698 = r26697 / r26693;
        double r26699 = r26687 * r26690;
        double r26700 = a;
        double r26701 = r26700 * r26692;
        double r26702 = r26699 - r26701;
        double r26703 = r26702 / r26693;
        double r26704 = r26698 * r26703;
        double r26705 = r26690 / r26693;
        double r26706 = r26696 ? r26704 : r26705;
        double r26707 = r26689 ? r26694 : r26706;
        return r26707;
}

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 r26708, r26709, r26710, r26711, r26712, r26713, r26714, r26715, r26716, r26717, r26718;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(592);
        mpfr_init(r26708);
        mpfr_init(r26709);
        mpfr_init(r26710);
        mpfr_init(r26711);
        mpfr_init(r26712);
        mpfr_init(r26713);
        mpfr_init(r26714);
        mpfr_init(r26715);
        mpfr_init(r26716);
        mpfr_init(r26717);
        mpfr_init(r26718);
}

double f_im(double a, double b, double c, double d) {
        mpfr_set_d(r26708, b, MPFR_RNDN);
        mpfr_set_d(r26709, c, MPFR_RNDN);
        mpfr_mul(r26710, r26708, r26709, MPFR_RNDN);
        mpfr_set_d(r26711, a, MPFR_RNDN);
        mpfr_set_d(r26712, d, MPFR_RNDN);
        mpfr_mul(r26713, r26711, r26712, MPFR_RNDN);
        mpfr_sub(r26714, r26710, r26713, MPFR_RNDN);
        mpfr_mul(r26715, r26709, r26709, MPFR_RNDN);
        mpfr_mul(r26716, r26712, r26712, MPFR_RNDN);
        mpfr_add(r26717, r26715, r26716, MPFR_RNDN);
        mpfr_div(r26718, r26714, r26717, MPFR_RNDN);
        return mpfr_get_d(r26718, MPFR_RNDN);
}

static mpfr_t r26719, r26720, r26721, r26722, r26723, r26724, r26725, r26726, r26727, r26728, r26729, r26730, r26731, r26732, r26733, r26734, r26735, r26736, r26737, r26738, r26739;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(592);
        mpfr_init(r26719);
        mpfr_init_set_str(r26720, "-2.2149249625222455e+181", 10, MPFR_RNDN);
        mpfr_init(r26721);
        mpfr_init(r26722);
        mpfr_init(r26723);
        mpfr_init(r26724);
        mpfr_init(r26725);
        mpfr_init(r26726);
        mpfr_init_set_str(r26727, "2.143387036101042e+85", 10, MPFR_RNDN);
        mpfr_init(r26728);
        mpfr_init_set_str(r26729, "1", 10, MPFR_RNDN);
        mpfr_init(r26730);
        mpfr_init(r26731);
        mpfr_init(r26732);
        mpfr_init(r26733);
        mpfr_init(r26734);
        mpfr_init(r26735);
        mpfr_init(r26736);
        mpfr_init(r26737);
        mpfr_init(r26738);
        mpfr_init(r26739);
}

double f_fm(double a, double b, double c, double d) {
        mpfr_set_d(r26719, c, MPFR_RNDN);
        ;
        mpfr_set_si(r26721, mpfr_cmp(r26719, r26720) <= 0, MPFR_RNDN);
        mpfr_set_d(r26722, b, MPFR_RNDN);
        mpfr_neg(r26723, r26722, MPFR_RNDN);
        mpfr_set_d(r26724, d, MPFR_RNDN);
        mpfr_hypot(r26725, r26719, r26724, MPFR_RNDN);
        mpfr_div(r26726, r26723, r26725, MPFR_RNDN);
        ;
        mpfr_set_si(r26728, mpfr_cmp(r26719, r26727) <= 0, MPFR_RNDN);
        ;
        mpfr_div(r26730, r26729, r26725, MPFR_RNDN);
        mpfr_mul(r26731, r26719, r26722, MPFR_RNDN);
        mpfr_set_d(r26732, a, MPFR_RNDN);
        mpfr_mul(r26733, r26732, r26724, MPFR_RNDN);
        mpfr_sub(r26734, r26731, r26733, MPFR_RNDN);
        mpfr_div(r26735, r26734, r26725, MPFR_RNDN);
        mpfr_mul(r26736, r26730, r26735, MPFR_RNDN);
        mpfr_div(r26737, r26722, r26725, MPFR_RNDN);
        if (mpfr_get_si(r26728, MPFR_RNDN)) { mpfr_set(r26738, r26736, MPFR_RNDN); } else { mpfr_set(r26738, r26737, MPFR_RNDN); };
        if (mpfr_get_si(r26721, MPFR_RNDN)) { mpfr_set(r26739, r26726, MPFR_RNDN); } else { mpfr_set(r26739, r26738, MPFR_RNDN); };
        return mpfr_get_d(r26739, MPFR_RNDN);
}

static mpfr_t r26740, r26741, r26742, r26743, r26744, r26745, r26746, r26747, r26748, r26749, r26750, r26751, r26752, r26753, r26754, r26755, r26756, r26757, r26758, r26759, r26760;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(592);
        mpfr_init(r26740);
        mpfr_init_set_str(r26741, "-2.2149249625222455e+181", 10, MPFR_RNDN);
        mpfr_init(r26742);
        mpfr_init(r26743);
        mpfr_init(r26744);
        mpfr_init(r26745);
        mpfr_init(r26746);
        mpfr_init(r26747);
        mpfr_init_set_str(r26748, "2.143387036101042e+85", 10, MPFR_RNDN);
        mpfr_init(r26749);
        mpfr_init_set_str(r26750, "1", 10, MPFR_RNDN);
        mpfr_init(r26751);
        mpfr_init(r26752);
        mpfr_init(r26753);
        mpfr_init(r26754);
        mpfr_init(r26755);
        mpfr_init(r26756);
        mpfr_init(r26757);
        mpfr_init(r26758);
        mpfr_init(r26759);
        mpfr_init(r26760);
}

double f_dm(double a, double b, double c, double d) {
        mpfr_set_d(r26740, c, MPFR_RNDN);
        ;
        mpfr_set_si(r26742, mpfr_cmp(r26740, r26741) <= 0, MPFR_RNDN);
        mpfr_set_d(r26743, b, MPFR_RNDN);
        mpfr_neg(r26744, r26743, MPFR_RNDN);
        mpfr_set_d(r26745, d, MPFR_RNDN);
        mpfr_hypot(r26746, r26740, r26745, MPFR_RNDN);
        mpfr_div(r26747, r26744, r26746, MPFR_RNDN);
        ;
        mpfr_set_si(r26749, mpfr_cmp(r26740, r26748) <= 0, MPFR_RNDN);
        ;
        mpfr_div(r26751, r26750, r26746, MPFR_RNDN);
        mpfr_mul(r26752, r26740, r26743, MPFR_RNDN);
        mpfr_set_d(r26753, a, MPFR_RNDN);
        mpfr_mul(r26754, r26753, r26745, MPFR_RNDN);
        mpfr_sub(r26755, r26752, r26754, MPFR_RNDN);
        mpfr_div(r26756, r26755, r26746, MPFR_RNDN);
        mpfr_mul(r26757, r26751, r26756, MPFR_RNDN);
        mpfr_div(r26758, r26743, r26746, MPFR_RNDN);
        if (mpfr_get_si(r26749, MPFR_RNDN)) { mpfr_set(r26759, r26757, MPFR_RNDN); } else { mpfr_set(r26759, r26758, MPFR_RNDN); };
        if (mpfr_get_si(r26742, MPFR_RNDN)) { mpfr_set(r26760, r26747, MPFR_RNDN); } else { mpfr_set(r26760, r26759, MPFR_RNDN); };
        return mpfr_get_d(r26760, MPFR_RNDN);
}