@@ -8,11 +8,6 @@ import Data.List (List(..), drop, reverse, take, (!!), (:))
88import Data.Maybe (Maybe(..))
99import Data.Tree (Forest, Tree, mkTree, modifyNodeValue, setNodeValue)
1010
11−-- import Data.Generic (class Generic, gEq, gShow)
12−-- import Data.List (List(..), drop, reverse, take, (!!), (:))
13−-- import Data.Maybe (Maybe(..))
14−-- import Data.Tree (Forest, Tree(..), mkTree, modifyNodeValue, nodeChildren, nodeValue, setNodeValue)
15−
1611-- | The `Loc` type describes the location of a `Node` inside a `Tree`. For this
1712-- | we store the current `Node`, the sibling nodes that appear before the current
1813-- | node, the sibling nodes that appear after the current node, and a `List` of