diff options
| author | Cyril Cohen | 2018-02-06 19:36:53 +0100 |
|---|---|---|
| committer | GitHub | 2018-02-06 19:36:53 +0100 |
| commit | d6bc72cd477ed6fe8b95782b26a2e0fc92711395 (patch) | |
| tree | 6996e39182b97573b1cdecaeb7c8c8a3f58c1e77 /mathcomp/odd_order/BGsection8.v | |
| parent | 11e539dae1bfe8bc67fc7bd1eb65ee3b4c29f813 (diff) | |
| parent | f3ce9ace4b55654d6240db9eb41a6de3c488f0d9 (diff) | |
Merge pull request #164 from CohenCyril/linting
linting of the whole library
Diffstat (limited to 'mathcomp/odd_order/BGsection8.v')
| -rw-r--r-- | mathcomp/odd_order/BGsection8.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/mathcomp/odd_order/BGsection8.v b/mathcomp/odd_order/BGsection8.v index db378f3..513d6d1 100644 --- a/mathcomp/odd_order/BGsection8.v +++ b/mathcomp/odd_order/BGsection8.v @@ -68,7 +68,7 @@ have piCA: pi.-group('C(A)). have Mx := subsetP sCAM x cAx; pose C := 'C_F(<[x]>). have sAC: A \subset C by rewrite subsetI sAF centsC cycle_subG. have sCFC_C: 'C_F(C) \subset C. - by rewrite (subset_trans _ sAC) ?setIS // centS ?(subset_trans _ sAC). + by rewrite (subset_trans _ sAC) ?setIS // centS ?(subset_trans _ sAC). have cFx: x \in 'C_M(F). rewrite inE Mx -cycle_subG coprime_nil_faithful_cent_stab //=. by rewrite cycle_subG (subsetP (gFnorm _ _)). @@ -339,7 +339,7 @@ have prH: H \proper G by rewrite inE in maxH; apply: maxgroupp maxH. have sAHM: A \subset H :&: M by rewrite subsetI sAH. have [R sylR_HM sAR]:= Sylow_superset sAHM (pgroupS sAP pP). have [/subsetIP[sRH sRM] pR _] := and3P sylR_HM. -have{sylR_HM} sylR_H: p.-Sylow(H) R. +have{sylR_HM} sylR_H: p.-Sylow(H) R. have [Q sylQ] := Sylow_superset sRM pR; have [sQM pQ _] := and3P sylQ. case/eqVproper=> [defR | /(nilpotent_proper_norm (pgroup_nil pQ)) sRN]. apply: (pHall_subl sRH (subsetT _)); rewrite pHallE subsetT /=. |