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

char *name = "powComplex, imaginary part";

double f_if(float x_re, float x_im, float y_re, float y_im) {
        float r14860 = x_re;
        float r14861 = r14860 * r14860;
        float r14862 = x_im;
        float r14863 = r14862 * r14862;
        float r14864 = r14861 + r14863;
        float r14865 = sqrt(r14864);
        float r14866 = log(r14865);
        float r14867 = y_re;
        float r14868 = r14866 * r14867;
        float r14869 = atan2(r14862, r14860);
        float r14870 = y_im;
        float r14871 = r14869 * r14870;
        float r14872 = r14868 - r14871;
        float r14873 = exp(r14872);
        float r14874 = r14866 * r14870;
        float r14875 = r14869 * r14867;
        float r14876 = r14874 + r14875;
        float r14877 = sin(r14876);
        float r14878 = r14873 * r14877;
        return r14878;
}

double f_id(double x_re, double x_im, double y_re, double y_im) {
        double r14879 = x_re;
        double r14880 = r14879 * r14879;
        double r14881 = x_im;
        double r14882 = r14881 * r14881;
        double r14883 = r14880 + r14882;
        double r14884 = sqrt(r14883);
        double r14885 = log(r14884);
        double r14886 = y_re;
        double r14887 = r14885 * r14886;
        double r14888 = atan2(r14881, r14879);
        double r14889 = y_im;
        double r14890 = r14888 * r14889;
        double r14891 = r14887 - r14890;
        double r14892 = exp(r14891);
        double r14893 = r14885 * r14889;
        double r14894 = r14888 * r14886;
        double r14895 = r14893 + r14894;
        double r14896 = sin(r14895);
        double r14897 = r14892 * r14896;
        return r14897;
}


double f_of(float x_re, float x_im, float y_re, float y_im) {
        float r14898 = x_re;
        float r14899 = -519.4088134765625f;
        bool r14900 = r14898 <= r14899;
        float r14901 = y_re;
        float r14902 = x_im;
        float r14903 = atan2(r14902, r14898);
        float r14904 = r14901 * r14903;
        float r14905 = -r14898;
        float r14906 = log(r14905);
        float r14907 = y_im;
        float r14908 = r14906 * r14907;
        float r14909 = r14904 + r14908;
        float r14910 = sin(r14909);
        float r14911 = exp(r14907);
        float r14912 = pow(r14911, r14903);
        float r14913 = pow(r14905, r14901);
        float r14914 = r14912 / r14913;
        float r14915 = r14910 / r14914;
        float r14916 = 3755.294677734375f;
        bool r14917 = r14898 <= r14916;
        float r14918 = sin(r14904);
        float r14919 = r14898 * r14898;
        float r14920 = r14902 * r14902;
        float r14921 = r14919 + r14920;
        float r14922 = sqrt(r14921);
        float r14923 = log(r14922);
        float r14924 = r14923 * r14907;
        float r14925 = cos(r14924);
        float r14926 = r14918 * r14925;
        float r14927 = cos(r14904);
        float r14928 = sin(r14924);
        float r14929 = r14927 * r14928;
        float r14930 = r14926 + r14929;
        float r14931 = pow(r14922, r14901);
        float r14932 = r14912 / r14931;
        float r14933 = r14930 / r14932;
        float r14934 = log(r14898);
        float r14935 = r14907 * r14934;
        float r14936 = r14935 + r14904;
        float r14937 = sin(r14936);
        float r14938 = pow(r14898, r14901);
        float r14939 = r14912 / r14938;
        float r14940 = r14937 / r14939;
        float r14941 = r14917 ? r14933 : r14940;
        float r14942 = r14900 ? r14915 : r14941;
        return r14942;
}

double f_od(double x_re, double x_im, double y_re, double y_im) {
        double r14943 = x_re;
        double r14944 = -519.4088134765625;
        bool r14945 = r14943 <= r14944;
        double r14946 = y_re;
        double r14947 = x_im;
        double r14948 = atan2(r14947, r14943);
        double r14949 = r14946 * r14948;
        double r14950 = -r14943;
        double r14951 = log(r14950);
        double r14952 = y_im;
        double r14953 = r14951 * r14952;
        double r14954 = r14949 + r14953;
        double r14955 = sin(r14954);
        double r14956 = exp(r14952);
        double r14957 = pow(r14956, r14948);
        double r14958 = pow(r14950, r14946);
        double r14959 = r14957 / r14958;
        double r14960 = r14955 / r14959;
        double r14961 = 3755.294677734375;
        bool r14962 = r14943 <= r14961;
        double r14963 = sin(r14949);
        double r14964 = r14943 * r14943;
        double r14965 = r14947 * r14947;
        double r14966 = r14964 + r14965;
        double r14967 = sqrt(r14966);
        double r14968 = log(r14967);
        double r14969 = r14968 * r14952;
        double r14970 = cos(r14969);
        double r14971 = r14963 * r14970;
        double r14972 = cos(r14949);
        double r14973 = sin(r14969);
        double r14974 = r14972 * r14973;
        double r14975 = r14971 + r14974;
        double r14976 = pow(r14967, r14946);
        double r14977 = r14957 / r14976;
        double r14978 = r14975 / r14977;
        double r14979 = log(r14943);
        double r14980 = r14952 * r14979;
        double r14981 = r14980 + r14949;
        double r14982 = sin(r14981);
        double r14983 = pow(r14943, r14946);
        double r14984 = r14957 / r14983;
        double r14985 = r14982 / r14984;
        double r14986 = r14962 ? r14978 : r14985;
        double r14987 = r14945 ? r14960 : r14986;
        return r14987;
}

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 r14988, r14989, r14990, r14991, r14992, r14993, r14994, r14995, r14996, r14997, r14998, r14999, r15000, r15001, r15002, r15003, r15004, r15005, r15006;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init(r14988);
        mpfr_init(r14989);
        mpfr_init(r14990);
        mpfr_init(r14991);
        mpfr_init(r14992);
        mpfr_init(r14993);
        mpfr_init(r14994);
        mpfr_init(r14995);
        mpfr_init(r14996);
        mpfr_init(r14997);
        mpfr_init(r14998);
        mpfr_init(r14999);
        mpfr_init(r15000);
        mpfr_init(r15001);
        mpfr_init(r15002);
        mpfr_init(r15003);
        mpfr_init(r15004);
        mpfr_init(r15005);
        mpfr_init(r15006);
}

double f_im(double x_re, double x_im, double y_re, double y_im) {
        mpfr_set_d(r14988, x_re, MPFR_RNDN);
        mpfr_mul(r14989, r14988, r14988, MPFR_RNDN);
        mpfr_set_d(r14990, x_im, MPFR_RNDN);
        mpfr_mul(r14991, r14990, r14990, MPFR_RNDN);
        mpfr_add(r14992, r14989, r14991, MPFR_RNDN);
        mpfr_sqrt(r14993, r14992, MPFR_RNDN);
        mpfr_log(r14994, r14993, MPFR_RNDN);
        mpfr_set_d(r14995, y_re, MPFR_RNDN);
        mpfr_mul(r14996, r14994, r14995, MPFR_RNDN);
        mpfr_atan2(r14997, r14990, r14988, MPFR_RNDN);
        mpfr_set_d(r14998, y_im, MPFR_RNDN);
        mpfr_mul(r14999, r14997, r14998, MPFR_RNDN);
        mpfr_sub(r15000, r14996, r14999, MPFR_RNDN);
        mpfr_exp(r15001, r15000, MPFR_RNDN);
        mpfr_mul(r15002, r14994, r14998, MPFR_RNDN);
        mpfr_mul(r15003, r14997, r14995, MPFR_RNDN);
        mpfr_add(r15004, r15002, r15003, MPFR_RNDN);
        mpfr_sin(r15005, r15004, MPFR_RNDN);
        mpfr_mul(r15006, r15001, r15005, MPFR_RNDN);
        return mpfr_get_d(r15006, MPFR_RNDN);
}

static mpfr_t r15007, r15008, r15009, r15010, r15011, r15012, r15013, r15014, r15015, r15016, r15017, r15018, r15019, r15020, r15021, r15022, r15023, r15024, r15025, r15026, r15027, r15028, r15029, r15030, r15031, r15032, r15033, r15034, r15035, r15036, r15037, r15038, r15039, r15040, r15041, r15042, r15043, r15044, r15045, r15046, r15047, r15048, r15049, r15050, r15051;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r15007);
        mpfr_init_set_str(r15008, "-519.4088f0", 10, MPFR_RNDN);
        mpfr_init(r15009);
        mpfr_init(r15010);
        mpfr_init(r15011);
        mpfr_init(r15012);
        mpfr_init(r15013);
        mpfr_init(r15014);
        mpfr_init(r15015);
        mpfr_init(r15016);
        mpfr_init(r15017);
        mpfr_init(r15018);
        mpfr_init(r15019);
        mpfr_init(r15020);
        mpfr_init(r15021);
        mpfr_init(r15022);
        mpfr_init(r15023);
        mpfr_init(r15024);
        mpfr_init_set_str(r15025, "3755.2947f0", 10, MPFR_RNDN);
        mpfr_init(r15026);
        mpfr_init(r15027);
        mpfr_init(r15028);
        mpfr_init(r15029);
        mpfr_init(r15030);
        mpfr_init(r15031);
        mpfr_init(r15032);
        mpfr_init(r15033);
        mpfr_init(r15034);
        mpfr_init(r15035);
        mpfr_init(r15036);
        mpfr_init(r15037);
        mpfr_init(r15038);
        mpfr_init(r15039);
        mpfr_init(r15040);
        mpfr_init(r15041);
        mpfr_init(r15042);
        mpfr_init(r15043);
        mpfr_init(r15044);
        mpfr_init(r15045);
        mpfr_init(r15046);
        mpfr_init(r15047);
        mpfr_init(r15048);
        mpfr_init(r15049);
        mpfr_init(r15050);
        mpfr_init(r15051);
}

double f_fm(double x_re, double x_im, double y_re, double y_im) {
        mpfr_set_d(r15007, x_re, MPFR_RNDN);
        ;
        mpfr_set_si(r15009, mpfr_cmp(r15007, r15008) <= 0, MPFR_RNDN);
        mpfr_set_d(r15010, y_re, MPFR_RNDN);
        mpfr_set_d(r15011, x_im, MPFR_RNDN);
        mpfr_atan2(r15012, r15011, r15007, MPFR_RNDN);
        mpfr_mul(r15013, r15010, r15012, MPFR_RNDN);
        mpfr_neg(r15014, r15007, MPFR_RNDN);
        mpfr_log(r15015, r15014, MPFR_RNDN);
        mpfr_set_d(r15016, y_im, MPFR_RNDN);
        mpfr_mul(r15017, r15015, r15016, MPFR_RNDN);
        mpfr_add(r15018, r15013, r15017, MPFR_RNDN);
        mpfr_sin(r15019, r15018, MPFR_RNDN);
        mpfr_exp(r15020, r15016, MPFR_RNDN);
        mpfr_pow(r15021, r15020, r15012, MPFR_RNDN);
        mpfr_pow(r15022, r15014, r15010, MPFR_RNDN);
        mpfr_div(r15023, r15021, r15022, MPFR_RNDN);
        mpfr_div(r15024, r15019, r15023, MPFR_RNDN);
        ;
        mpfr_set_si(r15026, mpfr_cmp(r15007, r15025) <= 0, MPFR_RNDN);
        mpfr_sin(r15027, r15013, MPFR_RNDN);
        mpfr_sqr(r15028, r15007, MPFR_RNDN);
        mpfr_mul(r15029, r15011, r15011, MPFR_RNDN);
        mpfr_add(r15030, r15028, r15029, MPFR_RNDN);
        mpfr_sqrt(r15031, r15030, MPFR_RNDN);
        mpfr_log(r15032, r15031, MPFR_RNDN);
        mpfr_mul(r15033, r15032, r15016, MPFR_RNDN);
        mpfr_cos(r15034, r15033, MPFR_RNDN);
        mpfr_mul(r15035, r15027, r15034, MPFR_RNDN);
        mpfr_cos(r15036, r15013, MPFR_RNDN);
        mpfr_sin(r15037, r15033, MPFR_RNDN);
        mpfr_mul(r15038, r15036, r15037, MPFR_RNDN);
        mpfr_add(r15039, r15035, r15038, MPFR_RNDN);
        mpfr_pow(r15040, r15031, r15010, MPFR_RNDN);
        mpfr_div(r15041, r15021, r15040, MPFR_RNDN);
        mpfr_div(r15042, r15039, r15041, MPFR_RNDN);
        mpfr_log(r15043, r15007, MPFR_RNDN);
        mpfr_mul(r15044, r15016, r15043, MPFR_RNDN);
        mpfr_add(r15045, r15044, r15013, MPFR_RNDN);
        mpfr_sin(r15046, r15045, MPFR_RNDN);
        mpfr_pow(r15047, r15007, r15010, MPFR_RNDN);
        mpfr_div(r15048, r15021, r15047, MPFR_RNDN);
        mpfr_div(r15049, r15046, r15048, MPFR_RNDN);
        if (mpfr_get_si(r15026, MPFR_RNDN)) { mpfr_set(r15050, r15042, MPFR_RNDN); } else { mpfr_set(r15050, r15049, MPFR_RNDN); };
        if (mpfr_get_si(r15009, MPFR_RNDN)) { mpfr_set(r15051, r15024, MPFR_RNDN); } else { mpfr_set(r15051, r15050, MPFR_RNDN); };
        return mpfr_get_d(r15051, MPFR_RNDN);
}

static mpfr_t r15052, r15053, r15054, r15055, r15056, r15057, r15058, r15059, r15060, r15061, r15062, r15063, r15064, r15065, r15066, r15067, r15068, r15069, r15070, r15071, r15072, r15073, r15074, r15075, r15076, r15077, r15078, r15079, r15080, r15081, r15082, r15083, r15084, r15085, r15086, r15087, r15088, r15089, r15090, r15091, r15092, r15093, r15094, r15095, r15096;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r15052);
        mpfr_init_set_str(r15053, "-519.4088f0", 10, MPFR_RNDN);
        mpfr_init(r15054);
        mpfr_init(r15055);
        mpfr_init(r15056);
        mpfr_init(r15057);
        mpfr_init(r15058);
        mpfr_init(r15059);
        mpfr_init(r15060);
        mpfr_init(r15061);
        mpfr_init(r15062);
        mpfr_init(r15063);
        mpfr_init(r15064);
        mpfr_init(r15065);
        mpfr_init(r15066);
        mpfr_init(r15067);
        mpfr_init(r15068);
        mpfr_init(r15069);
        mpfr_init_set_str(r15070, "3755.2947f0", 10, MPFR_RNDN);
        mpfr_init(r15071);
        mpfr_init(r15072);
        mpfr_init(r15073);
        mpfr_init(r15074);
        mpfr_init(r15075);
        mpfr_init(r15076);
        mpfr_init(r15077);
        mpfr_init(r15078);
        mpfr_init(r15079);
        mpfr_init(r15080);
        mpfr_init(r15081);
        mpfr_init(r15082);
        mpfr_init(r15083);
        mpfr_init(r15084);
        mpfr_init(r15085);
        mpfr_init(r15086);
        mpfr_init(r15087);
        mpfr_init(r15088);
        mpfr_init(r15089);
        mpfr_init(r15090);
        mpfr_init(r15091);
        mpfr_init(r15092);
        mpfr_init(r15093);
        mpfr_init(r15094);
        mpfr_init(r15095);
        mpfr_init(r15096);
}

double f_dm(double x_re, double x_im, double y_re, double y_im) {
        mpfr_set_d(r15052, x_re, MPFR_RNDN);
        ;
        mpfr_set_si(r15054, mpfr_cmp(r15052, r15053) <= 0, MPFR_RNDN);
        mpfr_set_d(r15055, y_re, MPFR_RNDN);
        mpfr_set_d(r15056, x_im, MPFR_RNDN);
        mpfr_atan2(r15057, r15056, r15052, MPFR_RNDN);
        mpfr_mul(r15058, r15055, r15057, MPFR_RNDN);
        mpfr_neg(r15059, r15052, MPFR_RNDN);
        mpfr_log(r15060, r15059, MPFR_RNDN);
        mpfr_set_d(r15061, y_im, MPFR_RNDN);
        mpfr_mul(r15062, r15060, r15061, MPFR_RNDN);
        mpfr_add(r15063, r15058, r15062, MPFR_RNDN);
        mpfr_sin(r15064, r15063, MPFR_RNDN);
        mpfr_exp(r15065, r15061, MPFR_RNDN);
        mpfr_pow(r15066, r15065, r15057, MPFR_RNDN);
        mpfr_pow(r15067, r15059, r15055, MPFR_RNDN);
        mpfr_div(r15068, r15066, r15067, MPFR_RNDN);
        mpfr_div(r15069, r15064, r15068, MPFR_RNDN);
        ;
        mpfr_set_si(r15071, mpfr_cmp(r15052, r15070) <= 0, MPFR_RNDN);
        mpfr_sin(r15072, r15058, MPFR_RNDN);
        mpfr_sqr(r15073, r15052, MPFR_RNDN);
        mpfr_mul(r15074, r15056, r15056, MPFR_RNDN);
        mpfr_add(r15075, r15073, r15074, MPFR_RNDN);
        mpfr_sqrt(r15076, r15075, MPFR_RNDN);
        mpfr_log(r15077, r15076, MPFR_RNDN);
        mpfr_mul(r15078, r15077, r15061, MPFR_RNDN);
        mpfr_cos(r15079, r15078, MPFR_RNDN);
        mpfr_mul(r15080, r15072, r15079, MPFR_RNDN);
        mpfr_cos(r15081, r15058, MPFR_RNDN);
        mpfr_sin(r15082, r15078, MPFR_RNDN);
        mpfr_mul(r15083, r15081, r15082, MPFR_RNDN);
        mpfr_add(r15084, r15080, r15083, MPFR_RNDN);
        mpfr_pow(r15085, r15076, r15055, MPFR_RNDN);
        mpfr_div(r15086, r15066, r15085, MPFR_RNDN);
        mpfr_div(r15087, r15084, r15086, MPFR_RNDN);
        mpfr_log(r15088, r15052, MPFR_RNDN);
        mpfr_mul(r15089, r15061, r15088, MPFR_RNDN);
        mpfr_add(r15090, r15089, r15058, MPFR_RNDN);
        mpfr_sin(r15091, r15090, MPFR_RNDN);
        mpfr_pow(r15092, r15052, r15055, MPFR_RNDN);
        mpfr_div(r15093, r15066, r15092, MPFR_RNDN);
        mpfr_div(r15094, r15091, r15093, MPFR_RNDN);
        if (mpfr_get_si(r15071, MPFR_RNDN)) { mpfr_set(r15095, r15087, MPFR_RNDN); } else { mpfr_set(r15095, r15094, MPFR_RNDN); };
        if (mpfr_get_si(r15054, MPFR_RNDN)) { mpfr_set(r15096, r15069, MPFR_RNDN); } else { mpfr_set(r15096, r15095, MPFR_RNDN); };
        return mpfr_get_d(r15096, MPFR_RNDN);
}

