From fdafa68bd43b288b0201e06f5c1b6c5805f4c6ae Mon Sep 17 00:00:00 2001 From: Louis Dalibard Date: Tue, 24 Dec 2024 17:10:22 +0100 Subject: [PATCH] yes --- palette-generator/Stylix/Palette.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/palette-generator/Stylix/Palette.hs b/palette-generator/Stylix/Palette.hs index cadf8e7..bce7f51 100644 --- a/palette-generator/Stylix/Palette.hs +++ b/palette-generator/Stylix/Palette.hs @@ -12,7 +12,7 @@ import System.Random ( randomRIO ) -- Adjust value according to coefficients adjustValue :: Float -> Float-> Float -> Float -> Int -adjustValue v a b x = round v*(a*x+b) +adjustValue v a b x = round (v*(a*x+b)) -- | Extract the primary scale from a pallete. primary :: V.Vector a -> V.Vector a