ref: b78c9edfb4e91efa4aa61e09feaf3da4848342b0
dir: /test/mp.sl/
(def x 9999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999) (apply * (map-int (λ (_) x) 1000))