Simon Brooke
0f8bc990f2
bignum multiply is still not working, but as bignum read and bignum divide depend on it, it's the problem to hit first.
9 lines
203 B
Common Lisp
9 lines
203 B
Common Lisp
(set! expt (lambda
|
|
(n x)
|
|
"Return the value of `n` raised to the `x`th power."
|
|
(cond
|
|
((= x 1) n)
|
|
(t (* n (expt n (- x 1)))))))
|
|
|
|
(expt 2 60)
|