Get the params field from a classname/params.
(classname/params->params x) → params
This is an ordinary field accessor created by defprod.
Function:
(defun classname/params->params$inline (x) (declare (xargs :guard (classname/params-p x))) (declare (xargs :guard t)) (let ((__function__ 'classname/params->params)) (declare (ignorable __function__)) (mbe :logic (b* ((x (and t x))) (vl-maybe-paramargs-fix (cdr x))) :exec (cdr x))))
Theorem:
(defthm vl-maybe-paramargs-p-of-classname/params->params (b* ((params (classname/params->params$inline x))) (vl-maybe-paramargs-p params)) :rule-classes :rewrite)
Theorem:
(defthm classname/params->params$inline-of-classname/params-fix-x (equal (classname/params->params$inline (classname/params-fix x)) (classname/params->params$inline x)))
Theorem:
(defthm classname/params->params$inline-classname/params-equiv-congruence-on-x (implies (classname/params-equiv x x-equiv) (equal (classname/params->params$inline x) (classname/params->params$inline x-equiv))) :rule-classes :congruence)