aboutsummaryrefslogtreecommitdiff
path: root/mathcomp/solvable/pgroup.v
diff options
context:
space:
mode:
authorJasper Hugunin2018-03-04 16:57:06 -0800
committerJasper Hugunin2018-03-04 16:57:06 -0800
commit2525c33691e25f837b7dca31d4c702199b3dbc5d (patch)
tree7937f252a0818909c715ccc20f3611a4f5c482d5 /mathcomp/solvable/pgroup.v
parent6f075b64b936de9ee4fa79ea4dc1d2fb9b9cf2c8 (diff)
Change deprecated Arguments Scope to Arguments
Diffstat (limited to 'mathcomp/solvable/pgroup.v')
-rw-r--r--mathcomp/solvable/pgroup.v24
1 files changed, 12 insertions, 12 deletions
diff --git a/mathcomp/solvable/pgroup.v b/mathcomp/solvable/pgroup.v
index d383aa7..6507160 100644
--- a/mathcomp/solvable/pgroup.v
+++ b/mathcomp/solvable/pgroup.v
@@ -83,15 +83,15 @@ Definition Sylow A B := p_group B && Hall A B.
End PgroupDefs.
-Arguments Scope pgroup [_ nat_scope group_scope].
-Arguments Scope psubgroup [_ nat_scope group_scope group_scope].
-Arguments Scope p_group [_ group_scope].
-Arguments Scope p_elt [_ nat_scope].
-Arguments Scope constt [_ group_scope nat_scope].
-Arguments Scope Hall [_ group_scope group_scope].
-Arguments Scope pHall [_ nat_scope group_scope group_scope].
-Arguments Scope Syl [_ nat_scope group_scope].
-Arguments Scope Sylow [_ group_scope group_scope].
+Arguments pgroup _ _%N _%g.
+Arguments psubgroup _ _%N _%g _%g.
+Arguments p_group _ _%g.
+Arguments p_elt _ _%N.
+Arguments constt _ _%g _%N.
+Arguments Hall _ _%g _%g.
+Arguments pHall _ _%N _%g _%g.
+Arguments Syl _ _%N _%g.
+Arguments Sylow _ _%g _%g.
Prenex Implicits p_group Hall Sylow.
Notation "pi .-group" := (pgroup pi)
@@ -863,8 +863,8 @@ Canonical pcore_group : {group gT} := Eval hnf in [group of pcore].
End PcoreDef.
-Arguments Scope pcore [_ nat_scope group_scope].
-Arguments Scope pcore_group [_ nat_scope Group_scope].
+Arguments pcore _ _%N _%g.
+Arguments pcore_group _ _%N _%G.
Notation "''O_' pi ( G )" := (pcore pi G)
(at level 8, pi at level 2, format "''O_' pi ( G )") : group_scope.
Notation "''O_' pi ( G )" := (pcore_group pi G) : Group_scope.
@@ -886,7 +886,7 @@ Canonical pseries_group : {group gT} := group pseries_group_set.
End PseriesDefs.
-Arguments Scope pseries [_ seq_scope group_scope].
+Arguments pseries _ _%SEQ _%g.
Local Notation ConsPred p := (@Cons nat_pred p%N) (only parsing).
Notation "''O_{' p1 , .. , pn } ( A )" :=
(pseries (ConsPred p1 .. (ConsPred pn [::]) ..) A)