import qualified Control.Monad 
yes = flip mapM