#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 r35825 = x;
        float r35826 = 2.0;
        float r35827 = r35825 * r35826;
        float r35828 = y;
        float r35829 = r35827 - r35828;
        return r35829;
}

double f_id(double x, double y) {
        double r35830 = x;
        double r35831 = 2.0;
        double r35832 = r35830 * r35831;
        double r35833 = y;
        double r35834 = r35832 - r35833;
        return r35834;
}


double f_of(float x, float y) {
        float r35835 = x;
        float r35836 = 2.0;
        float r35837 = r35835 * r35836;
        float r35838 = y;
        float r35839 = r35837 - r35838;
        return r35839;
}

double f_od(double x, double y) {
        double r35840 = x;
        double r35841 = 2.0;
        double r35842 = r35840 * r35841;
        double r35843 = y;
        double r35844 = r35842 - r35843;
        return r35844;
}

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 r35845, r35846, r35847, r35848, r35849;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(400);
        mpfr_init(r35845);
        mpfr_init_set_str(r35846, "2.0", 10, MPFR_RNDN);
        mpfr_init(r35847);
        mpfr_init(r35848);
        mpfr_init(r35849);
}

double f_im(double x, double y) {
        mpfr_set_d(r35845, x, MPFR_RNDN);
        ;
        mpfr_mul(r35847, r35845, r35846, MPFR_RNDN);
        mpfr_set_d(r35848, y, MPFR_RNDN);
        mpfr_sub(r35849, r35847, r35848, MPFR_RNDN);
        return mpfr_get_d(r35849, MPFR_RNDN);
}

static mpfr_t r35850, r35851, r35852, r35853, r35854;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(400);
        mpfr_init(r35850);
        mpfr_init_set_str(r35851, "2.0", 10, MPFR_RNDN);
        mpfr_init(r35852);
        mpfr_init(r35853);
        mpfr_init(r35854);
}

double f_fm(double x, double y) {
        mpfr_set_d(r35850, x, MPFR_RNDN);
        ;
        mpfr_mul(r35852, r35850, r35851, MPFR_RNDN);
        mpfr_set_d(r35853, y, MPFR_RNDN);
        mpfr_sub(r35854, r35852, r35853, MPFR_RNDN);
        return mpfr_get_d(r35854, MPFR_RNDN);
}

static mpfr_t r35855, r35856, r35857, r35858, r35859;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(400);
        mpfr_init(r35855);
        mpfr_init_set_str(r35856, "2.0", 10, MPFR_RNDN);
        mpfr_init(r35857);
        mpfr_init(r35858);
        mpfr_init(r35859);
}

double f_dm(double x, double y) {
        mpfr_set_d(r35855, x, MPFR_RNDN);
        ;
        mpfr_mul(r35857, r35855, r35856, MPFR_RNDN);
        mpfr_set_d(r35858, y, MPFR_RNDN);
        mpfr_sub(r35859, r35857, r35858, MPFR_RNDN);
        return mpfr_get_d(r35859, MPFR_RNDN);
}