diff --git a/theories/bi/tactics.v b/theories/bi/tactics.v index 983a5d8d4ef1ccbef431983c414e43863f925c58..feb33d0fb9540cd9737bbe8a9db4253cf81db45c 100644 --- a/theories/bi/tactics.v +++ b/theories/bi/tactics.v @@ -81,7 +81,7 @@ Module bi_reflection. Section bi_reflection. Lemma flatten_cancel e e' ns : cancel ns e = Some e' → flatten e ≡ₚ ns ++ flatten e'. Proof. - rewrite /cancel fmap_Some=> -[{e'}e' [He ->]]; rewrite flatten_prune. + rewrite /cancel fmap_Some=> -[{e'}-e' [He ->]]; rewrite flatten_prune. revert e' He; induction ns as [|n ns IH]=> e' He; simplify_option_eq; auto. rewrite Permutation_middle -flatten_cancel_go //; eauto. Qed.