Instance same_covered_eq {ora: RandomOracle}: Equivalence same_covered_anti_chain.

Lemma same_covered_future_anti_chain_spec {ora: RandomOracle}: forall d1 d2, same_covered_anti_chain d1 d2 -> future_anti_chain d1 d2 -> forall h1, d1 h1 -> exists h2, prefix_history h1 h2 /\ d2 h2.