#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, A";

double f_if(float x, float y) {
        float r35400 = x;
        float r35401 = y;
        float r35402 = r35400 + r35401;
        float r35403 = r35400 * r35401;
        float r35404 = r35402 - r35403;
        return r35404;
}

double f_id(double x, double y) {
        double r35405 = x;
        double r35406 = y;
        double r35407 = r35405 + r35406;
        double r35408 = r35405 * r35406;
        double r35409 = r35407 - r35408;
        return r35409;
}


double f_of(float x, float y) {
        float r35410 = x;
        float r35411 = y;
        float r35412 = r35410 + r35411;
        float r35413 = r35410 * r35411;
        float r35414 = r35412 - r35413;
        return r35414;
}

double f_od(double x, double y) {
        double r35415 = x;
        double r35416 = y;
        double r35417 = r35415 + r35416;
        double r35418 = r35415 * r35416;
        double r35419 = r35417 - r35418;
        return r35419;
}

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 r35420, r35421, r35422, r35423, r35424;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r35420);
        mpfr_init(r35421);
        mpfr_init(r35422);
        mpfr_init(r35423);
        mpfr_init(r35424);
}

double f_im(double x, double y) {
        mpfr_set_d(r35420, x, MPFR_RNDN);
        mpfr_set_d(r35421, y, MPFR_RNDN);
        mpfr_add(r35422, r35420, r35421, MPFR_RNDN);
        mpfr_mul(r35423, r35420, r35421, MPFR_RNDN);
        mpfr_sub(r35424, r35422, r35423, MPFR_RNDN);
        return mpfr_get_d(r35424, MPFR_RNDN);
}

static mpfr_t r35425, r35426, r35427, r35428, r35429;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r35425);
        mpfr_init(r35426);
        mpfr_init(r35427);
        mpfr_init(r35428);
        mpfr_init(r35429);
}

double f_fm(double x, double y) {
        mpfr_set_d(r35425, x, MPFR_RNDN);
        mpfr_set_d(r35426, y, MPFR_RNDN);
        mpfr_add(r35427, r35425, r35426, MPFR_RNDN);
        mpfr_mul(r35428, r35425, r35426, MPFR_RNDN);
        mpfr_sub(r35429, r35427, r35428, MPFR_RNDN);
        return mpfr_get_d(r35429, MPFR_RNDN);
}

static mpfr_t r35430, r35431, r35432, r35433, r35434;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r35430);
        mpfr_init(r35431);
        mpfr_init(r35432);
        mpfr_init(r35433);
        mpfr_init(r35434);
}

double f_dm(double x, double y) {
        mpfr_set_d(r35430, x, MPFR_RNDN);
        mpfr_set_d(r35431, y, MPFR_RNDN);
        mpfr_add(r35432, r35430, r35431, MPFR_RNDN);
        mpfr_mul(r35433, r35430, r35431, MPFR_RNDN);
        mpfr_sub(r35434, r35432, r35433, MPFR_RNDN);
        return mpfr_get_d(r35434, MPFR_RNDN);
}