diff --git a/palette-generator/Stylix/Palette.hs b/palette-generator/Stylix/Palette.hs index b8b835c..93e3881 100644 --- a/palette-generator/Stylix/Palette.hs +++ b/palette-generator/Stylix/Palette.hs @@ -11,7 +11,7 @@ import qualified Data.Vector as V import System.Random ( randomRIO ) -- Adjust value according to coefficients -adjustValue :: Int -> Float-> Float -> Float -> Int +adjustValue :: LAB(lightness) -> Float-> Float -> Float -> Int adjustValue v a b x = v*(a*x+b) -- | Extract the primary scale from a pallete.