#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 r8099 = x_re;
        float r8100 = r8099 * r8099;
        float r8101 = x_im;
        float r8102 = r8101 * r8101;
        float r8103 = r8100 + r8102;
        float r8104 = sqrt(r8103);
        float r8105 = log(r8104);
        float r8106 = y_re;
        float r8107 = r8105 * r8106;
        float r8108 = atan2(r8101, r8099);
        float r8109 = y_im;
        float r8110 = r8108 * r8109;
        float r8111 = r8107 - r8110;
        float r8112 = exp(r8111);
        float r8113 = r8105 * r8109;
        float r8114 = r8108 * r8106;
        float r8115 = r8113 + r8114;
        float r8116 = sin(r8115);
        float r8117 = r8112 * r8116;
        return r8117;
}

double f_id(double x_re, double x_im, double y_re, double y_im) {
        double r8118 = x_re;
        double r8119 = r8118 * r8118;
        double r8120 = x_im;
        double r8121 = r8120 * r8120;
        double r8122 = r8119 + r8121;
        double r8123 = sqrt(r8122);
        double r8124 = log(r8123);
        double r8125 = y_re;
        double r8126 = r8124 * r8125;
        double r8127 = atan2(r8120, r8118);
        double r8128 = y_im;
        double r8129 = r8127 * r8128;
        double r8130 = r8126 - r8129;
        double r8131 = exp(r8130);
        double r8132 = r8124 * r8128;
        double r8133 = r8127 * r8125;
        double r8134 = r8132 + r8133;
        double r8135 = sin(r8134);
        double r8136 = r8131 * r8135;
        return r8136;
}


double f_of(float x_re, float x_im, float y_re, float y_im) {
        float r8137 = x_re;
        float r8138 = r8137 * r8137;
        float r8139 = x_im;
        float r8140 = r8139 * r8139;
        float r8141 = r8138 + r8140;
        float r8142 = sqrt(r8141);
        float r8143 = log(r8142);
        float r8144 = y_re;
        float r8145 = r8143 * r8144;
        float r8146 = atan2(r8139, r8137);
        float r8147 = y_im;
        float r8148 = r8146 * r8147;
        float r8149 = r8145 - r8148;
        float r8150 = exp(r8149);
        float r8151 = r8146 * r8144;
        float r8152 = -1;
        float r8153 = r8152 / r8137;
        float r8154 = log(r8153);
        float r8155 = r8147 * r8154;
        float r8156 = r8151 - r8155;
        float r8157 = sin(r8156);
        float r8158 = r8150 * r8157;
        float r8159 = -5.2381370870178e-310;
        bool r8160 = r8158 <= r8159;
        float r8161 = cbrt(r8146);
        float r8162 = r8161 * r8161;
        float r8163 = cbrt(r8162);
        float r8164 = cbrt(r8161);
        float r8165 = r8163 * r8164;
        float r8166 = r8165 * r8147;
        float r8167 = r8162 * r8166;
        float r8168 = r8145 - r8167;
        float r8169 = exp(r8168);
        float r8170 = r8143 * r8147;
        float r8171 = r8170 + r8151;
        float r8172 = sin(r8171);
        float r8173 = r8169 * r8172;
        float r8174 = 0.0013168413006533974;
        bool r8175 = r8158 <= r8174;
        float r8176 = log(r8137);
        float r8177 = r8176 * r8147;
        float r8178 = r8177 + r8151;
        float r8179 = sin(r8178);
        float r8180 = r8150 * r8179;
        float r8181 = r8175 ? r8158 : r8180;
        float r8182 = r8160 ? r8173 : r8181;
        return r8182;
}

double f_od(double x_re, double x_im, double y_re, double y_im) {
        double r8183 = x_re;
        double r8184 = r8183 * r8183;
        double r8185 = x_im;
        double r8186 = r8185 * r8185;
        double r8187 = r8184 + r8186;
        double r8188 = sqrt(r8187);
        double r8189 = log(r8188);
        double r8190 = y_re;
        double r8191 = r8189 * r8190;
        double r8192 = atan2(r8185, r8183);
        double r8193 = y_im;
        double r8194 = r8192 * r8193;
        double r8195 = r8191 - r8194;
        double r8196 = exp(r8195);
        double r8197 = r8192 * r8190;
        double r8198 = -1;
        double r8199 = r8198 / r8183;
        double r8200 = log(r8199);
        double r8201 = r8193 * r8200;
        double r8202 = r8197 - r8201;
        double r8203 = sin(r8202);
        double r8204 = r8196 * r8203;
        double r8205 = -5.2381370870178e-310;
        bool r8206 = r8204 <= r8205;
        double r8207 = cbrt(r8192);
        double r8208 = r8207 * r8207;
        double r8209 = cbrt(r8208);
        double r8210 = cbrt(r8207);
        double r8211 = r8209 * r8210;
        double r8212 = r8211 * r8193;
        double r8213 = r8208 * r8212;
        double r8214 = r8191 - r8213;
        double r8215 = exp(r8214);
        double r8216 = r8189 * r8193;
        double r8217 = r8216 + r8197;
        double r8218 = sin(r8217);
        double r8219 = r8215 * r8218;
        double r8220 = 0.0013168413006533974;
        bool r8221 = r8204 <= r8220;
        double r8222 = log(r8183);
        double r8223 = r8222 * r8193;
        double r8224 = r8223 + r8197;
        double r8225 = sin(r8224);
        double r8226 = r8196 * r8225;
        double r8227 = r8221 ? r8204 : r8226;
        double r8228 = r8206 ? r8219 : r8227;
        return r8228;
}

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 r8229, r8230, r8231, r8232, r8233, r8234, r8235, r8236, r8237, r8238, r8239, r8240, r8241, r8242, r8243, r8244, r8245, r8246, r8247;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(2128);
        mpfr_init(r8229);
        mpfr_init(r8230);
        mpfr_init(r8231);
        mpfr_init(r8232);
        mpfr_init(r8233);
        mpfr_init(r8234);
        mpfr_init(r8235);
        mpfr_init(r8236);
        mpfr_init(r8237);
        mpfr_init(r8238);
        mpfr_init(r8239);
        mpfr_init(r8240);
        mpfr_init(r8241);
        mpfr_init(r8242);
        mpfr_init(r8243);
        mpfr_init(r8244);
        mpfr_init(r8245);
        mpfr_init(r8246);
        mpfr_init(r8247);
}

double f_im(double x_re, double x_im, double y_re, double y_im) {
        mpfr_set_d(r8229, x_re, MPFR_RNDN);
        mpfr_mul(r8230, r8229, r8229, MPFR_RNDN);
        mpfr_set_d(r8231, x_im, MPFR_RNDN);
        mpfr_mul(r8232, r8231, r8231, MPFR_RNDN);
        mpfr_add(r8233, r8230, r8232, MPFR_RNDN);
        mpfr_sqrt(r8234, r8233, MPFR_RNDN);
        mpfr_log(r8235, r8234, MPFR_RNDN);
        mpfr_set_d(r8236, y_re, MPFR_RNDN);
        mpfr_mul(r8237, r8235, r8236, MPFR_RNDN);
        mpfr_atan2(r8238, r8231, r8229, MPFR_RNDN);
        mpfr_set_d(r8239, y_im, MPFR_RNDN);
        mpfr_mul(r8240, r8238, r8239, MPFR_RNDN);
        mpfr_sub(r8241, r8237, r8240, MPFR_RNDN);
        mpfr_exp(r8242, r8241, MPFR_RNDN);
        mpfr_mul(r8243, r8235, r8239, MPFR_RNDN);
        mpfr_mul(r8244, r8238, r8236, MPFR_RNDN);
        mpfr_add(r8245, r8243, r8244, MPFR_RNDN);
        mpfr_sin(r8246, r8245, MPFR_RNDN);
        mpfr_mul(r8247, r8242, r8246, MPFR_RNDN);
        return mpfr_get_d(r8247, MPFR_RNDN);
}

static mpfr_t r8248, r8249, r8250, r8251, r8252, r8253, r8254, r8255, r8256, r8257, r8258, r8259, r8260, r8261, r8262, r8263, r8264, r8265, r8266, r8267, r8268, r8269, r8270, r8271, r8272, r8273, r8274, r8275, r8276, r8277, r8278, r8279, r8280, r8281, r8282, r8283, r8284, r8285, r8286, r8287, r8288, r8289, r8290, r8291, r8292, r8293;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(2128);
        mpfr_init(r8248);
        mpfr_init(r8249);
        mpfr_init(r8250);
        mpfr_init(r8251);
        mpfr_init(r8252);
        mpfr_init(r8253);
        mpfr_init(r8254);
        mpfr_init(r8255);
        mpfr_init(r8256);
        mpfr_init(r8257);
        mpfr_init(r8258);
        mpfr_init(r8259);
        mpfr_init(r8260);
        mpfr_init(r8261);
        mpfr_init(r8262);
        mpfr_init_set_str(r8263, "-1", 10, MPFR_RNDN);
        mpfr_init(r8264);
        mpfr_init(r8265);
        mpfr_init(r8266);
        mpfr_init(r8267);
        mpfr_init(r8268);
        mpfr_init(r8269);
        mpfr_init_set_str(r8270, "-5.2381370870178e-310", 10, MPFR_RNDN);
        mpfr_init(r8271);
        mpfr_init(r8272);
        mpfr_init(r8273);
        mpfr_init(r8274);
        mpfr_init(r8275);
        mpfr_init(r8276);
        mpfr_init(r8277);
        mpfr_init(r8278);
        mpfr_init(r8279);
        mpfr_init(r8280);
        mpfr_init(r8281);
        mpfr_init(r8282);
        mpfr_init(r8283);
        mpfr_init(r8284);
        mpfr_init_set_str(r8285, "0.0013168413006533974", 10, MPFR_RNDN);
        mpfr_init(r8286);
        mpfr_init(r8287);
        mpfr_init(r8288);
        mpfr_init(r8289);
        mpfr_init(r8290);
        mpfr_init(r8291);
        mpfr_init(r8292);
        mpfr_init(r8293);
}

double f_fm(double x_re, double x_im, double y_re, double y_im) {
        mpfr_set_d(r8248, x_re, MPFR_RNDN);
        mpfr_mul(r8249, r8248, r8248, MPFR_RNDN);
        mpfr_set_d(r8250, x_im, MPFR_RNDN);
        mpfr_mul(r8251, r8250, r8250, MPFR_RNDN);
        mpfr_add(r8252, r8249, r8251, MPFR_RNDN);
        mpfr_sqrt(r8253, r8252, MPFR_RNDN);
        mpfr_log(r8254, r8253, MPFR_RNDN);
        mpfr_set_d(r8255, y_re, MPFR_RNDN);
        mpfr_mul(r8256, r8254, r8255, MPFR_RNDN);
        mpfr_atan2(r8257, r8250, r8248, MPFR_RNDN);
        mpfr_set_d(r8258, y_im, MPFR_RNDN);
        mpfr_mul(r8259, r8257, r8258, MPFR_RNDN);
        mpfr_sub(r8260, r8256, r8259, MPFR_RNDN);
        mpfr_exp(r8261, r8260, MPFR_RNDN);
        mpfr_mul(r8262, r8257, r8255, MPFR_RNDN);
        ;
        mpfr_div(r8264, r8263, r8248, MPFR_RNDN);
        mpfr_log(r8265, r8264, MPFR_RNDN);
        mpfr_mul(r8266, r8258, r8265, MPFR_RNDN);
        mpfr_sub(r8267, r8262, r8266, MPFR_RNDN);
        mpfr_sin(r8268, r8267, MPFR_RNDN);
        mpfr_mul(r8269, r8261, r8268, MPFR_RNDN);
        ;
        mpfr_set_si(r8271, mpfr_cmp(r8269, r8270) <= 0, MPFR_RNDN);
        mpfr_cbrt(r8272, r8257, MPFR_RNDN);
        mpfr_mul(r8273, r8272, r8272, MPFR_RNDN);
        mpfr_cbrt(r8274, r8273, MPFR_RNDN);
        mpfr_cbrt(r8275, r8272, MPFR_RNDN);
        mpfr_mul(r8276, r8274, r8275, MPFR_RNDN);
        mpfr_mul(r8277, r8276, r8258, MPFR_RNDN);
        mpfr_mul(r8278, r8273, r8277, MPFR_RNDN);
        mpfr_sub(r8279, r8256, r8278, MPFR_RNDN);
        mpfr_exp(r8280, r8279, MPFR_RNDN);
        mpfr_mul(r8281, r8254, r8258, MPFR_RNDN);
        mpfr_add(r8282, r8281, r8262, MPFR_RNDN);
        mpfr_sin(r8283, r8282, MPFR_RNDN);
        mpfr_mul(r8284, r8280, r8283, MPFR_RNDN);
        ;
        mpfr_set_si(r8286, mpfr_cmp(r8269, r8285) <= 0, MPFR_RNDN);
        mpfr_log(r8287, r8248, MPFR_RNDN);
        mpfr_mul(r8288, r8287, r8258, MPFR_RNDN);
        mpfr_add(r8289, r8288, r8262, MPFR_RNDN);
        mpfr_sin(r8290, r8289, MPFR_RNDN);
        mpfr_mul(r8291, r8261, r8290, MPFR_RNDN);
        if (mpfr_get_si(r8286, MPFR_RNDN)) { mpfr_set(r8292, r8269, MPFR_RNDN); } else { mpfr_set(r8292, r8291, MPFR_RNDN); };
        if (mpfr_get_si(r8271, MPFR_RNDN)) { mpfr_set(r8293, r8284, MPFR_RNDN); } else { mpfr_set(r8293, r8292, MPFR_RNDN); };
        return mpfr_get_d(r8293, MPFR_RNDN);
}

static mpfr_t r8294, r8295, r8296, r8297, r8298, r8299, r8300, r8301, r8302, r8303, r8304, r8305, r8306, r8307, r8308, r8309, r8310, r8311, r8312, r8313, r8314, r8315, r8316, r8317, r8318, r8319, r8320, r8321, r8322, r8323, r8324, r8325, r8326, r8327, r8328, r8329, r8330, r8331, r8332, r8333, r8334, r8335, r8336, r8337, r8338, r8339;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(2128);
        mpfr_init(r8294);
        mpfr_init(r8295);
        mpfr_init(r8296);
        mpfr_init(r8297);
        mpfr_init(r8298);
        mpfr_init(r8299);
        mpfr_init(r8300);
        mpfr_init(r8301);
        mpfr_init(r8302);
        mpfr_init(r8303);
        mpfr_init(r8304);
        mpfr_init(r8305);
        mpfr_init(r8306);
        mpfr_init(r8307);
        mpfr_init(r8308);
        mpfr_init_set_str(r8309, "-1", 10, MPFR_RNDN);
        mpfr_init(r8310);
        mpfr_init(r8311);
        mpfr_init(r8312);
        mpfr_init(r8313);
        mpfr_init(r8314);
        mpfr_init(r8315);
        mpfr_init_set_str(r8316, "-5.2381370870178e-310", 10, MPFR_RNDN);
        mpfr_init(r8317);
        mpfr_init(r8318);
        mpfr_init(r8319);
        mpfr_init(r8320);
        mpfr_init(r8321);
        mpfr_init(r8322);
        mpfr_init(r8323);
        mpfr_init(r8324);
        mpfr_init(r8325);
        mpfr_init(r8326);
        mpfr_init(r8327);
        mpfr_init(r8328);
        mpfr_init(r8329);
        mpfr_init(r8330);
        mpfr_init_set_str(r8331, "0.0013168413006533974", 10, MPFR_RNDN);
        mpfr_init(r8332);
        mpfr_init(r8333);
        mpfr_init(r8334);
        mpfr_init(r8335);
        mpfr_init(r8336);
        mpfr_init(r8337);
        mpfr_init(r8338);
        mpfr_init(r8339);
}

double f_dm(double x_re, double x_im, double y_re, double y_im) {
        mpfr_set_d(r8294, x_re, MPFR_RNDN);
        mpfr_mul(r8295, r8294, r8294, MPFR_RNDN);
        mpfr_set_d(r8296, x_im, MPFR_RNDN);
        mpfr_mul(r8297, r8296, r8296, MPFR_RNDN);
        mpfr_add(r8298, r8295, r8297, MPFR_RNDN);
        mpfr_sqrt(r8299, r8298, MPFR_RNDN);
        mpfr_log(r8300, r8299, MPFR_RNDN);
        mpfr_set_d(r8301, y_re, MPFR_RNDN);
        mpfr_mul(r8302, r8300, r8301, MPFR_RNDN);
        mpfr_atan2(r8303, r8296, r8294, MPFR_RNDN);
        mpfr_set_d(r8304, y_im, MPFR_RNDN);
        mpfr_mul(r8305, r8303, r8304, MPFR_RNDN);
        mpfr_sub(r8306, r8302, r8305, MPFR_RNDN);
        mpfr_exp(r8307, r8306, MPFR_RNDN);
        mpfr_mul(r8308, r8303, r8301, MPFR_RNDN);
        ;
        mpfr_div(r8310, r8309, r8294, MPFR_RNDN);
        mpfr_log(r8311, r8310, MPFR_RNDN);
        mpfr_mul(r8312, r8304, r8311, MPFR_RNDN);
        mpfr_sub(r8313, r8308, r8312, MPFR_RNDN);
        mpfr_sin(r8314, r8313, MPFR_RNDN);
        mpfr_mul(r8315, r8307, r8314, MPFR_RNDN);
        ;
        mpfr_set_si(r8317, mpfr_cmp(r8315, r8316) <= 0, MPFR_RNDN);
        mpfr_cbrt(r8318, r8303, MPFR_RNDN);
        mpfr_mul(r8319, r8318, r8318, MPFR_RNDN);
        mpfr_cbrt(r8320, r8319, MPFR_RNDN);
        mpfr_cbrt(r8321, r8318, MPFR_RNDN);
        mpfr_mul(r8322, r8320, r8321, MPFR_RNDN);
        mpfr_mul(r8323, r8322, r8304, MPFR_RNDN);
        mpfr_mul(r8324, r8319, r8323, MPFR_RNDN);
        mpfr_sub(r8325, r8302, r8324, MPFR_RNDN);
        mpfr_exp(r8326, r8325, MPFR_RNDN);
        mpfr_mul(r8327, r8300, r8304, MPFR_RNDN);
        mpfr_add(r8328, r8327, r8308, MPFR_RNDN);
        mpfr_sin(r8329, r8328, MPFR_RNDN);
        mpfr_mul(r8330, r8326, r8329, MPFR_RNDN);
        ;
        mpfr_set_si(r8332, mpfr_cmp(r8315, r8331) <= 0, MPFR_RNDN);
        mpfr_log(r8333, r8294, MPFR_RNDN);
        mpfr_mul(r8334, r8333, r8304, MPFR_RNDN);
        mpfr_add(r8335, r8334, r8308, MPFR_RNDN);
        mpfr_sin(r8336, r8335, MPFR_RNDN);
        mpfr_mul(r8337, r8307, r8336, MPFR_RNDN);
        if (mpfr_get_si(r8332, MPFR_RNDN)) { mpfr_set(r8338, r8315, MPFR_RNDN); } else { mpfr_set(r8338, r8337, MPFR_RNDN); };
        if (mpfr_get_si(r8317, MPFR_RNDN)) { mpfr_set(r8339, r8330, MPFR_RNDN); } else { mpfr_set(r8339, r8338, MPFR_RNDN); };
        return mpfr_get_d(r8339, MPFR_RNDN);
}