#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 r35392 = x;
        float r35393 = 2.0;
        float r35394 = r35392 * r35393;
        float r35395 = y;
        float r35396 = r35394 - r35395;
        return r35396;
}

double f_id(double x, double y) {
        double r35397 = x;
        double r35398 = 2.0;
        double r35399 = r35397 * r35398;
        double r35400 = y;
        double r35401 = r35399 - r35400;
        return r35401;
}


double f_of(float x, float y) {
        float r35402 = x;
        float r35403 = 2.0;
        float r35404 = r35402 * r35403;
        float r35405 = y;
        float r35406 = r35404 - r35405;
        return r35406;
}

double f_od(double x, double y) {
        double r35407 = x;
        double r35408 = 2.0;
        double r35409 = r35407 * r35408;
        double r35410 = y;
        double r35411 = r35409 - r35410;
        return r35411;
}

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 r35412, r35413, r35414, r35415, r35416;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r35412);
        mpfr_init_set_str(r35413, "2.0", 10, MPFR_RNDN);
        mpfr_init(r35414);
        mpfr_init(r35415);
        mpfr_init(r35416);
}

double f_im(double x, double y) {
        mpfr_set_d(r35412, x, MPFR_RNDN);
        ;
        mpfr_mul(r35414, r35412, r35413, MPFR_RNDN);
        mpfr_set_d(r35415, y, MPFR_RNDN);
        mpfr_sub(r35416, r35414, r35415, MPFR_RNDN);
        return mpfr_get_d(r35416, MPFR_RNDN);
}

static mpfr_t r35417, r35418, r35419, r35420, r35421;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r35417);
        mpfr_init_set_str(r35418, "2.0", 10, MPFR_RNDN);
        mpfr_init(r35419);
        mpfr_init(r35420);
        mpfr_init(r35421);
}

double f_fm(double x, double y) {
        mpfr_set_d(r35417, x, MPFR_RNDN);
        ;
        mpfr_mul(r35419, r35417, r35418, MPFR_RNDN);
        mpfr_set_d(r35420, y, MPFR_RNDN);
        mpfr_sub(r35421, r35419, r35420, MPFR_RNDN);
        return mpfr_get_d(r35421, MPFR_RNDN);
}

static mpfr_t r35422, r35423, r35424, r35425, r35426;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r35422);
        mpfr_init_set_str(r35423, "2.0", 10, MPFR_RNDN);
        mpfr_init(r35424);
        mpfr_init(r35425);
        mpfr_init(r35426);
}

double f_dm(double x, double y) {
        mpfr_set_d(r35422, x, MPFR_RNDN);
        ;
        mpfr_mul(r35424, r35422, r35423, MPFR_RNDN);
        mpfr_set_d(r35425, y, MPFR_RNDN);
        mpfr_sub(r35426, r35424, r35425, MPFR_RNDN);
        return mpfr_get_d(r35426, MPFR_RNDN);
}