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