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