diff options
Diffstat (limited to 'mathcomp/ssreflect')
| -rw-r--r-- | mathcomp/ssreflect/fintype.v | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/mathcomp/ssreflect/fintype.v b/mathcomp/ssreflect/fintype.v index 3472a1d..f4f34a4 100644 --- a/mathcomp/ssreflect/fintype.v +++ b/mathcomp/ssreflect/fintype.v @@ -2220,6 +2220,9 @@ Arguments sub_ord {n'}. Arguments sub_ordK {n'}. Arguments inord_val {n'}. +Lemma ord1 : all_equal_to (ord0 : 'I_1). +Proof. by case=> [[] // ?]; apply: val_inj. Qed. + (* Product of two fintypes which is a fintype *) Section ProdFinType. |