F # дискриминируемый союз, выбирающий 0 или 1 из списка

Question

Учитывая программу отображения, в которой я сопоставляю массив строк с различенным объединением, я хочу выбрать экземпляр определенного типа DU.Я знаю, что будет 0 или 1 раз.Есть ли способ сделать это умнее?

type thing = { One:int; Two:int; Three:int}

type data = 
    | Alpha of int
    | Bravo of thing
    | Charlie of string
    | Delta of Object

//generate some data
let listData = [
                Alpha(1);
                Alpha(2);
                Bravo( { One = 1; Two = 2; Three = 3 } );
                Charlie("hello");
                Delta("hello again")]

//find the 0 or 1 instances of bravo and return the data as a thing
let result =    listData 
                |> List.map( function | Bravo b -> Some(b) | _ -> None)
                |> List.filter( fun op -> op.IsSome)
                |> (function | [] -> None | h::t -> Some(h.Value))

Спасибо

Answer 1

Как насчет

let result =
  listData
  |> List.tryPick (function | Bravo b -> Some b | _ -> None)

Answer 2

List.tryFind добьется цели:

let result = listData
             |> List.tryFind (function | Bravo b -> true | _ -> false)