tc и tco

(tco lst . prg) -> any (tc ['any ..]) Оптимизация хвостового вызова. tco реализует цикл, который перезапускается всякий раз, когда вызывается tc во время выполнения prg. Это быстрее и использует гораздо меньше места в стеке, чем рекурсивный вызов фу...