Фибоначчи.
FIBONACCI: ( ( N )
-> ( PROGN ( CASE N ( ( -1 0 )
( ( 0 1 )
$$ )
)
( + ( FIBONACCI ( - N 1 )
)
( FIBONACCI ( - N 2 )
)
)
)
)
)
Fibonacci(11) = 89
Рекурсивная функция рекурсивно рекурсирует.
$$ - это такая специальная автоматическая переменная, значение коей равно сработавшему варианту в списке совпадений. Подозреваю, что в большинстве случаев оно будет равно значению EXPR, но это я только сейчас так думаю - мало ли, вдруг найдутся случаи, когда это не так (но как?!)