2008-03-24 P32: 最大公約数を求める。 L-99 Common Lisp これもSICPから。 ;; P32 (defun my-gcd (m n) (cond ((< m n) (my-gcd n m)) ((= n 0) m) (t (my-gcd n (rem m n)))))