-- |
-- Check if some 'Position's are within the bounds of a board
areValid :: Board -> Set.Set Position -> Set.Set Position
areValid board = Set.filter (isValid board)
areValid :: Board -> Set.Set Position -> Set.Set Position
areValid board = Set.filter (isValid board)
areValid board = Set.filter (isValid board)