|
\def\gobtoA#1\revA{}\def\gobtoB#1\revB{}
|
|
\def\reverse#1{\reversei{}#1\revA\revB\revB\revB\revB\revB\revB\revB\revB\revA}
|
|
\def\reversei#1#2#3#4#5#6#7#8#9{\gobtoB#9\revend\revB\reversei{#9#8#7#6#5#4#3#2#1}}
|
|
\def\revend\revB\reversei#1#2\revA{\gobtoA#1}
|
|
\reverse{Rosetta}
|
|
\bye
|