diff --git a/palette-generator/Stylix/Palette.hs b/palette-generator/Stylix/Palette.hs
index d19322d..0a06dac 100644
--- a/palette-generator/Stylix/Palette.hs
+++ b/palette-generator/Stylix/Palette.hs
@@ -44,7 +44,7 @@ instance Species (String, Image PixelRGB8) (V.Vector LAB) where
     colour <- randomFromImage image
     return $ palette // [(index, colour)]
 
-  fitness (polarity,primaryScaleDark,primaryScaleLight, _) palette
+  fitness (polarity, _) palette
     = realToFrac $ accentDifference - (primarySimilarity/10) - scheme
       where
         -- The primary scale should use similar colours, to an extent.