[Haskell-cafe] Mapping of async tasks to threads?