diff --git a/opam b/opam
index 585f8d0465ecfd4752f3f6deb309fe71025fb436..3236b964459b1256e4b808f6b9a672a325269baa 100644
--- a/opam
+++ b/opam
@@ -10,5 +10,5 @@ build: [make "-j%{jobs}%"]
 install: [make "install"]
 remove: [ "sh" "-c" "rm -rf '%{lib}%/coq/user-contrib/lrust'" ]
 depends: [
-  "coq-iris" { (= "dev.2017-10-26.0") | (= "dev") }
+  "coq-iris" { (= "dev.2017-10-27.0") | (= "dev") }
 ]
diff --git a/theories/lifetime/model/primitive.v b/theories/lifetime/model/primitive.v
index a4c995fc218d1baad5adbc8133dc846621f0360d..629093d78de5622c30b49f2f2e5a4f4f2dbf5624 100644
--- a/theories/lifetime/model/primitive.v
+++ b/theories/lifetime/model/primitive.v
@@ -328,7 +328,7 @@ Proof. reflexivity. Qed.
 
 Lemma lft_intersect_incl_l κ κ': (κ ⊓ κ' ⊑ κ)%I.
 Proof.
-  iIntros "!#". iSplitR.
+  unfold lft_incl. iIntros "!#". iSplitR.
   - iIntros (q). rewrite <-lft_tok_sep. iIntros "[H Hf]". iExists q. iFrame.
     rewrite <-lft_tok_sep. by iIntros "!>{$Hf}$".
   - iIntros "? !>". iApply lft_dead_or. auto.
@@ -338,7 +338,7 @@ Lemma lft_intersect_incl_r κ κ': (κ ⊓ κ' ⊑ κ')%I.
 Proof. rewrite comm. apply lft_intersect_incl_l. Qed.
 
 Lemma lft_incl_refl κ : (κ ⊑ κ)%I.
-Proof. iIntros "!#"; iSplitR; auto 10 with iFrame. Qed.
+Proof. unfold lft_incl. iIntros "!#"; iSplitR; auto 10 with iFrame. Qed.
 
 Lemma lft_incl_trans κ κ' κ'': κ ⊑ κ' -∗ κ' ⊑ κ'' -∗ κ ⊑ κ''.
 Proof.