s/4/3./
s/3/2./
s/2/../p
:
s/\.\(#*\)$/#>\1/
s/>#/.>/
s/>$//p
t
d