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