main = do
  s <- getLine
  if ('W' `elem` s) && ('E' `notElem` s)
  then
    putStrLn "No"
  else if 'W' `notElem` s  && 'E' `elem` s
  then
    putStrLn "No"
  else if 'N' `elem` s && 'S' `notElem` s
  then
    putStrLn "No"
  else if 'N' `notElem` s && 'S' `elem` s
  then
    putStrLn "No"
  else
    putStrLn "Yes"