(vl-initial-scan-for-ignore x mwtype) → ignorep
Function:
(defun vl-initial-scan-for-ignore (x mwtype) (declare (xargs :guard (and (vl-initial-p x) (stringp mwtype)))) (let ((__function__ 'vl-initial-scan-for-ignore)) (declare (ignorable __function__)) (b* (((vl-initial x) (vl-initial-fix x))) (b* ((ignorep (vl-stmt-scan-for-ignore x.stmt mwtype)) (ignorep1 (vl-lint-atts-say-ignore x.atts mwtype)) (ignorep (or ignorep1 ignorep))) ignorep))))
Theorem:
(defthm booleanp-of-vl-initial-scan-for-ignore (b* ((ignorep (vl-initial-scan-for-ignore x mwtype))) (booleanp ignorep)) :rule-classes :type-prescription)
Theorem:
(defthm vl-initial-scan-for-ignore-of-vl-initial-fix-x (equal (vl-initial-scan-for-ignore (vl-initial-fix x) mwtype) (vl-initial-scan-for-ignore x mwtype)))
Theorem:
(defthm vl-initial-scan-for-ignore-vl-initial-equiv-congruence-on-x (implies (vl-initial-equiv x x-equiv) (equal (vl-initial-scan-for-ignore x mwtype) (vl-initial-scan-for-ignore x-equiv mwtype))) :rule-classes :congruence)
Theorem:
(defthm vl-initial-scan-for-ignore-of-str-fix-mwtype (equal (vl-initial-scan-for-ignore x (str-fix mwtype)) (vl-initial-scan-for-ignore x mwtype)))
Theorem:
(defthm vl-initial-scan-for-ignore-streqv-congruence-on-mwtype (implies (streqv mwtype mwtype-equiv) (equal (vl-initial-scan-for-ignore x mwtype) (vl-initial-scan-for-ignore x mwtype-equiv))) :rule-classes :congruence)