Remove mtl dependency

src/Dodge/Data/GenWorld.hs

@@ -10,7 +10,8 @@ module Dodge.Data.GenWorld (
 
 import ShortShow
 import Control.Lens
-import Control.Monad.State
+--import Control.Monad.State
+import Control.Monad.Trans.State.Lazy
 import qualified Data.Set as S
 import Data.Tile
 import Dodge.Data.Room

src/Dodge/Data/MetaTree.hs

@@ -6,7 +6,8 @@ module Dodge.Data.MetaTree where
 import Control.Lens
 import Data.Tree
 import System.Random
-import Control.Monad.State
+--import Control.Monad.State
+import Control.Monad.Trans.State.Lazy
 
 data MetaTree a b = MTree
     {_mtLabel :: b, _mtTree :: MetaNode a b, _mtBranches :: [MetaBranch a b]}