Documentation

input :: (Num a, Read a) => a #

wall :: (Bits a, Num a) => a -> (a, a) -> Bool #

walk :: (Bits a, Num a, Ord a, Enum b) => a -> ((a, a), b) -> Set (a, a) -> ([((a, a), b)], Set (a, a)) #

main :: IO () #