blob: d99a1fd5d42405156fabf851525778641e05603a (
plain) (
blame)
1
2
3
4
5
6
|
(with-output-to-file "TRIGRID.TXT" (lambda () (for-each
(lambda (a)
(display (remainder (quotient (* a (+ a 2) (+ (* a 2) 1)) 8) 2016))
(newline))
'(4 3 5 6 111 222 3333 4444 55555 666666 7777777 88888888 999999999
123456789123456789 1000000000000000000))))
|
