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