User:Spekkio: Difference between revisions

no edit summary
No edit summary
No edit summary
Line 200:
 
(defun fibcalc (n)
(let ((sqrtFive (sqrtnsquareroot 5)))
(/ (- (powint (* 1/2 (+ 1 sqrtFive)) n) (powint (* 1/2 (- 1 sqrtFive)) n)) sqrtFive)))
 
Line 212:
</lang>
 
test:
test:
[14]> (float (asine 9/100))
Anonymous user