local D = {
	["petit "] = {"[Nn][Yy][Uu][^%w]*$"; 6; 9};
	["digi "] = {"[Nn][Yy][Oo][^%w]*$"; 6; 8};
	["rabi "] = 0;
	["gema "] = {"[Gg][Ee][Mm][Aa][^%w]*$"; 7; 9};
	["piyo "] = {"[Pp][Yy][Oo][^%w]*$"; 6; 8}
}
(function (f)
	local b=f()
	while b~=nil do print(b and "CORRECT (maybe)" or "WRONG!") b=f() end
end)(function ()
	local s=io.stdin:read("*l")
	if s==nil then return nil end
	if D[s:sub(1,5)]~=nil then
		if D[s:sub(1,5)]==0 then
			if s:sub(6):match("%w")==nil then return false end
		else
			if #s<D[s:sub(1,5)][3] then return false end
			if s:sub(-D[s:sub(1,5)][2]):match(D[s:sub(1,5)][1])==nil then return false end
		end
	elseif D[s:sub(1,6)]~=nil then
		if #s<D[s:sub(1,6)][3] then return false end
		if s:sub(-D[s:sub(1,6)][2]):match(D[s:sub(1,6)][1])==nil then return false end
	else return false end
	return true
end)