Advertisement
florence20

Untitled

Apr 26th, 2018
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.15 KB | None | 0 0
  1. twoDigitCombinations :: Position -> Position -> [Position]
  2. twoDigitCombinations p1 p2 = [Position t | fst t <- [fst p1..fst p2], snd t <- [snd p1..snd p2]]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement