import Control.Monad(forM) 
yes = flip mapM