Create a new channel as a copy of main.
Rename main to:
Delete main? This cannot be undone.
I was planning to do this in J, but gave up.
My next initial attempt was in Haskell but was something awful like O(n^4) with bad constant factors, as seen in part2_tooslow.hs
part2_tooslow.hs