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