Скажи, что я хочу вернутьOption в то время как вasync рабочий процесс:

let run = 
    async {
        let! x = doAsyncThing
        let! y = doNextAsyncThing x
        match y with
        | None -> return None
        | Some z -> return Some