$f[1] = 'e';
$f[2] = 'y';
$f[3] = 'e';
$f[4] = 'n';
$f[5] = 'c';
$f[6] = 'e';

chomp($line = <>);
@n = split(//, $line);


$r = "NO";
$m = 0;
for ($i = 0; $i <= $#n; $i++){
	if($n[$i] eq "k"){
		if($i == 0){
			if(join("", @n[0 .. 6]) eq 'keyence'){
				$r = "YES";
			}else{
				for ($p = 1; $p <= 6; $p++){
					if($n[$i + $p] ne $f[$p]){
						$m = $p;
						last;
					}
				}
				for ($m .. $#n){
					if($n[$_] eq $f[$m]){
						if(join("", @n[$_ .. $_ + 6 - $m]) eq join("", @f[$m .. 6])){
							$r = "YES";
						}
						last;
					}
				}
			}
		}else{
			$r = "YES" if((join("", @n[$i .. $i + 6]) eq 'keyence') and ($i + 6 == $#n));
		}
		last;
	}
}

print "$r\n";
