Я практиковал Scheme в интерпретаторе Guile 1.8.8
на OS X. Я заметил что-то интересное.
Здесь expt
функция, которая в основном состоит в экспонировании expt(b,n) = b^n
:
(define (square x) (* x x))
(define (even? x) (= (remainder x 2) 0))
(define (expt b n)
(cond ((= n 0) 1)
((even? n) (square (expt b (/ n 2))))
(else (* b (expt b (- n 1))))
))
Если я попробую его с некоторыми входами
> (expt 2 10)
1024
> (expt 2 63)
9223372036854775808
Вот странная часть:
> (expt 2 64)
0
Более странно, до n=488
он остается на 0
:
> (expt 2 487)
0
> (expt 2 488)
79916762888089401123.....
> (expt 2 1000)
1071508607186267320948425049060....
> (expt 2 10000)
0
Когда я пытаюсь использовать этот код с помощью repl.it онлайн-интерпретатора, он работает так, как ожидалось. Итак, Что, черт возьми, не так с Guile?
(Примечание. На некоторых диалектах функция remainder
называется mod
.)