RosettaCodeData/Task/Langtons-ant/Haskell/langtons-ant-3.hs
2023-07-01 13:44:08 -04:00

5 lines
159 B
Haskell

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