|]
let asyncSleep d = async {
do! Async.Sleep d
printfn "finish sleep with %d" d
return d
}
let r =
seq { for x in a do yield asyncSleep x}
|> Async.Parallel
|> Async.RunSynchronously
выводит дебаг сортированно, но как сделать, чтоб выходной массив отсортировался?
Можно сложить в очередь.
Обсуждают сегодня