		Search-engine friendly clone of the ACL2 documentation.

Constants-conversions-and-bounds

I128-to-n128

Signature
(i128-to-n128 x) → *
Arguments: x — Guard (i128p x).

Definitions and Theorems

Function: i128-to-n128$inline

(defun i128-to-n128$inline (x)
  (declare (type (signed-byte 128) x))
  (declare (xargs :guard (i128p x)))
  (mbe :logic (loghead 128 x)
       :exec
       (if (>= x 0)
           x
         (+ x
            340282366920938463463374607431768211456))))