Allow for random composition of trees

This commit is contained in:
2022-06-09 11:24:13 +01:00
parent 1f05c74abc
commit 1789a3785d
17 changed files with 103 additions and 88 deletions
-2
View File
@@ -24,10 +24,8 @@ import LensHelp
import Data.Tile
import qualified Data.Set as S
import Data.Tree
import System.Random
import Control.Monad.State
--import Data.Tree
--import qualified Data.IntMap as IM
longRoom :: RandomGen g => State g Room