2 lines
85 B
Text
2 lines
85 B
Text
(DEFUN FIBONACCI (N)
|
|
(FLOOR (+ (/ (EXPT (/ (+ (SQRT 5) 1) 2) N) (SQRT 5)) 0.5)))
|
(DEFUN FIBONACCI (N)
|
|
(FLOOR (+ (/ (EXPT (/ (+ (SQRT 5) 1) 2) N) (SQRT 5)) 0.5)))
|