diff --git a/tests/proofmode.v b/tests/proofmode.v index 73027cdbd7a06f0661cfe7e3ce8d38053dc4c1d0..66cebcc72a1e56c2af695331f6a8563166b833ef 100644 --- a/tests/proofmode.v +++ b/tests/proofmode.v @@ -1,3 +1,4 @@ +From iris.algebra Require Import gmap. From iris.bi Require Import laterable. From iris.proofmode Require Import tactics intro_patterns. From iris.prelude Require Import options. @@ -81,6 +82,11 @@ Proof. auto. Qed. +Lemma test_iRewrite_dom `{!BiInternalEq PROP} {A : ofe} (m1 m2 : gmap nat A) : + m1 ≡ m2 ⊢@{PROP} + ⌜ dom (gset nat) m1 = dom (gset nat) m2 âŒ. +Proof. iIntros "H". by iRewrite "H". Qed. + Check "test_iDestruct_and_emp". Lemma test_iDestruct_and_emp P Q `{!Persistent P, !Persistent Q} : P ∧ emp -∗ emp ∧ Q -∗ <affine> (P ∗ Q).