[Haskell-cafe] ($) and ApplicativeDo