Greatest common divisor: Difference between revisions
Content added Content deleted
m (moved to Common Lisp) |
(→Alternate solution: incorrect) |
||
| Line 773: | Line 773: | ||
finally (return x)))</lang> |
finally (return x)))</lang> |
||
===Alternate solution=== |
===Alternate solution=== |
||
{{incorrect|Common Lisp|This program fails for negative b.}} |
|||
I use [https://franz.com/downloads/clp/survey Allegro CL 10.1] |
I use [https://franz.com/downloads/clp/survey Allegro CL 10.1] |
||