#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 r26097 = b;
        float r26098 = c;
        float r26099 = r26097 * r26098;
        float r26100 = a;
        float r26101 = d;
        float r26102 = r26100 * r26101;
        float r26103 = r26099 - r26102;
        float r26104 = r26098 * r26098;
        float r26105 = r26101 * r26101;
        float r26106 = r26104 + r26105;
        float r26107 = r26103 / r26106;
        return r26107;
}

double f_id(double a, double b, double c, double d) {
        double r26108 = b;
        double r26109 = c;
        double r26110 = r26108 * r26109;
        double r26111 = a;
        double r26112 = d;
        double r26113 = r26111 * r26112;
        double r26114 = r26110 - r26113;
        double r26115 = r26109 * r26109;
        double r26116 = r26112 * r26112;
        double r26117 = r26115 + r26116;
        double r26118 = r26114 / r26117;
        return r26118;
}


double f_of(float a, float b, float c, float d) {
        float r26119 = c;
        float r26120 = d;
        float r26121 = hypot(r26119, r26120);
        float r26122 = sqrt(r26121);
        float r26123 = r26119 / r26122;
        float r26124 = b;
        float r26125 = r26124 / r26122;
        float r26126 = -r26120;
        float r26127 = r26126 / r26121;
        float r26128 = a;
        float r26129 = r26127 * r26128;
        float r26130 = fma(r26123, r26125, r26129);
        float r26131 = r26130 / r26121;
        float r26132 = 0;
        float r26133 = r26131 + r26132;
        return r26133;
}

double f_od(double a, double b, double c, double d) {
        double r26134 = c;
        double r26135 = d;
        double r26136 = hypot(r26134, r26135);
        double r26137 = sqrt(r26136);
        double r26138 = r26134 / r26137;
        double r26139 = b;
        double r26140 = r26139 / r26137;
        double r26141 = -r26135;
        double r26142 = r26141 / r26136;
        double r26143 = a;
        double r26144 = r26142 * r26143;
        double r26145 = fma(r26138, r26140, r26144);
        double r26146 = r26145 / r26136;
        double r26147 = 0;
        double r26148 = r26146 + r26147;
        return r26148;
}

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 r26149, r26150, r26151, r26152, r26153, r26154, r26155, r26156, r26157, r26158, r26159;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(592);
        mpfr_init(r26149);
        mpfr_init(r26150);
        mpfr_init(r26151);
        mpfr_init(r26152);
        mpfr_init(r26153);
        mpfr_init(r26154);
        mpfr_init(r26155);
        mpfr_init(r26156);
        mpfr_init(r26157);
        mpfr_init(r26158);
        mpfr_init(r26159);
}

double f_im(double a, double b, double c, double d) {
        mpfr_set_d(r26149, b, MPFR_RNDN);
        mpfr_set_d(r26150, c, MPFR_RNDN);
        mpfr_mul(r26151, r26149, r26150, MPFR_RNDN);
        mpfr_set_d(r26152, a, MPFR_RNDN);
        mpfr_set_d(r26153, d, MPFR_RNDN);
        mpfr_mul(r26154, r26152, r26153, MPFR_RNDN);
        mpfr_sub(r26155, r26151, r26154, MPFR_RNDN);
        mpfr_mul(r26156, r26150, r26150, MPFR_RNDN);
        mpfr_mul(r26157, r26153, r26153, MPFR_RNDN);
        mpfr_add(r26158, r26156, r26157, MPFR_RNDN);
        mpfr_div(r26159, r26155, r26158, MPFR_RNDN);
        return mpfr_get_d(r26159, MPFR_RNDN);
}

static mpfr_t r26160, r26161, r26162, r26163, r26164, r26165, r26166, r26167, r26168, r26169, r26170, r26171, r26172, r26173, r26174;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(592);
        mpfr_init(r26160);
        mpfr_init(r26161);
        mpfr_init(r26162);
        mpfr_init(r26163);
        mpfr_init(r26164);
        mpfr_init(r26165);
        mpfr_init(r26166);
        mpfr_init(r26167);
        mpfr_init(r26168);
        mpfr_init(r26169);
        mpfr_init(r26170);
        mpfr_init(r26171);
        mpfr_init(r26172);
        mpfr_init_set_str(r26173, "0", 10, MPFR_RNDN);
        mpfr_init(r26174);
}

double f_fm(double a, double b, double c, double d) {
        mpfr_set_d(r26160, c, MPFR_RNDN);
        mpfr_set_d(r26161, d, MPFR_RNDN);
        mpfr_hypot(r26162, r26160, r26161, MPFR_RNDN);
        mpfr_sqrt(r26163, r26162, MPFR_RNDN);
        mpfr_div(r26164, r26160, r26163, MPFR_RNDN);
        mpfr_set_d(r26165, b, MPFR_RNDN);
        mpfr_div(r26166, r26165, r26163, MPFR_RNDN);
        mpfr_neg(r26167, r26161, MPFR_RNDN);
        mpfr_div(r26168, r26167, r26162, MPFR_RNDN);
        mpfr_set_d(r26169, a, MPFR_RNDN);
        mpfr_mul(r26170, r26168, r26169, MPFR_RNDN);
        mpfr_fma(r26171, r26164, r26166, r26170, MPFR_RNDN);
        mpfr_div(r26172, r26171, r26162, MPFR_RNDN);
        ;
        mpfr_add(r26174, r26172, r26173, MPFR_RNDN);
        return mpfr_get_d(r26174, MPFR_RNDN);
}

static mpfr_t r26175, r26176, r26177, r26178, r26179, r26180, r26181, r26182, r26183, r26184, r26185, r26186, r26187, r26188, r26189;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(592);
        mpfr_init(r26175);
        mpfr_init(r26176);
        mpfr_init(r26177);
        mpfr_init(r26178);
        mpfr_init(r26179);
        mpfr_init(r26180);
        mpfr_init(r26181);
        mpfr_init(r26182);
        mpfr_init(r26183);
        mpfr_init(r26184);
        mpfr_init(r26185);
        mpfr_init(r26186);
        mpfr_init(r26187);
        mpfr_init_set_str(r26188, "0", 10, MPFR_RNDN);
        mpfr_init(r26189);
}

double f_dm(double a, double b, double c, double d) {
        mpfr_set_d(r26175, c, MPFR_RNDN);
        mpfr_set_d(r26176, d, MPFR_RNDN);
        mpfr_hypot(r26177, r26175, r26176, MPFR_RNDN);
        mpfr_sqrt(r26178, r26177, MPFR_RNDN);
        mpfr_div(r26179, r26175, r26178, MPFR_RNDN);
        mpfr_set_d(r26180, b, MPFR_RNDN);
        mpfr_div(r26181, r26180, r26178, MPFR_RNDN);
        mpfr_neg(r26182, r26176, MPFR_RNDN);
        mpfr_div(r26183, r26182, r26177, MPFR_RNDN);
        mpfr_set_d(r26184, a, MPFR_RNDN);
        mpfr_mul(r26185, r26183, r26184, MPFR_RNDN);
        mpfr_fma(r26186, r26179, r26181, r26185, MPFR_RNDN);
        mpfr_div(r26187, r26186, r26177, MPFR_RNDN);
        ;
        mpfr_add(r26189, r26187, r26188, MPFR_RNDN);
        return mpfr_get_d(r26189, MPFR_RNDN);
}