Identifier of an initializer declarator.
(init-declor->ident initdeclor) → ident
Function:
(defun init-declor->ident (initdeclor) (declare (xargs :guard (init-declorp initdeclor))) (b* (((init-declor initdeclor) initdeclor)) (declor->ident initdeclor.declor)))
Theorem:
(defthm identp-of-init-declor->ident (b* ((ident (init-declor->ident initdeclor))) (identp ident)) :rule-classes :rewrite)
Theorem:
(defthm init-declor->ident-of-init-declor-fix-initdeclor (equal (init-declor->ident (init-declor-fix initdeclor)) (init-declor->ident initdeclor)))
Theorem:
(defthm init-declor->ident-init-declor-equiv-congruence-on-initdeclor (implies (init-declor-equiv initdeclor initdeclor-equiv) (equal (init-declor->ident initdeclor) (init-declor->ident initdeclor-equiv))) :rule-classes :congruence)