SWI-Prolog
ballPointPenguin