module Direction where data Direction = L | R | Dno Int deriving (Eq, Ord, Read, Show)