RosettaCodeData/Task/Langtons-ant/Haskell/langtons-ant-3.hs
2016-12-05 22:15:40 +01:00

5 lines
159 B
Haskell

data State = State { antPosition :: Point
, antDirection :: Point
, getCells :: Set Point }
type Point = (Float, Float)