var S:String[105];
Begin
Write('S=');readln(S);
if pos('Yardi',S)>0 then
  writeln('YES')
else
  writeln('NO');
readln;
end.