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

char *name = "Data.Colour.CIE:cieLABView from colour-2.3.3, A";

double f_if(float x) {
        float r35602 = 841.0;
        float r35603 = 108.0;
        float r35604 = r35602 / r35603;
        float r35605 = x;
        float r35606 = r35604 * r35605;
        float r35607 = 4.0;
        float r35608 = 29.0;
        float r35609 = r35607 / r35608;
        float r35610 = r35606 + r35609;
        return r35610;
}

double f_id(double x) {
        double r35611 = 841.0;
        double r35612 = 108.0;
        double r35613 = r35611 / r35612;
        double r35614 = x;
        double r35615 = r35613 * r35614;
        double r35616 = 4.0;
        double r35617 = 29.0;
        double r35618 = r35616 / r35617;
        double r35619 = r35615 + r35618;
        return r35619;
}


double f_of(float x) {
        float r35620 = 841.0;
        float r35621 = 108.0;
        float r35622 = r35620 / r35621;
        float r35623 = x;
        float r35624 = r35622 * r35623;
        float r35625 = 4.0;
        float r35626 = 29.0;
        float r35627 = r35625 / r35626;
        float r35628 = r35624 + r35627;
        return r35628;
}

double f_od(double x) {
        double r35629 = 841.0;
        double r35630 = 108.0;
        double r35631 = r35629 / r35630;
        double r35632 = x;
        double r35633 = r35631 * r35632;
        double r35634 = 4.0;
        double r35635 = 29.0;
        double r35636 = r35634 / r35635;
        double r35637 = r35633 + r35636;
        return r35637;
}

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 r35638, r35639, r35640, r35641, r35642, r35643, r35644, r35645, r35646;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init_set_str(r35638, "841.0", 10, MPFR_RNDN);
        mpfr_init_set_str(r35639, "108.0", 10, MPFR_RNDN);
        mpfr_init(r35640);
        mpfr_init(r35641);
        mpfr_init(r35642);
        mpfr_init_set_str(r35643, "4.0", 10, MPFR_RNDN);
        mpfr_init_set_str(r35644, "29.0", 10, MPFR_RNDN);
        mpfr_init(r35645);
        mpfr_init(r35646);
}

double f_im(double x) {
        ;
        ;
        mpfr_div(r35640, r35638, r35639, MPFR_RNDN);
        mpfr_set_d(r35641, x, MPFR_RNDN);
        mpfr_mul(r35642, r35640, r35641, MPFR_RNDN);
        ;
        ;
        mpfr_div(r35645, r35643, r35644, MPFR_RNDN);
        mpfr_add(r35646, r35642, r35645, MPFR_RNDN);
        return mpfr_get_d(r35646, MPFR_RNDN);
}

static mpfr_t r35647, r35648, r35649, r35650, r35651, r35652, r35653, r35654, r35655;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init_set_str(r35647, "841.0", 10, MPFR_RNDN);
        mpfr_init_set_str(r35648, "108.0", 10, MPFR_RNDN);
        mpfr_init(r35649);
        mpfr_init(r35650);
        mpfr_init(r35651);
        mpfr_init_set_str(r35652, "4.0", 10, MPFR_RNDN);
        mpfr_init_set_str(r35653, "29.0", 10, MPFR_RNDN);
        mpfr_init(r35654);
        mpfr_init(r35655);
}

double f_fm(double x) {
        ;
        ;
        mpfr_div(r35649, r35647, r35648, MPFR_RNDN);
        mpfr_set_d(r35650, x, MPFR_RNDN);
        mpfr_mul(r35651, r35649, r35650, MPFR_RNDN);
        ;
        ;
        mpfr_div(r35654, r35652, r35653, MPFR_RNDN);
        mpfr_add(r35655, r35651, r35654, MPFR_RNDN);
        return mpfr_get_d(r35655, MPFR_RNDN);
}

static mpfr_t r35656, r35657, r35658, r35659, r35660, r35661, r35662, r35663, r35664;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init_set_str(r35656, "841.0", 10, MPFR_RNDN);
        mpfr_init_set_str(r35657, "108.0", 10, MPFR_RNDN);
        mpfr_init(r35658);
        mpfr_init(r35659);
        mpfr_init(r35660);
        mpfr_init_set_str(r35661, "4.0", 10, MPFR_RNDN);
        mpfr_init_set_str(r35662, "29.0", 10, MPFR_RNDN);
        mpfr_init(r35663);
        mpfr_init(r35664);
}

double f_dm(double x) {
        ;
        ;
        mpfr_div(r35658, r35656, r35657, MPFR_RNDN);
        mpfr_set_d(r35659, x, MPFR_RNDN);
        mpfr_mul(r35660, r35658, r35659, MPFR_RNDN);
        ;
        ;
        mpfr_div(r35663, r35661, r35662, MPFR_RNDN);
        mpfr_add(r35664, r35660, r35663, MPFR_RNDN);
        return mpfr_get_d(r35664, MPFR_RNDN);
}