#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 r20113 = 0.5;
        float r20114 = 2.0;
        float r20115 = re;
        float r20116 = r20115 * r20115;
        float r20117 = im;
        float r20118 = r20117 * r20117;
        float r20119 = r20116 - r20118;
        float r20120 = sqrt(r20119);
        float r20121 = r20120 + r20115;
        float r20122 = r20114 * r20121;
        float r20123 = sqrt(r20122);
        float r20124 = r20113 * r20123;
        return r20124;
}

double f_id(double re, double im) {
        double r20125 = 0.5;
        double r20126 = 2.0;
        double r20127 = re;
        double r20128 = r20127 * r20127;
        double r20129 = im;
        double r20130 = r20129 * r20129;
        double r20131 = r20128 - r20130;
        double r20132 = sqrt(r20131);
        double r20133 = r20132 + r20127;
        double r20134 = r20126 * r20133;
        double r20135 = sqrt(r20134);
        double r20136 = r20125 * r20135;
        return r20136;
}


double f_of(float re, float im) {
        float r20137 = 0.5;
        float r20138 = 2.0;
        float r20139 = re;
        float r20140 = im;
        float r20141 = r20139 + r20140;
        float r20142 = sqrt(r20141);
        float r20143 = r20139 - r20140;
        float r20144 = sqrt(r20143);
        float r20145 = r20142 * r20144;
        float r20146 = r20145 + r20139;
        float r20147 = r20138 * r20146;
        float r20148 = sqrt(r20147);
        float r20149 = r20137 * r20148;
        return r20149;
}

double f_od(double re, double im) {
        double r20150 = 0.5;
        double r20151 = 2.0;
        double r20152 = re;
        double r20153 = im;
        double r20154 = r20152 + r20153;
        double r20155 = sqrt(r20154);
        double r20156 = r20152 - r20153;
        double r20157 = sqrt(r20156);
        double r20158 = r20155 * r20157;
        double r20159 = r20158 + r20152;
        double r20160 = r20151 * r20159;
        double r20161 = sqrt(r20160);
        double r20162 = r20150 * r20161;
        return r20162;
}

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 r20163, r20164, r20165, r20166, r20167, r20168, r20169, r20170, r20171, r20172, r20173, r20174;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(4496);
        mpfr_init_set_str(r20163, "0.5", 10, MPFR_RNDN);
        mpfr_init_set_str(r20164, "2.0", 10, MPFR_RNDN);
        mpfr_init(r20165);
        mpfr_init(r20166);
        mpfr_init(r20167);
        mpfr_init(r20168);
        mpfr_init(r20169);
        mpfr_init(r20170);
        mpfr_init(r20171);
        mpfr_init(r20172);
        mpfr_init(r20173);
        mpfr_init(r20174);
}

double f_im(double re, double im) {
        ;
        ;
        mpfr_set_d(r20165, re, MPFR_RNDN);
        mpfr_mul(r20166, r20165, r20165, MPFR_RNDN);
        mpfr_set_d(r20167, im, MPFR_RNDN);
        mpfr_mul(r20168, r20167, r20167, MPFR_RNDN);
        mpfr_sub(r20169, r20166, r20168, MPFR_RNDN);
        mpfr_sqrt(r20170, r20169, MPFR_RNDN);
        mpfr_add(r20171, r20170, r20165, MPFR_RNDN);
        mpfr_mul(r20172, r20164, r20171, MPFR_RNDN);
        mpfr_sqrt(r20173, r20172, MPFR_RNDN);
        mpfr_mul(r20174, r20163, r20173, MPFR_RNDN);
        return mpfr_get_d(r20174, MPFR_RNDN);
}

static mpfr_t r20175, r20176, r20177, r20178, r20179, r20180, r20181, r20182, r20183, r20184, r20185, r20186, r20187;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(4496);
        mpfr_init_set_str(r20175, "0.5", 10, MPFR_RNDN);
        mpfr_init_set_str(r20176, "2.0", 10, MPFR_RNDN);
        mpfr_init(r20177);
        mpfr_init(r20178);
        mpfr_init(r20179);
        mpfr_init(r20180);
        mpfr_init(r20181);
        mpfr_init(r20182);
        mpfr_init(r20183);
        mpfr_init(r20184);
        mpfr_init(r20185);
        mpfr_init(r20186);
        mpfr_init(r20187);
}

double f_fm(double re, double im) {
        ;
        ;
        mpfr_set_d(r20177, re, MPFR_RNDN);
        mpfr_set_d(r20178, im, MPFR_RNDN);
        mpfr_add(r20179, r20177, r20178, MPFR_RNDN);
        mpfr_sqrt(r20180, r20179, MPFR_RNDN);
        mpfr_sub(r20181, r20177, r20178, MPFR_RNDN);
        mpfr_sqrt(r20182, r20181, MPFR_RNDN);
        mpfr_mul(r20183, r20180, r20182, MPFR_RNDN);
        mpfr_add(r20184, r20183, r20177, MPFR_RNDN);
        mpfr_mul(r20185, r20176, r20184, MPFR_RNDN);
        mpfr_sqrt(r20186, r20185, MPFR_RNDN);
        mpfr_mul(r20187, r20175, r20186, MPFR_RNDN);
        return mpfr_get_d(r20187, MPFR_RNDN);
}

static mpfr_t r20188, r20189, r20190, r20191, r20192, r20193, r20194, r20195, r20196, r20197, r20198, r20199, r20200;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(4496);
        mpfr_init_set_str(r20188, "0.5", 10, MPFR_RNDN);
        mpfr_init_set_str(r20189, "2.0", 10, MPFR_RNDN);
        mpfr_init(r20190);
        mpfr_init(r20191);
        mpfr_init(r20192);
        mpfr_init(r20193);
        mpfr_init(r20194);
        mpfr_init(r20195);
        mpfr_init(r20196);
        mpfr_init(r20197);
        mpfr_init(r20198);
        mpfr_init(r20199);
        mpfr_init(r20200);
}

double f_dm(double re, double im) {
        ;
        ;
        mpfr_set_d(r20190, re, MPFR_RNDN);
        mpfr_set_d(r20191, im, MPFR_RNDN);
        mpfr_add(r20192, r20190, r20191, MPFR_RNDN);
        mpfr_sqrt(r20193, r20192, MPFR_RNDN);
        mpfr_sub(r20194, r20190, r20191, MPFR_RNDN);
        mpfr_sqrt(r20195, r20194, MPFR_RNDN);
        mpfr_mul(r20196, r20193, r20195, MPFR_RNDN);
        mpfr_add(r20197, r20196, r20190, MPFR_RNDN);
        mpfr_mul(r20198, r20189, r20197, MPFR_RNDN);
        mpfr_sqrt(r20199, r20198, MPFR_RNDN);
        mpfr_mul(r20200, r20188, r20199, MPFR_RNDN);
        return mpfr_get_d(r20200, MPFR_RNDN);
}