module Data.Graph.Internal.Color where data Color = White | Grey | Black deriving (Eq,Ord,Show,Read)