" plus patha plus "" # print
#collects plus "-= --"
collects plus collect
#collects plus "-- =-"
collects plus now
except
now "
█"
collects plus now
resume
fig
next
now return collects
fig
collect listd "."
clen collect len
now collect reverse
bal 0
forin p collect
has instr p "
"
now bal minus 1 swap now bal
fig
now p print
next
for p 1 bal 1
now "