Skip to content
Snippets Groups Projects
Commit 58f78c5c authored by Hai Dang's avatar Hai Dang
Browse files

Minor cleanup

parent 623d628b
No related branches found
No related tags found
1 merge request!30Enable mangled names
Hide whitespace changes
Inline Side-by-side
Showing
with 0 additions and 1 deletion
theories/lang/memcpy.v
+ 0
− 1
View file @ 58f78c5c
......@@ -32,7 +32,6 @@ Proof.
- destruct vl1 as [|v1 vl1], vl2 as [|v2 vl2], n as [|n|]; try (discriminate || lia).
revert Hvl1 Hvl2. intros [= Hvl1] [= Hvl2]; rewrite !own_loc_na_vec_cons. subst n.
iDestruct "Hl1" as "[Hv1 Hl1]". iDestruct "Hl2" as "[Hv2 Hl2]".
Local Opaque Zminus.
wp_read; wp_write. do 3 wp_op. iApply ("IH" with "[%] [%] Hl1 Hl2"); [lia..|].
iIntros "!> [Hl1 Hl2]"; iApply "HΦ"; by iFrame.
Qed.
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