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

char *name = "NMSE Section 6.1 mentioned, B";

double f_if(float a, float b) {
        float r26106 = atan2(1.0, 0.0);
        float r26107 = 2.0f;
        float r26108 = r26106 / r26107;
        float r26109 = 1.0f;
        float r26110 = b;
        float r26111 = r26110 * r26110;
        float r26112 = a;
        float r26113 = r26112 * r26112;
        float r26114 = r26111 - r26113;
        float r26115 = r26109 / r26114;
        float r26116 = r26108 * r26115;
        float r26117 = r26109 / r26112;
        float r26118 = r26109 / r26110;
        float r26119 = r26117 - r26118;
        float r26120 = r26116 * r26119;
        return r26120;
}

double f_id(double a, double b) {
        double r26121 = atan2(1.0, 0.0);
        double r26122 = 2.0;
        double r26123 = r26121 / r26122;
        double r26124 = 1.0;
        double r26125 = b;
        double r26126 = r26125 * r26125;
        double r26127 = a;
        double r26128 = r26127 * r26127;
        double r26129 = r26126 - r26128;
        double r26130 = r26124 / r26129;
        double r26131 = r26123 * r26130;
        double r26132 = r26124 / r26127;
        double r26133 = r26124 / r26125;
        double r26134 = r26132 - r26133;
        double r26135 = r26131 * r26134;
        return r26135;
}


double f_of(float a, float b) {
        float r26136 = atan2(1.0, 0.0);
        float r26137 = b;
        float r26138 = a;
        float r26139 = r26137 + r26138;
        float r26140 = r26136 / r26139;
        float r26141 = 1.0f;
        float r26142 = 2.0f;
        float r26143 = r26138 * r26137;
        float r26144 = r26142 * r26143;
        float r26145 = r26141 / r26144;
        float r26146 = r26140 * r26145;
        return r26146;
}

double f_od(double a, double b) {
        double r26147 = atan2(1.0, 0.0);
        double r26148 = b;
        double r26149 = a;
        double r26150 = r26148 + r26149;
        double r26151 = r26147 / r26150;
        double r26152 = 1.0;
        double r26153 = 2.0;
        double r26154 = r26149 * r26148;
        double r26155 = r26153 * r26154;
        double r26156 = r26152 / r26155;
        double r26157 = r26151 * r26156;
        return r26157;
}

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 r26158, r26159, r26160, r26161, r26162, r26163, r26164, r26165, r26166, r26167, r26168, r26169, r26170, r26171, r26172;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init(r26158);
        mpfr_init_set_str(r26159, "2", 10, MPFR_RNDN);
        mpfr_init(r26160);
        mpfr_init_set_str(r26161, "1", 10, MPFR_RNDN);
        mpfr_init(r26162);
        mpfr_init(r26163);
        mpfr_init(r26164);
        mpfr_init(r26165);
        mpfr_init(r26166);
        mpfr_init(r26167);
        mpfr_init(r26168);
        mpfr_init(r26169);
        mpfr_init(r26170);
        mpfr_init(r26171);
        mpfr_init(r26172);
}

double f_im(double a, double b) {
        mpfr_const_pi(r26158, MPFR_RNDN);
        ;
        mpfr_div(r26160, r26158, r26159, MPFR_RNDN);
        ;
        mpfr_set_d(r26162, b, MPFR_RNDN);
        mpfr_sqr(r26163, r26162, MPFR_RNDN);
        mpfr_set_d(r26164, a, MPFR_RNDN);
        mpfr_sqr(r26165, r26164, MPFR_RNDN);
        mpfr_sub(r26166, r26163, r26165, MPFR_RNDN);
        mpfr_div(r26167, r26161, r26166, MPFR_RNDN);
        mpfr_mul(r26168, r26160, r26167, MPFR_RNDN);
        mpfr_div(r26169, r26161, r26164, MPFR_RNDN);
        mpfr_div(r26170, r26161, r26162, MPFR_RNDN);
        mpfr_sub(r26171, r26169, r26170, MPFR_RNDN);
        mpfr_mul(r26172, r26168, r26171, MPFR_RNDN);
        return mpfr_get_d(r26172, MPFR_RNDN);
}

static mpfr_t r26173, r26174, r26175, r26176, r26177, r26178, r26179, r26180, r26181, r26182, r26183;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init(r26173);
        mpfr_init(r26174);
        mpfr_init(r26175);
        mpfr_init(r26176);
        mpfr_init(r26177);
        mpfr_init_set_str(r26178, "1", 10, MPFR_RNDN);
        mpfr_init_set_str(r26179, "2", 10, MPFR_RNDN);
        mpfr_init(r26180);
        mpfr_init(r26181);
        mpfr_init(r26182);
        mpfr_init(r26183);
}

double f_fm(double a, double b) {
        mpfr_const_pi(r26173, MPFR_RNDN);
        mpfr_set_d(r26174, b, MPFR_RNDN);
        mpfr_set_d(r26175, a, MPFR_RNDN);
        mpfr_add(r26176, r26174, r26175, MPFR_RNDN);
        mpfr_div(r26177, r26173, r26176, MPFR_RNDN);
        ;
        ;
        mpfr_mul(r26180, r26175, r26174, MPFR_RNDN);
        mpfr_mul(r26181, r26179, r26180, MPFR_RNDN);
        mpfr_div(r26182, r26178, r26181, MPFR_RNDN);
        mpfr_mul(r26183, r26177, r26182, MPFR_RNDN);
        return mpfr_get_d(r26183, MPFR_RNDN);
}

static mpfr_t r26184, r26185, r26186, r26187, r26188, r26189, r26190, r26191, r26192, r26193, r26194;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init(r26184);
        mpfr_init(r26185);
        mpfr_init(r26186);
        mpfr_init(r26187);
        mpfr_init(r26188);
        mpfr_init_set_str(r26189, "1", 10, MPFR_RNDN);
        mpfr_init_set_str(r26190, "2", 10, MPFR_RNDN);
        mpfr_init(r26191);
        mpfr_init(r26192);
        mpfr_init(r26193);
        mpfr_init(r26194);
}

double f_dm(double a, double b) {
        mpfr_const_pi(r26184, MPFR_RNDN);
        mpfr_set_d(r26185, b, MPFR_RNDN);
        mpfr_set_d(r26186, a, MPFR_RNDN);
        mpfr_add(r26187, r26185, r26186, MPFR_RNDN);
        mpfr_div(r26188, r26184, r26187, MPFR_RNDN);
        ;
        ;
        mpfr_mul(r26191, r26186, r26185, MPFR_RNDN);
        mpfr_mul(r26192, r26190, r26191, MPFR_RNDN);
        mpfr_div(r26193, r26189, r26192, MPFR_RNDN);
        mpfr_mul(r26194, r26188, r26193, MPFR_RNDN);
        return mpfr_get_d(r26194, MPFR_RNDN);
}

