読者です 読者をやめる 読者になる 読者になる

by shigemk2

当面は技術的なことしか書かない

対話によるCommon Lisp入門 30 末尾再帰 その2

読書ノート
[6]> (defun factorial (n)
(factorial-loop n 1 1))
FACTORIAL
[7]> (defun factorial-loop (n i p)
(if (> i n) p
(factorial-loop n (+ i 1) (* p i))))
FACTORIAL-LOOP
[8]> (factorial 4)
24