I
Size: a a a
I
let a _ = async {
Console.WriteLine "start"
do! Async.Sleep (TimeSpan.FromSeconds 3.)
Console.WriteLine "end"
}
let computations = Seq.init 10 a
(computations, 2)
|> Async.Parallel
|> Async.RunSynchronously
|> ignore
лучше бы добавили еще один метод, который бы ограничивал максимальное количество задачоГ
VS
let a _ = async {
Console.WriteLine "start"
do! Async.Sleep (TimeSpan.FromSeconds 3.)
Console.WriteLine "end"
}
let computations = Seq.init 10 a
(computations, 2)
|> Async.Parallel
|> Async.RunSynchronously
|> ignore
лучше бы добавили еще один метод, который бы ограничивал максимальное количество задачVS
I
I
VS
I
VS
VS
I
VS
I
VS
I
I
I