#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 r55434 = x;
        float r55435 = 1.0;
        float r55436 = y;
        float r55437 = r55435 - r55436;
        float r55438 = z;
        float r55439 = r55437 * r55438;
        float r55440 = r55435 - r55439;
        float r55441 = r55434 * r55440;
        return r55441;
}

double f_id(double x, double y, double z) {
        double r55442 = x;
        double r55443 = 1.0;
        double r55444 = y;
        double r55445 = r55443 - r55444;
        double r55446 = z;
        double r55447 = r55445 * r55446;
        double r55448 = r55443 - r55447;
        double r55449 = r55442 * r55448;
        return r55449;
}


double f_of(float x, float y, float z) {
        float r55450 = x;
        float r55451 = 1.0;
        float r55452 = r55450 * r55451;
        float r55453 = z;
        float r55454 = r55453 * r55450;
        float r55455 = y;
        float r55456 = r55451 - r55455;
        float r55457 = r55454 * r55456;
        float r55458 = r55452 - r55457;
        return r55458;
}

double f_od(double x, double y, double z) {
        double r55459 = x;
        double r55460 = 1.0;
        double r55461 = r55459 * r55460;
        double r55462 = z;
        double r55463 = r55462 * r55459;
        double r55464 = y;
        double r55465 = r55460 - r55464;
        double r55466 = r55463 * r55465;
        double r55467 = r55461 - r55466;
        return r55467;
}

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 r55468, r55469, r55470, r55471, r55472, r55473, r55474, r55475;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r55468);
        mpfr_init_set_str(r55469, "1.0", 10, MPFR_RNDN);
        mpfr_init(r55470);
        mpfr_init(r55471);
        mpfr_init(r55472);
        mpfr_init(r55473);
        mpfr_init(r55474);
        mpfr_init(r55475);
}

double f_im(double x, double y, double z) {
        mpfr_set_d(r55468, x, MPFR_RNDN);
        ;
        mpfr_set_d(r55470, y, MPFR_RNDN);
        mpfr_sub(r55471, r55469, r55470, MPFR_RNDN);
        mpfr_set_d(r55472, z, MPFR_RNDN);
        mpfr_mul(r55473, r55471, r55472, MPFR_RNDN);
        mpfr_sub(r55474, r55469, r55473, MPFR_RNDN);
        mpfr_mul(r55475, r55468, r55474, MPFR_RNDN);
        return mpfr_get_d(r55475, MPFR_RNDN);
}

static mpfr_t r55476, r55477, r55478, r55479, r55480, r55481, r55482, r55483, r55484;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r55476);
        mpfr_init_set_str(r55477, "1.0", 10, MPFR_RNDN);
        mpfr_init(r55478);
        mpfr_init(r55479);
        mpfr_init(r55480);
        mpfr_init(r55481);
        mpfr_init(r55482);
        mpfr_init(r55483);
        mpfr_init(r55484);
}

double f_fm(double x, double y, double z) {
        mpfr_set_d(r55476, x, MPFR_RNDN);
        ;
        mpfr_mul(r55478, r55476, r55477, MPFR_RNDN);
        mpfr_set_d(r55479, z, MPFR_RNDN);
        mpfr_mul(r55480, r55479, r55476, MPFR_RNDN);
        mpfr_set_d(r55481, y, MPFR_RNDN);
        mpfr_sub(r55482, r55477, r55481, MPFR_RNDN);
        mpfr_mul(r55483, r55480, r55482, MPFR_RNDN);
        mpfr_sub(r55484, r55478, r55483, MPFR_RNDN);
        return mpfr_get_d(r55484, MPFR_RNDN);
}

static mpfr_t r55485, r55486, r55487, r55488, r55489, r55490, r55491, r55492, r55493;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r55485);
        mpfr_init_set_str(r55486, "1.0", 10, MPFR_RNDN);
        mpfr_init(r55487);
        mpfr_init(r55488);
        mpfr_init(r55489);
        mpfr_init(r55490);
        mpfr_init(r55491);
        mpfr_init(r55492);
        mpfr_init(r55493);
}

double f_dm(double x, double y, double z) {
        mpfr_set_d(r55485, x, MPFR_RNDN);
        ;
        mpfr_mul(r55487, r55485, r55486, MPFR_RNDN);
        mpfr_set_d(r55488, z, MPFR_RNDN);
        mpfr_mul(r55489, r55488, r55485, MPFR_RNDN);
        mpfr_set_d(r55490, y, MPFR_RNDN);
        mpfr_sub(r55491, r55486, r55490, MPFR_RNDN);
        mpfr_mul(r55492, r55489, r55491, MPFR_RNDN);
        mpfr_sub(r55493, r55487, r55492, MPFR_RNDN);
        return mpfr_get_d(r55493, MPFR_RNDN);
}