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

char *name = "Maksimov and Kolovsky, Equation (3)";

double f_if(float J, float K, float U) {
        float r26265 = -2;
        float r26266 = J;
        float r26267 = r26265 * r26266;
        float r26268 = K;
        float r26269 = 2;
        float r26270 = r26268 / r26269;
        float r26271 = cos(r26270);
        float r26272 = r26267 * r26271;
        float r26273 = 1;
        float r26274 = U;
        float r26275 = r26269 * r26266;
        float r26276 = r26275 * r26271;
        float r26277 = r26274 / r26276;
        float r26278 = pow(r26277, r26269);
        float r26279 = r26273 + r26278;
        float r26280 = sqrt(r26279);
        float r26281 = r26272 * r26280;
        return r26281;
}

double f_id(double J, double K, double U) {
        double r26282 = -2;
        double r26283 = J;
        double r26284 = r26282 * r26283;
        double r26285 = K;
        double r26286 = 2;
        double r26287 = r26285 / r26286;
        double r26288 = cos(r26287);
        double r26289 = r26284 * r26288;
        double r26290 = 1;
        double r26291 = U;
        double r26292 = r26286 * r26283;
        double r26293 = r26292 * r26288;
        double r26294 = r26291 / r26293;
        double r26295 = pow(r26294, r26286);
        double r26296 = r26290 + r26295;
        double r26297 = sqrt(r26296);
        double r26298 = r26289 * r26297;
        return r26298;
}


double f_of(float J, float K, float U) {
        float r26299 = -2;
        float r26300 = J;
        float r26301 = r26299 * r26300;
        float r26302 = K;
        float r26303 = 2;
        float r26304 = r26302 / r26303;
        float r26305 = cos(r26304);
        float r26306 = r26301 * r26305;
        float r26307 = 1;
        float r26308 = U;
        float r26309 = r26303 * r26300;
        float r26310 = r26309 * r26305;
        float r26311 = r26308 / r26310;
        float r26312 = pow(r26311, r26303);
        float r26313 = r26307 + r26312;
        float r26314 = sqrt(r26313);
        float r26315 = r26306 * r26314;
        return r26315;
}

double f_od(double J, double K, double U) {
        double r26316 = -2;
        double r26317 = J;
        double r26318 = r26316 * r26317;
        double r26319 = K;
        double r26320 = 2;
        double r26321 = r26319 / r26320;
        double r26322 = cos(r26321);
        double r26323 = r26318 * r26322;
        double r26324 = 1;
        double r26325 = U;
        double r26326 = r26320 * r26317;
        double r26327 = r26326 * r26322;
        double r26328 = r26325 / r26327;
        double r26329 = pow(r26328, r26320);
        double r26330 = r26324 + r26329;
        double r26331 = sqrt(r26330);
        double r26332 = r26323 * r26331;
        return r26332;
}

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 r26333, r26334, r26335, r26336, r26337, r26338, r26339, r26340, r26341, r26342, r26343, r26344, r26345, r26346, r26347, r26348, r26349;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(336);
        mpfr_init_set_str(r26333, "-2", 10, MPFR_RNDN);
        mpfr_init(r26334);
        mpfr_init(r26335);
        mpfr_init(r26336);
        mpfr_init_set_str(r26337, "2", 10, MPFR_RNDN);
        mpfr_init(r26338);
        mpfr_init(r26339);
        mpfr_init(r26340);
        mpfr_init_set_str(r26341, "1", 10, MPFR_RNDN);
        mpfr_init(r26342);
        mpfr_init(r26343);
        mpfr_init(r26344);
        mpfr_init(r26345);
        mpfr_init(r26346);
        mpfr_init(r26347);
        mpfr_init(r26348);
        mpfr_init(r26349);
}

double f_im(double J, double K, double U) {
        ;
        mpfr_set_d(r26334, J, MPFR_RNDN);
        mpfr_mul(r26335, r26333, r26334, MPFR_RNDN);
        mpfr_set_d(r26336, K, MPFR_RNDN);
        ;
        mpfr_div(r26338, r26336, r26337, MPFR_RNDN);
        mpfr_cos(r26339, r26338, MPFR_RNDN);
        mpfr_mul(r26340, r26335, r26339, MPFR_RNDN);
        ;
        mpfr_set_d(r26342, U, MPFR_RNDN);
        mpfr_mul(r26343, r26337, r26334, MPFR_RNDN);
        mpfr_mul(r26344, r26343, r26339, MPFR_RNDN);
        mpfr_div(r26345, r26342, r26344, MPFR_RNDN);
        mpfr_pow(r26346, r26345, r26337, MPFR_RNDN);
        mpfr_add(r26347, r26341, r26346, MPFR_RNDN);
        mpfr_sqrt(r26348, r26347, MPFR_RNDN);
        mpfr_mul(r26349, r26340, r26348, MPFR_RNDN);
        return mpfr_get_d(r26349, MPFR_RNDN);
}

static mpfr_t r26350, r26351, r26352, r26353, r26354, r26355, r26356, r26357, r26358, r26359, r26360, r26361, r26362, r26363, r26364, r26365, r26366;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(336);
        mpfr_init_set_str(r26350, "-2", 10, MPFR_RNDN);
        mpfr_init(r26351);
        mpfr_init(r26352);
        mpfr_init(r26353);
        mpfr_init_set_str(r26354, "2", 10, MPFR_RNDN);
        mpfr_init(r26355);
        mpfr_init(r26356);
        mpfr_init(r26357);
        mpfr_init_set_str(r26358, "1", 10, MPFR_RNDN);
        mpfr_init(r26359);
        mpfr_init(r26360);
        mpfr_init(r26361);
        mpfr_init(r26362);
        mpfr_init(r26363);
        mpfr_init(r26364);
        mpfr_init(r26365);
        mpfr_init(r26366);
}

double f_fm(double J, double K, double U) {
        ;
        mpfr_set_d(r26351, J, MPFR_RNDN);
        mpfr_mul(r26352, r26350, r26351, MPFR_RNDN);
        mpfr_set_d(r26353, K, MPFR_RNDN);
        ;
        mpfr_div(r26355, r26353, r26354, MPFR_RNDN);
        mpfr_cos(r26356, r26355, MPFR_RNDN);
        mpfr_mul(r26357, r26352, r26356, MPFR_RNDN);
        ;
        mpfr_set_d(r26359, U, MPFR_RNDN);
        mpfr_mul(r26360, r26354, r26351, MPFR_RNDN);
        mpfr_mul(r26361, r26360, r26356, MPFR_RNDN);
        mpfr_div(r26362, r26359, r26361, MPFR_RNDN);
        mpfr_pow(r26363, r26362, r26354, MPFR_RNDN);
        mpfr_add(r26364, r26358, r26363, MPFR_RNDN);
        mpfr_sqrt(r26365, r26364, MPFR_RNDN);
        mpfr_mul(r26366, r26357, r26365, MPFR_RNDN);
        return mpfr_get_d(r26366, MPFR_RNDN);
}

static mpfr_t r26367, r26368, r26369, r26370, r26371, r26372, r26373, r26374, r26375, r26376, r26377, r26378, r26379, r26380, r26381, r26382, r26383;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(336);
        mpfr_init_set_str(r26367, "-2", 10, MPFR_RNDN);
        mpfr_init(r26368);
        mpfr_init(r26369);
        mpfr_init(r26370);
        mpfr_init_set_str(r26371, "2", 10, MPFR_RNDN);
        mpfr_init(r26372);
        mpfr_init(r26373);
        mpfr_init(r26374);
        mpfr_init_set_str(r26375, "1", 10, MPFR_RNDN);
        mpfr_init(r26376);
        mpfr_init(r26377);
        mpfr_init(r26378);
        mpfr_init(r26379);
        mpfr_init(r26380);
        mpfr_init(r26381);
        mpfr_init(r26382);
        mpfr_init(r26383);
}

double f_dm(double J, double K, double U) {
        ;
        mpfr_set_d(r26368, J, MPFR_RNDN);
        mpfr_mul(r26369, r26367, r26368, MPFR_RNDN);
        mpfr_set_d(r26370, K, MPFR_RNDN);
        ;
        mpfr_div(r26372, r26370, r26371, MPFR_RNDN);
        mpfr_cos(r26373, r26372, MPFR_RNDN);
        mpfr_mul(r26374, r26369, r26373, MPFR_RNDN);
        ;
        mpfr_set_d(r26376, U, MPFR_RNDN);
        mpfr_mul(r26377, r26371, r26368, MPFR_RNDN);
        mpfr_mul(r26378, r26377, r26373, MPFR_RNDN);
        mpfr_div(r26379, r26376, r26378, MPFR_RNDN);
        mpfr_pow(r26380, r26379, r26371, MPFR_RNDN);
        mpfr_add(r26381, r26375, r26380, MPFR_RNDN);
        mpfr_sqrt(r26382, r26381, MPFR_RNDN);
        mpfr_mul(r26383, r26374, r26382, MPFR_RNDN);
        return mpfr_get_d(r26383, MPFR_RNDN);
}

