		Search-engine friendly clone of the ACL2 documentation.

Floating-point-operations

Float-plus

Unary plus + on floats [JLS14:4.2.4] [JLS14:15.15.3].

Signature
(float-plus operand) → result
Arguments: operand — Guard (float-valuep operand).
Returns: result — Type (float-valuep result).

Definitions and Theorems

Function: float-plus

(defun float-plus (operand)
  (declare (xargs :guard (float-valuep operand)))
  (b* ((x (float-value->float operand)))
    (float-value (float-plus-abs x))))

Theorem: float-valuep-of-float-plus

(defthm float-valuep-of-float-plus
  (b* ((result (float-plus operand)))
    (float-valuep result))
  :rule-classes :rewrite)

Theorem: float-plus-of-float-value-fix-operand

(defthm float-plus-of-float-value-fix-operand
  (equal (float-plus (float-value-fix operand))
         (float-plus operand)))

Theorem: float-plus-float-value-equiv-congruence-on-operand

(defthm float-plus-float-value-equiv-congruence-on-operand
  (implies (float-value-equiv operand operand-equiv)
           (equal (float-plus operand)
                  (float-plus operand-equiv)))
  :rule-classes :congruence)