ee t ξ ⇒ DiffTree t ξ → Html
renderTree t = li (renderNode t >> renderForest (getChildren t))

renderForest ∷ RenderableTree t
renderTree ∷ RenderableTree t ξ ⇒ DiffTree t ξ → Html
renderTree t = li (renderNode t >> renderForest (getChildren t))
renderTree t = li (renderNode t >> renderForest (getChildren t))