beowulf/resources/ff.mexpr.lsp

3 lines
85 B
Plaintext

;; From page 6 of Lisp 1.5 Programmer's Manual
ff[x]=[atom[x] -> x; T -> ff[car[x]]]