Relation between message extraction and message creation.
Theorem:
(defthm message-certs-with-dest-of-make-certificate-messages (implies (address-setp dests) (equal (message-certs-with-dest dest (make-certificate-messages cert dests)) (if (in (address-fix dest) dests) (insert (certificate-fix cert) nil) nil))))