#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 r26216 = b;
        float r26217 = c;
        float r26218 = r26216 * r26217;
        float r26219 = a;
        float r26220 = d;
        float r26221 = r26219 * r26220;
        float r26222 = r26218 - r26221;
        float r26223 = r26217 * r26217;
        float r26224 = r26220 * r26220;
        float r26225 = r26223 + r26224;
        float r26226 = r26222 / r26225;
        return r26226;
}

double f_id(double a, double b, double c, double d) {
        double r26227 = b;
        double r26228 = c;
        double r26229 = r26227 * r26228;
        double r26230 = a;
        double r26231 = d;
        double r26232 = r26230 * r26231;
        double r26233 = r26229 - r26232;
        double r26234 = r26228 * r26228;
        double r26235 = r26231 * r26231;
        double r26236 = r26234 + r26235;
        double r26237 = r26233 / r26236;
        return r26237;
}


double f_of(float a, float b, float c, float d) {
        float r26238 = d;
        float r26239 = -6.642517161325143e+143;
        bool r26240 = r26238 <= r26239;
        float r26241 = a;
        float r26242 = c;
        float r26243 = hypot(r26242, r26238);
        float r26244 = r26241 / r26243;
        float r26245 = 2.0217244136337119e+90;
        bool r26246 = r26238 <= r26245;
        float r26247 = b;
        float r26248 = r26247 * r26242;
        float r26249 = r26241 * r26238;
        float r26250 = r26248 - r26249;
        float r26251 = r26250 / r26243;
        float r26252 = r26251 / r26243;
        float r26253 = r26242 / r26238;
        float r26254 = -r26241;
        float r26255 = fma(r26253, r26247, r26254);
        float r26256 = r26255 / r26243;
        float r26257 = r26246 ? r26252 : r26256;
        float r26258 = r26240 ? r26244 : r26257;
        return r26258;
}

double f_od(double a, double b, double c, double d) {
        double r26259 = d;
        double r26260 = -6.642517161325143e+143;
        bool r26261 = r26259 <= r26260;
        double r26262 = a;
        double r26263 = c;
        double r26264 = hypot(r26263, r26259);
        double r26265 = r26262 / r26264;
        double r26266 = 2.0217244136337119e+90;
        bool r26267 = r26259 <= r26266;
        double r26268 = b;
        double r26269 = r26268 * r26263;
        double r26270 = r26262 * r26259;
        double r26271 = r26269 - r26270;
        double r26272 = r26271 / r26264;
        double r26273 = r26272 / r26264;
        double r26274 = r26263 / r26259;
        double r26275 = -r26262;
        double r26276 = fma(r26274, r26268, r26275);
        double r26277 = r26276 / r26264;
        double r26278 = r26267 ? r26273 : r26277;
        double r26279 = r26261 ? r26265 : r26278;
        return r26279;
}

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 r26280, r26281, r26282, r26283, r26284, r26285, r26286, r26287, r26288, r26289, r26290;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(592);
        mpfr_init(r26280);
        mpfr_init(r26281);
        mpfr_init(r26282);
        mpfr_init(r26283);
        mpfr_init(r26284);
        mpfr_init(r26285);
        mpfr_init(r26286);
        mpfr_init(r26287);
        mpfr_init(r26288);
        mpfr_init(r26289);
        mpfr_init(r26290);
}

double f_im(double a, double b, double c, double d) {
        mpfr_set_d(r26280, b, MPFR_RNDN);
        mpfr_set_d(r26281, c, MPFR_RNDN);
        mpfr_mul(r26282, r26280, r26281, MPFR_RNDN);
        mpfr_set_d(r26283, a, MPFR_RNDN);
        mpfr_set_d(r26284, d, MPFR_RNDN);
        mpfr_mul(r26285, r26283, r26284, MPFR_RNDN);
        mpfr_sub(r26286, r26282, r26285, MPFR_RNDN);
        mpfr_mul(r26287, r26281, r26281, MPFR_RNDN);
        mpfr_mul(r26288, r26284, r26284, MPFR_RNDN);
        mpfr_add(r26289, r26287, r26288, MPFR_RNDN);
        mpfr_div(r26290, r26286, r26289, MPFR_RNDN);
        return mpfr_get_d(r26290, MPFR_RNDN);
}

static mpfr_t r26291, r26292, r26293, r26294, r26295, r26296, r26297, r26298, r26299, r26300, r26301, r26302, r26303, r26304, r26305, r26306, r26307, r26308, r26309, r26310, r26311;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(592);
        mpfr_init(r26291);
        mpfr_init_set_str(r26292, "-6.642517161325143e+143", 10, MPFR_RNDN);
        mpfr_init(r26293);
        mpfr_init(r26294);
        mpfr_init(r26295);
        mpfr_init(r26296);
        mpfr_init(r26297);
        mpfr_init_set_str(r26298, "2.0217244136337119e+90", 10, MPFR_RNDN);
        mpfr_init(r26299);
        mpfr_init(r26300);
        mpfr_init(r26301);
        mpfr_init(r26302);
        mpfr_init(r26303);
        mpfr_init(r26304);
        mpfr_init(r26305);
        mpfr_init(r26306);
        mpfr_init(r26307);
        mpfr_init(r26308);
        mpfr_init(r26309);
        mpfr_init(r26310);
        mpfr_init(r26311);
}

double f_fm(double a, double b, double c, double d) {
        mpfr_set_d(r26291, d, MPFR_RNDN);
        ;
        mpfr_set_si(r26293, mpfr_cmp(r26291, r26292) <= 0, MPFR_RNDN);
        mpfr_set_d(r26294, a, MPFR_RNDN);
        mpfr_set_d(r26295, c, MPFR_RNDN);
        mpfr_hypot(r26296, r26295, r26291, MPFR_RNDN);
        mpfr_div(r26297, r26294, r26296, MPFR_RNDN);
        ;
        mpfr_set_si(r26299, mpfr_cmp(r26291, r26298) <= 0, MPFR_RNDN);
        mpfr_set_d(r26300, b, MPFR_RNDN);
        mpfr_mul(r26301, r26300, r26295, MPFR_RNDN);
        mpfr_mul(r26302, r26294, r26291, MPFR_RNDN);
        mpfr_sub(r26303, r26301, r26302, MPFR_RNDN);
        mpfr_div(r26304, r26303, r26296, MPFR_RNDN);
        mpfr_div(r26305, r26304, r26296, MPFR_RNDN);
        mpfr_div(r26306, r26295, r26291, MPFR_RNDN);
        mpfr_neg(r26307, r26294, MPFR_RNDN);
        mpfr_fma(r26308, r26306, r26300, r26307, MPFR_RNDN);
        mpfr_div(r26309, r26308, r26296, MPFR_RNDN);
        if (mpfr_get_si(r26299, MPFR_RNDN)) { mpfr_set(r26310, r26305, MPFR_RNDN); } else { mpfr_set(r26310, r26309, MPFR_RNDN); };
        if (mpfr_get_si(r26293, MPFR_RNDN)) { mpfr_set(r26311, r26297, MPFR_RNDN); } else { mpfr_set(r26311, r26310, MPFR_RNDN); };
        return mpfr_get_d(r26311, MPFR_RNDN);
}

static mpfr_t r26312, r26313, r26314, r26315, r26316, r26317, r26318, r26319, r26320, r26321, r26322, r26323, r26324, r26325, r26326, r26327, r26328, r26329, r26330, r26331, r26332;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(592);
        mpfr_init(r26312);
        mpfr_init_set_str(r26313, "-6.642517161325143e+143", 10, MPFR_RNDN);
        mpfr_init(r26314);
        mpfr_init(r26315);
        mpfr_init(r26316);
        mpfr_init(r26317);
        mpfr_init(r26318);
        mpfr_init_set_str(r26319, "2.0217244136337119e+90", 10, MPFR_RNDN);
        mpfr_init(r26320);
        mpfr_init(r26321);
        mpfr_init(r26322);
        mpfr_init(r26323);
        mpfr_init(r26324);
        mpfr_init(r26325);
        mpfr_init(r26326);
        mpfr_init(r26327);
        mpfr_init(r26328);
        mpfr_init(r26329);
        mpfr_init(r26330);
        mpfr_init(r26331);
        mpfr_init(r26332);
}

double f_dm(double a, double b, double c, double d) {
        mpfr_set_d(r26312, d, MPFR_RNDN);
        ;
        mpfr_set_si(r26314, mpfr_cmp(r26312, r26313) <= 0, MPFR_RNDN);
        mpfr_set_d(r26315, a, MPFR_RNDN);
        mpfr_set_d(r26316, c, MPFR_RNDN);
        mpfr_hypot(r26317, r26316, r26312, MPFR_RNDN);
        mpfr_div(r26318, r26315, r26317, MPFR_RNDN);
        ;
        mpfr_set_si(r26320, mpfr_cmp(r26312, r26319) <= 0, MPFR_RNDN);
        mpfr_set_d(r26321, b, MPFR_RNDN);
        mpfr_mul(r26322, r26321, r26316, MPFR_RNDN);
        mpfr_mul(r26323, r26315, r26312, MPFR_RNDN);
        mpfr_sub(r26324, r26322, r26323, MPFR_RNDN);
        mpfr_div(r26325, r26324, r26317, MPFR_RNDN);
        mpfr_div(r26326, r26325, r26317, MPFR_RNDN);
        mpfr_div(r26327, r26316, r26312, MPFR_RNDN);
        mpfr_neg(r26328, r26315, MPFR_RNDN);
        mpfr_fma(r26329, r26327, r26321, r26328, MPFR_RNDN);
        mpfr_div(r26330, r26329, r26317, MPFR_RNDN);
        if (mpfr_get_si(r26320, MPFR_RNDN)) { mpfr_set(r26331, r26326, MPFR_RNDN); } else { mpfr_set(r26331, r26330, MPFR_RNDN); };
        if (mpfr_get_si(r26314, MPFR_RNDN)) { mpfr_set(r26332, r26318, MPFR_RNDN); } else { mpfr_set(r26332, r26331, MPFR_RNDN); };
        return mpfr_get_d(r26332, MPFR_RNDN);
}