Addresses of the members of the committee.
(committee-members commtt) → addresses
The members of a committees are the keys of the map.
Function:
(defun committee-members (commtt) (declare (xargs :guard (committeep commtt))) (let ((__function__ 'committee-members)) (declare (ignorable __function__)) (omap::keys (committee->members-with-stake commtt))))
Theorem:
(defthm address-setp-of-committee-members (b* ((addresses (committee-members commtt))) (address-setp addresses)) :rule-classes :rewrite)
Theorem:
(defthm committee-members-of-committee-fix-commtt (equal (committee-members (committee-fix commtt)) (committee-members commtt)))
Theorem:
(defthm committee-members-committee-equiv-congruence-on-commtt (implies (committee-equiv commtt commtt-equiv) (equal (committee-members commtt) (committee-members commtt-equiv))) :rule-classes :congruence)