		Search-engine friendly clone of the ACL2 documentation.

Rv32im-le-states

Error32

Set the error flag in the state.

Signature
(error32 stat) → new-stat
Arguments: stat — Guard (stat32p stat).
Returns: new-stat — Type (stat32p new-stat).

Definitions and Theorems

Function: error32

(defun error32 (stat)
  (declare (xargs :guard (stat32p stat)))
  (change-stat32 stat :error t))

Theorem: stat32p-of-error32

(defthm stat32p-of-error32
  (b* ((new-stat (error32 stat)))
    (stat32p new-stat))
  :rule-classes :rewrite)

Theorem: error32-of-stat32-fix-stat

(defthm error32-of-stat32-fix-stat
  (equal (error32 (stat32-fix stat))
         (error32 stat)))

Theorem: error32-stat32-equiv-congruence-on-stat

(defthm error32-stat32-equiv-congruence-on-stat
  (implies (stat32-equiv stat stat-equiv)
           (equal (error32 stat)
                  (error32 stat-equiv)))
  :rule-classes :congruence)