'choice' in Control.Applicative?

Should there be a 'choice' function in Control.Applicative? choice :: Alternativehttp://www.haskell.org/ghc/docs/latest/html/libraries/base/Control-Applicati...f => [f a] -> f a choice = foldr (<|>) empty or: choice = Data.Foldable.asum Thanks, Greg