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

char *name = "Data.Colour.RGBSpace.HSL:hsl from colour-2.3.3, D";

double f_if(float x, float y, float z) {
        float r35569 = x;
        float r35570 = y;
        float r35571 = r35570 - r35569;
        float r35572 = 6.0;
        float r35573 = r35571 * r35572;
        float r35574 = 2.0;
        float r35575 = 3.0;
        float r35576 = r35574 / r35575;
        float r35577 = z;
        float r35578 = r35576 - r35577;
        float r35579 = r35573 * r35578;
        float r35580 = r35569 + r35579;
        return r35580;
}

double f_id(double x, double y, double z) {
        double r35581 = x;
        double r35582 = y;
        double r35583 = r35582 - r35581;
        double r35584 = 6.0;
        double r35585 = r35583 * r35584;
        double r35586 = 2.0;
        double r35587 = 3.0;
        double r35588 = r35586 / r35587;
        double r35589 = z;
        double r35590 = r35588 - r35589;
        double r35591 = r35585 * r35590;
        double r35592 = r35581 + r35591;
        return r35592;
}


double f_of(float x, float y, float z) {
        float r35593 = x;
        float r35594 = y;
        float r35595 = r35594 - r35593;
        float r35596 = 6.0;
        float r35597 = r35595 * r35596;
        float r35598 = 2.0;
        float r35599 = 3.0;
        float r35600 = r35598 / r35599;
        float r35601 = z;
        float r35602 = r35600 - r35601;
        float r35603 = r35597 * r35602;
        float r35604 = r35593 + r35603;
        return r35604;
}

double f_od(double x, double y, double z) {
        double r35605 = x;
        double r35606 = y;
        double r35607 = r35606 - r35605;
        double r35608 = 6.0;
        double r35609 = r35607 * r35608;
        double r35610 = 2.0;
        double r35611 = 3.0;
        double r35612 = r35610 / r35611;
        double r35613 = z;
        double r35614 = r35612 - r35613;
        double r35615 = r35609 * r35614;
        double r35616 = r35605 + r35615;
        return r35616;
}

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 r35617, r35618, r35619, r35620, r35621, r35622, r35623, r35624, r35625, r35626, r35627, r35628;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(1424);
        mpfr_init(r35617);
        mpfr_init(r35618);
        mpfr_init(r35619);
        mpfr_init_set_str(r35620, "6.0", 10, MPFR_RNDN);
        mpfr_init(r35621);
        mpfr_init_set_str(r35622, "2.0", 10, MPFR_RNDN);
        mpfr_init_set_str(r35623, "3.0", 10, MPFR_RNDN);
        mpfr_init(r35624);
        mpfr_init(r35625);
        mpfr_init(r35626);
        mpfr_init(r35627);
        mpfr_init(r35628);
}

double f_im(double x, double y, double z) {
        mpfr_set_d(r35617, x, MPFR_RNDN);
        mpfr_set_d(r35618, y, MPFR_RNDN);
        mpfr_sub(r35619, r35618, r35617, MPFR_RNDN);
        ;
        mpfr_mul(r35621, r35619, r35620, MPFR_RNDN);
        ;
        ;
        mpfr_div(r35624, r35622, r35623, MPFR_RNDN);
        mpfr_set_d(r35625, z, MPFR_RNDN);
        mpfr_sub(r35626, r35624, r35625, MPFR_RNDN);
        mpfr_mul(r35627, r35621, r35626, MPFR_RNDN);
        mpfr_add(r35628, r35617, r35627, MPFR_RNDN);
        return mpfr_get_d(r35628, MPFR_RNDN);
}

static mpfr_t r35629, r35630, r35631, r35632, r35633, r35634, r35635, r35636, r35637, r35638, r35639, r35640;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(1424);
        mpfr_init(r35629);
        mpfr_init(r35630);
        mpfr_init(r35631);
        mpfr_init_set_str(r35632, "6.0", 10, MPFR_RNDN);
        mpfr_init(r35633);
        mpfr_init_set_str(r35634, "2.0", 10, MPFR_RNDN);
        mpfr_init_set_str(r35635, "3.0", 10, MPFR_RNDN);
        mpfr_init(r35636);
        mpfr_init(r35637);
        mpfr_init(r35638);
        mpfr_init(r35639);
        mpfr_init(r35640);
}

double f_fm(double x, double y, double z) {
        mpfr_set_d(r35629, x, MPFR_RNDN);
        mpfr_set_d(r35630, y, MPFR_RNDN);
        mpfr_sub(r35631, r35630, r35629, MPFR_RNDN);
        ;
        mpfr_mul(r35633, r35631, r35632, MPFR_RNDN);
        ;
        ;
        mpfr_div(r35636, r35634, r35635, MPFR_RNDN);
        mpfr_set_d(r35637, z, MPFR_RNDN);
        mpfr_sub(r35638, r35636, r35637, MPFR_RNDN);
        mpfr_mul(r35639, r35633, r35638, MPFR_RNDN);
        mpfr_add(r35640, r35629, r35639, MPFR_RNDN);
        return mpfr_get_d(r35640, MPFR_RNDN);
}

static mpfr_t r35641, r35642, r35643, r35644, r35645, r35646, r35647, r35648, r35649, r35650, r35651, r35652;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(1424);
        mpfr_init(r35641);
        mpfr_init(r35642);
        mpfr_init(r35643);
        mpfr_init_set_str(r35644, "6.0", 10, MPFR_RNDN);
        mpfr_init(r35645);
        mpfr_init_set_str(r35646, "2.0", 10, MPFR_RNDN);
        mpfr_init_set_str(r35647, "3.0", 10, MPFR_RNDN);
        mpfr_init(r35648);
        mpfr_init(r35649);
        mpfr_init(r35650);
        mpfr_init(r35651);
        mpfr_init(r35652);
}

double f_dm(double x, double y, double z) {
        mpfr_set_d(r35641, x, MPFR_RNDN);
        mpfr_set_d(r35642, y, MPFR_RNDN);
        mpfr_sub(r35643, r35642, r35641, MPFR_RNDN);
        ;
        mpfr_mul(r35645, r35643, r35644, MPFR_RNDN);
        ;
        ;
        mpfr_div(r35648, r35646, r35647, MPFR_RNDN);
        mpfr_set_d(r35649, z, MPFR_RNDN);
        mpfr_sub(r35650, r35648, r35649, MPFR_RNDN);
        mpfr_mul(r35651, r35645, r35650, MPFR_RNDN);
        mpfr_add(r35652, r35641, r35651, MPFR_RNDN);
        return mpfr_get_d(r35652, MPFR_RNDN);
}

