-- | Get a list of all valid co-ordinates on the given `Board`.
allPoints :: Board p -> [(Int, Int)]
allPoints = map repaCoordsToTuple . B.allPoints
allPoints :: Board p -> [(Int, Int)]
allPoints = map repaCoordsToTuple . B.allPoints
allPoints = map repaCoordsToTuple . B.allPoints