main :: IO ()
main = do
  s <- getLine
  print $ if (('N' `elem` s) `xor` ('S' `elem` s)) && (('E' `elem` s) `xor` ('W' `elem` s))
    then "YES"
    else "NO"

xor :: Bool -> Bool -> Bool
xor True True = True
xor False False = True
xor True False = False
xor False True = False
