Data.Tree.Lens

root

children