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

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

double f_if(float re, float im) {
        float r21068 = re;
        float r21069 = r21068 * r21068;
        float r21070 = im;
        float r21071 = r21070 * r21070;
        float r21072 = r21069 + r21071;
        float r21073 = sqrt(r21072);
        float r21074 = log(r21073);
        float r21075 = 10;
        float r21076 = log(r21075);
        float r21077 = r21074 / r21076;
        return r21077;
}

double f_id(double re, double im) {
        double r21078 = re;
        double r21079 = r21078 * r21078;
        double r21080 = im;
        double r21081 = r21080 * r21080;
        double r21082 = r21079 + r21081;
        double r21083 = sqrt(r21082);
        double r21084 = log(r21083);
        double r21085 = 10;
        double r21086 = log(r21085);
        double r21087 = r21084 / r21086;
        return r21087;
}


double f_of(float re, float im) {
        float r21088 = re;
        float r21089 = -3.2564584289677175e+97;
        bool r21090 = r21088 <= r21089;
        float r21091 = -r21088;
        float r21092 = log(r21091);
        float r21093 = 10;
        float r21094 = log(r21093);
        float r21095 = r21092 / r21094;
        float r21096 = 2.447855958190132e-195;
        bool r21097 = r21088 <= r21096;
        float r21098 = 1/2;
        float r21099 = sqrt(r21094);
        float r21100 = r21098 / r21099;
        float r21101 = r21088 * r21088;
        float r21102 = im;
        float r21103 = r21102 * r21102;
        float r21104 = r21101 + r21103;
        float r21105 = log(r21104);
        float r21106 = 1;
        float r21107 = r21106 / r21099;
        float r21108 = r21105 * r21107;
        float r21109 = r21100 * r21108;
        float r21110 = 1.539380988490176e-178;
        bool r21111 = r21088 <= r21110;
        float r21112 = log(r21088);
        float r21113 = r21112 / r21094;
        float r21114 = 323298652673.5006;
        bool r21115 = r21088 <= r21114;
        float r21116 = r21115 ? r21109 : r21113;
        float r21117 = r21111 ? r21113 : r21116;
        float r21118 = r21097 ? r21109 : r21117;
        float r21119 = r21090 ? r21095 : r21118;
        return r21119;
}

double f_od(double re, double im) {
        double r21120 = re;
        double r21121 = -3.2564584289677175e+97;
        bool r21122 = r21120 <= r21121;
        double r21123 = -r21120;
        double r21124 = log(r21123);
        double r21125 = 10;
        double r21126 = log(r21125);
        double r21127 = r21124 / r21126;
        double r21128 = 2.447855958190132e-195;
        bool r21129 = r21120 <= r21128;
        double r21130 = 1/2;
        double r21131 = sqrt(r21126);
        double r21132 = r21130 / r21131;
        double r21133 = r21120 * r21120;
        double r21134 = im;
        double r21135 = r21134 * r21134;
        double r21136 = r21133 + r21135;
        double r21137 = log(r21136);
        double r21138 = 1;
        double r21139 = r21138 / r21131;
        double r21140 = r21137 * r21139;
        double r21141 = r21132 * r21140;
        double r21142 = 1.539380988490176e-178;
        bool r21143 = r21120 <= r21142;
        double r21144 = log(r21120);
        double r21145 = r21144 / r21126;
        double r21146 = 323298652673.5006;
        bool r21147 = r21120 <= r21146;
        double r21148 = r21147 ? r21141 : r21145;
        double r21149 = r21143 ? r21145 : r21148;
        double r21150 = r21129 ? r21141 : r21149;
        double r21151 = r21122 ? r21127 : r21150;
        return r21151;
}

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 r21152, r21153, r21154, r21155, r21156, r21157, r21158, r21159, r21160, r21161;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r21152);
        mpfr_init(r21153);
        mpfr_init(r21154);
        mpfr_init(r21155);
        mpfr_init(r21156);
        mpfr_init(r21157);
        mpfr_init(r21158);
        mpfr_init_set_str(r21159, "10", 10, MPFR_RNDN);
        mpfr_init(r21160);
        mpfr_init(r21161);
}

double f_im(double re, double im) {
        mpfr_set_d(r21152, re, MPFR_RNDN);
        mpfr_mul(r21153, r21152, r21152, MPFR_RNDN);
        mpfr_set_d(r21154, im, MPFR_RNDN);
        mpfr_mul(r21155, r21154, r21154, MPFR_RNDN);
        mpfr_add(r21156, r21153, r21155, MPFR_RNDN);
        mpfr_sqrt(r21157, r21156, MPFR_RNDN);
        mpfr_log(r21158, r21157, MPFR_RNDN);
        ;
        mpfr_log(r21160, r21159, MPFR_RNDN);
        mpfr_div(r21161, r21158, r21160, MPFR_RNDN);
        return mpfr_get_d(r21161, MPFR_RNDN);
}

static mpfr_t r21162, r21163, r21164, r21165, r21166, r21167, r21168, r21169, r21170, r21171, r21172, r21173, r21174, r21175, r21176, r21177, r21178, r21179, r21180, r21181, r21182, r21183, r21184, r21185, r21186, r21187, r21188, r21189, r21190, r21191, r21192, r21193;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r21162);
        mpfr_init_set_str(r21163, "-3.2564584289677175e+97", 10, MPFR_RNDN);
        mpfr_init(r21164);
        mpfr_init(r21165);
        mpfr_init(r21166);
        mpfr_init_set_str(r21167, "10", 10, MPFR_RNDN);
        mpfr_init(r21168);
        mpfr_init(r21169);
        mpfr_init_set_str(r21170, "2.447855958190132e-195", 10, MPFR_RNDN);
        mpfr_init(r21171);
        mpfr_init_set_str(r21172, "1/2", 10, MPFR_RNDN);
        mpfr_init(r21173);
        mpfr_init(r21174);
        mpfr_init(r21175);
        mpfr_init(r21176);
        mpfr_init(r21177);
        mpfr_init(r21178);
        mpfr_init(r21179);
        mpfr_init_set_str(r21180, "1", 10, MPFR_RNDN);
        mpfr_init(r21181);
        mpfr_init(r21182);
        mpfr_init(r21183);
        mpfr_init_set_str(r21184, "1.539380988490176e-178", 10, MPFR_RNDN);
        mpfr_init(r21185);
        mpfr_init(r21186);
        mpfr_init(r21187);
        mpfr_init_set_str(r21188, "323298652673.5006", 10, MPFR_RNDN);
        mpfr_init(r21189);
        mpfr_init(r21190);
        mpfr_init(r21191);
        mpfr_init(r21192);
        mpfr_init(r21193);
}

double f_fm(double re, double im) {
        mpfr_set_d(r21162, re, MPFR_RNDN);
        ;
        mpfr_set_si(r21164, mpfr_cmp(r21162, r21163) <= 0, MPFR_RNDN);
        mpfr_neg(r21165, r21162, MPFR_RNDN);
        mpfr_log(r21166, r21165, MPFR_RNDN);
        ;
        mpfr_log(r21168, r21167, MPFR_RNDN);
        mpfr_div(r21169, r21166, r21168, MPFR_RNDN);
        ;
        mpfr_set_si(r21171, mpfr_cmp(r21162, r21170) <= 0, MPFR_RNDN);
        ;
        mpfr_sqrt(r21173, r21168, MPFR_RNDN);
        mpfr_div(r21174, r21172, r21173, MPFR_RNDN);
        mpfr_mul(r21175, r21162, r21162, MPFR_RNDN);
        mpfr_set_d(r21176, im, MPFR_RNDN);
        mpfr_mul(r21177, r21176, r21176, MPFR_RNDN);
        mpfr_add(r21178, r21175, r21177, MPFR_RNDN);
        mpfr_log(r21179, r21178, MPFR_RNDN);
        ;
        mpfr_div(r21181, r21180, r21173, MPFR_RNDN);
        mpfr_mul(r21182, r21179, r21181, MPFR_RNDN);
        mpfr_mul(r21183, r21174, r21182, MPFR_RNDN);
        ;
        mpfr_set_si(r21185, mpfr_cmp(r21162, r21184) <= 0, MPFR_RNDN);
        mpfr_log(r21186, r21162, MPFR_RNDN);
        mpfr_div(r21187, r21186, r21168, MPFR_RNDN);
        ;
        mpfr_set_si(r21189, mpfr_cmp(r21162, r21188) <= 0, MPFR_RNDN);
        if (mpfr_get_si(r21189, MPFR_RNDN)) { mpfr_set(r21190, r21183, MPFR_RNDN); } else { mpfr_set(r21190, r21187, MPFR_RNDN); };
        if (mpfr_get_si(r21185, MPFR_RNDN)) { mpfr_set(r21191, r21187, MPFR_RNDN); } else { mpfr_set(r21191, r21190, MPFR_RNDN); };
        if (mpfr_get_si(r21171, MPFR_RNDN)) { mpfr_set(r21192, r21183, MPFR_RNDN); } else { mpfr_set(r21192, r21191, MPFR_RNDN); };
        if (mpfr_get_si(r21164, MPFR_RNDN)) { mpfr_set(r21193, r21169, MPFR_RNDN); } else { mpfr_set(r21193, r21192, MPFR_RNDN); };
        return mpfr_get_d(r21193, MPFR_RNDN);
}

static mpfr_t r21194, r21195, r21196, r21197, r21198, r21199, r21200, r21201, r21202, r21203, r21204, r21205, r21206, r21207, r21208, r21209, r21210, r21211, r21212, r21213, r21214, r21215, r21216, r21217, r21218, r21219, r21220, r21221, r21222, r21223, r21224, r21225;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r21194);
        mpfr_init_set_str(r21195, "-3.2564584289677175e+97", 10, MPFR_RNDN);
        mpfr_init(r21196);
        mpfr_init(r21197);
        mpfr_init(r21198);
        mpfr_init_set_str(r21199, "10", 10, MPFR_RNDN);
        mpfr_init(r21200);
        mpfr_init(r21201);
        mpfr_init_set_str(r21202, "2.447855958190132e-195", 10, MPFR_RNDN);
        mpfr_init(r21203);
        mpfr_init_set_str(r21204, "1/2", 10, MPFR_RNDN);
        mpfr_init(r21205);
        mpfr_init(r21206);
        mpfr_init(r21207);
        mpfr_init(r21208);
        mpfr_init(r21209);
        mpfr_init(r21210);
        mpfr_init(r21211);
        mpfr_init_set_str(r21212, "1", 10, MPFR_RNDN);
        mpfr_init(r21213);
        mpfr_init(r21214);
        mpfr_init(r21215);
        mpfr_init_set_str(r21216, "1.539380988490176e-178", 10, MPFR_RNDN);
        mpfr_init(r21217);
        mpfr_init(r21218);
        mpfr_init(r21219);
        mpfr_init_set_str(r21220, "323298652673.5006", 10, MPFR_RNDN);
        mpfr_init(r21221);
        mpfr_init(r21222);
        mpfr_init(r21223);
        mpfr_init(r21224);
        mpfr_init(r21225);
}

double f_dm(double re, double im) {
        mpfr_set_d(r21194, re, MPFR_RNDN);
        ;
        mpfr_set_si(r21196, mpfr_cmp(r21194, r21195) <= 0, MPFR_RNDN);
        mpfr_neg(r21197, r21194, MPFR_RNDN);
        mpfr_log(r21198, r21197, MPFR_RNDN);
        ;
        mpfr_log(r21200, r21199, MPFR_RNDN);
        mpfr_div(r21201, r21198, r21200, MPFR_RNDN);
        ;
        mpfr_set_si(r21203, mpfr_cmp(r21194, r21202) <= 0, MPFR_RNDN);
        ;
        mpfr_sqrt(r21205, r21200, MPFR_RNDN);
        mpfr_div(r21206, r21204, r21205, MPFR_RNDN);
        mpfr_mul(r21207, r21194, r21194, MPFR_RNDN);
        mpfr_set_d(r21208, im, MPFR_RNDN);
        mpfr_mul(r21209, r21208, r21208, MPFR_RNDN);
        mpfr_add(r21210, r21207, r21209, MPFR_RNDN);
        mpfr_log(r21211, r21210, MPFR_RNDN);
        ;
        mpfr_div(r21213, r21212, r21205, MPFR_RNDN);
        mpfr_mul(r21214, r21211, r21213, MPFR_RNDN);
        mpfr_mul(r21215, r21206, r21214, MPFR_RNDN);
        ;
        mpfr_set_si(r21217, mpfr_cmp(r21194, r21216) <= 0, MPFR_RNDN);
        mpfr_log(r21218, r21194, MPFR_RNDN);
        mpfr_div(r21219, r21218, r21200, MPFR_RNDN);
        ;
        mpfr_set_si(r21221, mpfr_cmp(r21194, r21220) <= 0, MPFR_RNDN);
        if (mpfr_get_si(r21221, MPFR_RNDN)) { mpfr_set(r21222, r21215, MPFR_RNDN); } else { mpfr_set(r21222, r21219, MPFR_RNDN); };
        if (mpfr_get_si(r21217, MPFR_RNDN)) { mpfr_set(r21223, r21219, MPFR_RNDN); } else { mpfr_set(r21223, r21222, MPFR_RNDN); };
        if (mpfr_get_si(r21203, MPFR_RNDN)) { mpfr_set(r21224, r21215, MPFR_RNDN); } else { mpfr_set(r21224, r21223, MPFR_RNDN); };
        if (mpfr_get_si(r21196, MPFR_RNDN)) { mpfr_set(r21225, r21201, MPFR_RNDN); } else { mpfr_set(r21225, r21224, MPFR_RNDN); };
        return mpfr_get_d(r21225, MPFR_RNDN);
}

