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

char *name = "Bouland and Aaronson, Equation (25)";

double f_if(float a, float b) {
        float r26673 = a;
        float r26674 = r26673 * r26673;
        float r26675 = b;
        float r26676 = r26675 * r26675;
        float r26677 = r26674 + r26676;
        float r26678 = 2;
        float r26679 = pow(r26677, r26678);
        float r26680 = 4;
        float r26681 = 1;
        float r26682 = r26681 + r26673;
        float r26683 = r26674 * r26682;
        float r26684 = 3;
        float r26685 = r26684 * r26673;
        float r26686 = r26681 - r26685;
        float r26687 = r26676 * r26686;
        float r26688 = r26683 + r26687;
        float r26689 = r26680 * r26688;
        float r26690 = r26679 + r26689;
        float r26691 = r26690 - r26681;
        return r26691;
}

double f_id(double a, double b) {
        double r26692 = a;
        double r26693 = r26692 * r26692;
        double r26694 = b;
        double r26695 = r26694 * r26694;
        double r26696 = r26693 + r26695;
        double r26697 = 2;
        double r26698 = pow(r26696, r26697);
        double r26699 = 4;
        double r26700 = 1;
        double r26701 = r26700 + r26692;
        double r26702 = r26693 * r26701;
        double r26703 = 3;
        double r26704 = r26703 * r26692;
        double r26705 = r26700 - r26704;
        double r26706 = r26695 * r26705;
        double r26707 = r26702 + r26706;
        double r26708 = r26699 * r26707;
        double r26709 = r26698 + r26708;
        double r26710 = r26709 - r26700;
        return r26710;
}


double f_of(float a, float b) {
        float r26711 = a;
        float r26712 = r26711 * r26711;
        float r26713 = b;
        float r26714 = r26713 * r26713;
        float r26715 = r26712 + r26714;
        float r26716 = 2;
        float r26717 = pow(r26715, r26716);
        float r26718 = 4;
        float r26719 = 1;
        float r26720 = r26719 + r26711;
        float r26721 = r26712 * r26720;
        float r26722 = 3;
        float r26723 = r26722 * r26711;
        float r26724 = r26719 - r26723;
        float r26725 = r26714 * r26724;
        float r26726 = r26721 + r26725;
        float r26727 = r26718 * r26726;
        float r26728 = r26717 + r26727;
        float r26729 = r26728 - r26719;
        return r26729;
}

double f_od(double a, double b) {
        double r26730 = a;
        double r26731 = r26730 * r26730;
        double r26732 = b;
        double r26733 = r26732 * r26732;
        double r26734 = r26731 + r26733;
        double r26735 = 2;
        double r26736 = pow(r26734, r26735);
        double r26737 = 4;
        double r26738 = 1;
        double r26739 = r26738 + r26730;
        double r26740 = r26731 * r26739;
        double r26741 = 3;
        double r26742 = r26741 * r26730;
        double r26743 = r26738 - r26742;
        double r26744 = r26733 * r26743;
        double r26745 = r26740 + r26744;
        double r26746 = r26737 * r26745;
        double r26747 = r26736 + r26746;
        double r26748 = r26747 - r26738;
        return r26748;
}

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 r26749, r26750, r26751, r26752, r26753, r26754, r26755, r26756, r26757, r26758, r26759, r26760, r26761, r26762, r26763, r26764, r26765, r26766, r26767;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(336);
        mpfr_init(r26749);
        mpfr_init(r26750);
        mpfr_init(r26751);
        mpfr_init(r26752);
        mpfr_init(r26753);
        mpfr_init_set_str(r26754, "2", 10, MPFR_RNDN);
        mpfr_init(r26755);
        mpfr_init_set_str(r26756, "4", 10, MPFR_RNDN);
        mpfr_init_set_str(r26757, "1", 10, MPFR_RNDN);
        mpfr_init(r26758);
        mpfr_init(r26759);
        mpfr_init_set_str(r26760, "3", 10, MPFR_RNDN);
        mpfr_init(r26761);
        mpfr_init(r26762);
        mpfr_init(r26763);
        mpfr_init(r26764);
        mpfr_init(r26765);
        mpfr_init(r26766);
        mpfr_init(r26767);
}

double f_im(double a, double b) {
        mpfr_set_d(r26749, a, MPFR_RNDN);
        mpfr_mul(r26750, r26749, r26749, MPFR_RNDN);
        mpfr_set_d(r26751, b, MPFR_RNDN);
        mpfr_mul(r26752, r26751, r26751, MPFR_RNDN);
        mpfr_add(r26753, r26750, r26752, MPFR_RNDN);
        ;
        mpfr_pow(r26755, r26753, r26754, MPFR_RNDN);
        ;
        ;
        mpfr_add(r26758, r26757, r26749, MPFR_RNDN);
        mpfr_mul(r26759, r26750, r26758, MPFR_RNDN);
        ;
        mpfr_mul(r26761, r26760, r26749, MPFR_RNDN);
        mpfr_sub(r26762, r26757, r26761, MPFR_RNDN);
        mpfr_mul(r26763, r26752, r26762, MPFR_RNDN);
        mpfr_add(r26764, r26759, r26763, MPFR_RNDN);
        mpfr_mul(r26765, r26756, r26764, MPFR_RNDN);
        mpfr_add(r26766, r26755, r26765, MPFR_RNDN);
        mpfr_sub(r26767, r26766, r26757, MPFR_RNDN);
        return mpfr_get_d(r26767, MPFR_RNDN);
}

static mpfr_t r26768, r26769, r26770, r26771, r26772, r26773, r26774, r26775, r26776, r26777, r26778, r26779, r26780, r26781, r26782, r26783, r26784, r26785, r26786;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(336);
        mpfr_init(r26768);
        mpfr_init(r26769);
        mpfr_init(r26770);
        mpfr_init(r26771);
        mpfr_init(r26772);
        mpfr_init_set_str(r26773, "2", 10, MPFR_RNDN);
        mpfr_init(r26774);
        mpfr_init_set_str(r26775, "4", 10, MPFR_RNDN);
        mpfr_init_set_str(r26776, "1", 10, MPFR_RNDN);
        mpfr_init(r26777);
        mpfr_init(r26778);
        mpfr_init_set_str(r26779, "3", 10, MPFR_RNDN);
        mpfr_init(r26780);
        mpfr_init(r26781);
        mpfr_init(r26782);
        mpfr_init(r26783);
        mpfr_init(r26784);
        mpfr_init(r26785);
        mpfr_init(r26786);
}

double f_fm(double a, double b) {
        mpfr_set_d(r26768, a, MPFR_RNDN);
        mpfr_mul(r26769, r26768, r26768, MPFR_RNDN);
        mpfr_set_d(r26770, b, MPFR_RNDN);
        mpfr_mul(r26771, r26770, r26770, MPFR_RNDN);
        mpfr_add(r26772, r26769, r26771, MPFR_RNDN);
        ;
        mpfr_pow(r26774, r26772, r26773, MPFR_RNDN);
        ;
        ;
        mpfr_add(r26777, r26776, r26768, MPFR_RNDN);
        mpfr_mul(r26778, r26769, r26777, MPFR_RNDN);
        ;
        mpfr_mul(r26780, r26779, r26768, MPFR_RNDN);
        mpfr_sub(r26781, r26776, r26780, MPFR_RNDN);
        mpfr_mul(r26782, r26771, r26781, MPFR_RNDN);
        mpfr_add(r26783, r26778, r26782, MPFR_RNDN);
        mpfr_mul(r26784, r26775, r26783, MPFR_RNDN);
        mpfr_add(r26785, r26774, r26784, MPFR_RNDN);
        mpfr_sub(r26786, r26785, r26776, MPFR_RNDN);
        return mpfr_get_d(r26786, MPFR_RNDN);
}

static mpfr_t r26787, r26788, r26789, r26790, r26791, r26792, r26793, r26794, r26795, r26796, r26797, r26798, r26799, r26800, r26801, r26802, r26803, r26804, r26805;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(336);
        mpfr_init(r26787);
        mpfr_init(r26788);
        mpfr_init(r26789);
        mpfr_init(r26790);
        mpfr_init(r26791);
        mpfr_init_set_str(r26792, "2", 10, MPFR_RNDN);
        mpfr_init(r26793);
        mpfr_init_set_str(r26794, "4", 10, MPFR_RNDN);
        mpfr_init_set_str(r26795, "1", 10, MPFR_RNDN);
        mpfr_init(r26796);
        mpfr_init(r26797);
        mpfr_init_set_str(r26798, "3", 10, MPFR_RNDN);
        mpfr_init(r26799);
        mpfr_init(r26800);
        mpfr_init(r26801);
        mpfr_init(r26802);
        mpfr_init(r26803);
        mpfr_init(r26804);
        mpfr_init(r26805);
}

double f_dm(double a, double b) {
        mpfr_set_d(r26787, a, MPFR_RNDN);
        mpfr_mul(r26788, r26787, r26787, MPFR_RNDN);
        mpfr_set_d(r26789, b, MPFR_RNDN);
        mpfr_mul(r26790, r26789, r26789, MPFR_RNDN);
        mpfr_add(r26791, r26788, r26790, MPFR_RNDN);
        ;
        mpfr_pow(r26793, r26791, r26792, MPFR_RNDN);
        ;
        ;
        mpfr_add(r26796, r26795, r26787, MPFR_RNDN);
        mpfr_mul(r26797, r26788, r26796, MPFR_RNDN);
        ;
        mpfr_mul(r26799, r26798, r26787, MPFR_RNDN);
        mpfr_sub(r26800, r26795, r26799, MPFR_RNDN);
        mpfr_mul(r26801, r26790, r26800, MPFR_RNDN);
        mpfr_add(r26802, r26797, r26801, MPFR_RNDN);
        mpfr_mul(r26803, r26794, r26802, MPFR_RNDN);
        mpfr_add(r26804, r26793, r26803, MPFR_RNDN);
        mpfr_sub(r26805, r26804, r26795, MPFR_RNDN);
        return mpfr_get_d(r26805, MPFR_RNDN);
}