Minesweeper game: Difference between revisions

m
Line 3,487:
 
groupedByRows :: Board -> [Board]
groupedByRows = groupBy (\c1 c2 -> yAxis c1 == yAxis c2)
. sortBy (\c1 c2 -> view yCoordLensyAxis c1 `compare` view yCoordLensyAxis c2)
where
yAxis = view yCoordLens
Anonymous user