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

char *name = "math.sqrt on complex, imaginary part, im greater than 0 branch";

double f_if(float re, float im) {
        float r15233 = 0.5f;
        float r15234 = 2.0f;
        float r15235 = re;
        float r15236 = r15235 * r15235;
        float r15237 = im;
        float r15238 = r15237 * r15237;
        float r15239 = r15236 - r15238;
        float r15240 = sqrt(r15239);
        float r15241 = r15240 + r15235;
        float r15242 = r15234 * r15241;
        float r15243 = sqrt(r15242);
        float r15244 = r15233 * r15243;
        return r15244;
}

double f_id(double re, double im) {
        double r15245 = 0.5;
        double r15246 = 2.0;
        double r15247 = re;
        double r15248 = r15247 * r15247;
        double r15249 = im;
        double r15250 = r15249 * r15249;
        double r15251 = r15248 - r15250;
        double r15252 = sqrt(r15251);
        double r15253 = r15252 + r15247;
        double r15254 = r15246 * r15253;
        double r15255 = sqrt(r15254);
        double r15256 = r15245 * r15255;
        return r15256;
}


double f_of(float re, float im) {
        float r15257 = re;
        float r15258 = 5.745475187433076e-281f;
        bool r15259 = r15257 <= r15258;
        float r15260 = 0.5f;
        float r15261 = 2.0f;
        float r15262 = -1.0f;
        float r15263 = r15262 * r15257;
        float r15264 = r15263 + r15257;
        float r15265 = r15261 * r15264;
        float r15266 = sqrt(r15265);
        float r15267 = r15260 * r15266;
        float r15268 = im;
        float r15269 = r15257 + r15268;
        float r15270 = sqrt(r15269);
        float r15271 = r15257 - r15268;
        float r15272 = sqrt(r15271);
        float r15273 = r15270 * r15272;
        float r15274 = r15273 + r15257;
        float r15275 = r15261 * r15274;
        float r15276 = sqrt(r15275);
        float r15277 = r15260 * r15276;
        float r15278 = r15259 ? r15267 : r15277;
        return r15278;
}

double f_od(double re, double im) {
        double r15279 = re;
        double r15280 = 5.745475187433076e-281;
        bool r15281 = r15279 <= r15280;
        double r15282 = 0.5;
        double r15283 = 2.0;
        double r15284 = -1.0;
        double r15285 = r15284 * r15279;
        double r15286 = r15285 + r15279;
        double r15287 = r15283 * r15286;
        double r15288 = sqrt(r15287);
        double r15289 = r15282 * r15288;
        double r15290 = im;
        double r15291 = r15279 + r15290;
        double r15292 = sqrt(r15291);
        double r15293 = r15279 - r15290;
        double r15294 = sqrt(r15293);
        double r15295 = r15292 * r15294;
        double r15296 = r15295 + r15279;
        double r15297 = r15283 * r15296;
        double r15298 = sqrt(r15297);
        double r15299 = r15282 * r15298;
        double r15300 = r15281 ? r15289 : r15299;
        return r15300;
}

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 r15301, r15302, r15303, r15304, r15305, r15306, r15307, r15308, r15309, r15310, r15311, r15312;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init_set_str(r15301, "0.5", 10, MPFR_RNDN);
        mpfr_init_set_str(r15302, "2.0", 10, MPFR_RNDN);
        mpfr_init(r15303);
        mpfr_init(r15304);
        mpfr_init(r15305);
        mpfr_init(r15306);
        mpfr_init(r15307);
        mpfr_init(r15308);
        mpfr_init(r15309);
        mpfr_init(r15310);
        mpfr_init(r15311);
        mpfr_init(r15312);
}

double f_im(double re, double im) {
        ;
        ;
        mpfr_set_d(r15303, re, MPFR_RNDN);
        mpfr_mul(r15304, r15303, r15303, MPFR_RNDN);
        mpfr_set_d(r15305, im, MPFR_RNDN);
        mpfr_mul(r15306, r15305, r15305, MPFR_RNDN);
        mpfr_sub(r15307, r15304, r15306, MPFR_RNDN);
        mpfr_sqrt(r15308, r15307, MPFR_RNDN);
        mpfr_add(r15309, r15308, r15303, MPFR_RNDN);
        mpfr_mul(r15310, r15302, r15309, MPFR_RNDN);
        mpfr_sqrt(r15311, r15310, MPFR_RNDN);
        mpfr_mul(r15312, r15301, r15311, MPFR_RNDN);
        return mpfr_get_d(r15312, MPFR_RNDN);
}

static mpfr_t r15313, r15314, r15315, r15316, r15317, r15318, r15319, r15320, r15321, r15322, r15323, r15324, r15325, r15326, r15327, r15328, r15329, r15330, r15331, r15332, r15333, r15334;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r15313);
        mpfr_init_set_str(r15314, "5.745475187433076e-281", 10, MPFR_RNDN);
        mpfr_init(r15315);
        mpfr_init_set_str(r15316, "0.5", 10, MPFR_RNDN);
        mpfr_init_set_str(r15317, "2.0", 10, MPFR_RNDN);
        mpfr_init_set_str(r15318, "-1", 10, MPFR_RNDN);
        mpfr_init(r15319);
        mpfr_init(r15320);
        mpfr_init(r15321);
        mpfr_init(r15322);
        mpfr_init(r15323);
        mpfr_init(r15324);
        mpfr_init(r15325);
        mpfr_init(r15326);
        mpfr_init(r15327);
        mpfr_init(r15328);
        mpfr_init(r15329);
        mpfr_init(r15330);
        mpfr_init(r15331);
        mpfr_init(r15332);
        mpfr_init(r15333);
        mpfr_init(r15334);
}

double f_fm(double re, double im) {
        mpfr_set_d(r15313, re, MPFR_RNDN);
        ;
        mpfr_set_si(r15315, mpfr_cmp(r15313, r15314) <= 0, MPFR_RNDN);
        ;
        ;
        ;
        mpfr_mul(r15319, r15318, r15313, MPFR_RNDN);
        mpfr_add(r15320, r15319, r15313, MPFR_RNDN);
        mpfr_mul(r15321, r15317, r15320, MPFR_RNDN);
        mpfr_sqrt(r15322, r15321, MPFR_RNDN);
        mpfr_mul(r15323, r15316, r15322, MPFR_RNDN);
        mpfr_set_d(r15324, im, MPFR_RNDN);
        mpfr_add(r15325, r15313, r15324, MPFR_RNDN);
        mpfr_sqrt(r15326, r15325, MPFR_RNDN);
        mpfr_sub(r15327, r15313, r15324, MPFR_RNDN);
        mpfr_sqrt(r15328, r15327, MPFR_RNDN);
        mpfr_mul(r15329, r15326, r15328, MPFR_RNDN);
        mpfr_add(r15330, r15329, r15313, MPFR_RNDN);
        mpfr_mul(r15331, r15317, r15330, MPFR_RNDN);
        mpfr_sqrt(r15332, r15331, MPFR_RNDN);
        mpfr_mul(r15333, r15316, r15332, MPFR_RNDN);
        if (mpfr_get_si(r15315, MPFR_RNDN)) { mpfr_set(r15334, r15323, MPFR_RNDN); } else { mpfr_set(r15334, r15333, MPFR_RNDN); };
        return mpfr_get_d(r15334, MPFR_RNDN);
}

static mpfr_t r15335, r15336, r15337, r15338, r15339, r15340, r15341, r15342, r15343, r15344, r15345, r15346, r15347, r15348, r15349, r15350, r15351, r15352, r15353, r15354, r15355, r15356;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r15335);
        mpfr_init_set_str(r15336, "5.745475187433076e-281", 10, MPFR_RNDN);
        mpfr_init(r15337);
        mpfr_init_set_str(r15338, "0.5", 10, MPFR_RNDN);
        mpfr_init_set_str(r15339, "2.0", 10, MPFR_RNDN);
        mpfr_init_set_str(r15340, "-1", 10, MPFR_RNDN);
        mpfr_init(r15341);
        mpfr_init(r15342);
        mpfr_init(r15343);
        mpfr_init(r15344);
        mpfr_init(r15345);
        mpfr_init(r15346);
        mpfr_init(r15347);
        mpfr_init(r15348);
        mpfr_init(r15349);
        mpfr_init(r15350);
        mpfr_init(r15351);
        mpfr_init(r15352);
        mpfr_init(r15353);
        mpfr_init(r15354);
        mpfr_init(r15355);
        mpfr_init(r15356);
}

double f_dm(double re, double im) {
        mpfr_set_d(r15335, re, MPFR_RNDN);
        ;
        mpfr_set_si(r15337, mpfr_cmp(r15335, r15336) <= 0, MPFR_RNDN);
        ;
        ;
        ;
        mpfr_mul(r15341, r15340, r15335, MPFR_RNDN);
        mpfr_add(r15342, r15341, r15335, MPFR_RNDN);
        mpfr_mul(r15343, r15339, r15342, MPFR_RNDN);
        mpfr_sqrt(r15344, r15343, MPFR_RNDN);
        mpfr_mul(r15345, r15338, r15344, MPFR_RNDN);
        mpfr_set_d(r15346, im, MPFR_RNDN);
        mpfr_add(r15347, r15335, r15346, MPFR_RNDN);
        mpfr_sqrt(r15348, r15347, MPFR_RNDN);
        mpfr_sub(r15349, r15335, r15346, MPFR_RNDN);
        mpfr_sqrt(r15350, r15349, MPFR_RNDN);
        mpfr_mul(r15351, r15348, r15350, MPFR_RNDN);
        mpfr_add(r15352, r15351, r15335, MPFR_RNDN);
        mpfr_mul(r15353, r15339, r15352, MPFR_RNDN);
        mpfr_sqrt(r15354, r15353, MPFR_RNDN);
        mpfr_mul(r15355, r15338, r15354, MPFR_RNDN);
        if (mpfr_get_si(r15337, MPFR_RNDN)) { mpfr_set(r15356, r15345, MPFR_RNDN); } else { mpfr_set(r15356, r15355, MPFR_RNDN); };
        return mpfr_get_d(r15356, MPFR_RNDN);
}