(in-package :ta2) (defvar *debug?* nil)