List of transactions of (the proposal in) a certificate.
(certificate->transactions cert) → transactions
Function:
(defun certificate->transactions (cert) (declare (xargs :guard (certificatep cert))) (let ((__function__ 'certificate->transactions)) (declare (ignorable __function__)) (proposal->transactions (certificate->proposal cert))))
Theorem:
(defthm transaction-listp-of-certificate->transactions (b* ((transactions (certificate->transactions cert))) (transaction-listp transactions)) :rule-classes :rewrite)
Theorem:
(defthm certificate->transactions-of-certificate-fix-cert (equal (certificate->transactions (certificate-fix cert)) (certificate->transactions cert)))
Theorem:
(defthm certificate->transactions-certificate-equiv-congruence-on-cert (implies (certificate-equiv cert cert-equiv) (equal (certificate->transactions cert) (certificate->transactions cert-equiv))) :rule-classes :congruence)