aboutsummaryrefslogtreecommitdiff
path: root/mathcomp/solvable
diff options
context:
space:
mode:
authorMaxime Dénès2017-10-30 14:16:48 +0100
committerMaxime Dénès2017-10-30 14:16:48 +0100
commite1b1743fb6aaed042d5e6762ea76c3242593ab1d (patch)
treef2c7a9504fe1a1a39a9015a771bf07eba1696ca8 /mathcomp/solvable
parentd5437703555329168288467dc1a94b1176e1776e (diff)
Fix obsolete vernacular syntax for locality.
It was emitting a deprecation warning and will soon be removed from Coq.
Diffstat (limited to 'mathcomp/solvable')
-rw-r--r--mathcomp/solvable/alt.v4
-rw-r--r--mathcomp/solvable/gseries.v2
2 files changed, 3 insertions, 3 deletions
diff --git a/mathcomp/solvable/alt.v b/mathcomp/solvable/alt.v
index f43c89a..baf4792 100644
--- a/mathcomp/solvable/alt.v
+++ b/mathcomp/solvable/alt.v
@@ -36,7 +36,7 @@ Definition Sym of phant T : {set {perm T}} := setT.
Canonical Sym_group phT := Eval hnf in [group of Sym phT].
-Notation Local "'Sym_T" := (Sym (Phant T)) (at level 0).
+Local Notation "'Sym_T" := (Sym (Phant T)) (at level 0).
Canonical sign_morph := @Morphism _ _ 'Sym_T _ (in2W (@odd_permM _)).
@@ -44,7 +44,7 @@ Definition Alt of phant T := 'ker (@odd_perm T).
Canonical Alt_group phT := Eval hnf in [group of Alt phT].
-Notation Local "'Alt_T" := (Alt (Phant T)) (at level 0).
+Local Notation "'Alt_T" := (Alt (Phant T)) (at level 0).
Lemma Alt_even p : (p \in 'Alt_T) = ~~ p.
Proof. by rewrite !inE /=; case: odd_perm. Qed.
diff --git a/mathcomp/solvable/gseries.v b/mathcomp/solvable/gseries.v
index fe83ada..772db33 100644
--- a/mathcomp/solvable/gseries.v
+++ b/mathcomp/solvable/gseries.v
@@ -42,7 +42,7 @@ Section GroupDefs.
Variable gT : finGroupType.
Implicit Types A B U V : {set gT}.
-Notation Local groupT := (group_of (Phant gT)).
+Local Notation groupT := (group_of (Phant gT)).
Definition subnormal A B :=
(A \subset B) && (iter #|B| (fun N => generated (class_support A N)) B == A).