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

double f_if(float x, float y) {
        float r35183 = x;
        float r35184 = 2.0;
        float r35185 = r35183 * r35184;
        float r35186 = y;
        float r35187 = r35185 - r35186;
        return r35187;
}

double f_id(double x, double y) {
        double r35188 = x;
        double r35189 = 2.0;
        double r35190 = r35188 * r35189;
        double r35191 = y;
        double r35192 = r35190 - r35191;
        return r35192;
}


double f_of(float x, float y) {
        float r35193 = x;
        float r35194 = 2.0;
        float r35195 = r35193 * r35194;
        float r35196 = y;
        float r35197 = r35195 - r35196;
        return r35197;
}

double f_od(double x, double y) {
        double r35198 = x;
        double r35199 = 2.0;
        double r35200 = r35198 * r35199;
        double r35201 = y;
        double r35202 = r35200 - r35201;
        return r35202;
}

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 r35203, r35204, r35205, r35206, r35207;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r35203);
        mpfr_init_set_str(r35204, "2.0", 10, MPFR_RNDN);
        mpfr_init(r35205);
        mpfr_init(r35206);
        mpfr_init(r35207);
}

double f_im(double x, double y) {
        mpfr_set_d(r35203, x, MPFR_RNDN);
        ;
        mpfr_mul(r35205, r35203, r35204, MPFR_RNDN);
        mpfr_set_d(r35206, y, MPFR_RNDN);
        mpfr_sub(r35207, r35205, r35206, MPFR_RNDN);
        return mpfr_get_d(r35207, MPFR_RNDN);
}

static mpfr_t r35208, r35209, r35210, r35211, r35212;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r35208);
        mpfr_init_set_str(r35209, "2.0", 10, MPFR_RNDN);
        mpfr_init(r35210);
        mpfr_init(r35211);
        mpfr_init(r35212);
}

double f_fm(double x, double y) {
        mpfr_set_d(r35208, x, MPFR_RNDN);
        ;
        mpfr_mul(r35210, r35208, r35209, MPFR_RNDN);
        mpfr_set_d(r35211, y, MPFR_RNDN);
        mpfr_sub(r35212, r35210, r35211, MPFR_RNDN);
        return mpfr_get_d(r35212, MPFR_RNDN);
}

static mpfr_t r35213, r35214, r35215, r35216, r35217;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r35213);
        mpfr_init_set_str(r35214, "2.0", 10, MPFR_RNDN);
        mpfr_init(r35215);
        mpfr_init(r35216);
        mpfr_init(r35217);
}

double f_dm(double x, double y) {
        mpfr_set_d(r35213, x, MPFR_RNDN);
        ;
        mpfr_mul(r35215, r35213, r35214, MPFR_RNDN);
        mpfr_set_d(r35216, y, MPFR_RNDN);
        mpfr_sub(r35217, r35215, r35216, MPFR_RNDN);
        return mpfr_get_d(r35217, MPFR_RNDN);
}