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

char *name = "Data.Colour.RGBSpace.HSV:hsv from colour-2.3.3, J";

double f_if(float x, float y, float z) {
        float r56555 = x;
        float r56556 = 1.0;
        float r56557 = y;
        float r56558 = r56556 - r56557;
        float r56559 = z;
        float r56560 = r56558 * r56559;
        float r56561 = r56556 - r56560;
        float r56562 = r56555 * r56561;
        return r56562;
}

double f_id(double x, double y, double z) {
        double r56563 = x;
        double r56564 = 1.0;
        double r56565 = y;
        double r56566 = r56564 - r56565;
        double r56567 = z;
        double r56568 = r56566 * r56567;
        double r56569 = r56564 - r56568;
        double r56570 = r56563 * r56569;
        return r56570;
}


double f_of(float x, float y, float z) {
        float r56571 = x;
        float r56572 = 1.0;
        float r56573 = r56571 * r56572;
        float r56574 = z;
        float r56575 = r56574 * r56571;
        float r56576 = y;
        float r56577 = r56572 - r56576;
        float r56578 = r56575 * r56577;
        float r56579 = r56573 - r56578;
        return r56579;
}

double f_od(double x, double y, double z) {
        double r56580 = x;
        double r56581 = 1.0;
        double r56582 = r56580 * r56581;
        double r56583 = z;
        double r56584 = r56583 * r56580;
        double r56585 = y;
        double r56586 = r56581 - r56585;
        double r56587 = r56584 * r56586;
        double r56588 = r56582 - r56587;
        return r56588;
}

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 r56589, r56590, r56591, r56592, r56593, r56594, r56595, r56596;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r56589);
        mpfr_init_set_str(r56590, "1.0", 10, MPFR_RNDN);
        mpfr_init(r56591);
        mpfr_init(r56592);
        mpfr_init(r56593);
        mpfr_init(r56594);
        mpfr_init(r56595);
        mpfr_init(r56596);
}

double f_im(double x, double y, double z) {
        mpfr_set_d(r56589, x, MPFR_RNDN);
        ;
        mpfr_set_d(r56591, y, MPFR_RNDN);
        mpfr_sub(r56592, r56590, r56591, MPFR_RNDN);
        mpfr_set_d(r56593, z, MPFR_RNDN);
        mpfr_mul(r56594, r56592, r56593, MPFR_RNDN);
        mpfr_sub(r56595, r56590, r56594, MPFR_RNDN);
        mpfr_mul(r56596, r56589, r56595, MPFR_RNDN);
        return mpfr_get_d(r56596, MPFR_RNDN);
}

static mpfr_t r56597, r56598, r56599, r56600, r56601, r56602, r56603, r56604, r56605;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r56597);
        mpfr_init_set_str(r56598, "1.0", 10, MPFR_RNDN);
        mpfr_init(r56599);
        mpfr_init(r56600);
        mpfr_init(r56601);
        mpfr_init(r56602);
        mpfr_init(r56603);
        mpfr_init(r56604);
        mpfr_init(r56605);
}

double f_fm(double x, double y, double z) {
        mpfr_set_d(r56597, x, MPFR_RNDN);
        ;
        mpfr_mul(r56599, r56597, r56598, MPFR_RNDN);
        mpfr_set_d(r56600, z, MPFR_RNDN);
        mpfr_mul(r56601, r56600, r56597, MPFR_RNDN);
        mpfr_set_d(r56602, y, MPFR_RNDN);
        mpfr_sub(r56603, r56598, r56602, MPFR_RNDN);
        mpfr_mul(r56604, r56601, r56603, MPFR_RNDN);
        mpfr_sub(r56605, r56599, r56604, MPFR_RNDN);
        return mpfr_get_d(r56605, MPFR_RNDN);
}

static mpfr_t r56606, r56607, r56608, r56609, r56610, r56611, r56612, r56613, r56614;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r56606);
        mpfr_init_set_str(r56607, "1.0", 10, MPFR_RNDN);
        mpfr_init(r56608);
        mpfr_init(r56609);
        mpfr_init(r56610);
        mpfr_init(r56611);
        mpfr_init(r56612);
        mpfr_init(r56613);
        mpfr_init(r56614);
}

double f_dm(double x, double y, double z) {
        mpfr_set_d(r56606, x, MPFR_RNDN);
        ;
        mpfr_mul(r56608, r56606, r56607, MPFR_RNDN);
        mpfr_set_d(r56609, z, MPFR_RNDN);
        mpfr_mul(r56610, r56609, r56606, MPFR_RNDN);
        mpfr_set_d(r56611, y, MPFR_RNDN);
        mpfr_sub(r56612, r56607, r56611, MPFR_RNDN);
        mpfr_mul(r56613, r56610, r56612, MPFR_RNDN);
        mpfr_sub(r56614, r56608, r56613, MPFR_RNDN);
        return mpfr_get_d(r56614, MPFR_RNDN);
}