Здравствуйте, DemAS, Вы писали:

DAS>Как в таком случае быть? Где искать и как установить эту библиотеку?

(define-syntax aif
  (syntax-rules ()
    ((_ name test true-arm false-arm)
     (let ((name test))
       (if name
           true-arm
           false-arm)))
    ((_ name pred test true-arm false-arm)
     (let ((name test))
       (if (pred name)
           true-arm
           false-arm)))
    ))

"aif" определен на этой же странице.
По ссылке не пример использования стандартной библиотеки "aif", а неформальное предложение удобного (адаптированного из "On Lisp" Грэма) макроса общественности.