((/xdoc/names.lisp::file-name-mangle (nil nil nil (let) nil nil nil) (((str (concatenate (quote string) (symbol-package-name x) :: (symbol-name x)))) nil nil nil nil (file-name-mangle-aux) nil) ((str acc) (0) (length) nil nil nil nil) ((str) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/xdoc/names.lisp::in-package-p (nil nil nil (equal) nil nil nil) ((sym) nil nil (intern-in-package-of-symbol) nil nil nil) ((base-pkg) nil (symbol-name) nil nil nil nil) ((sym) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/xdoc/names.lisp::sneaky-downcase (nil nil nil (let) nil nil nil) (((down (string-downcase x))) nil nil nil (strsubst) nil nil) ((acl2 ACL2 down) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/xdoc/names.lisp::upcase-first-letter (nil nil nil nil (if) nil nil) ((x) nil nil (equal) (concatenate) nil nil) ((x ) nil (quote) (coerce) (subseq) nil nil) ((string x nil) (1) (list quote) nil nil nil nil) ((string) nil (char-upcase) nil nil nil nil) (nil nil nil (char) nil nil nil) ((x) (0) nil nil nil nil nil)))