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

char *name = "math.sqrt on complex, real part";

double f_if(float re, float im) {
        float r26104 = 0.5;
        float r26105 = 2.0;
        float r26106 = re;
        float r26107 = r26106 * r26106;
        float r26108 = im;
        float r26109 = r26108 * r26108;
        float r26110 = r26107 + r26109;
        float r26111 = sqrt(r26110);
        float r26112 = r26111 + r26106;
        float r26113 = r26105 * r26112;
        float r26114 = sqrt(r26113);
        float r26115 = r26104 * r26114;
        return r26115;
}

double f_id(double re, double im) {
        double r26116 = 0.5;
        double r26117 = 2.0;
        double r26118 = re;
        double r26119 = r26118 * r26118;
        double r26120 = im;
        double r26121 = r26120 * r26120;
        double r26122 = r26119 + r26121;
        double r26123 = sqrt(r26122);
        double r26124 = r26123 + r26118;
        double r26125 = r26117 * r26124;
        double r26126 = sqrt(r26125);
        double r26127 = r26116 * r26126;
        return r26127;
}


double f_of(float re, float im) {
        float r26128 = 0.5;
        float r26129 = re;
        float r26130 = im;
        float r26131 = hypot(r26129, r26130);
        float r26132 = 2.0;
        float r26133 = r26129 * r26132;
        float r26134 = fma(r26131, r26132, r26133);
        float r26135 = sqrt(r26134);
        float r26136 = r26128 * r26135;
        return r26136;
}

double f_od(double re, double im) {
        double r26137 = 0.5;
        double r26138 = re;
        double r26139 = im;
        double r26140 = hypot(r26138, r26139);
        double r26141 = 2.0;
        double r26142 = r26138 * r26141;
        double r26143 = fma(r26140, r26141, r26142);
        double r26144 = sqrt(r26143);
        double r26145 = r26137 * r26144;
        return r26145;
}

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 r26146, r26147, r26148, r26149, r26150, r26151, r26152, r26153, r26154, r26155, r26156, r26157;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(3408);
        mpfr_init_set_str(r26146, "0.5", 10, MPFR_RNDN);
        mpfr_init_set_str(r26147, "2.0", 10, MPFR_RNDN);
        mpfr_init(r26148);
        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);
}

double f_im(double re, double im) {
        ;
        ;
        mpfr_set_d(r26148, re, MPFR_RNDN);
        mpfr_mul(r26149, r26148, r26148, MPFR_RNDN);
        mpfr_set_d(r26150, im, MPFR_RNDN);
        mpfr_mul(r26151, r26150, r26150, MPFR_RNDN);
        mpfr_add(r26152, r26149, r26151, MPFR_RNDN);
        mpfr_sqrt(r26153, r26152, MPFR_RNDN);
        mpfr_add(r26154, r26153, r26148, MPFR_RNDN);
        mpfr_mul(r26155, r26147, r26154, MPFR_RNDN);
        mpfr_sqrt(r26156, r26155, MPFR_RNDN);
        mpfr_mul(r26157, r26146, r26156, MPFR_RNDN);
        return mpfr_get_d(r26157, MPFR_RNDN);
}

static mpfr_t r26158, r26159, r26160, r26161, r26162, r26163, r26164, r26165, r26166;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(3408);
        mpfr_init_set_str(r26158, "0.5", 10, MPFR_RNDN);
        mpfr_init(r26159);
        mpfr_init(r26160);
        mpfr_init(r26161);
        mpfr_init_set_str(r26162, "2.0", 10, MPFR_RNDN);
        mpfr_init(r26163);
        mpfr_init(r26164);
        mpfr_init(r26165);
        mpfr_init(r26166);
}

double f_fm(double re, double im) {
        ;
        mpfr_set_d(r26159, re, MPFR_RNDN);
        mpfr_set_d(r26160, im, MPFR_RNDN);
        mpfr_hypot(r26161, r26159, r26160, MPFR_RNDN);
        ;
        mpfr_mul(r26163, r26159, r26162, MPFR_RNDN);
        mpfr_fma(r26164, r26161, r26162, r26163, MPFR_RNDN);
        mpfr_sqrt(r26165, r26164, MPFR_RNDN);
        mpfr_mul(r26166, r26158, r26165, MPFR_RNDN);
        return mpfr_get_d(r26166, MPFR_RNDN);
}

static mpfr_t r26167, r26168, r26169, r26170, r26171, r26172, r26173, r26174, r26175;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(3408);
        mpfr_init_set_str(r26167, "0.5", 10, MPFR_RNDN);
        mpfr_init(r26168);
        mpfr_init(r26169);
        mpfr_init(r26170);
        mpfr_init_set_str(r26171, "2.0", 10, MPFR_RNDN);
        mpfr_init(r26172);
        mpfr_init(r26173);
        mpfr_init(r26174);
        mpfr_init(r26175);
}

double f_dm(double re, double im) {
        ;
        mpfr_set_d(r26168, re, MPFR_RNDN);
        mpfr_set_d(r26169, im, MPFR_RNDN);
        mpfr_hypot(r26170, r26168, r26169, MPFR_RNDN);
        ;
        mpfr_mul(r26172, r26168, r26171, MPFR_RNDN);
        mpfr_fma(r26173, r26170, r26171, r26172, MPFR_RNDN);
        mpfr_sqrt(r26174, r26173, MPFR_RNDN);
        mpfr_mul(r26175, r26167, r26174, MPFR_RNDN);
        return mpfr_get_d(r26175, MPFR_RNDN);
}