mirror
/
RosettaCodeData
mirror of https://github.com/acmeism/RosettaCodeData.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
RosettaCodeData/Task/Fibonacci-sequence/XLISP/fibonacci-sequence-1.xlisp

3 lines
85 B
Plaintext
Raw Permalink Blame History

(DEFUN FIBONACCI (N)
(FLOOR (+ (/ (EXPT (/ (+ (SQRT 5) 1) 2) N) (SQRT 5)) 0.5)))
Reference in New Issue View Git Blame Copy Permalink