Collect properties redefined in self

Property definitions

nitc :: model_collect $ MModule :: collect_redef_mproperties
	# Collect properties redefined in `self`
	fun collect_redef_mproperties(filter: nullable ModelFilter): Set[MProperty] do
		var res = new HashSet[MProperty]
		for mclassdef in mclassdefs do
			for mpropdef in mclassdef.collect_redef_mpropdefs(filter) do
				res.add mpropdef.mproperty
			end
		end
		return res
	end
src/model/model_collect.nit:594,2--603,4