mirror
/
RosettaCodeData
mirror of https://github.com/acmeism/RosettaCodeData.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
RosettaCodeData/Task/Nth-root/Common-Lisp/nth-root-2.lisp

5 lines
103 B
Common Lisp
Raw Permalink Blame History

(let* ((r (nth-root 3 10))
(rf (coerce r 'float)))
(print (* r r r ))
(print (* rf rf rf)))
Reference in New Issue View Git Blame Copy Permalink