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