$buf = []
def fill_buf; (s = gets) ? $buf = s.chomp.split : break while $buf.empty? end
def has_next; fill_buf; !$buf.empty? end
def get; fill_buf; $buf.shift end
def geti; get.to_i end
def getf; get.to_f end
def getss(n = nil); n ? Array.new(n) { get } : begin fill_buf; $buf.shift(1e9) end; end
def getis(n = nil); get_ss(n).map(&:to_i) end
def getfs(n = nil); get_ss(n).map(&:to_f) end

while has_next
  s = get
  ans = if s =~ /ai$/
          s.sub(/ai$/, "AI")
        else
          s.sub(/$/, "-AI")
        end
  puts ans
end