module Internal.Types where type Vector = (Int, Int) data Direction = North | East | South | West deriving (Show, Eq, Ord)