tweak proof to also work after a Coq bugfix

927a2930 · Ralf Jung · 0dec8845 · 927a2930
Commit 927a2930 authored Jul 12, 2019 by Ralf Jung
--- a/theories/algebra/ufrac_auth.v
+++ b/theories/algebra/ufrac_auth.v
@@ -74,7 +74,7 @@ Section ufrac_auth.
  Proof.
    rewrite auth_both_validN=> -[Hincl Hvalid].
    move: Hincl=> /Some_includedN=> -[[_ ? //]|[[[p' ?] ?] [/=]]].
-    move=> /discrete_iff /leibniz_equiv_iff; rewrite ufrac_op'=> [/Qp_eq/=].
+    rewrite -discrete_iff leibniz_equiv_iff. rewrite ufrac_op'=> [/Qp_eq/=].
    rewrite -{1}(Qcplus_0_r p)=> /(inj (Qcplus p))=> ?; by subst.
  Qed.
  Lemma ufrac_auth_agree p a b : ✓ (●U{p} a ⋅ ◯U{p} b) → a ≡ b.