Commit 946b911f authored by Jonas Kastberg's avatar Jonas Kastberg

Mechanised paper example of location subprotocols

parent 1130d468
Pipeline #27752 passed with stage
in 5 minutes and 43 seconds
From actris.channel Require Import proofmode proto channel.
Section basics.
Context `{heapG Σ, chanG Σ}.
Lemma reference_example (l2' : loc) :
l2' #22 -
(<! (l1 l2 : loc)> MSG (#l1, #l2) {{ l1 #20 l2 #22 }}; END)%proto
(<! (l1 : loc)> MSG (#l1, #l2') {{ l1 #20 }}; END)%proto.
Proof.
iIntros "Hl2'" (l1) "Hl1". iExists l1, l2'.
iSplitL; eauto with iFrame.
Qed.
End pair.
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