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