Lisp インタプリタ経過報告
再帰できる。ここまで長かった。
slisp> (define fact (lambda (x) (if (= x 0) 1 (* x (fact (- x 1)))))) #<undef> slisp> fact #<subr(lambda)> slisp> (fact 10) 3628800 slisp>
再帰できる。ここまで長かった。
slisp> (define fact (lambda (x) (if (= x 0) 1 (* x (fact (- x 1)))))) #<undef> slisp> fact #<subr(lambda)> slisp> (fact 10) 3628800 slisp>