		Search-engine friendly clone of the ACL2 documentation.

Abstract-syntax-aidentp

Ident-option-aidentp

Signature
(ident-option-aidentp ident-option gcc) → fty::result
Arguments: ident-option — Guard (ident-optionp ident-option).; gcc — Guard (booleanp gcc).
Returns: fty::result — Type (booleanp fty::result).

Definitions and Theorems

Function: ident-option-aidentp

(defun ident-option-aidentp (ident-option gcc)
  (declare (xargs :guard (and (ident-optionp ident-option)
                              (booleanp gcc))))
  (let ((__function__ 'ident-option-aidentp))
    (declare (ignorable __function__))
    (ident-option-case
         ident-option
         :some (ident-aidentp (ident-option-some->val ident-option)
                              gcc)
         :none t)))

Theorem: booleanp-of-ident-option-aidentp

(defthm booleanp-of-ident-option-aidentp
  (b* ((fty::result (ident-option-aidentp ident-option gcc)))
    (booleanp fty::result))
  :rule-classes :rewrite)

Theorem: ident-option-aidentp-of-ident-option-fix-ident-option

(defthm ident-option-aidentp-of-ident-option-fix-ident-option
  (equal (ident-option-aidentp (ident-option-fix ident-option)
                               gcc)
         (ident-option-aidentp ident-option gcc)))

Theorem: ident-option-aidentp-ident-option-equiv-congruence-on-ident-option

(defthm
 ident-option-aidentp-ident-option-equiv-congruence-on-ident-option
 (implies (ident-option-equiv ident-option ident-option-equiv)
          (equal (ident-option-aidentp ident-option gcc)
                 (ident-option-aidentp ident-option-equiv gcc)))
 :rule-classes :congruence)

Theorem: ident-option-aidentp-of-bool-fix-gcc

(defthm ident-option-aidentp-of-bool-fix-gcc
  (equal (ident-option-aidentp ident-option (bool-fix gcc))
         (ident-option-aidentp ident-option gcc)))

Theorem: ident-option-aidentp-iff-congruence-on-gcc

(defthm ident-option-aidentp-iff-congruence-on-gcc
  (implies (iff gcc gcc-equiv)
           (equal (ident-option-aidentp ident-option gcc)
                  (ident-option-aidentp ident-option gcc-equiv)))
  :rule-classes :congruence)