diff options
| author | affeldt-aist | 2020-04-09 16:21:30 +0200 |
|---|---|---|
| committer | GitHub | 2020-04-09 16:21:30 +0200 |
| commit | dc1ea50f04fdaada16f2a27a81ec24859b4ab843 (patch) | |
| tree | 66047a2e09d7111f8b5dfa7eb4de4ad7e61de2c3 /mathcomp/fingroup | |
| parent | fea81ec06b1c309852c4c4062f4c5d1755c738d0 (diff) | |
| parent | 691e0c20a8934343a6840f2a19735acea6e79d05 (diff) | |
Merge pull request #473 from affeldt-aist/long_short_suffixes
switching long suffixes to short suffixes
Diffstat (limited to 'mathcomp/fingroup')
| -rw-r--r-- | mathcomp/fingroup/perm.v | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/mathcomp/fingroup/perm.v b/mathcomp/fingroup/perm.v index eb5e028..aff97b0 100644 --- a/mathcomp/fingroup/perm.v +++ b/mathcomp/fingroup/perm.v @@ -452,8 +452,8 @@ Qed. Lemma odd_mul_tperm x y s : odd_perm (tperm x y * s) = (x != y) (+) odd_perm s. Proof. -rewrite addbC -addbA -[~~ _]oddb -odd_add -ncycles_mul_tperm. -by rewrite odd_add odd_double addbF. +rewrite addbC -addbA -[~~ _]oddb -oddD -ncycles_mul_tperm. +by rewrite oddD odd_double addbF. Qed. Lemma odd_tperm x y : odd_perm (tperm x y) = (x != y). @@ -490,7 +490,7 @@ Lemma odd_permM : {morph odd_perm : s1 s2 / s1 * s2 >-> s1 (+) s2}. Proof. move=> s1 s2; case: (prod_tpermP s1) => ts1 ->{s1} dts1. case: (prod_tpermP s2) => ts2 ->{s2} dts2. -by rewrite -big_cat !odd_perm_prod ?all_cat ?dts1 // size_cat odd_add. +by rewrite -big_cat !odd_perm_prod ?all_cat ?dts1 // size_cat oddD. Qed. Lemma odd_permV s : odd_perm s^-1 = odd_perm s. |