Вызов данного FN как функции
| (defun map-comp (fn al vl) ; fn покомпонентно применить ; к соотвественным элементам AL и VL (cond (xl (cons (fn (car al) (car vl)) ; Вызов данного FN как функции (map-comp (cdr al) (cdr vl)) ) ) ) ) |
| Пример 7.7. Определить функцию покомпонентной обработки двух списков с помощью заданной функции fn: |
| Закрыть окно |
