diff --git a/iris/bi/big_op.v b/iris/bi/big_op.v index 6209dbf57a6d79086b9d0dad24826adb1b68e5e9..5bc3420c00911fff91cfd66dbe7e9531fa7ab04e 100644 --- a/iris/bi/big_op.v +++ b/iris/bi/big_op.v @@ -2251,7 +2251,7 @@ End gset. Lemma big_sepS_sepS `{Countable A, Countable B} (X : gset A) (Y : gset B) (Φ : A → B → PROP) : - ([∗ set] x ∈ X, [∗ set] y ∈ Y, Φ x y) -∗ ([∗ set] y ∈ Y, [∗ set] x ∈ X, Φ x y). + ([∗ set] x ∈ X, [∗ set] y ∈ Y, Φ x y) ⊣⊢ ([∗ set] y ∈ Y, [∗ set] x ∈ X, Φ x y). Proof. repeat setoid_rewrite big_sepS_elements. rewrite big_sepL_sepL. done.