s/$/%\n/
:1
/\(.\)%.*\1/b3
s/%.*/&&/
:
s/\(\(.\)%.*\)%\n\(\w*\)/\1\n\2\3%/
t
s/%$//
:3
s/.%/%/
/^%./!b1
s///