var
        s,s1,s2:ansistring;
        i,l:longint;
begin
        readln(s);
        l:=length(s);
        for i:=1 to l div 2 do begin
                if s[i]='b' then begin
                        s[i]:='d';
                        continue;
                end;
                if s[i]='d' then begin
                        s[i]:='b';
                        continue;
                end;
                if s[i]='p' then begin
                        s[i]:='q';
                        continue;
                end;
                if s[i]='q' then begin
                        s[i]:='q';
                        continue;
                end;
        end;
        for i:=1 to l div 2 do s1:=s1+s[i];
        for i:=l downto l div 2+1 do s2:=s2+s[i];
        if s1=s2 then writeln('Yes') else writeln('No');
end.