var
  s:ansistring;
  i,j,n,k,m,t:longint;
begin
  readln(s);
  k:=length(s);
  if k mod 2<>0 then
  begin
    writeln('NO');
    halt;
  end;
  for i:=1 to k div 2 do
  begin
    t:=abs(ord(s[i])-ord(s[k-i+1]));
    if (t<>1)and(t<>2) then
    begin
      writeln('No');
      halt;
    end;
  end;
  writeln('Yes');
end.
