diff options
| author | Olivier Laurent | 2020-05-04 10:48:30 +0200 |
|---|---|---|
| committer | Olivier Laurent | 2020-05-04 10:56:48 +0200 |
| commit | 1a11eaddca057bea4e1ea0b3c276fc5228e5b4b2 (patch) | |
| tree | c513695ac3676b5d80110827c9685cd7dd90a327 | |
| parent | 14e5b1ac33f268d50ca379a12bfc729f6183161e (diff) | |
add incl_Forall_in_iff
| -rw-r--r-- | doc/changelog/10-standard-library/12237-list-more-filter-incl.rst | 2 | ||||
| -rw-r--r-- | theories/Lists/List.v | 4 |
2 files changed, 5 insertions, 1 deletions
diff --git a/doc/changelog/10-standard-library/12237-list-more-filter-incl.rst b/doc/changelog/10-standard-library/12237-list-more-filter-incl.rst index 7b4b0e86d3..37aaf697b5 100644 --- a/doc/changelog/10-standard-library/12237-list-more-filter-incl.rst +++ b/doc/changelog/10-standard-library/12237-list-more-filter-incl.rst @@ -1,4 +1,4 @@ - **Added:** - new lemmas in ``List``: ``incl_map``, ``incl_filter``, ``NoDup_filter`` + new lemmas in ``List``: ``incl_map``, ``incl_filter``, ``NoDup_filter``, ``incl_Forall_in_iff`` (`#12237 <https://github.com/coq/coq/pull/12237>`_, by Olivier Laurent). diff --git a/theories/Lists/List.v b/theories/Lists/List.v index e4b87507f4..bdaaa91828 100644 --- a/theories/Lists/List.v +++ b/theories/Lists/List.v @@ -2968,6 +2968,10 @@ Section Exists_Forall. now apply neg_Forall_Exists_neg. Defined. + Lemma incl_Forall_in_iff l l' : + incl l l' <-> Forall (fun x => In x l') l. + Proof. now rewrite Forall_forall; split. Qed. + End Exists_Forall. Hint Constructors Exists : core. |