		Search-engine friendly clone of the ACL2 documentation.

Abstract-syntax-unambp

Transunit-unambp

Signature
(transunit-unambp transunit) → fty::result
Arguments: transunit — Guard (transunitp transunit).
Returns: fty::result — Type (booleanp fty::result).

Definitions and Theorems

Function: transunit-unambp

(defun transunit-unambp (transunit)
  (declare (xargs :guard (transunitp transunit)))
  (declare (ignorable transunit))
  (let ((__function__ 'transunit-unambp))
    (declare (ignorable __function__))
    (ext-declon-list-unambp (transunit->declons transunit))))

Theorem: booleanp-of-transunit-unambp

(defthm booleanp-of-transunit-unambp
  (b* ((fty::result (transunit-unambp transunit)))
    (booleanp fty::result))
  :rule-classes :rewrite)

Theorem: transunit-unambp-of-transunit-fix-transunit

(defthm transunit-unambp-of-transunit-fix-transunit
  (equal (transunit-unambp (transunit-fix transunit))
         (transunit-unambp transunit)))

Theorem: transunit-unambp-transunit-equiv-congruence-on-transunit

(defthm transunit-unambp-transunit-equiv-congruence-on-transunit
  (implies (transunit-equiv transunit transunit-equiv)
           (equal (transunit-unambp transunit)
                  (transunit-unambp transunit-equiv)))
  :rule-classes :congruence)