let
pick_and_cancel: (
'
a,
'
error) t list
->
(
'
a,
'
error) t =
fun
l
->
Lwt
.pick l