Idiomatyczny sposób podsumowania listy Może Int w haskell

Czy istnieje bardziej idiomatyczny sposób wdrożenia poniższych? Czuję, że brakuje mi sposobu na pozbycie się lambda, ale nie mogłem wymyślić sposobu, aby przekonwertować go na bezcelowy. Może jest też inny, niepraktyczny sposób, który jest bardziej prosty?

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

questionAnswers(5)

yourAnswerToTheQuestion