:- initialization(
	logtalk_load([
		relationp,
		relation,
		constrained_relation])).