Pretty-print an integer number.
Function:
(defun pprint-integer (int) (declare (xargs :guard (integerp int))) (let ((__function__ 'pprint-integer)) (declare (ignorable __function__)) (str::int-to-dec-string int)))
Theorem:
(defthm msgp-of-pprint-integer (b* ((part (pprint-integer int))) (msgp part)) :rule-classes :rewrite)
Theorem:
(defthm pprint-integer-of-ifix-int (equal (pprint-integer (ifix int)) (pprint-integer int)))
Theorem:
(defthm pprint-integer-int-equiv-congruence-on-int (implies (acl2::int-equiv int int-equiv) (equal (pprint-integer int) (pprint-integer int-equiv))) :rule-classes :congruence)