RosettaCodeData/Task/Factorial/NewLISP/factorial.l

5 lines
105 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
> (define (factorial n) (exp (gammaln (+ n 1))))
(lambda (n) (exp (gammaln (+ n 1))))
> (factorial 4)
24