Generic element-list transform for mapappend
Theorem: outelement-list-p-of-element-listxformer
(defthm outelement-list-p-of-element-listxformer (implies (element-p x) (outelement-list-p (element-listxformer x))))