% % backtrack within this tree level to the prior lookup open % % this is the closing proc brace, now find matching open brace % _\ dup % % stack: close-lookup open-search % { Tree.Prev( ? dup !\ "Type" \_ "lookup" eq$ "Data" \_ "open" eq$ and { % % have both angle brackets for lookup % delete the close angle bracket % % stack: close-lookup open-lookup % second Mep.Remove "look" dup "Type" \! dup "Data" \! !\\ true ? } if } loop pop2