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

char *name = "Rosa's TurbineBenchmark";

double f_if(float v, float w, float r) {
        float r14766 = 3.0f;
        float r14767 = 2.0f;
        float r14768 = r;
        float r14769 = r14768 * r14768;
        float r14770 = r14767 / r14769;
        float r14771 = r14766 + r14770;
        float r14772 = 0.125f;
        float r14773 = v;
        float r14774 = r14767 * r14773;
        float r14775 = r14766 - r14774;
        float r14776 = r14772 * r14775;
        float r14777 = w;
        float r14778 = r14777 * r14777;
        float r14779 = r14778 * r14768;
        float r14780 = r14779 * r14768;
        float r14781 = r14776 * r14780;
        float r14782 = 1.0f;
        float r14783 = r14782 - r14773;
        float r14784 = r14781 / r14783;
        float r14785 = r14771 - r14784;
        float r14786 = 4.5f;
        float r14787 = r14785 - r14786;
        return r14787;
}

double f_id(double v, double w, double r) {
        double r14788 = 3.0;
        double r14789 = 2.0;
        double r14790 = r;
        double r14791 = r14790 * r14790;
        double r14792 = r14789 / r14791;
        double r14793 = r14788 + r14792;
        double r14794 = 0.125;
        double r14795 = v;
        double r14796 = r14789 * r14795;
        double r14797 = r14788 - r14796;
        double r14798 = r14794 * r14797;
        double r14799 = w;
        double r14800 = r14799 * r14799;
        double r14801 = r14800 * r14790;
        double r14802 = r14801 * r14790;
        double r14803 = r14798 * r14802;
        double r14804 = 1.0;
        double r14805 = r14804 - r14795;
        double r14806 = r14803 / r14805;
        double r14807 = r14793 - r14806;
        double r14808 = 4.5;
        double r14809 = r14807 - r14808;
        return r14809;
}


double f_of(float v, float w, float r) {
        float r14810 = 3.0f;
        float r14811 = 4.5f;
        float r14812 = r14810 - r14811;
        float r14813 = 2.0f;
        float r14814 = r;
        float r14815 = r14814 * r14814;
        float r14816 = r14813 / r14815;
        float r14817 = r14812 + r14816;
        float r14818 = 0.125f;
        float r14819 = 1.0f;
        float r14820 = v;
        float r14821 = r14819 - r14820;
        float r14822 = r14818 / r14821;
        float r14823 = r14813 * r14820;
        float r14824 = r14810 - r14823;
        float r14825 = r14822 * r14824;
        float r14826 = w;
        float r14827 = r14826 * r14814;
        float r14828 = r14825 * r14827;
        float r14829 = r14828 * r14827;
        float r14830 = r14817 - r14829;
        return r14830;
}

double f_od(double v, double w, double r) {
        double r14831 = 3.0;
        double r14832 = 4.5;
        double r14833 = r14831 - r14832;
        double r14834 = 2.0;
        double r14835 = r;
        double r14836 = r14835 * r14835;
        double r14837 = r14834 / r14836;
        double r14838 = r14833 + r14837;
        double r14839 = 0.125;
        double r14840 = 1.0;
        double r14841 = v;
        double r14842 = r14840 - r14841;
        double r14843 = r14839 / r14842;
        double r14844 = r14834 * r14841;
        double r14845 = r14831 - r14844;
        double r14846 = r14843 * r14845;
        double r14847 = w;
        double r14848 = r14847 * r14835;
        double r14849 = r14846 * r14848;
        double r14850 = r14849 * r14848;
        double r14851 = r14838 - r14850;
        return r14851;
}

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 r14852, r14853, r14854, r14855, r14856, r14857, r14858, r14859, r14860, r14861, r14862, r14863, r14864, r14865, r14866, r14867, r14868, r14869, r14870, r14871, r14872, r14873;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(144);
        mpfr_init_set_str(r14852, "3", 10, MPFR_RNDN);
        mpfr_init_set_str(r14853, "2", 10, MPFR_RNDN);
        mpfr_init(r14854);
        mpfr_init(r14855);
        mpfr_init(r14856);
        mpfr_init(r14857);
        mpfr_init_set_str(r14858, "0.125", 10, MPFR_RNDN);
        mpfr_init(r14859);
        mpfr_init(r14860);
        mpfr_init(r14861);
        mpfr_init(r14862);
        mpfr_init(r14863);
        mpfr_init(r14864);
        mpfr_init(r14865);
        mpfr_init(r14866);
        mpfr_init(r14867);
        mpfr_init_set_str(r14868, "1", 10, MPFR_RNDN);
        mpfr_init(r14869);
        mpfr_init(r14870);
        mpfr_init(r14871);
        mpfr_init_set_str(r14872, "4.5", 10, MPFR_RNDN);
        mpfr_init(r14873);
}

double f_im(double v, double w, double r) {
        ;
        ;
        mpfr_set_d(r14854, r, MPFR_RNDN);
        mpfr_mul(r14855, r14854, r14854, MPFR_RNDN);
        mpfr_div(r14856, r14853, r14855, MPFR_RNDN);
        mpfr_add(r14857, r14852, r14856, MPFR_RNDN);
        ;
        mpfr_set_d(r14859, v, MPFR_RNDN);
        mpfr_mul(r14860, r14853, r14859, MPFR_RNDN);
        mpfr_sub(r14861, r14852, r14860, MPFR_RNDN);
        mpfr_mul(r14862, r14858, r14861, MPFR_RNDN);
        mpfr_set_d(r14863, w, MPFR_RNDN);
        mpfr_mul(r14864, r14863, r14863, MPFR_RNDN);
        mpfr_mul(r14865, r14864, r14854, MPFR_RNDN);
        mpfr_mul(r14866, r14865, r14854, MPFR_RNDN);
        mpfr_mul(r14867, r14862, r14866, MPFR_RNDN);
        ;
        mpfr_sub(r14869, r14868, r14859, MPFR_RNDN);
        mpfr_div(r14870, r14867, r14869, MPFR_RNDN);
        mpfr_sub(r14871, r14857, r14870, MPFR_RNDN);
        ;
        mpfr_sub(r14873, r14871, r14872, MPFR_RNDN);
        return mpfr_get_d(r14873, MPFR_RNDN);
}

static mpfr_t r14874, r14875, r14876, r14877, r14878, r14879, r14880, r14881, r14882, r14883, r14884, r14885, r14886, r14887, r14888, r14889, r14890, r14891, r14892, r14893, r14894;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(144);
        mpfr_init_set_str(r14874, "3", 10, MPFR_RNDN);
        mpfr_init_set_str(r14875, "4.5", 10, MPFR_RNDN);
        mpfr_init(r14876);
        mpfr_init_set_str(r14877, "2", 10, MPFR_RNDN);
        mpfr_init(r14878);
        mpfr_init(r14879);
        mpfr_init(r14880);
        mpfr_init(r14881);
        mpfr_init_set_str(r14882, "0.125", 10, MPFR_RNDN);
        mpfr_init_set_str(r14883, "1", 10, MPFR_RNDN);
        mpfr_init(r14884);
        mpfr_init(r14885);
        mpfr_init(r14886);
        mpfr_init(r14887);
        mpfr_init(r14888);
        mpfr_init(r14889);
        mpfr_init(r14890);
        mpfr_init(r14891);
        mpfr_init(r14892);
        mpfr_init(r14893);
        mpfr_init(r14894);
}

double f_fm(double v, double w, double r) {
        ;
        ;
        mpfr_sub(r14876, r14874, r14875, MPFR_RNDN);
        ;
        mpfr_set_d(r14878, r, MPFR_RNDN);
        mpfr_mul(r14879, r14878, r14878, MPFR_RNDN);
        mpfr_div(r14880, r14877, r14879, MPFR_RNDN);
        mpfr_add(r14881, r14876, r14880, MPFR_RNDN);
        ;
        ;
        mpfr_set_d(r14884, v, MPFR_RNDN);
        mpfr_sub(r14885, r14883, r14884, MPFR_RNDN);
        mpfr_div(r14886, r14882, r14885, MPFR_RNDN);
        mpfr_mul(r14887, r14877, r14884, MPFR_RNDN);
        mpfr_sub(r14888, r14874, r14887, MPFR_RNDN);
        mpfr_mul(r14889, r14886, r14888, MPFR_RNDN);
        mpfr_set_d(r14890, w, MPFR_RNDN);
        mpfr_mul(r14891, r14890, r14878, MPFR_RNDN);
        mpfr_mul(r14892, r14889, r14891, MPFR_RNDN);
        mpfr_mul(r14893, r14892, r14891, MPFR_RNDN);
        mpfr_sub(r14894, r14881, r14893, MPFR_RNDN);
        return mpfr_get_d(r14894, MPFR_RNDN);
}

static mpfr_t r14895, r14896, r14897, r14898, r14899, r14900, r14901, r14902, r14903, r14904, r14905, r14906, r14907, r14908, r14909, r14910, r14911, r14912, r14913, r14914, r14915;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(144);
        mpfr_init_set_str(r14895, "3", 10, MPFR_RNDN);
        mpfr_init_set_str(r14896, "4.5", 10, MPFR_RNDN);
        mpfr_init(r14897);
        mpfr_init_set_str(r14898, "2", 10, MPFR_RNDN);
        mpfr_init(r14899);
        mpfr_init(r14900);
        mpfr_init(r14901);
        mpfr_init(r14902);
        mpfr_init_set_str(r14903, "0.125", 10, MPFR_RNDN);
        mpfr_init_set_str(r14904, "1", 10, MPFR_RNDN);
        mpfr_init(r14905);
        mpfr_init(r14906);
        mpfr_init(r14907);
        mpfr_init(r14908);
        mpfr_init(r14909);
        mpfr_init(r14910);
        mpfr_init(r14911);
        mpfr_init(r14912);
        mpfr_init(r14913);
        mpfr_init(r14914);
        mpfr_init(r14915);
}

double f_dm(double v, double w, double r) {
        ;
        ;
        mpfr_sub(r14897, r14895, r14896, MPFR_RNDN);
        ;
        mpfr_set_d(r14899, r, MPFR_RNDN);
        mpfr_mul(r14900, r14899, r14899, MPFR_RNDN);
        mpfr_div(r14901, r14898, r14900, MPFR_RNDN);
        mpfr_add(r14902, r14897, r14901, MPFR_RNDN);
        ;
        ;
        mpfr_set_d(r14905, v, MPFR_RNDN);
        mpfr_sub(r14906, r14904, r14905, MPFR_RNDN);
        mpfr_div(r14907, r14903, r14906, MPFR_RNDN);
        mpfr_mul(r14908, r14898, r14905, MPFR_RNDN);
        mpfr_sub(r14909, r14895, r14908, MPFR_RNDN);
        mpfr_mul(r14910, r14907, r14909, MPFR_RNDN);
        mpfr_set_d(r14911, w, MPFR_RNDN);
        mpfr_mul(r14912, r14911, r14899, MPFR_RNDN);
        mpfr_mul(r14913, r14910, r14912, MPFR_RNDN);
        mpfr_mul(r14914, r14913, r14912, MPFR_RNDN);
        mpfr_sub(r14915, r14902, r14914, MPFR_RNDN);
        return mpfr_get_d(r14915, MPFR_RNDN);
}

