Obtain the length of a Java
(char-array-length array) → length
Function:
(defun char-array-length (array) (declare (xargs :guard (char-arrayp array))) (let ((__function__ 'char-array-length)) (declare (ignorable __function__)) (int-value (len (char-array->components array)))))
Theorem:
(defthm int-valuep-of-char-array-length (b* ((length (char-array-length array))) (int-valuep length)) :rule-classes :rewrite)