let f i c = let cn= (int c)-(i+1)%26 if cn<65 then (cn+26) |> char elif cn>90 then (cn-26) |> char else cn |> char stdin.ReadLine() |> Seq.mapi f |> System.String.Concat |> stdout.WriteLine