Forma idiomática de sumar una lista de Maybe Int en haskell

¿Hay alguna forma más idiomática de implementar lo siguiente? Siento que me estoy perdiendo una forma de deshacerme de la lambda, pero no pude encontrar una manera de convertirla en un punto libre. Tal vez haya otra forma no aplicativa que sea más directa.

import Data.Maybe
import Control.Applicative

foldl (\x y -> pure (+) <*> x <*> y) (Just 0) [Just 3, Just 4]
-- Just 7

foldl (\x y -> pure (+) <*> x <*> y) (Just 0) [Just 3, Just 4, Nothing]
-- Nothing

Respuestas a la pregunta(5)

Su respuesta a la pregunta