(import random)

(let printer (fun (val) {
  (sys:sleep (mod (random) 1000))
  (print val) }))

(async printer "Enjoy")
(async printer "Rosetta")
(async printer "Code")