The function
(leos2bsp bytes) → bits
The
Function:
(defun leos2bsp (bytes) (declare (xargs :guard (byte-listp bytes))) (let ((__function__ 'leos2bsp)) (declare (ignorable __function__)) (acl2::lebytes=>bits bytes)))
Theorem:
(defthm bit-listp-of-leos2bsp (b* ((bits (leos2bsp bytes))) (bit-listp bits)) :rule-classes :rewrite)
Theorem:
(defthm len-of-leos2bsp (b* ((?bits (leos2bsp bytes))) (equal (len bits) (* 8 (len bytes)))))