From c7c344f2f08f3910c884d9c3bb1bd5cfe3c2a1d7 Mon Sep 17 00:00:00 2001 From: Anton Trunov Date: Wed, 29 May 2019 12:38:48 +0300 Subject: Rename eqsP to eqPsym as suggested by @CohenCyril --- mathcomp/fingroup/perm.v | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'mathcomp/fingroup') diff --git a/mathcomp/fingroup/perm.v b/mathcomp/fingroup/perm.v index c7eaf58..a1bb896 100644 --- a/mathcomp/fingroup/perm.v +++ b/mathcomp/fingroup/perm.v @@ -570,7 +570,7 @@ apply/permP=> i; case: (unliftP j i) => [i'|] ->; last first. apply: ord_inj; rewrite lift_perm_lift !permE /= eq_sym -if_neg neq_lift. rewrite fun_if -val_eqE /= def_k /bump ltn_neqAle andbC. case: leqP => [_ | lt_i'm] /=; last by rewrite -if_neg neq_ltn leqW. -by rewrite add1n eqSS; case: eqsP. +by rewrite add1n eqSS; case: eqPsym. Qed. End LiftPerm. -- cgit v1.2.3