procedure rot13(s)
	local t, i
	t := ""
	s ? while i := ord(move(1)) do {
		(65 <= i <= 90)  & i := (i - 52) % 26 + 65
		(97 <= i <= 122) & i := (i - 84) % 26 + 97
		t ||:= char(i)
	}
	return t
end
procedure main()
	while write(rot13(read()))
end