Tree map lemmas #
This file contains lemmas about Std.Data.TreeMap
. Most of the lemmas require
TransCmp cmp
for the comparison function cmp
.
theorem
Std.TreeMap.mem_of_mem_insertIfNew
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
{k a : α}
{v : β}
:
a ∈ t.insertIfNew k v → cmp k a ≠ Ordering.eq → a ∈ t
theorem
Std.TreeMap.mem_of_mem_insertIfNew'
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
{k a : α}
{v : β}
:
a ∈ t.insertIfNew k v → ¬(cmp k a = Ordering.eq ∧ ¬k ∈ t) → a ∈ t
This is a restatement of mem_of_mem_insertIfNew
that is written to exactly match the
proof obligation in the statement of get_insertIfNew
.
theorem
Std.TreeMap.getElem_insertIfNew
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
{k a : α}
{v : β}
{h₁ : a ∈ t.insertIfNew k v}
:
theorem
Std.TreeMap.getKey_insertIfNew
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
{k a : α}
{v : β}
{h₁ : a ∈ t.insertIfNew k v}
:
theorem
Std.TreeMap.distinct_keys
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
:
List.Pairwise (fun (a b : α) => ¬cmp a b = Ordering.eq) t.keys
theorem
Std.TreeMap.ordered_keys
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
:
List.Pairwise (fun (a b : α) => cmp a b = Ordering.lt) t.keys
theorem
Std.TreeMap.distinct_keys_toList
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
:
List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) t.toList
theorem
Std.TreeMap.ordered_keys_toList
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
:
List.Pairwise (fun (a b : α × β) => cmp a.fst b.fst = Ordering.lt) t.toList
theorem
Std.TreeMap.foldlM_eq_foldlM_toList
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
{δ : Type w}
{m : Type w → Type w}
[Monad m]
[LawfulMonad m]
{f : δ → α → β → m δ}
{init : δ}
:
theorem
Std.TreeMap.foldrM_eq_foldrM_toList
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
{δ : Type w}
{m : Type w → Type w}
[Monad m]
[LawfulMonad m]
{f : α → β → δ → m δ}
{init : δ}
:
@[simp]
theorem
Std.TreeMap.foldlM_eq_foldlM_keys
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
{δ : Type w}
{m : Type w → Type w}
[Monad m]
[LawfulMonad m]
{f : δ → α → m δ}
{init : δ}
:
theorem
Std.TreeMap.foldrM_eq_foldrM_keys
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
{δ : Type w}
{m : Type w → Type w}
[Monad m]
[LawfulMonad m]
{f : α → δ → m δ}
{init : δ}
:
@[simp]
theorem
Std.TreeMap.insertMany_nil
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
:
theorem
Std.TreeMap.getKey?_insertMany_list_of_mem
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
{l : List (α × β)}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
(distinct : List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) l)
(mem : k ∈ List.map Prod.fst l)
:
theorem
Std.TreeMap.getKey_insertMany_list_of_mem
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
{l : List (α × β)}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
(distinct : List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) l)
(mem : k ∈ List.map Prod.fst l)
{h' : k' ∈ t.insertMany l}
:
theorem
Std.TreeMap.getKey!_insertMany_list_of_mem
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
[Inhabited α]
{l : List (α × β)}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
(distinct : List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) l)
(mem : k ∈ List.map Prod.fst l)
:
theorem
Std.TreeMap.getKeyD_insertMany_list_of_mem
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
{l : List (α × β)}
{k k' fallback : α}
(k_eq : cmp k k' = Ordering.eq)
(distinct : List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) l)
(mem : k ∈ List.map Prod.fst l)
:
theorem
Std.TreeMap.size_insertMany_list
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
[BEq α]
[LawfulBEqCmp cmp]
{l : List (α × β)}
(distinct : List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) l)
:
theorem
Std.TreeMap.getElem?_insertMany_list_of_mem
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
[BEq α]
[LawfulBEqCmp cmp]
{l : List (α × β)}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
{v : β}
(distinct : List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) l)
(mem : (k, v) ∈ l)
:
theorem
Std.TreeMap.getElem_insertMany_list_of_mem
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
{l : List (α × β)}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
{v : β}
(distinct : List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) l)
(mem : (k, v) ∈ l)
{h' : k' ∈ t.insertMany l}
:
theorem
Std.TreeMap.getElem!_insertMany_list_of_mem
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
{l : List (α × β)}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
{v : β}
[Inhabited β]
(distinct : List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) l)
(mem : (k, v) ∈ l)
:
theorem
Std.TreeMap.getD_insertMany_list_of_mem
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
{t : TreeMap α β cmp}
[TransCmp cmp]
{l : List (α × β)}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
{v fallback : β}
(distinct : List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) l)
(mem : (k, v) ∈ l)
:
@[simp]
theorem
Std.TreeMap.insertManyIfNewUnit_nil
{α : Type u}
{cmp : α → α → Ordering}
{t : TreeMap α Unit cmp}
:
@[simp]
theorem
Std.TreeMap.insertManyIfNewUnit_list_singleton
{α : Type u}
{cmp : α → α → Ordering}
{t : TreeMap α Unit cmp}
{k : α}
:
theorem
Std.TreeMap.getKey?_insertManyIfNewUnit_list_of_not_mem_of_mem
{α : Type u}
{cmp : α → α → Ordering}
{t : TreeMap α Unit cmp}
[TransCmp cmp]
{l : List α}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
(not_mem : ¬k ∈ t)
(distinct : List.Pairwise (fun (a b : α) => ¬cmp a b = Ordering.eq) l)
(mem : k ∈ l)
:
theorem
Std.TreeMap.getKey_insertManyIfNewUnit_list_of_mem
{α : Type u}
{cmp : α → α → Ordering}
{t : TreeMap α Unit cmp}
[TransCmp cmp]
{l : List α}
{k : α}
{h' : k ∈ t.insertManyIfNewUnit l}
(contains : k ∈ t)
:
theorem
Std.TreeMap.getKey_insertManyIfNewUnit_list_of_not_mem_of_mem
{α : Type u}
{cmp : α → α → Ordering}
{t : TreeMap α Unit cmp}
[TransCmp cmp]
{l : List α}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
{h' : k' ∈ t.insertManyIfNewUnit l}
(not_mem : ¬k ∈ t)
(distinct : List.Pairwise (fun (a b : α) => ¬cmp a b = Ordering.eq) l)
(mem : k ∈ l)
:
theorem
Std.TreeMap.getKey!_insertManyIfNewUnit_list_of_not_mem_of_mem
{α : Type u}
{cmp : α → α → Ordering}
{t : TreeMap α Unit cmp}
[TransCmp cmp]
[Inhabited α]
{l : List α}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
(not_mem : ¬k ∈ t)
(distinct : List.Pairwise (fun (a b : α) => ¬cmp a b = Ordering.eq) l)
(mem : k ∈ l)
:
theorem
Std.TreeMap.getKeyD_insertManyIfNewUnit_list_of_not_mem_of_mem
{α : Type u}
{cmp : α → α → Ordering}
{t : TreeMap α Unit cmp}
[TransCmp cmp]
{l : List α}
{k k' fallback : α}
(k_eq : cmp k k' = Ordering.eq)
(not_mem : ¬k ∈ t)
(distinct : List.Pairwise (fun (a b : α) => ¬cmp a b = Ordering.eq) l)
(mem : k ∈ l)
:
theorem
Std.TreeMap.size_insertManyIfNewUnit_list
{α : Type u}
{cmp : α → α → Ordering}
{t : TreeMap α Unit cmp}
[TransCmp cmp]
[BEq α]
[LawfulBEqCmp cmp]
{l : List α}
(distinct : List.Pairwise (fun (a b : α) => ¬cmp a b = Ordering.eq) l)
:
@[simp]
theorem
Std.TreeMap.getElem_insertManyIfNewUnit_list
{α : Type u}
{cmp : α → α → Ordering}
{t : TreeMap α Unit cmp}
{l : List α}
{k : α}
{h' : k ∈ t.insertManyIfNewUnit l}
:
theorem
Std.TreeMap.getElem?_ofList_of_mem
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
[TransCmp cmp]
{l : List (α × β)}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
{v : β}
(distinct : List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) l)
(mem : (k, v) ∈ l)
:
theorem
Std.TreeMap.getElem_ofList_of_mem
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
[TransCmp cmp]
{l : List (α × β)}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
{v : β}
(distinct : List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) l)
(mem : (k, v) ∈ l)
{h : k' ∈ ofList l cmp}
:
theorem
Std.TreeMap.getD_ofList_of_mem
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
[TransCmp cmp]
{l : List (α × β)}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
{v fallback : β}
(distinct : List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) l)
(mem : (k, v) ∈ l)
:
theorem
Std.TreeMap.getKey?_ofList_of_mem
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
[TransCmp cmp]
{l : List (α × β)}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
(distinct : List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) l)
(mem : k ∈ List.map Prod.fst l)
:
theorem
Std.TreeMap.getKey_ofList_of_mem
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
[TransCmp cmp]
{l : List (α × β)}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
(distinct : List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) l)
(mem : k ∈ List.map Prod.fst l)
{h' : k' ∈ ofList l cmp}
:
theorem
Std.TreeMap.getKey!_ofList_of_mem
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
[TransCmp cmp]
[Inhabited α]
{l : List (α × β)}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
(distinct : List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) l)
(mem : k ∈ List.map Prod.fst l)
:
theorem
Std.TreeMap.getKeyD_ofList_of_mem
{α : Type u}
{β : Type v}
{cmp : α → α → Ordering}
[TransCmp cmp]
{l : List (α × β)}
{k k' fallback : α}
(k_eq : cmp k k' = Ordering.eq)
(distinct : List.Pairwise (fun (a b : α × β) => ¬cmp a.fst b.fst = Ordering.eq) l)
(mem : k ∈ List.map Prod.fst l)
:
@[simp]
@[simp]
@[simp]
theorem
Std.TreeMap.contains_unitOfList
{α : Type u}
{cmp : α → α → Ordering}
[TransCmp cmp]
[BEq α]
[LawfulBEqCmp cmp]
{l : List α}
{k : α}
:
@[simp]
theorem
Std.TreeMap.mem_unitOfList
{α : Type u}
{cmp : α → α → Ordering}
[TransCmp cmp]
[BEq α]
[LawfulBEqCmp cmp]
{l : List α}
{k : α}
:
theorem
Std.TreeMap.getKey?_unitOfList_of_contains_eq_false
{α : Type u}
{cmp : α → α → Ordering}
[TransCmp cmp]
[BEq α]
[LawfulBEqCmp cmp]
{l : List α}
{k : α}
(contains_eq_false : l.contains k = false)
:
theorem
Std.TreeMap.getKey?_unitOfList_of_mem
{α : Type u}
{cmp : α → α → Ordering}
[TransCmp cmp]
{l : List α}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
(distinct : List.Pairwise (fun (a b : α) => ¬cmp a b = Ordering.eq) l)
(mem : k ∈ l)
:
theorem
Std.TreeMap.getKey_unitOfList_of_mem
{α : Type u}
{cmp : α → α → Ordering}
[TransCmp cmp]
{l : List α}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
(distinct : List.Pairwise (fun (a b : α) => ¬cmp a b = Ordering.eq) l)
(mem : k ∈ l)
{h' : k' ∈ unitOfList l cmp}
:
theorem
Std.TreeMap.getKey!_unitOfList_of_mem
{α : Type u}
{cmp : α → α → Ordering}
[TransCmp cmp]
[Inhabited α]
{l : List α}
{k k' : α}
(k_eq : cmp k k' = Ordering.eq)
(distinct : List.Pairwise (fun (a b : α) => ¬cmp a b = Ordering.eq) l)
(mem : k ∈ l)
:
theorem
Std.TreeMap.getKeyD_unitOfList_of_contains_eq_false
{α : Type u}
{cmp : α → α → Ordering}
[TransCmp cmp]
[BEq α]
[LawfulBEqCmp cmp]
{l : List α}
{k fallback : α}
(contains_eq_false : l.contains k = false)
:
theorem
Std.TreeMap.getKeyD_unitOfList_of_mem
{α : Type u}
{cmp : α → α → Ordering}
[TransCmp cmp]
{l : List α}
{k k' fallback : α}
(k_eq : cmp k k' = Ordering.eq)
(distinct : List.Pairwise (fun (a b : α) => ¬cmp a b = Ordering.eq) l)
(mem : k ∈ l)
:
theorem
Std.TreeMap.size_unitOfList
{α : Type u}
{cmp : α → α → Ordering}
[TransCmp cmp]
{l : List α}
(distinct : List.Pairwise (fun (a b : α) => ¬cmp a b = Ordering.eq) l)
:
theorem
Std.TreeMap.size_unitOfList_le
{α : Type u}
{cmp : α → α → Ordering}
[TransCmp cmp]
{l : List α}
:
@[simp]
theorem
Std.TreeMap.isEmpty_unitOfList
{α : Type u}
{cmp : α → α → Ordering}
[TransCmp cmp]
{l : List α}
:
@[simp]
theorem
Std.TreeMap.getElem_unitOfList
{α : Type u}
{cmp : α → α → Ordering}
{l : List α}
{k : α}
{h : k ∈ unitOfList l cmp}
: