import qualified Control.Monad as CM 
yes = flip mapM