:- initialization(
	logtalk_load([
		shape,
		polygon,
		regular_polygon,
		square,
		q1,
		q2])).