(jenkins-acc-symbol symbol acc) → acc$
Function:
(defun jenkins-acc-symbol$inline (symbol acc) (declare (type symbol symbol) (type (unsigned-byte 32) acc) (xargs :type-prescription (natp (jenkins-acc-symbol symbol acc))) (optimize (speed 3) (safety 0))) (declare (xargs :guard t)) (the (unsigned-byte 32) (jenkins-acc-string (symbol-name symbol) (jenkins-acc-string (symbol-package-name symbol) acc))))
Theorem:
(defthm return-type-of-jenkins-acc-symbol (b* ((acc$ (jenkins-acc-symbol$inline symbol acc))) (unsigned-byte-p 32 acc$)) :rule-classes :rewrite)