Generate random chess position: Difference between revisions

Content added Content deleted
Line 768: Line 768:
fullBoard
fullBoard


go :: [(Square, Int)] -> Int -> State BoardState ()
go :: PieceCount -> Int -> State BoardState ()
go _ 0 = pure ()
go _ 0 = pure ()
go remaining n = do
go remaining n = do