Я не знаю, что делает этот программ-код, но амеры кричат: Ужас !

http://www-cs-faculty.stanford.edu/~knuth/programs/tpk.i

MORE...