Initial translation state.
(init-trans-state) → tstate
Function:
(defun init-trans-state nil (declare (xargs :guard t)) (let ((__function__ 'init-trans-state)) (declare (ignorable __function__)) (make-trans-state :tops nil)))
Theorem:
(defthm trans-statep-of-init-trans-state (b* ((tstate (init-trans-state))) (trans-statep tstate)) :rule-classes :rewrite)