ref: 439510c77f14f7484b937bf247013b8500315d3d
dir: /test/mp.lsp/
(define x 9999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999) (apply * (map-int (λ (_) x) 1000))