yes
This commit is contained in:
parent
2742333c12
commit
ae9451ec49
@ -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.
|
||||
|
Loading…
Reference in New Issue
Block a user