An ad-hoc lisp geometry library