An irrelevant string literal.
(irr-stringlit) → acl2::irr
This can be used as a dummy value of the type.
Function:
(defun irr-stringlit nil (declare (xargs :guard t)) (let ((__function__ 'irr-stringlit)) (declare (ignorable __function__)) (make-stringlit :prefix? nil :schars nil)))
Theorem:
(defthm stringlitp-of-irr-stringlit (b* ((acl2::irr (irr-stringlit))) (stringlitp acl2::irr)) :rule-classes :rewrite)