(aig-count-labels x map) → count
Function:
(defun aig-count-labels (x map) (declare (xargs :guard t)) (let ((__function__ 'aig-count-labels)) (declare (ignorable __function__)) (set::cardinality (aig-collect-labels x map))))
Theorem:
(defthm natp-of-aig-count-labels (b* ((count (aig-count-labels x map))) (natp count)) :rule-classes :type-prescription)