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

char *name = "math.log/1 on complex, real part";

double f_if(float re, float im) {
        float r20829 = re;
        float r20830 = r20829 * r20829;
        float r20831 = im;
        float r20832 = r20831 * r20831;
        float r20833 = r20830 + r20832;
        float r20834 = sqrt(r20833);
        float r20835 = log(r20834);
        return r20835;
}

double f_id(double re, double im) {
        double r20836 = re;
        double r20837 = r20836 * r20836;
        double r20838 = im;
        double r20839 = r20838 * r20838;
        double r20840 = r20837 + r20839;
        double r20841 = sqrt(r20840);
        double r20842 = log(r20841);
        return r20842;
}


double f_of(float re, float im) {
        float r20843 = re;
        float r20844 = -2.5444508077594253e+135;
        bool r20845 = r20843 <= r20844;
        float r20846 = -r20843;
        float r20847 = log(r20846);
        float r20848 = -1.6471939554857127e-238;
        bool r20849 = r20843 <= r20848;
        float r20850 = r20843 * r20843;
        float r20851 = im;
        float r20852 = r20851 * r20851;
        float r20853 = r20850 + r20852;
        float r20854 = sqrt(r20853);
        float r20855 = log(r20854);
        float r20856 = 1.3032773090778938e-265;
        bool r20857 = r20843 <= r20856;
        float r20858 = log(r20851);
        float r20859 = 3.4177957375684004e+77;
        bool r20860 = r20843 <= r20859;
        float r20861 = log(r20843);
        float r20862 = r20860 ? r20855 : r20861;
        float r20863 = r20857 ? r20858 : r20862;
        float r20864 = r20849 ? r20855 : r20863;
        float r20865 = r20845 ? r20847 : r20864;
        return r20865;
}

double f_od(double re, double im) {
        double r20866 = re;
        double r20867 = -2.5444508077594253e+135;
        bool r20868 = r20866 <= r20867;
        double r20869 = -r20866;
        double r20870 = log(r20869);
        double r20871 = -1.6471939554857127e-238;
        bool r20872 = r20866 <= r20871;
        double r20873 = r20866 * r20866;
        double r20874 = im;
        double r20875 = r20874 * r20874;
        double r20876 = r20873 + r20875;
        double r20877 = sqrt(r20876);
        double r20878 = log(r20877);
        double r20879 = 1.3032773090778938e-265;
        bool r20880 = r20866 <= r20879;
        double r20881 = log(r20874);
        double r20882 = 3.4177957375684004e+77;
        bool r20883 = r20866 <= r20882;
        double r20884 = log(r20866);
        double r20885 = r20883 ? r20878 : r20884;
        double r20886 = r20880 ? r20881 : r20885;
        double r20887 = r20872 ? r20878 : r20886;
        double r20888 = r20868 ? r20870 : r20887;
        return r20888;
}

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 r20889, r20890, r20891, r20892, r20893, r20894, r20895;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r20889);
        mpfr_init(r20890);
        mpfr_init(r20891);
        mpfr_init(r20892);
        mpfr_init(r20893);
        mpfr_init(r20894);
        mpfr_init(r20895);
}

double f_im(double re, double im) {
        mpfr_set_d(r20889, re, MPFR_RNDN);
        mpfr_mul(r20890, r20889, r20889, MPFR_RNDN);
        mpfr_set_d(r20891, im, MPFR_RNDN);
        mpfr_mul(r20892, r20891, r20891, MPFR_RNDN);
        mpfr_add(r20893, r20890, r20892, MPFR_RNDN);
        mpfr_sqrt(r20894, r20893, MPFR_RNDN);
        mpfr_log(r20895, r20894, MPFR_RNDN);
        return mpfr_get_d(r20895, MPFR_RNDN);
}

static mpfr_t r20896, r20897, r20898, r20899, r20900, r20901, r20902, r20903, r20904, r20905, r20906, r20907, r20908, r20909, r20910, r20911, r20912, r20913, r20914, r20915, r20916, r20917, r20918;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r20896);
        mpfr_init_set_str(r20897, "-2.5444508077594253e+135", 10, MPFR_RNDN);
        mpfr_init(r20898);
        mpfr_init(r20899);
        mpfr_init(r20900);
        mpfr_init_set_str(r20901, "-1.6471939554857127e-238", 10, MPFR_RNDN);
        mpfr_init(r20902);
        mpfr_init(r20903);
        mpfr_init(r20904);
        mpfr_init(r20905);
        mpfr_init(r20906);
        mpfr_init(r20907);
        mpfr_init(r20908);
        mpfr_init_set_str(r20909, "1.3032773090778938e-265", 10, MPFR_RNDN);
        mpfr_init(r20910);
        mpfr_init(r20911);
        mpfr_init_set_str(r20912, "3.4177957375684004e+77", 10, MPFR_RNDN);
        mpfr_init(r20913);
        mpfr_init(r20914);
        mpfr_init(r20915);
        mpfr_init(r20916);
        mpfr_init(r20917);
        mpfr_init(r20918);
}

double f_fm(double re, double im) {
        mpfr_set_d(r20896, re, MPFR_RNDN);
        ;
        mpfr_set_si(r20898, mpfr_cmp(r20896, r20897) <= 0, MPFR_RNDN);
        mpfr_neg(r20899, r20896, MPFR_RNDN);
        mpfr_log(r20900, r20899, MPFR_RNDN);
        ;
        mpfr_set_si(r20902, mpfr_cmp(r20896, r20901) <= 0, MPFR_RNDN);
        mpfr_mul(r20903, r20896, r20896, MPFR_RNDN);
        mpfr_set_d(r20904, im, MPFR_RNDN);
        mpfr_mul(r20905, r20904, r20904, MPFR_RNDN);
        mpfr_add(r20906, r20903, r20905, MPFR_RNDN);
        mpfr_sqrt(r20907, r20906, MPFR_RNDN);
        mpfr_log(r20908, r20907, MPFR_RNDN);
        ;
        mpfr_set_si(r20910, mpfr_cmp(r20896, r20909) <= 0, MPFR_RNDN);
        mpfr_log(r20911, r20904, MPFR_RNDN);
        ;
        mpfr_set_si(r20913, mpfr_cmp(r20896, r20912) <= 0, MPFR_RNDN);
        mpfr_log(r20914, r20896, MPFR_RNDN);
        if (mpfr_get_si(r20913, MPFR_RNDN)) { mpfr_set(r20915, r20908, MPFR_RNDN); } else { mpfr_set(r20915, r20914, MPFR_RNDN); };
        if (mpfr_get_si(r20910, MPFR_RNDN)) { mpfr_set(r20916, r20911, MPFR_RNDN); } else { mpfr_set(r20916, r20915, MPFR_RNDN); };
        if (mpfr_get_si(r20902, MPFR_RNDN)) { mpfr_set(r20917, r20908, MPFR_RNDN); } else { mpfr_set(r20917, r20916, MPFR_RNDN); };
        if (mpfr_get_si(r20898, MPFR_RNDN)) { mpfr_set(r20918, r20900, MPFR_RNDN); } else { mpfr_set(r20918, r20917, MPFR_RNDN); };
        return mpfr_get_d(r20918, MPFR_RNDN);
}

static mpfr_t r20919, r20920, r20921, r20922, r20923, r20924, r20925, r20926, r20927, r20928, r20929, r20930, r20931, r20932, r20933, r20934, r20935, r20936, r20937, r20938, r20939, r20940, r20941;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r20919);
        mpfr_init_set_str(r20920, "-2.5444508077594253e+135", 10, MPFR_RNDN);
        mpfr_init(r20921);
        mpfr_init(r20922);
        mpfr_init(r20923);
        mpfr_init_set_str(r20924, "-1.6471939554857127e-238", 10, MPFR_RNDN);
        mpfr_init(r20925);
        mpfr_init(r20926);
        mpfr_init(r20927);
        mpfr_init(r20928);
        mpfr_init(r20929);
        mpfr_init(r20930);
        mpfr_init(r20931);
        mpfr_init_set_str(r20932, "1.3032773090778938e-265", 10, MPFR_RNDN);
        mpfr_init(r20933);
        mpfr_init(r20934);
        mpfr_init_set_str(r20935, "3.4177957375684004e+77", 10, MPFR_RNDN);
        mpfr_init(r20936);
        mpfr_init(r20937);
        mpfr_init(r20938);
        mpfr_init(r20939);
        mpfr_init(r20940);
        mpfr_init(r20941);
}

double f_dm(double re, double im) {
        mpfr_set_d(r20919, re, MPFR_RNDN);
        ;
        mpfr_set_si(r20921, mpfr_cmp(r20919, r20920) <= 0, MPFR_RNDN);
        mpfr_neg(r20922, r20919, MPFR_RNDN);
        mpfr_log(r20923, r20922, MPFR_RNDN);
        ;
        mpfr_set_si(r20925, mpfr_cmp(r20919, r20924) <= 0, MPFR_RNDN);
        mpfr_mul(r20926, r20919, r20919, MPFR_RNDN);
        mpfr_set_d(r20927, im, MPFR_RNDN);
        mpfr_mul(r20928, r20927, r20927, MPFR_RNDN);
        mpfr_add(r20929, r20926, r20928, MPFR_RNDN);
        mpfr_sqrt(r20930, r20929, MPFR_RNDN);
        mpfr_log(r20931, r20930, MPFR_RNDN);
        ;
        mpfr_set_si(r20933, mpfr_cmp(r20919, r20932) <= 0, MPFR_RNDN);
        mpfr_log(r20934, r20927, MPFR_RNDN);
        ;
        mpfr_set_si(r20936, mpfr_cmp(r20919, r20935) <= 0, MPFR_RNDN);
        mpfr_log(r20937, r20919, MPFR_RNDN);
        if (mpfr_get_si(r20936, MPFR_RNDN)) { mpfr_set(r20938, r20931, MPFR_RNDN); } else { mpfr_set(r20938, r20937, MPFR_RNDN); };
        if (mpfr_get_si(r20933, MPFR_RNDN)) { mpfr_set(r20939, r20934, MPFR_RNDN); } else { mpfr_set(r20939, r20938, MPFR_RNDN); };
        if (mpfr_get_si(r20925, MPFR_RNDN)) { mpfr_set(r20940, r20931, MPFR_RNDN); } else { mpfr_set(r20940, r20939, MPFR_RNDN); };
        if (mpfr_get_si(r20921, MPFR_RNDN)) { mpfr_set(r20941, r20923, MPFR_RNDN); } else { mpfr_set(r20941, r20940, MPFR_RNDN); };
        return mpfr_get_d(r20941, MPFR_RNDN);
}