From 4f079e775d86d8c3a572a03c04c5c58237476f1c Mon Sep 17 00:00:00 2001
From: Louis Dalibard <ontake@ontake.dev>
Date: Tue, 24 Dec 2024 16:45:52 +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 40ac88a..ebd50fe 100644
--- a/palette-generator/Stylix/Palette.hs
+++ b/palette-generator/Stylix/Palette.hs
@@ -44,7 +44,7 @@ instance Species (String,String,String, Image PixelRGB8) (V.Vector LAB) where
     colour <- randomFromImage image
     return $ palette // [(index, colour)]
 
-  fitness (polarity,_,_,_, _) palette
+  fitness (polarity,_,_, _) palette
     = realToFrac $ accentDifference - (primarySimilarity/10) - scheme
       where
         -- The primary scale should use similar colours, to an extent.