diff options
| author | Kazuhiko Sakaguchi | 2020-09-28 18:49:09 +0900 |
|---|---|---|
| committer | GitHub | 2020-09-28 18:49:09 +0900 |
| commit | c9e5a9621c9a2143e1170ef1553fa7d9135b4130 (patch) | |
| tree | 6e73fc6f8a73dc38fdf616a98cb08e0027180d2d /mathcomp/fingroup | |
| parent | a97b433c2d81c702fe690101a6e4e7afb4a3c28d (diff) | |
| parent | e41cb4f8b30181d3b144b57fc46cb89407f632d8 (diff) | |
Merge pull request #484 from CohenCyril/ord1
Putting `ord1` in `fintype.v`
Diffstat (limited to 'mathcomp/fingroup')
| -rw-r--r-- | mathcomp/fingroup/perm.v | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/mathcomp/fingroup/perm.v b/mathcomp/fingroup/perm.v index 0c02f3b..d0ba321 100644 --- a/mathcomp/fingroup/perm.v +++ b/mathcomp/fingroup/perm.v @@ -638,9 +638,7 @@ Lemma permS0 : all_equal_to (1 : 'S_0). Proof. by move=> g; apply/permP; case. Qed. Lemma permS1 : all_equal_to (1 : 'S_1). -Proof. -by move=> g; apply/permP => i; apply: val_inj; do ![case: (X in val X); case]. -Qed. +Proof. by move=> g; apply/permP => i; rewrite !ord1. Qed. Section CastSn. |