Commit 0d981f42 authored by Robbert Krebbers's avatar Robbert Krebbers

Add lemma dec_agree_core_id.

parent 4e7e8579
......@@ -45,6 +45,9 @@ Qed.
Canonical Structure dec_agreeR : cmraT := discreteR dec_agree_ra.
(* Some properties of this CMRA *)
Lemma dec_agree_core_id (x : dec_agree A) : core x = x.
Proof. done. Qed.
Lemma dec_agree_ne a b : a b DecAgree a DecAgree b = DecAgreeBot.
Proof. intros. by rewrite /= decide_False. Qed.
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment