I
let asyncDelayMs (delay: int) work =
async {
do! Async.Sleep delay
work()
} |> Async.Start
[<EntryPoint>]
let main argv =
asyncDelayMs 10 (fun () -> failwith "Hi")
Thread.Sleep 1000
Console.WriteLine("Hello")
Thread.Sleep 1000
Console.WriteLine("Hello")
Thread.Sleep 1000
Console.WriteLine("Hello")
0