Guest User

Untitled

a guest
Jan 24th, 2019
98
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.24 KB | None | 0 0
  1. leftImpl ∷ State → State
  2. leftImpl (State s) =
  3. case s.direction of
  4. North → State s { direction = West }
  5. South → State s { direction = East }
  6. East → State s { direction = North }
  7. West → State s { direction = South }
Add Comment
Please, Sign In to add comment