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