RosettaCodeData/Task/Langtons-ant/Haskell/langtons-ant-3.hs

6 lines
159 B
Haskell
Raw Permalink Normal View History

2016-12-05 22:15:40 +01:00
data State = State { antPosition :: Point
, antDirection :: Point
, getCells :: Set Point }
type Point = (Float, Float)