講義でLispを触ったので、残しておく。 a+bを計算する関数addを定義する ただし、0はa、1は(a)、2は((a))、・・・・とする (defun add (x y) (cond ((atom x) y) (t (add (car x) (list y))))) 全く触ったことがなかったので、こんなものでも面白かった。