import Control.Applicative ((<$>), (<*>))
import Control.Monad
import Data.List

main :: IO ()
main = do
  solve <$> getLine >>= putStrLn

solve :: String -> String
solve xs
  | ys == "EW" = "Yes"
  | ys == "NS" = "Yes"
  | ys == "ENSW" = "Yes"
  | otherwise = "No"
  where
    ys = sort . nub $ xs
