import Data.List.Split ( splitOn )

main :: IO ()
main = interact $ solve . drop 2. words

solve :: [String] -> String
solve xss = if p then "YES" else "NO"
    where
        p = not $ any (== 1) $ map length $ map (splitOn "Love") xss