s/^/9\n>0123456789/
:
s/9\n/\n0/
t
s/^\n/0\n/
s/\(.\?\)\n\(.*\)\(>.*\1\(.\)\)/\4\2\n\3/
/^9\?8\?7\?6\?5\?4\?3\?2\?1\?0\?\n/P
/0000/Q
b