-- For Monads.
-- | Given an Int n and a monad a, return a monadic list of n lists of n a.
getMonadicGrid :: (Monad m) => Int -> m a -> m [[a]]
getMonadicGrid count func = replicateM count (replicateM count func)
getMonadicGrid :: (Monad m) => Int -> m a -> m [[a]]
getMonadicGrid count func = replicateM count (replicateM count func)
getMonadicGrid count func = replicateM count (replicateM count func)