Skip to content
Snippets Groups Projects
Commit cbf81b65 authored by Robbert Krebbers's avatar Robbert Krebbers
Browse files

Add lemma `cmra_transport_trans`.

parent a36f8a23
No related branches found
No related tags found
No related merge requests found
......@@ -959,6 +959,10 @@ Proof. rewrite /urFunctorContractive; apply _. Qed.
Definition cmra_transport {A B : cmraT} (H : A = B) (x : A) : B :=
eq_rect A id x _ H.
Lemma cmra_transport_trans {A B C : cmraT} (H1 : A = B) (H2 : B = C) x :
cmra_transport H2 (cmra_transport H1 x) = cmra_transport (eq_trans H1 H2) x.
Proof. by destruct H2. Qed.
Section cmra_transport.
Context {A B : cmraT} (H : A = B).
Notation T := (cmra_transport H).
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment