aboutsummaryrefslogtreecommitdiff
path: root/mathcomp/ssreflect/seq.v
diff options
context:
space:
mode:
authorChristian Doczkal2020-05-05 19:50:42 +0200
committerChristian Doczkal2020-06-18 16:45:03 +0200
commit18edd0a87f8cc8bfd3a7c7aaaafa3d2cfdf5d165 (patch)
treed00555c16a860a20dfe94cf1d61f8935499d32a6 /mathcomp/ssreflect/seq.v
parent3ceb153b972cbfc23a33daa740ec31050881bfa2 (diff)
cardinality lemmas for #|A| <= 1 and n <= #|A|
Diffstat (limited to 'mathcomp/ssreflect/seq.v')
-rw-r--r--mathcomp/ssreflect/seq.v3
1 files changed, 3 insertions, 0 deletions
diff --git a/mathcomp/ssreflect/seq.v b/mathcomp/ssreflect/seq.v
index 920f393..b202dd0 100644
--- a/mathcomp/ssreflect/seq.v
+++ b/mathcomp/ssreflect/seq.v
@@ -2008,6 +2008,9 @@ Proof. by rewrite -cats1 prefix_subseq. Qed.
Lemma subseq_uniq s1 s2 : subseq s1 s2 -> uniq s2 -> uniq s1.
Proof. by case/subseqP=> m _ -> Us2; apply: mask_uniq. Qed.
+Lemma take_uniq s n : uniq s -> uniq (take n s).
+Proof. exact/subseq_uniq/take_subseq. Qed.
+
End Subseq.
Prenex Implicits subseq.