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

Add lemma `delete_option_local_update_cancelable`.

parent 36af3fe0
No related branches found
No related tags found
No related merge requests found
...@@ -200,3 +200,10 @@ Proof. ...@@ -200,3 +200,10 @@ Proof.
move: Hy. rewrite Heq /= -Some_op=>Hy. eapply Hex. move: Hy. rewrite Heq /= -Some_op=>Hy. eapply Hex.
eapply cmra_validN_le; [|lia]. eapply Hy. eapply cmra_validN_le; [|lia]. eapply Hy.
Qed. Qed.
Lemma delete_option_local_update_cancelable {A : cmra} (mx : option A) :
Cancelable mx (mx, mx) ~l~> (None, None).
Proof.
intros ?. apply local_update_unital=>n mf /= Hmx Heq. split; first done.
rewrite left_id. eapply (cancelableN mx); by rewrite right_id_L.
Qed.
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