lines = readlines
def correct
  puts "CORRECT (maybe)"
end

def wrong
  puts "WRONG!"
end

lines.each do |l|
  items = l.split
  name = items[0]
  if items.length <= 1
    wrong
    next
  end
  word = items[1..(-1)].join(" ").downcase
  last_word = items[-1].downcase
  case name
  when "digi"
    if word =~ /nyo$/
      correct
    elsif last_word =~ /nyo(.{,3})$/ && $1.gsub("_","") !~ /^\w+$/
      correct
    else
      wrong
    end
  when "petit"
    if word =~ /nyu$/
      correct
    elsif last_word =~ /nyu(.{,3})$/ && $1.gsub("_","") !~ /^\w+$/
      correct
    else
      wrong
    end
  when "rabi"
    word.gsub!("_","")
    if word =~ /\w/
      correct
    else
      wrong
    end
  when "gema"
    if word =~ /gema$/
      correct
    elsif last_word =~ /gema(.{,3})$/ && $1.gsub("_","") !~ /^\w+$/
      correct
    else
      wrong
    end
  when "piyo"
    if word =~ /pyo$/
      correct
    elsif last_word =~ /pyo(.{,3})$/ && $1.gsub("_","") !~ /^\w+$/
      correct
    else
      wrong
    end

  else
    wrong
  end
end