Collect all inits introduced in self

Property definitions

nitc :: model_collect $ MModule :: collect_intro_inits
	# Collect all inits introduced in `self`
	fun collect_intro_inits(filter: nullable ModelFilter): Set[MMethod] do
		var res = new HashSet[MMethod]
		for mproperty in collect_intro_mproperties(filter) do
			if mproperty isa MMethod and mproperty.is_init then res.add(mproperty)
		end
		return res
	end
src/model/model_collect.nit:614,2--621,4