Generate all the Java methods that add the ACL2 package definitions.
(atj-gen-pkg-methods pkgs verbose$) → methods
Function:
(defun atj-gen-pkg-methods (pkgs verbose$) (declare (xargs :guard (and (string-listp pkgs) (booleanp verbose$)))) (let ((__function__ 'atj-gen-pkg-methods)) (declare (ignorable __function__)) (if (endp pkgs) nil (b* ((first-method (atj-gen-pkg-method (car pkgs) verbose$)) (rest-methods (atj-gen-pkg-methods (cdr pkgs) verbose$))) (cons first-method rest-methods)))))
Theorem:
(defthm jmethod-listp-of-atj-gen-pkg-methods (b* ((methods (atj-gen-pkg-methods pkgs verbose$))) (jmethod-listp methods)) :rule-classes :rewrite)