Get rid of more scopes.

theories/examples/stack/refinement.v

@@ -24,9 +24,9 @@ Section Stack_refinement.
 
   Lemma FG_CG_push_refinement st st' (τi : D) (v v' : val) l {τP : ∀ ww, PersistentP (τi ww)} Γ :
     inv stackN (sinv τi st st' l) -∗ τi (v,v') -∗
-    Γ ⊨ ((FG_push $/ (LitV (Loc st))) v)%E ≤log≤ ((CG_locked_push $/ (LitV (Loc st')) $/ (LitV (Loc l))) v')%E : TUnit.
+    Γ ⊨ (FG_push $/ (LitV (Loc st))) v ≤log≤ (CG_locked_push $/ (LitV (Loc st')) $/ (LitV (Loc l))) v' : TUnit.
   Proof.
-    iIntros "#Hinv #Hvv'". iIntros (Δ).
+    iIntros "#Hinv #Hvv'" (Δ).
     Transparent FG_push.
     unfold CG_locked_push. unlock. simpl_subst/=.
     rel_rec_r.