25 04 2007 SICP elisp Tweet
こんな感じで
(defun pscl (x y) (cond ((< y 3) 1) ((= x 1) 1) ((= y x) 1) (t (+ (pscl (- x 1) (- y 1)) (pscl x (- y 1)))) ))
