Cleanup
This commit is contained in:
@@ -5,11 +5,10 @@ A /trunk/ refers to the successive first nodes in lists of children.
|
||||
-}
|
||||
module Dodge.Tree.GenerateStructure
|
||||
where
|
||||
import Dodge.RandomHelp
|
||||
import RandomHelp
|
||||
|
||||
import Data.Tree
|
||||
import Control.Monad.State
|
||||
import System.Random
|
||||
{- Single branched tree (a trunk). -}
|
||||
treePath :: Int -> Tree ()
|
||||
treePath 0 = Node () []
|
||||
|
||||
Reference in New Issue
Block a user