main = do
  s <- getLine
  let ans = compute s
  putStrLn $ if ans then "Yes" else "No"

compute s = null k2
  where
    (k1,s1) = chomp "keyence" s
    (k2,_) = chomp (reverse k1) (reverse s1)

chomp xxs@(x:xs) yys@(y:ys)
  | x == y = chomp xs ys
  | True = (xxs, yys)
chomp xs ys = (xs,ys)