let def_any () : unit Deferred.t = Deferred.any [delayed 0.5 "fast!"; delayed 1.0 "slow!"] >>| print_endline