(vl-idscope name) → scopeexpr
Function:
(defun vl-idscope (name) (declare (xargs :guard (stringp name))) (let ((__function__ 'vl-idscope)) (declare (ignorable __function__)) (make-vl-scopeexpr-end :hid (make-vl-hidexpr-end :name name))))
Theorem:
(defthm vl-scopeexpr-p-of-vl-idscope (b* ((scopeexpr (vl-idscope name))) (vl-scopeexpr-p scopeexpr)) :rule-classes :rewrite)
Theorem:
(defthm vl-idscope-p-of-vl-idscope (b* ((?scopeexpr (vl-idscope name))) (vl-idscope-p scopeexpr)))
Theorem:
(defthm vl-idscope->name-of-vl-idscope (b* ((?scopeexpr (vl-idscope name))) (equal (vl-idscope->name scopeexpr) (string-fix name))))
Theorem:
(defthm vl-idscope-of-str-fix-name (equal (vl-idscope (str-fix name)) (vl-idscope name)))
Theorem:
(defthm vl-idscope-streqv-congruence-on-name (implies (streqv name name-equiv) (equal (vl-idscope name) (vl-idscope name-equiv))) :rule-classes :congruence)