MM
Size: a a a
MM
Л
Л
NE
ДН
❄
IC
let dayVipit = job {
let stakan = IVar()
do! barmen *<<+ stakan
return! stakan
}
dayVipit
>>- printfn "И немедленно выпил %A"
>>=. timeOutMillis 1000
|> Job.foreverServer
|> queueNE
let dayVipit = job {
let stakan = IVar()
do! barmen *<<+ stakan
return! stakan
}
dayVipit
>>- printfn "И немедленно выпил %A"
>>=. timeOutMillis 1000
|> Job.foreverServer
|> queueNE
NE
Dv
let dayVipit = job {
let stakan = IVar()
do! barmen *<<+ stakan
return! stakan
}
dayVipit
>>- printfn "И немедленно выпил %A"
>>=. timeOutMillis 1000
|> Job.foreverServer
|> queueIC
IC
NE
IC
IC
Dv
let dayVipit = job {
let stakan = IVar()
do! barmen *<<+ stakan
return! stakan
}
dayVipit
>>- printfn "И немедленно выпил %A"
>>=. timeOutMillis 1000
|> Job.foreverServer
|> queueNE
NE
Dv