I do not bite, I just want to play:
--------------------------------------------------------------------------------
(yeti@tilde.institute:p2)~/gambit$ cat mb2.scm
(let* ((xmin -2 ) (xmax 2 )
(ymin -2 ) (ymax 2 )
(dx 4/78) (dy 4/32)
(maxi 17 ))
(do ((cy ymin (+ cy dy)))
((> cy ymax))
(do ((cx xmin (+ cx dx)))
((> cx xmax) (newline))
(do ((x 0) (y 0) (x2 0) (y2 0) (i 0))
((or (>= i maxi) (> (+ x2 y2) 4)) (print (integer->char (+ i 64))))
(set! y (+ (* 2 x y) cy))
(set! x (+ (- x2 y2) cx))
(set! i (+ i 1))
(set! x2 (* x x))
(set! y2 (* y y))
)
)
)
)
(yeti@tilde.institute:p2)~/gambit$ cat mb2ce.scm
(let* ((xmin -2 ) (xmax +2 )
(ymin -2i ) (ymax +2i )
(dx 4/78) (dy +4/32i)
(maxi 17 ))
(do ((cy ymin (+ cy dy)))
((> (imag-part cy) (imag-part ymax)))
(do ((cx xmin (+ cx dx)))
((> (real-part cx) (real-part xmax)) (newline))
(do ((z 0 (+ (* z z) cx cy)) (i 0 (+ i 1)))
((or (>= i maxi) (> (magnitude z) 2)) (print (integer->char (+ i 64))))
)
)
)
)
--------------------------------------------------------------------------------
Those are two ways to print the "full circle" Mandelbrot set image, one using
fractions, the other using complex fractions.
And they produce exactly the same output:
--------------------------------------------------------------------------------
(yeti@tilde.institute:p2)~/gambit$ sha1sum *.out
48ddbd025206b0cab9cfedaa48d075daa56ce685 mb2.scm.out
48ddbd025206b0cab9cfedaa48d075daa56ce685 mb2ce.scm.out
--------------------------------------------------------------------------------
Boring, isn't it?
But wait!
There is more:
--------------------------------------------------------------------------------
(yeti@tilde.institute:p2)~/gambit$ cat mb2.scm.out
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAAAAA
AAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAA
AAAAAAAAABBBBBBBBBBBCCCCCCCCCCCCCCCCCCCBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAA
AAAAAAABBBBBBBCCCCCCCCCCCCCCCCCDDDEGEEDDDCCCCBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAA
AAAAAABBBBCCCCCCCCCCCCCCCCDDDDDDEEFGKIJQEDDDDCCCCBBBBBBBBBBBBBBBBBBBBBBBBAAAAAA
AAAABBBBCCCCCCCCCCCCCCCDDDDDDDEEEFEEQEEIEEEDDDDCCCCCBBBBBBBBBBBBBBBBBBBBBBBAAAA
AAABBBCCCCCCCCCCCCCCDDDDDDDEFFFGGHPQQQQQHGFFEEEDDCCCCCBBBBBBBBBBBBBBBBBBBBBBAAA
AABBCCCCCCCCCCCCCDDDDEEEEFGOEEQEEQEEQEEQEEQENJQIEDCCCCCCBBBBBBBBBBBBBBBBBBBBBAA
AABCCCCCCCCCCDDEEEEEEEEFFGJKQQQQQQQQQQQHQQQQQQLGEEDCCCCCCBBBBBBBBBBBBBBBBBBBBAA
ABCCCCCDDDDEEFEIGGHPHGGHHKQQEEQEEQEEQEEQEEQEEQEEJEDDCCCCCCBBBBBBBBBBBBBBBBBBBBA
ACCDDDDDDEEEFGHJQQQQQQQKLQQQQQQQQQQQQQQGQQQQQQQLGEDDCCCCCCBBBBBBBBBBBBBBBBBBBBA
ADDDDDEEEFEEKJEQQQQQQQQQQQQQQEQEEQEEQEEQEEQEEQEEFEDDDCCCCCCBBBBBBBBBBBBBBBBBBBA
QQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQKHFEEDDDCCCCCCBBBBBBBBBBBBBBBBBBBB
ADDDDDEFFFGHKJLQEEQEEQEEQEQQEQQQQQQQQQQQQQQQQQQIFEDDDCCCCCCBBBBBBBBBBBBBBBBBBBA
ACCDDDDDDEEEFGHJQQQQQQQKLQQQQQQQQQQQQQQQQQQQQQQLGEDDCCCCCCBBBBBBBBBBBBBBBBBBBBA
ABCCCCCDDDDEEFHIEEHEEGEEHEQQQQQQQQQQQQQQQQQQQQQMJEDDCCCCCCBBBBBBBBBBBBBBBBBBBBA
AABCCCCCCCCCCDDEEEEEEEEFFGJKQQQQQQQQQQQQQQQQQQLGEEDCCCCCCBBBBBBBBBBBBBBBBBBBBAA
AABBCCCCCCCCCCCCCDDDDEEEEEGOQQQNQQQQQQQQQQQIEJEEEDCCCCCCBBBBBBBBBBBBBBBBBBBBBAA
AAABBBCCCCCCCCCCCCCCDDDDDDDEFFFGGHPQQQQGHGFFEEEDDCCCCCBBBBBBBBBBBBBBBBBBBBBBAAA
AAAABBBBCCCCCCCCCCCCCCCDDDDDDDEEEFJKQQMIFEEDDDDCCCCCBBBBBBBBBBBBBBBBBBBBBBBAAAA
AAAAAABBBBCCCCCCCCCCCCCCCCDDDDDDEEFGKIJQEDDDDCCCCBBBBBBBBBBBBBBBBBBBBBBBBAAAAAA
AAAAAAABBBBBBBCCCCCCCCCCCCCCCCCDDDEEEEDDDCCCCBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAA
AAAAAAAAABBBBBBBBBBBCCCCCCCCCCCCCCCCCCCBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAA
AAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAA
AAAAAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
--------------------------------------------------------------------------------
So both are wrong in exactly the same way!
Now it gets interesting?
Running the same programs at home (Gambit-4.9.5 on Debian11) yields the same
output for both variants too:
--------------------------------------------------------------------------------
(yeti@kumari:16)~/wrk/gambit$ sha1sum *.out
2afc568d51b567a515f8d8197d7606351fce9ebc mb2ce.scm.out
2afc568d51b567a515f8d8197d7606351fce9ebc mb2.scm.out
--------------------------------------------------------------------------------
That's fine!
BUT WAIT!
That's a different SHAsum!
Let's have a look:
--------------------------------------------------------------------------------
(yeti@kumari:16)~/wrk/gambit$ cat mb2.scm.out
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAAAAA
AAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAA
AAAAAAAAABBBBBBBBBBBCCCCCCCCCCCCCCCCCCCBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAA
AAAAAAABBBBBBBCCCCCCCCCCCCCCCCCDDDEGEEDDDCCCCBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAA
AAAAAABBBBCCCCCCCCCCCCCCCCDDDDDDEEFGKIJQEDDDDCCCCBBBBBBBBBBBBBBBBBBBBBBBBAAAAAA
AAAABBBBCCCCCCCCCCCCCCCDDDDDDDEEEFJKQQMIFEEDDDDCCCCCBBBBBBBBBBBBBBBBBBBBBBBAAAA
AAABBBCCCCCCCCCCCCCCDDDDDDDEFFFGGHPQQQQQHGFFEEEDDCCCCCBBBBBBBBBBBBBBBBBBBBBBAAA
AABBCCCCCCCCCCCCCDDDDEEEEFGOQQQNQQQQQQQQQQQINJQIEDCCCCCCBBBBBBBBBBBBBBBBBBBBBAA
AABCCCCCCCCCCDDEEEEEEEEFFGJKQQQQQQQQQQQQQQQQQQLGEEDCCCCCCBBBBBBBBBBBBBBBBBBBBAA
ABCCCCCDDDDEEFHIGGHPHGGHHKQQQQQQQQQQQQQQQQQQQQQMJEDDCCCCCCBBBBBBBBBBBBBBBBBBBBA
ACCDDDDDDEEEFGHJQQQQQQQKLQQQQQQQQQQQQQQQQQQQQQQLGEDDCCCCCCBBBBBBBBBBBBBBBBBBBBA
ADDDDDEFFFGHKJLQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQIFEDDDCCCCCCBBBBBBBBBBBBBBBBBBBA
QQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQKHFEEDDDCCCCCCBBBBBBBBBBBBBBBBBBBB
ADDDDDEFFFGHKJLQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQIFEDDDCCCCCCBBBBBBBBBBBBBBBBBBBA
ACCDDDDDDEEEFGHJQQQQQQQKLQQQQQQQQQQQQQQQQQQQQQQLGEDDCCCCCCBBBBBBBBBBBBBBBBBBBBA
ABCCCCCDDDDEEFHIGGHPHGGHHKQQQQQQQQQQQQQQQQQQQQQMJEDDCCCCCCBBBBBBBBBBBBBBBBBBBBA
AABCCCCCCCCCCDDEEEEEEEEFFGJKQQQQQQQQQQQQQQQQQQLGEEDCCCCCCBBBBBBBBBBBBBBBBBBBBAA
AABBCCCCCCCCCCCCCDDDDEEEEFGOQQQNQQQQQQQQQQQINJQIEDCCCCCCBBBBBBBBBBBBBBBBBBBBBAA
AAABBBCCCCCCCCCCCCCCDDDDDDDEFFFGGHPQQQQQHGFFEEEDDCCCCCBBBBBBBBBBBBBBBBBBBBBBAAA
AAAABBBBCCCCCCCCCCCCCCCDDDDDDDEEEFJKQQMIFEEDDDDCCCCCBBBBBBBBBBBBBBBBBBBBBBBAAAA
AAAAAABBBBCCCCCCCCCCCCCCCCDDDDDDEEFGKIJQEDDDDCCCCBBBBBBBBBBBBBBBBBBBBBBBBAAAAAA
AAAAAAABBBBBBBCCCCCCCCCCCCCCCCCDDDEGEEDDDCCCCBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAA
AAAAAAAAABBBBBBBBBBBCCCCCCCCCCCCCCCCCCCBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAA
AAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAA
AAAAAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAABBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
--------------------------------------------------------------------------------
And this one looks like one would expect!
While Gambit-4.9.3 on ~institute glitches in the same way for both test
programs, Gambit-4.9.5 at home does not.
I dare to assume, that both programs are "correct enough" and the problem is
somewhere in Gambit-4.9.3 or the bignum library it uses on OpenBSD7.3 and
therefore I suggest to uninstall Gambit on ~institute.
