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

char *name = "r*sin(b)/cos(a+b), A";

double f_if(float r, float a, float b) {
        float r20667 = r;
        float r20668 = b;
        float r20669 = sin(r20668);
        float r20670 = r20667 * r20669;
        float r20671 = a;
        float r20672 = r20671 + r20668;
        float r20673 = cos(r20672);
        float r20674 = r20670 / r20673;
        return r20674;
}

double f_id(double r, double a, double b) {
        double r20675 = r;
        double r20676 = b;
        double r20677 = sin(r20676);
        double r20678 = r20675 * r20677;
        double r20679 = a;
        double r20680 = r20679 + r20676;
        double r20681 = cos(r20680);
        double r20682 = r20678 / r20681;
        return r20682;
}


double f_of(float r, float a, float b) {
        float r20683 = r;
        float r20684 = 1;
        float r20685 = r20683 / r20684;
        float r20686 = b;
        float r20687 = sin(r20686);
        float r20688 = a;
        float r20689 = cos(r20688);
        float r20690 = cos(r20686);
        float r20691 = sin(r20688);
        float r20692 = r20691 * r20687;
        float r20693 = expm1(r20692);
        float r20694 = log1p(r20693);
        float r20695 = -r20694;
        float r20696 = fma(r20689, r20690, r20695);
        float r20697 = r20687 / r20696;
        float r20698 = r20685 * r20697;
        return r20698;
}

double f_od(double r, double a, double b) {
        double r20699 = r;
        double r20700 = 1;
        double r20701 = r20699 / r20700;
        double r20702 = b;
        double r20703 = sin(r20702);
        double r20704 = a;
        double r20705 = cos(r20704);
        double r20706 = cos(r20702);
        double r20707 = sin(r20704);
        double r20708 = r20707 * r20703;
        double r20709 = expm1(r20708);
        double r20710 = log1p(r20709);
        double r20711 = -r20710;
        double r20712 = fma(r20705, r20706, r20711);
        double r20713 = r20703 / r20712;
        double r20714 = r20701 * r20713;
        return r20714;
}

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 r20715, r20716, r20717, r20718, r20719, r20720, r20721, r20722;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(1424);
        mpfr_init(r20715);
        mpfr_init(r20716);
        mpfr_init(r20717);
        mpfr_init(r20718);
        mpfr_init(r20719);
        mpfr_init(r20720);
        mpfr_init(r20721);
        mpfr_init(r20722);
}

double f_im(double r, double a, double b) {
        mpfr_set_d(r20715, r, MPFR_RNDN);
        mpfr_set_d(r20716, b, MPFR_RNDN);
        mpfr_sin(r20717, r20716, MPFR_RNDN);
        mpfr_mul(r20718, r20715, r20717, MPFR_RNDN);
        mpfr_set_d(r20719, a, MPFR_RNDN);
        mpfr_add(r20720, r20719, r20716, MPFR_RNDN);
        mpfr_cos(r20721, r20720, MPFR_RNDN);
        mpfr_div(r20722, r20718, r20721, MPFR_RNDN);
        return mpfr_get_d(r20722, MPFR_RNDN);
}

static mpfr_t r20723, r20724, r20725, r20726, r20727, r20728, r20729, r20730, r20731, r20732, r20733, r20734, r20735, r20736, r20737, r20738;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(1424);
        mpfr_init(r20723);
        mpfr_init_set_str(r20724, "1", 10, MPFR_RNDN);
        mpfr_init(r20725);
        mpfr_init(r20726);
        mpfr_init(r20727);
        mpfr_init(r20728);
        mpfr_init(r20729);
        mpfr_init(r20730);
        mpfr_init(r20731);
        mpfr_init(r20732);
        mpfr_init(r20733);
        mpfr_init(r20734);
        mpfr_init(r20735);
        mpfr_init(r20736);
        mpfr_init(r20737);
        mpfr_init(r20738);
}

double f_fm(double r, double a, double b) {
        mpfr_set_d(r20723, r, MPFR_RNDN);
        ;
        mpfr_div(r20725, r20723, r20724, MPFR_RNDN);
        mpfr_set_d(r20726, b, MPFR_RNDN);
        mpfr_sin(r20727, r20726, MPFR_RNDN);
        mpfr_set_d(r20728, a, MPFR_RNDN);
        mpfr_cos(r20729, r20728, MPFR_RNDN);
        mpfr_cos(r20730, r20726, MPFR_RNDN);
        mpfr_sin(r20731, r20728, MPFR_RNDN);
        mpfr_mul(r20732, r20731, r20727, MPFR_RNDN);
        mpfr_expm1(r20733, r20732, MPFR_RNDN);
        mpfr_log1p(r20734, r20733, MPFR_RNDN);
        mpfr_neg(r20735, r20734, MPFR_RNDN);
        mpfr_fma(r20736, r20729, r20730, r20735, MPFR_RNDN);
        mpfr_div(r20737, r20727, r20736, MPFR_RNDN);
        mpfr_mul(r20738, r20725, r20737, MPFR_RNDN);
        return mpfr_get_d(r20738, MPFR_RNDN);
}

static mpfr_t r20739, r20740, r20741, r20742, r20743, r20744, r20745, r20746, r20747, r20748, r20749, r20750, r20751, r20752, r20753, r20754;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(1424);
        mpfr_init(r20739);
        mpfr_init_set_str(r20740, "1", 10, MPFR_RNDN);
        mpfr_init(r20741);
        mpfr_init(r20742);
        mpfr_init(r20743);
        mpfr_init(r20744);
        mpfr_init(r20745);
        mpfr_init(r20746);
        mpfr_init(r20747);
        mpfr_init(r20748);
        mpfr_init(r20749);
        mpfr_init(r20750);
        mpfr_init(r20751);
        mpfr_init(r20752);
        mpfr_init(r20753);
        mpfr_init(r20754);
}

double f_dm(double r, double a, double b) {
        mpfr_set_d(r20739, r, MPFR_RNDN);
        ;
        mpfr_div(r20741, r20739, r20740, MPFR_RNDN);
        mpfr_set_d(r20742, b, MPFR_RNDN);
        mpfr_sin(r20743, r20742, MPFR_RNDN);
        mpfr_set_d(r20744, a, MPFR_RNDN);
        mpfr_cos(r20745, r20744, MPFR_RNDN);
        mpfr_cos(r20746, r20742, MPFR_RNDN);
        mpfr_sin(r20747, r20744, MPFR_RNDN);
        mpfr_mul(r20748, r20747, r20743, MPFR_RNDN);
        mpfr_expm1(r20749, r20748, MPFR_RNDN);
        mpfr_log1p(r20750, r20749, MPFR_RNDN);
        mpfr_neg(r20751, r20750, MPFR_RNDN);
        mpfr_fma(r20752, r20745, r20746, r20751, MPFR_RNDN);
        mpfr_div(r20753, r20743, r20752, MPFR_RNDN);
        mpfr_mul(r20754, r20741, r20753, MPFR_RNDN);
        return mpfr_get_d(r20754, MPFR_RNDN);
}