anchor.diff:  (defpackage :Prover)
   (defpackage :Simplify)
   (defpackage :IsaTermPrinter)
  +(defpackage :CoqTermPrinter)
   (defpackage :Refs)
   (defpackage :Haskell)
   (defpackage :SWShell)
  
positive.code:               (unless (null uid)
                  (setq cl-user::*last-unit-Id-_loaded* uid)
                  (IsaTermPrinter::printUIDtoThyFile-2 uid t))))
             (gen-acl2 
              (let ((TypeObligations::generateTerminationConditions? nil)
                    (TypeObligations::generateExhaustivityConditions? t)
  
negative.code:     ("oblig"     . "[unit-term] Abbreviation for show obligations ...")
      ("gen-obligations" . "[unit-term] Generate Isabelle/HOL obligation theory for unit.")
      ("gen-obligs" . "[unit-term] Generate Isabelle/HOL obligation theory for unit.")
      ("gen-coq"   . "Generates Coq obligations for unit.")
      ("gen-acl2"   . "Generates ACL2 code for unit.")
      ("gen-haskell" . "[unit-term] Generate Haskell code for unit.")
      ("gen-h" . "[unit-term] Generate Haskell code theory for unit.")
  