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

char *name = "logs (example 3.8)";

double f_if(float n) {
        float r26268 = n;
        float r26269 = 1;
        float r26270 = r26268 + r26269;
        float r26271 = log(r26270);
        float r26272 = r26270 * r26271;
        float r26273 = log(r26268);
        float r26274 = r26268 * r26273;
        float r26275 = r26272 - r26274;
        float r26276 = r26275 - r26269;
        return r26276;
}

double f_id(double n) {
        double r26277 = n;
        double r26278 = 1;
        double r26279 = r26277 + r26278;
        double r26280 = log(r26279);
        double r26281 = r26279 * r26280;
        double r26282 = log(r26277);
        double r26283 = r26277 * r26282;
        double r26284 = r26281 - r26283;
        double r26285 = r26284 - r26278;
        return r26285;
}


double f_of(float n) {
        float r26286 = 1/3;
        float r26287 = n;
        float r26288 = r26286 / r26287;
        float r26289 = 1;
        float r26290 = r26289 / r26287;
        float r26291 = fma(r26288, r26290, r26289);
        float r26292 = 1/2;
        float r26293 = -r26292;
        float r26294 = log1p(r26287);
        float r26295 = fma(r26290, r26293, r26294);
        float r26296 = r26291 + r26295;
        float r26297 = r26296 - r26289;
        return r26297;
}

double f_od(double n) {
        double r26298 = 1/3;
        double r26299 = n;
        double r26300 = r26298 / r26299;
        double r26301 = 1;
        double r26302 = r26301 / r26299;
        double r26303 = fma(r26300, r26302, r26301);
        double r26304 = 1/2;
        double r26305 = -r26304;
        double r26306 = log1p(r26299);
        double r26307 = fma(r26302, r26305, r26306);
        double r26308 = r26303 + r26307;
        double r26309 = r26308 - r26301;
        return r26309;
}

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 r26310, r26311, r26312, r26313, r26314, r26315, r26316, r26317, r26318;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(1360);
        mpfr_init(r26310);
        mpfr_init_set_str(r26311, "1", 10, MPFR_RNDN);
        mpfr_init(r26312);
        mpfr_init(r26313);
        mpfr_init(r26314);
        mpfr_init(r26315);
        mpfr_init(r26316);
        mpfr_init(r26317);
        mpfr_init(r26318);
}

double f_im(double n) {
        mpfr_set_d(r26310, n, MPFR_RNDN);
        ;
        mpfr_add(r26312, r26310, r26311, MPFR_RNDN);
        mpfr_log(r26313, r26312, MPFR_RNDN);
        mpfr_mul(r26314, r26312, r26313, MPFR_RNDN);
        mpfr_log(r26315, r26310, MPFR_RNDN);
        mpfr_mul(r26316, r26310, r26315, MPFR_RNDN);
        mpfr_sub(r26317, r26314, r26316, MPFR_RNDN);
        mpfr_sub(r26318, r26317, r26311, MPFR_RNDN);
        return mpfr_get_d(r26318, MPFR_RNDN);
}

static mpfr_t r26319, r26320, r26321, r26322, r26323, r26324, r26325, r26326, r26327, r26328, r26329, r26330;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(1360);
        mpfr_init_set_str(r26319, "1/3", 10, MPFR_RNDN);
        mpfr_init(r26320);
        mpfr_init(r26321);
        mpfr_init_set_str(r26322, "1", 10, MPFR_RNDN);
        mpfr_init(r26323);
        mpfr_init(r26324);
        mpfr_init_set_str(r26325, "1/2", 10, MPFR_RNDN);
        mpfr_init(r26326);
        mpfr_init(r26327);
        mpfr_init(r26328);
        mpfr_init(r26329);
        mpfr_init(r26330);
}

double f_fm(double n) {
        ;
        mpfr_set_d(r26320, n, MPFR_RNDN);
        mpfr_div(r26321, r26319, r26320, MPFR_RNDN);
        ;
        mpfr_div(r26323, r26322, r26320, MPFR_RNDN);
        mpfr_fma(r26324, r26321, r26323, r26322, MPFR_RNDN);
        ;
        mpfr_neg(r26326, r26325, MPFR_RNDN);
        mpfr_log1p(r26327, r26320, MPFR_RNDN);
        mpfr_fma(r26328, r26323, r26326, r26327, MPFR_RNDN);
        mpfr_add(r26329, r26324, r26328, MPFR_RNDN);
        mpfr_sub(r26330, r26329, r26322, MPFR_RNDN);
        return mpfr_get_d(r26330, MPFR_RNDN);
}

static mpfr_t r26331, r26332, r26333, r26334, r26335, r26336, r26337, r26338, r26339, r26340, r26341, r26342;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(1360);
        mpfr_init_set_str(r26331, "1/3", 10, MPFR_RNDN);
        mpfr_init(r26332);
        mpfr_init(r26333);
        mpfr_init_set_str(r26334, "1", 10, MPFR_RNDN);
        mpfr_init(r26335);
        mpfr_init(r26336);
        mpfr_init_set_str(r26337, "1/2", 10, MPFR_RNDN);
        mpfr_init(r26338);
        mpfr_init(r26339);
        mpfr_init(r26340);
        mpfr_init(r26341);
        mpfr_init(r26342);
}

double f_dm(double n) {
        ;
        mpfr_set_d(r26332, n, MPFR_RNDN);
        mpfr_div(r26333, r26331, r26332, MPFR_RNDN);
        ;
        mpfr_div(r26335, r26334, r26332, MPFR_RNDN);
        mpfr_fma(r26336, r26333, r26335, r26334, MPFR_RNDN);
        ;
        mpfr_neg(r26338, r26337, MPFR_RNDN);
        mpfr_log1p(r26339, r26332, MPFR_RNDN);
        mpfr_fma(r26340, r26335, r26338, r26339, MPFR_RNDN);
        mpfr_add(r26341, r26336, r26340, MPFR_RNDN);
        mpfr_sub(r26342, r26341, r26334, MPFR_RNDN);
        return mpfr_get_d(r26342, MPFR_RNDN);
}