-- | Converts a FunMap to a list
toList :: (Enum k) => FunMap k v -> [(k, v)]
toList (FunMap f) = [ (x, value) | x <- enumAll, Just value <- [f x] ]
toList :: (Enum k) => FunMap k v -> [(k, v)]
toList (FunMap f) = [ (x, value) | x <- enumAll, Just value <- [f x] ]
toList (FunMap f) = [ (x, value) | x <- enumAll, Just value <- [f x] ]