#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 r26323 = b;
        float r26324 = c;
        float r26325 = r26323 * r26324;
        float r26326 = a;
        float r26327 = d;
        float r26328 = r26326 * r26327;
        float r26329 = r26325 - r26328;
        float r26330 = r26324 * r26324;
        float r26331 = r26327 * r26327;
        float r26332 = r26330 + r26331;
        float r26333 = r26329 / r26332;
        return r26333;
}

double f_id(double a, double b, double c, double d) {
        double r26334 = b;
        double r26335 = c;
        double r26336 = r26334 * r26335;
        double r26337 = a;
        double r26338 = d;
        double r26339 = r26337 * r26338;
        double r26340 = r26336 - r26339;
        double r26341 = r26335 * r26335;
        double r26342 = r26338 * r26338;
        double r26343 = r26341 + r26342;
        double r26344 = r26340 / r26343;
        return r26344;
}


double f_of(float a, float b, float c, float d) {
        float r26345 = c;
        float r26346 = -8.061942750956684e+108;
        bool r26347 = r26345 <= r26346;
        float r26348 = b;
        float r26349 = -r26348;
        float r26350 = d;
        float r26351 = hypot(r26345, r26350);
        float r26352 = r26349 / r26351;
        float r26353 = 2.0301593549536938e+139;
        bool r26354 = r26345 <= r26353;
        float r26355 = 1;
        float r26356 = r26355 / r26351;
        float r26357 = a;
        float r26358 = r26357 * r26350;
        float r26359 = -r26358;
        float r26360 = fma(r26345, r26348, r26359);
        float r26361 = r26360 / r26351;
        float r26362 = r26356 * r26361;
        float r26363 = r26348 / r26351;
        float r26364 = r26354 ? r26362 : r26363;
        float r26365 = r26347 ? r26352 : r26364;
        return r26365;
}

double f_od(double a, double b, double c, double d) {
        double r26366 = c;
        double r26367 = -8.061942750956684e+108;
        bool r26368 = r26366 <= r26367;
        double r26369 = b;
        double r26370 = -r26369;
        double r26371 = d;
        double r26372 = hypot(r26366, r26371);
        double r26373 = r26370 / r26372;
        double r26374 = 2.0301593549536938e+139;
        bool r26375 = r26366 <= r26374;
        double r26376 = 1;
        double r26377 = r26376 / r26372;
        double r26378 = a;
        double r26379 = r26378 * r26371;
        double r26380 = -r26379;
        double r26381 = fma(r26366, r26369, r26380);
        double r26382 = r26381 / r26372;
        double r26383 = r26377 * r26382;
        double r26384 = r26369 / r26372;
        double r26385 = r26375 ? r26383 : r26384;
        double r26386 = r26368 ? r26373 : r26385;
        return r26386;
}

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 r26387, r26388, r26389, r26390, r26391, r26392, r26393, r26394, r26395, r26396, r26397;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(592);
        mpfr_init(r26387);
        mpfr_init(r26388);
        mpfr_init(r26389);
        mpfr_init(r26390);
        mpfr_init(r26391);
        mpfr_init(r26392);
        mpfr_init(r26393);
        mpfr_init(r26394);
        mpfr_init(r26395);
        mpfr_init(r26396);
        mpfr_init(r26397);
}

double f_im(double a, double b, double c, double d) {
        mpfr_set_d(r26387, b, MPFR_RNDN);
        mpfr_set_d(r26388, c, MPFR_RNDN);
        mpfr_mul(r26389, r26387, r26388, MPFR_RNDN);
        mpfr_set_d(r26390, a, MPFR_RNDN);
        mpfr_set_d(r26391, d, MPFR_RNDN);
        mpfr_mul(r26392, r26390, r26391, MPFR_RNDN);
        mpfr_sub(r26393, r26389, r26392, MPFR_RNDN);
        mpfr_mul(r26394, r26388, r26388, MPFR_RNDN);
        mpfr_mul(r26395, r26391, r26391, MPFR_RNDN);
        mpfr_add(r26396, r26394, r26395, MPFR_RNDN);
        mpfr_div(r26397, r26393, r26396, MPFR_RNDN);
        return mpfr_get_d(r26397, MPFR_RNDN);
}

static mpfr_t r26398, r26399, r26400, r26401, r26402, r26403, r26404, r26405, r26406, r26407, r26408, r26409, r26410, r26411, r26412, r26413, r26414, r26415, r26416, r26417, r26418;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(592);
        mpfr_init(r26398);
        mpfr_init_set_str(r26399, "-8.061942750956684e+108", 10, MPFR_RNDN);
        mpfr_init(r26400);
        mpfr_init(r26401);
        mpfr_init(r26402);
        mpfr_init(r26403);
        mpfr_init(r26404);
        mpfr_init(r26405);
        mpfr_init_set_str(r26406, "2.0301593549536938e+139", 10, MPFR_RNDN);
        mpfr_init(r26407);
        mpfr_init_set_str(r26408, "1", 10, MPFR_RNDN);
        mpfr_init(r26409);
        mpfr_init(r26410);
        mpfr_init(r26411);
        mpfr_init(r26412);
        mpfr_init(r26413);
        mpfr_init(r26414);
        mpfr_init(r26415);
        mpfr_init(r26416);
        mpfr_init(r26417);
        mpfr_init(r26418);
}

double f_fm(double a, double b, double c, double d) {
        mpfr_set_d(r26398, c, MPFR_RNDN);
        ;
        mpfr_set_si(r26400, mpfr_cmp(r26398, r26399) <= 0, MPFR_RNDN);
        mpfr_set_d(r26401, b, MPFR_RNDN);
        mpfr_neg(r26402, r26401, MPFR_RNDN);
        mpfr_set_d(r26403, d, MPFR_RNDN);
        mpfr_hypot(r26404, r26398, r26403, MPFR_RNDN);
        mpfr_div(r26405, r26402, r26404, MPFR_RNDN);
        ;
        mpfr_set_si(r26407, mpfr_cmp(r26398, r26406) <= 0, MPFR_RNDN);
        ;
        mpfr_div(r26409, r26408, r26404, MPFR_RNDN);
        mpfr_set_d(r26410, a, MPFR_RNDN);
        mpfr_mul(r26411, r26410, r26403, MPFR_RNDN);
        mpfr_neg(r26412, r26411, MPFR_RNDN);
        mpfr_fma(r26413, r26398, r26401, r26412, MPFR_RNDN);
        mpfr_div(r26414, r26413, r26404, MPFR_RNDN);
        mpfr_mul(r26415, r26409, r26414, MPFR_RNDN);
        mpfr_div(r26416, r26401, r26404, MPFR_RNDN);
        if (mpfr_get_si(r26407, MPFR_RNDN)) { mpfr_set(r26417, r26415, MPFR_RNDN); } else { mpfr_set(r26417, r26416, MPFR_RNDN); };
        if (mpfr_get_si(r26400, MPFR_RNDN)) { mpfr_set(r26418, r26405, MPFR_RNDN); } else { mpfr_set(r26418, r26417, MPFR_RNDN); };
        return mpfr_get_d(r26418, MPFR_RNDN);
}

static mpfr_t r26419, r26420, r26421, r26422, r26423, r26424, r26425, r26426, r26427, r26428, r26429, r26430, r26431, r26432, r26433, r26434, r26435, r26436, r26437, r26438, r26439;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(592);
        mpfr_init(r26419);
        mpfr_init_set_str(r26420, "-8.061942750956684e+108", 10, MPFR_RNDN);
        mpfr_init(r26421);
        mpfr_init(r26422);
        mpfr_init(r26423);
        mpfr_init(r26424);
        mpfr_init(r26425);
        mpfr_init(r26426);
        mpfr_init_set_str(r26427, "2.0301593549536938e+139", 10, MPFR_RNDN);
        mpfr_init(r26428);
        mpfr_init_set_str(r26429, "1", 10, MPFR_RNDN);
        mpfr_init(r26430);
        mpfr_init(r26431);
        mpfr_init(r26432);
        mpfr_init(r26433);
        mpfr_init(r26434);
        mpfr_init(r26435);
        mpfr_init(r26436);
        mpfr_init(r26437);
        mpfr_init(r26438);
        mpfr_init(r26439);
}

double f_dm(double a, double b, double c, double d) {
        mpfr_set_d(r26419, c, MPFR_RNDN);
        ;
        mpfr_set_si(r26421, mpfr_cmp(r26419, r26420) <= 0, MPFR_RNDN);
        mpfr_set_d(r26422, b, MPFR_RNDN);
        mpfr_neg(r26423, r26422, MPFR_RNDN);
        mpfr_set_d(r26424, d, MPFR_RNDN);
        mpfr_hypot(r26425, r26419, r26424, MPFR_RNDN);
        mpfr_div(r26426, r26423, r26425, MPFR_RNDN);
        ;
        mpfr_set_si(r26428, mpfr_cmp(r26419, r26427) <= 0, MPFR_RNDN);
        ;
        mpfr_div(r26430, r26429, r26425, MPFR_RNDN);
        mpfr_set_d(r26431, a, MPFR_RNDN);
        mpfr_mul(r26432, r26431, r26424, MPFR_RNDN);
        mpfr_neg(r26433, r26432, MPFR_RNDN);
        mpfr_fma(r26434, r26419, r26422, r26433, MPFR_RNDN);
        mpfr_div(r26435, r26434, r26425, MPFR_RNDN);
        mpfr_mul(r26436, r26430, r26435, MPFR_RNDN);
        mpfr_div(r26437, r26422, r26425, MPFR_RNDN);
        if (mpfr_get_si(r26428, MPFR_RNDN)) { mpfr_set(r26438, r26436, MPFR_RNDN); } else { mpfr_set(r26438, r26437, MPFR_RNDN); };
        if (mpfr_get_si(r26421, MPFR_RNDN)) { mpfr_set(r26439, r26426, MPFR_RNDN); } else { mpfr_set(r26439, r26438, MPFR_RNDN); };
        return mpfr_get_d(r26439, MPFR_RNDN);
}