String Halving by nn

s/.*/{&}/
:
s/[^{][^{}]\+/{:&;}/
:a
s/:\([^;]\)/\1:/
s/\([^:]\);/;\1/
ta
s/:;/}{/
t

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page