:- initialization(
	logtalk_load([
		concentric,
		polygon,
		hexagon,
		pentagon,
		square,
		triangle],
		[events(on)])).