class
	GRAND_PARENT_CLASS

feature

	f: INTEGER is
		do
			Result := -1
		end
end