Theorems about alist-map-keys.
Theorem: true-listp-of-alist-map-keys-equal
(defthm true-listp-of-alist-map-keys-equal (implies (alistp alist) (true-listp (alist-map-keys-equal alist))))