import Data.List main :: IO () main = do s <- getLine print $ length $ elemIndices 'n' s