		Search-engine friendly clone of the ACL2 documentation.

Ubyte11s-as-digits-in-base-2048

Leubyte11s=>nat

Convert a little-endian list of unsigned 11-bit bytes, seen as digits in base 2048, to their value.

Signature
(leubyte11s=>nat digits) → nat
Arguments: digits — Guard (ubyte11-listp digits).
Returns: nat — Type (natp nat).

Definitions and Theorems

Function: leubyte11s=>nat

(defun leubyte11s=>nat (digits)
  (declare (xargs :guard (ubyte11-listp digits)))
  (let ((__function__ 'leubyte11s=>nat))
    (declare (ignorable __function__))
    (lendian=>nat 2048 digits)))

Theorem: natp-of-leubyte11s=>nat

(defthm natp-of-leubyte11s=>nat
  (b* ((nat (leubyte11s=>nat digits)))
    (natp nat))
  :rule-classes :rewrite)

Theorem: leubyte11s=>nat-of-ubyte11-list-fix-digits

(defthm leubyte11s=>nat-of-ubyte11-list-fix-digits
  (equal (leubyte11s=>nat (ubyte11-list-fix digits))
         (leubyte11s=>nat digits)))

Theorem: leubyte11s=>nat-ubyte11-list-equiv-congruence-on-digits

(defthm leubyte11s=>nat-ubyte11-list-equiv-congruence-on-digits
  (implies (ubyte11-list-equiv digits digits-equiv)
           (equal (leubyte11s=>nat digits)
                  (leubyte11s=>nat digits-equiv)))
  :rule-classes :congruence)

Subtopics

Leubyte11s=>nat-injectivity+
Leubyte11s=>nat-injectivity*
Leubyte11s=>nat-of-nat=>leubyte11s
Leubyte11s=>nat-injectivity
Nat=>leubyte11s+-of-leubyte11s=>nat
Nat=>leubyte11s*-of-leubyte11s=>nat
Nat=>leubyte11s-of-leubyte11s=>nat
Leubyte11s=>nat-of-nat=>leubyte11s+
Leubyte11s=>nat-of-nat=>leubyte11s*