(https://github.com/logicmoo/wam_common_lisp/blob/master/prolog/wam_cl/printers.pl)