(** *** Incremental proofs using our [pcofix]

    As before, we can easily turn the above [cofix]-proofs into
    [pcofix]-proofs.
*)

Definition teq' t1 t2 := paco2 teq_gen bot2 t1 t2.

Lemma teq'_one_two : forall r, (r one eins : Prop) -> paco2 teq_gen r two zwei.