yes
This commit is contained in:
parent
3f5656bd3b
commit
01ea47411c
@ -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.
|
||||
|
Loading…
Reference in New Issue
Block a user