git.iko.soy/elk
on master help sign in
Add type hint for `complement`
9b27e7devancz
elm/src/Types/Hints.hs+1
compare with master
unifiedsplit
@@ -82,6 +82,7 @@ graphicsElement = prefix "Graphics"
82graphicsColor = prefix "Color" clrs
82graphicsColor = prefix "Color" clrs
83 where clrs = [ numScheme (\n -> n ==> n ==> n ==> color) "rgb"
83 where clrs = [ numScheme (\n -> n ==> n ==> n ==> color) "rgb"
84 , numScheme (\n -> n ==> n ==> n ==> n ==> color) "rgba"
84 , numScheme (\n -> n ==> n ==> n ==> n ==> color) "rgba"
85+ , "complement" -: color ==> color
85 ] ++ hasType color ["red","green","blue","black","white"
86 ] ++ hasType color ["red","green","blue","black","white"
86 ,"yellow","cyan","magenta","grey","gray"]
87 ,"yellow","cyan","magenta","grey","gray"]
87
88