Proof of the invariant from other invariants.
This is the proof of our invariant, from the other two invariants. The rewrite rules enabled in the hints take care of everything; also see the observation in same-active-committees-when-nofork about the particular form of that rewrite rule.
Theorem:
(defthm same-committees-p-implied (implies (and (nonforking-blockchains-p systate) (ordered-blockchain-p systate)) (same-committees-p systate)))