Multisets
These are implemented as the quotient of a list by permutations.
@[instance]
Equations
- multiset.has_coe = {coe := quot.mk setoid.r}
@[simp]
@[instance]
Equations
- multiset.has_decidable_eq s₁ s₂ = quotient.rec_on_subsingleton₂ s₁ s₂ (λ (l₁ l₂ : list α), decidable_of_iff' (l₁ ≈ l₂) _)
defines a size for a multiset by referring to the size of the underlying list
Equations
- s.sizeof = quot.lift_on s sizeof multiset.sizeof._proof_1
@[instance]
Equations
- multiset.has_sizeof = {sizeof := multiset.sizeof _inst_1}
0 : multiset α is the empty set
Equations
@[instance]
Equations
- multiset.has_zero = {zero := multiset.zero α}
@[instance]
Equations
- multiset.has_emptyc = {emptyc := 0}
@[instance]
Equations
- multiset.inhabited = {default := 0}
cons a s is the multiset which contains s plus one more
instance of a.
@[instance]
Equations
def
multiset.rec
{α : Type u_1}
{C : multiset α → Sort u_4}
(C_0 : C 0)
(C_cons : Π (a : α) (m : multiset α), C m → C (a :: m))
(C_cons_heq : ∀ (a a' : α) (m : multiset α) (b : C m), C_cons a (a' :: m) (C_cons a' m b) == C_cons a' (a :: m) (C_cons a m b))
(m : multiset α) :
C m
Dependent recursor on multisets.
TODO: should be @[recursor 6], but then the definition of multiset.pi fails with a stack
overflow in whnf.
Equations
- multiset.rec C_0 C_cons C_cons_heq m = quotient.hrec_on m (list.rec C_0 (λ (a : α) (l : list α) (b : (λ (l : list α), C ⟦l⟧) l), C_cons a ⟦l⟧ b)) _
def
multiset.rec_on
{α : Type u_1}
{C : multiset α → Sort u_4}
(m : multiset α)
(C_0 : C 0)
(C_cons : Π (a : α) (m : multiset α), C m → C (a :: m))
(C_cons_heq : ∀ (a a' : α) (m : multiset α) (b : C m), C_cons a (a' :: m) (C_cons a' m b) == C_cons a' (a :: m) (C_cons a m b)) :
C m
Equations
- m.rec_on C_0 C_cons C_cons_heq = multiset.rec C_0 C_cons C_cons_heq m
@[simp]
a ∈ s means that a has nonzero multiplicity in s.
Equations
- multiset.mem a s = quot.lift_on s (λ (l : list α), a ∈ l) _
@[instance]
Equations
- multiset.has_mem = {mem := multiset.mem α}
@[instance]
Equations
theorem
multiset.eq_zero_of_forall_not_mem
{α : Type u_1}
{s : multiset α}
(a : ∀ (x : α), x ∉ s) :
s = 0
theorem
multiset.exists_mem_of_ne_zero
{α : Type u_1}
{s : multiset α}
(a : s ≠ 0) :
∃ (a : α), a ∈ s
s ⊆ t is the lift of the list subset relation. It means that any
element with nonzero multiplicity in s has nonzero multiplicity in t,
but it does not imply that the multiplicity of a in s is less or equal than in t;
see s ≤ t for this relation.
@[instance]
Equations
Produces a list of the elements in the multiset using choice.
Equations
- s.to_list = classical.some _
s ≤ t means that s is a sublist of t (up to permutation).
Equivalently, s ≤ t means that count a s ≤ count a t for all a.
Equations
- s.le t = quotient.lift_on₂ s t list.subperm multiset.le._proof_1
@[instance]
Equations
- multiset.partial_order = {le := multiset.le α, lt := preorder.lt._default multiset.le, le_refl := _, le_trans := _, lt_iff_le_not_le := _, le_antisymm := _}
The cardinality of a multiset is the sum of the multiplicities of all its elements, or simply the length of the underlying list.
Equations
- s.card = quot.lift_on s list.length multiset.card._proof_1
def
multiset.strong_induction_on
{α : Type u_1}
{p : multiset α → Sort u_2}
(s : multiset α)
(a : Π (s : multiset α), (Π (t : multiset α), t < s → p t) → p s) :
p s
Equations
- s.strong_induction_on = λ (ih : Π (s : multiset α), (Π (t : multiset α), t < s → p t) → p s), ih s (λ (t : multiset α) (h : t < s), t.strong_induction_on ih)
theorem
multiset.strong_induction_eq
{α : Type u_1}
{p : multiset α → Sort u_2}
(s : multiset α)
(H : Π (s : multiset α), (Π (t : multiset α), t < s → p t) → p s) :
s.strong_induction_on H = H s (λ (t : multiset α) (h : t < s), t.strong_induction_on H)
@[instance]
Equations
- multiset.has_singleton = {singleton := λ (a : α), a :: 0}
@[instance]
Equations
The sum of two multisets is the lift of the list append operation.
This adds the multiplicities of each element,
i.e. count a (s + t) = count a s + count a t.
@[instance]
Equations
- multiset.has_add = {add := multiset.add α}
@[instance]
Equations
- multiset.ordered_cancel_add_comm_monoid = {add := has_add.add multiset.has_add, add_assoc := _, zero := 0, zero_add := _, add_zero := _, add_comm := _, add_left_cancel := _, add_right_cancel := _, le := partial_order.le multiset.partial_order, lt := partial_order.lt multiset.partial_order, le_refl := _, le_trans := _, lt_iff_le_not_le := _, le_antisymm := _, add_le_add_left := _, le_of_add_le_add_left := _}
@[instance]
Equations
- multiset.canonically_ordered_add_monoid = {add := ordered_cancel_add_comm_monoid.add multiset.ordered_cancel_add_comm_monoid, add_assoc := _, zero := ordered_cancel_add_comm_monoid.zero multiset.ordered_cancel_add_comm_monoid, zero_add := _, add_zero := _, add_comm := _, le := ordered_cancel_add_comm_monoid.le multiset.ordered_cancel_add_comm_monoid, lt := ordered_cancel_add_comm_monoid.lt multiset.ordered_cancel_add_comm_monoid, le_refl := _, le_trans := _, lt_iff_le_not_le := _, le_antisymm := _, add_le_add_left := _, lt_of_add_lt_add_left := _, bot := 0, bot_le := _, le_iff_exists_add := _}
repeat a n is the multiset containing only a with multiplicity n.
Equations
- multiset.repeat a n = ↑(list.repeat a n)
@[simp]
theorem
multiset.repeat_succ
{α : Type u_1}
(a : α)
(n : ℕ) :
multiset.repeat a (n + 1) = a :: multiset.repeat a n
@[simp]
theorem
multiset.eq_of_mem_repeat
{α : Type u_1}
{a b : α}
{n : ℕ}
(a_1 : b ∈ multiset.repeat a n) :
b = a
theorem
multiset.eq_repeat_of_mem
{α : Type u_1}
{a : α}
{s : multiset α}
(a_1 : ∀ (b : α), b ∈ s → b = a) :
s = multiset.repeat a s.card
theorem
multiset.repeat_subset_singleton
{α : Type u_1}
(a : α)
(n : ℕ) :
multiset.repeat a n ⊆ a :: 0
theorem
multiset.repeat_le_coe
{α : Type u_1}
{a : α}
{n : ℕ}
{l : list α} :
multiset.repeat a n ≤ ↑l ↔ list.repeat a n <+ l
erase s a is the multiset that subtracts 1 from the
multiplicity of a.
@[simp]
@[simp]
@[simp]
theorem
multiset.erase_cons_tail
{α : Type u_1}
[decidable_eq α]
{a b : α}
(s : multiset α)
(h : b ≠ a) :
@[simp]
theorem
multiset.erase_of_not_mem
{α : Type u_1}
[decidable_eq α]
{a : α}
{s : multiset α}
(a_1 : a ∉ s) :
@[simp]
theorem
multiset.cons_erase
{α : Type u_1}
[decidable_eq α]
{s : multiset α}
{a : α}
(a_1 : a ∈ s) :
@[simp]
theorem
multiset.mem_erase_of_ne
{α : Type u_1}
[decidable_eq α]
{a b : α}
{s : multiset α}
(ab : a ≠ b) :
theorem
multiset.mem_of_mem_erase
{α : Type u_1}
[decidable_eq α]
{a b : α}
{s : multiset α}
(a_1 : a ∈ s.erase b) :
a ∈ s
theorem
multiset.erase_le_erase
{α : Type u_1}
[decidable_eq α]
{s t : multiset α}
(a : α)
(h : s ≤ t) :
@[simp]
theorem
multiset.card_erase_of_mem
{α : Type u_1}
[decidable_eq α]
{a : α}
{s : multiset α}
(a_1 : a ∈ s) :
theorem
multiset.card_erase_lt_of_mem
{α : Type u_1}
[decidable_eq α]
{a : α}
{s : multiset α}
(a_1 : a ∈ s) :
map f s is the lift of the list map operation. The multiplicity
of b in map f s is the number of a ∈ s (counting multiplicity)
such that f a = b.
Equations
- multiset.map f s = quot.lift_on s (λ (l : list α), ↑(list.map f l)) _
theorem
multiset.forall_mem_map_iff
{α : Type u_1}
{β : Type u_2}
{f : α → β}
{p : β → Prop}
{s : multiset α} :
(∀ (y : β), y ∈ multiset.map f s → p y) ↔ ∀ (x : α), x ∈ s → p (f x)
@[simp]
theorem
multiset.coe_map
{α : Type u_1}
{β : Type u_2}
(f : α → β)
(l : list α) :
multiset.map f ↑l = ↑(list.map f l)
@[simp]
@[simp]
theorem
multiset.map_cons
{α : Type u_1}
{β : Type u_2}
(f : α → β)
(a : α)
(s : multiset α) :
multiset.map f (a :: s) = f a :: multiset.map f s
theorem
multiset.map_singleton
{α : Type u_1}
{β : Type u_2}
(f : α → β)
(a : α) :
multiset.map f {a} = {f a}
theorem
multiset.map_repeat
{α : Type u_1}
{β : Type u_2}
(f : α → β)
(a : α)
(k : ℕ) :
multiset.map f (multiset.repeat a k) = multiset.repeat (f a) k
@[simp]
theorem
multiset.map_add
{α : Type u_1}
{β : Type u_2}
(f : α → β)
(s t : multiset α) :
multiset.map f (s + t) = multiset.map f s + multiset.map f t
@[instance]
@[simp]
@[simp]
theorem
multiset.card_map
{α : Type u_1}
{β : Type u_2}
(f : α → β)
(s : multiset α) :
(multiset.map f s).card = s.card
@[simp]
theorem
multiset.map_eq_zero
{α : Type u_1}
{β : Type u_2}
{s : multiset α}
{f : α → β} :
multiset.map f s = 0 ↔ s = 0
theorem
multiset.mem_map_of_mem
{α : Type u_1}
{β : Type u_2}
(f : α → β)
{a : α}
{s : multiset α}
(h : a ∈ s) :
f a ∈ multiset.map f s
theorem
multiset.mem_map_of_injective
{α : Type u_1}
{β : Type u_2}
{f : α → β}
(H : function.injective f)
{a : α}
{s : multiset α} :
f a ∈ multiset.map f s ↔ a ∈ s
@[simp]
theorem
multiset.map_map
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
(g : β → γ)
(f : α → β)
(s : multiset α) :
multiset.map g (multiset.map f s) = multiset.map (g ∘ f) s
@[simp]
@[simp]
theorem
multiset.map_const
{α : Type u_1}
{β : Type u_2}
(s : multiset α)
(b : β) :
multiset.map (function.const α b) s = multiset.repeat b s.card
theorem
multiset.map_congr
{α : Type u_1}
{β : Type u_2}
{f g : α → β}
{s : multiset α}
(a : ∀ (x : α), x ∈ s → f x = g x) :
multiset.map f s = multiset.map g s
theorem
multiset.map_hcongr
{α : Type u_1}
{β β' : Type u_2}
{m : multiset α}
{f : α → β}
{f' : α → β'}
(h : β = β')
(hf : ∀ (a : α), a ∈ m → f a == f' a) :
multiset.map f m == multiset.map f' m
theorem
multiset.eq_of_mem_map_const
{α : Type u_1}
{β : Type u_2}
{b₁ b₂ : β}
{l : list α}
(h : b₁ ∈ multiset.map (function.const α b₂) ↑l) :
b₁ = b₂
@[simp]
theorem
multiset.map_le_map
{α : Type u_1}
{β : Type u_2}
{f : α → β}
{s t : multiset α}
(h : s ≤ t) :
multiset.map f s ≤ multiset.map f t
@[simp]
theorem
multiset.map_subset_map
{α : Type u_1}
{β : Type u_2}
{f : α → β}
{s t : multiset α}
(H : s ⊆ t) :
multiset.map f s ⊆ multiset.map f t
def
multiset.foldl
{α : Type u_1}
{β : Type u_2}
(f : β → α → β)
(H : right_commutative f)
(b : β)
(s : multiset α) :
β
foldl f H b s is the lift of the list operation foldl f b l,
which folds f over the multiset. It is well defined when f is right-commutative,
that is, f (f b a₁) a₂ = f (f b a₂) a₁.
Equations
- multiset.foldl f H b s = quot.lift_on s (λ (l : list α), list.foldl f b l) _
@[simp]
theorem
multiset.foldl_zero
{α : Type u_1}
{β : Type u_2}
(f : β → α → β)
(H : right_commutative f)
(b : β) :
multiset.foldl f H b 0 = b
@[simp]
theorem
multiset.foldl_cons
{α : Type u_1}
{β : Type u_2}
(f : β → α → β)
(H : right_commutative f)
(b : β)
(a : α)
(s : multiset α) :
multiset.foldl f H b (a :: s) = multiset.foldl f H (f b a) s
@[simp]
theorem
multiset.foldl_add
{α : Type u_1}
{β : Type u_2}
(f : β → α → β)
(H : right_commutative f)
(b : β)
(s t : multiset α) :
multiset.foldl f H b (s + t) = multiset.foldl f H (multiset.foldl f H b s) t
def
multiset.foldr
{α : Type u_1}
{β : Type u_2}
(f : α → β → β)
(H : left_commutative f)
(b : β)
(s : multiset α) :
β
foldr f H b s is the lift of the list operation foldr f b l,
which folds f over the multiset. It is well defined when f is left-commutative,
that is, f a₁ (f a₂ b) = f a₂ (f a₁ b).
Equations
- multiset.foldr f H b s = quot.lift_on s (λ (l : list α), list.foldr f b l) _
@[simp]
theorem
multiset.foldr_zero
{α : Type u_1}
{β : Type u_2}
(f : α → β → β)
(H : left_commutative f)
(b : β) :
multiset.foldr f H b 0 = b
@[simp]
theorem
multiset.foldr_cons
{α : Type u_1}
{β : Type u_2}
(f : α → β → β)
(H : left_commutative f)
(b : β)
(a : α)
(s : multiset α) :
multiset.foldr f H b (a :: s) = f a (multiset.foldr f H b s)
@[simp]
theorem
multiset.foldr_add
{α : Type u_1}
{β : Type u_2}
(f : α → β → β)
(H : left_commutative f)
(b : β)
(s t : multiset α) :
multiset.foldr f H b (s + t) = multiset.foldr f H (multiset.foldr f H b t) s
@[simp]
theorem
multiset.coe_foldr
{α : Type u_1}
{β : Type u_2}
(f : α → β → β)
(H : left_commutative f)
(b : β)
(l : list α) :
multiset.foldr f H b ↑l = list.foldr f b l
@[simp]
theorem
multiset.coe_foldl
{α : Type u_1}
{β : Type u_2}
(f : β → α → β)
(H : right_commutative f)
(b : β)
(l : list α) :
multiset.foldl f H b ↑l = list.foldl f b l
theorem
multiset.coe_foldr_swap
{α : Type u_1}
{β : Type u_2}
(f : α → β → β)
(H : left_commutative f)
(b : β)
(l : list α) :
multiset.foldr f H b ↑l = list.foldl (λ (x : β) (y : α), f y x) b l
theorem
multiset.foldr_swap
{α : Type u_1}
{β : Type u_2}
(f : α → β → β)
(H : left_commutative f)
(b : β)
(s : multiset α) :
multiset.foldr f H b s = multiset.foldl (λ (x : β) (y : α), f y x) _ b s
theorem
multiset.foldl_swap
{α : Type u_1}
{β : Type u_2}
(f : β → α → β)
(H : right_commutative f)
(b : β)
(s : multiset α) :
multiset.foldl f H b s = multiset.foldr (λ (x : α) (y : β), f y x) _ b s
Product of a multiset given a commutative monoid structure on α.
prod {a, b, c} = a * b * c
Equations
- multiset.prod = multiset.foldr has_mul.mul multiset.prod._proof_1 1
theorem
multiset.sum_eq_foldr
{α : Type u_1}
[add_comm_monoid α]
(s : multiset α) :
s.sum = multiset.foldr has_add.add _ 0 s
theorem
multiset.prod_eq_foldr
{α : Type u_1}
[comm_monoid α]
(s : multiset α) :
s.prod = multiset.foldr has_mul.mul _ 1 s
theorem
multiset.prod_eq_foldl
{α : Type u_1}
[comm_monoid α]
(s : multiset α) :
s.prod = multiset.foldl has_mul.mul _ 1 s
theorem
multiset.sum_eq_foldl
{α : Type u_1}
[add_comm_monoid α]
(s : multiset α) :
s.sum = multiset.foldl has_add.add _ 0 s
@[simp]
@[simp]
@[simp]
@[simp]
@[simp]
@[simp]
@[instance]
@[simp]
theorem
multiset.prod_repeat
{α : Type u_1}
[comm_monoid α]
(a : α)
(n : ℕ) :
(multiset.repeat a n).prod = a ^ n
@[simp]
theorem
multiset.sum_repeat
{α : Type u_1}
[add_comm_monoid α]
(a : α)
(n : ℕ) :
(multiset.repeat a n).sum = n •ℕ a
theorem
multiset.prod_map_one
{α : Type u_1}
{γ : Type u_3}
[comm_monoid γ]
{m : multiset α} :
(multiset.map (λ (a : α), 1) m).prod = 1
theorem
multiset.sum_map_zero
{α : Type u_1}
{γ : Type u_3}
[add_comm_monoid γ]
{m : multiset α} :
(multiset.map (λ (a : α), 0) m).sum = 0
@[simp]
theorem
multiset.sum_map_add
{α : Type u_1}
{γ : Type u_3}
[add_comm_monoid γ]
{m : multiset α}
{f g : α → γ} :
(multiset.map (λ (a : α), f a + g a) m).sum = (multiset.map f m).sum + (multiset.map g m).sum
@[simp]
theorem
multiset.prod_map_mul
{α : Type u_1}
{γ : Type u_3}
[comm_monoid γ]
{m : multiset α}
{f g : α → γ} :
(multiset.map (λ (a : α), (f a) * g a) m).prod = ((multiset.map f m).prod) * (multiset.map g m).prod
theorem
multiset.prod_map_prod_map
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
[comm_monoid γ]
(m : multiset α)
(n : multiset β)
{f : α → β → γ} :
(multiset.map (λ (a : α), (multiset.map (λ (b : β), f a b) n).prod) m).prod = (multiset.map (λ (b : β), (multiset.map (λ (a : α), f a b) m).prod) n).prod
theorem
multiset.sum_map_sum_map
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
[add_comm_monoid γ]
(m : multiset α)
(n : multiset β)
{f : α → β → γ} :
(multiset.map (λ (a : α), (multiset.map (λ (b : β), f a b) n).sum) m).sum = (multiset.map (λ (b : β), (multiset.map (λ (a : α), f a b) m).sum) n).sum
theorem
multiset.sum_map_mul_left
{α : Type u_1}
{β : Type u_2}
[semiring β]
{b : β}
{s : multiset α}
{f : α → β} :
(multiset.map (λ (a : α), b * f a) s).sum = b * (multiset.map f s).sum
theorem
multiset.sum_map_mul_right
{α : Type u_1}
{β : Type u_2}
[semiring β]
{b : β}
{s : multiset α}
{f : α → β} :
(multiset.map (λ (a : α), (f a) * b) s).sum = ((multiset.map f s).sum) * b
theorem
multiset.prod_ne_zero
{R : Type u_1}
[integral_domain R]
{m : multiset R}
(a : ∀ (x : R), x ∈ m → x ≠ 0) :
theorem
multiset.sum_hom
{α : Type u_1}
{β : Type u_2}
[add_comm_monoid α]
[add_comm_monoid β]
(s : multiset α)
(f : α →+ β) :
theorem
multiset.prod_hom
{α : Type u_1}
{β : Type u_2}
[comm_monoid α]
[comm_monoid β]
(s : multiset α)
(f : α →* β) :
theorem
multiset.sum_hom_rel
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
[add_comm_monoid β]
[add_comm_monoid γ]
(s : multiset α)
{r : β → γ → Prop}
{f : α → β}
{g : α → γ}
(h₁ : r 0 0)
(h₂ : ∀ ⦃a : α⦄ ⦃b : β⦄ ⦃c : γ⦄, r b c → r (f a + b) (g a + c)) :
r (multiset.map f s).sum (multiset.map g s).sum
theorem
multiset.prod_hom_rel
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
[comm_monoid β]
[comm_monoid γ]
(s : multiset α)
{r : β → γ → Prop}
{f : α → β}
{g : α → γ}
(h₁ : r 1 1)
(h₂ : ∀ ⦃a : α⦄ ⦃b : β⦄ ⦃c : γ⦄, r b c → r ((f a) * b) ((g a) * c)) :
r (multiset.map f s).prod (multiset.map g s).prod
theorem
multiset.prod_eq_zero_iff
{α : Type u_1}
[comm_cancel_monoid_with_zero α]
[nontrivial α]
{s : multiset α} :
theorem
multiset.le_sum_of_subadditive
{α : Type u_1}
{β : Type u_2}
[add_comm_monoid α]
[ordered_add_comm_monoid β]
(f : α → β)
(h_zero : f 0 = 0)
(h_add : ∀ (x y : α), f (x + y) ≤ f x + f y)
(s : multiset α) :
f s.sum ≤ (multiset.map f s).sum
theorem
multiset.abs_sum_le_sum_abs
{α : Type u_1}
[discrete_linear_ordered_field α]
{s : multiset α} :
theorem
multiset.dvd_sum
{α : Type u_1}
[comm_semiring α]
{a : α}
{s : multiset α}
(a_1 : ∀ (x : α), x ∈ s → a ∣ x) :
join S, where S is a multiset of multisets, is the lift of the list join
operation, that is, the union of all the sets.
join {{1, 2}, {1, 2}, {0, 1}} = {0, 1, 1, 1, 2, 2}
Equations
@[simp]
theorem
multiset.card_join
{α : Type u_1}
(S : multiset (multiset α)) :
S.join.card = (multiset.map multiset.card S).sum
bind s f is the monad bind operation, defined as join (map f s).
It is the union of f a as a ranges over s.
Equations
- s.bind f = (multiset.map f s).join
@[simp]
@[simp]
@[simp]
theorem
multiset.bind_cons
{α : Type u_1}
{β : Type u_2}
(s : multiset α)
(f : α → β)
(g : α → multiset β) :
@[simp]
theorem
multiset.card_bind
{α : Type u_1}
{β : Type u_2}
(s : multiset α)
(f : α → multiset β) :
(s.bind f).card = (multiset.map (multiset.card ∘ f) s).sum
theorem
multiset.map_bind
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
(m : multiset α)
(n : α → multiset β)
(f : β → γ) :
multiset.map f (m.bind n) = m.bind (λ (a : α), multiset.map f (n a))
theorem
multiset.bind_map
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
(m : multiset α)
(n : β → multiset γ)
(f : α → β) :
(multiset.map f m).bind n = m.bind (λ (a : α), n (f a))
theorem
multiset.bind_map_comm
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
(m : multiset α)
(n : multiset β)
{f : α → β → γ} :
m.bind (λ (a : α), multiset.map (λ (b : β), f a b) n) = n.bind (λ (b : β), multiset.map (λ (a : α), f a b) m)
@[simp]
theorem
multiset.prod_bind
{α : Type u_1}
{β : Type u_2}
[comm_monoid β]
(s : multiset α)
(t : α → multiset β) :
@[simp]
theorem
multiset.sum_bind
{α : Type u_1}
{β : Type u_2}
[add_comm_monoid β]
(s : multiset α)
(t : α → multiset β) :
@[simp]
def
multiset.sigma
{α : Type u_1}
{σ : α → Type u_4}
(s : multiset α)
(t : Π (a : α), multiset (σ a)) :
multiset (Σ (a : α), σ a)
sigma s t is the dependent version of product. It is the sum of
(a, b) as a ranges over s and b ranges over t a.
Equations
- s.sigma t = s.bind (λ (a : α), multiset.map (sigma.mk a) (t a))
@[simp]
@[simp]
theorem
multiset.card_sigma
{α : Type u_1}
{σ : α → Type u_4}
(s : multiset α)
(t : Π (a : α), multiset (σ a)) :
def
multiset.pmap
{α : Type u_1}
{β : Type u_2}
{p : α → Prop}
(f : Π (a : α), p a → β)
(s : multiset α)
(a : ∀ (a : α), a ∈ s → p a) :
multiset β
Lift of the list pmap operation. Map a partial function f over a multiset
s whose elements are all in the domain of f.
Equations
- multiset.pmap f s = quot.rec_on s (λ (l : list α) (H : ∀ (a : α), a ∈ quot.mk setoid.r l → p a), ↑(list.pmap f l H)) _
@[simp]
theorem
multiset.coe_pmap
{α : Type u_1}
{β : Type u_2}
{p : α → Prop}
(f : Π (a : α), p a → β)
(l : list α)
(H : ∀ (a : α), a ∈ l → p a) :
multiset.pmap f ↑l H = ↑(list.pmap f l H)
@[simp]
theorem
multiset.pmap_zero
{α : Type u_1}
{β : Type u_2}
{p : α → Prop}
(f : Π (a : α), p a → β)
(h : ∀ (a : α), a ∈ 0 → p a) :
multiset.pmap f 0 h = 0
@[simp]
theorem
multiset.pmap_cons
{α : Type u_1}
{β : Type u_2}
{p : α → Prop}
(f : Π (a : α), p a → β)
(a : α)
(m : multiset α)
(h : ∀ (b : α), b ∈ a :: m → p b) :
multiset.pmap f (a :: m) h = f a _ :: multiset.pmap f m _
"Attach" a proof that a ∈ s to each element a in s to produce
a multiset on {x // x ∈ s}.
Equations
- s.attach = multiset.pmap subtype.mk s _
theorem
multiset.sizeof_lt_sizeof_of_mem
{α : Type u_1}
[has_sizeof α]
{x : α}
{s : multiset α}
(hx : x ∈ s) :
theorem
multiset.pmap_eq_map
{α : Type u_1}
{β : Type u_2}
(p : α → Prop)
(f : α → β)
(s : multiset α)
(H : ∀ (a : α), a ∈ s → p a) :
multiset.pmap (λ (a : α) (_x : p a), f a) s H = multiset.map f s
theorem
multiset.pmap_congr
{α : Type u_1}
{β : Type u_2}
{p q : α → Prop}
{f : Π (a : α), p a → β}
{g : Π (a : α), q a → β}
(s : multiset α)
{H₁ : ∀ (a : α), a ∈ s → p a}
{H₂ : ∀ (a : α), a ∈ s → q a}
(h : ∀ (a : α) (h₁ : p a) (h₂ : q a), f a h₁ = g a h₂) :
multiset.pmap f s H₁ = multiset.pmap g s H₂
theorem
multiset.map_pmap
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
{p : α → Prop}
(g : β → γ)
(f : Π (a : α), p a → β)
(s : multiset α)
(H : ∀ (a : α), a ∈ s → p a) :
multiset.map g (multiset.pmap f s H) = multiset.pmap (λ (a : α) (h : p a), g (f a h)) s H
theorem
multiset.pmap_eq_map_attach
{α : Type u_1}
{β : Type u_2}
{p : α → Prop}
(f : Π (a : α), p a → β)
(s : multiset α)
(H : ∀ (a : α), a ∈ s → p a) :
multiset.pmap f s H = multiset.map (λ (x : {x // x ∈ s}), f x.val _) s.attach
@[simp]
theorem
multiset.mem_pmap
{α : Type u_1}
{β : Type u_2}
{p : α → Prop}
{f : Π (a : α), p a → β}
{s : multiset α}
{H : ∀ (a : α), a ∈ s → p a}
{b : β} :
b ∈ multiset.pmap f s H ↔ ∃ (a : α) (h : a ∈ s), f a _ = b
@[simp]
theorem
multiset.card_pmap
{α : Type u_1}
{β : Type u_2}
{p : α → Prop}
(f : Π (a : α), p a → β)
(s : multiset α)
(H : ∀ (a : α), a ∈ s → p a) :
(multiset.pmap f s H).card = s.card
def
multiset.decidable_forall_multiset
{α : Type u_1}
{m : multiset α}
{p : α → Prop}
[hp : Π (a : α), decidable (p a)] :
Equations
- multiset.decidable_forall_multiset = quotient.rec_on_subsingleton m (λ (l : list α), decidable_of_iff (∀ (a : α), a ∈ l → p a) _)
@[instance]
def
multiset.decidable_dforall_multiset
{α : Type u_1}
{m : multiset α}
{p : Π (a : α), a ∈ m → Prop}
[hp : Π (a : α) (h : a ∈ m), decidable (p a h)] :
Equations
- multiset.decidable_dforall_multiset = decidable_of_decidable_of_iff multiset.decidable_forall_multiset multiset.decidable_dforall_multiset._proof_3
@[instance]
def
multiset.decidable_eq_pi_multiset
{α : Type u_1}
{m : multiset α}
{β : α → Type u_2}
[h : Π (a : α), decidable_eq (β a)] :
decidable_eq (Π (a : α), a ∈ m → β a)
decidable equality for functions whose domain is bounded by multisets
Equations
- multiset.decidable_eq_pi_multiset = λ (f g : Π (a : α), a ∈ m → β a), decidable_of_iff (∀ (a : α) (h : a ∈ m), f a h = g a h) _
def
multiset.decidable_exists_multiset
{α : Type u_1}
{m : multiset α}
{p : α → Prop}
[decidable_pred p] :
@[instance]
def
multiset.decidable_dexists_multiset
{α : Type u_1}
{m : multiset α}
{p : Π (a : α), a ∈ m → Prop}
[hp : Π (a : α) (h : a ∈ m), decidable (p a h)] :
Equations
- multiset.decidable_dexists_multiset = decidable_of_decidable_of_iff multiset.decidable_exists_multiset multiset.decidable_dexists_multiset._proof_3
s - t is the multiset such that
count a (s - t) = count a s - count a t for all a.
@[instance]
Equations
- multiset.has_sub = {sub := multiset.sub (λ (a b : α), _inst_1 a b)}
@[simp]
@[simp]
@[simp]
@[simp]
@[simp]
theorem
multiset.sub_le_sub_right
{α : Type u_1}
[decidable_eq α]
{s t : multiset α}
(h : s ≤ t)
(u : multiset α) :
theorem
multiset.sub_le_sub_left
{α : Type u_1}
[decidable_eq α]
{s t : multiset α}
(h : s ≤ t)
(u : multiset α) :
s ∪ t is the lattice join operation with respect to the
multiset ≤. The multiplicity of a in s ∪ t is the maximum
of the multiplicities in s and t.
@[instance]
Equations
- multiset.has_union = {union := multiset.union (λ (a b : α), _inst_1 a b)}
theorem
multiset.union_le_union_right
{α : Type u_1}
[decidable_eq α]
{s t : multiset α}
(h : s ≤ t)
(u : multiset α) :
theorem
multiset.union_le
{α : Type u_1}
[decidable_eq α]
{s t u : multiset α}
(h₁ : s ≤ u)
(h₂ : t ≤ u) :
@[simp]
@[simp]
theorem
multiset.map_union
{α : Type u_1}
{β : Type u_2}
[decidable_eq α]
[decidable_eq β]
{f : α → β}
(finj : function.injective f)
{s t : multiset α} :
multiset.map f (s ∪ t) = multiset.map f s ∪ multiset.map f t
s ∩ t is the lattice meet operation with respect to the
multiset ≤. The multiplicity of a in s ∩ t is the minimum
of the multiplicities in s and t.
@[instance]
Equations
- multiset.has_inter = {inter := multiset.inter (λ (a b : α), _inst_1 a b)}
@[simp]
@[simp]
@[simp]
theorem
multiset.cons_inter_of_neg
{α : Type u_1}
[decidable_eq α]
{a : α}
(s : multiset α)
{t : multiset α}
(a_1 : a ∉ t) :
theorem
multiset.le_inter
{α : Type u_1}
[decidable_eq α]
{s t u : multiset α}
(h₁ : s ≤ t)
(h₂ : s ≤ u) :
@[simp]
@[instance]
Equations
- multiset.lattice = {sup := has_union.union multiset.has_union, le := partial_order.le multiset.partial_order, lt := partial_order.lt multiset.partial_order, le_refl := _, le_trans := _, lt_iff_le_not_le := _, le_antisymm := _, le_sup_left := _, le_sup_right := _, sup_le := _, inf := has_inter.inter multiset.has_inter, inf_le_left := _, inf_le_right := _, le_inf := _}
@[simp]
@[simp]
@[simp]
@[simp]
@[instance]
Equations
- multiset.semilattice_inf_bot = {bot := 0, le := lattice.le multiset.lattice, lt := lattice.lt multiset.lattice, le_refl := _, le_trans := _, lt_iff_le_not_le := _, le_antisymm := _, bot_le := _, inf := lattice.inf multiset.lattice, inf_le_left := _, inf_le_right := _, le_inf := _}
theorem
multiset.union_le_union_left
{α : Type u_1}
[decidable_eq α]
{s t : multiset α}
(h : s ≤ t)
(u : multiset α) :
def
multiset.filter
{α : Type u_1}
(p : α → Prop)
[h : decidable_pred p]
(s : multiset α) :
multiset α
filter p s returns the elements in s (with the same multiplicities)
which satisfy p, and removes the rest.
Equations
- multiset.filter p s = quot.lift_on s (λ (l : list α), ↑(list.filter p l)) _
@[simp]
theorem
multiset.coe_filter
{α : Type u_1}
(p : α → Prop)
[h : decidable_pred p]
(l : list α) :
multiset.filter p ↑l = ↑(list.filter p l)
@[simp]
theorem
multiset.filter_zero
{α : Type u_1}
(p : α → Prop)
[h : decidable_pred p] :
multiset.filter p 0 = 0
@[simp]
theorem
multiset.filter_cons_of_pos
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{a : α}
(s : multiset α)
(a_1 : p a) :
multiset.filter p (a :: s) = a :: multiset.filter p s
@[simp]
theorem
multiset.filter_cons_of_neg
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{a : α}
(s : multiset α)
(a_1 : ¬p a) :
multiset.filter p (a :: s) = multiset.filter p s
theorem
multiset.filter_congr
{α : Type u_1}
{p q : α → Prop}
[decidable_pred p]
[decidable_pred q]
{s : multiset α}
(a : ∀ (x : α), x ∈ s → (p x ↔ q x)) :
multiset.filter p s = multiset.filter q s
@[simp]
theorem
multiset.filter_add
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
(s t : multiset α) :
multiset.filter p (s + t) = multiset.filter p s + multiset.filter p t
@[simp]
theorem
multiset.filter_le
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
(s : multiset α) :
multiset.filter p s ≤ s
@[simp]
theorem
multiset.filter_subset
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
(s : multiset α) :
multiset.filter p s ⊆ s
@[simp]
theorem
multiset.mem_filter
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{a : α}
{s : multiset α} :
a ∈ multiset.filter p s ↔ a ∈ s ∧ p a
theorem
multiset.of_mem_filter
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{a : α}
{s : multiset α}
(h : a ∈ multiset.filter p s) :
p a
theorem
multiset.mem_of_mem_filter
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{a : α}
{s : multiset α}
(h : a ∈ multiset.filter p s) :
a ∈ s
theorem
multiset.mem_filter_of_mem
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{a : α}
{l : multiset α}
(m : a ∈ l)
(h : p a) :
a ∈ multiset.filter p l
theorem
multiset.filter_eq_self
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{s : multiset α} :
multiset.filter p s = s ↔ ∀ (a : α), a ∈ s → p a
theorem
multiset.filter_eq_nil
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{s : multiset α} :
multiset.filter p s = 0 ↔ ∀ (a : α), a ∈ s → ¬p a
theorem
multiset.filter_le_filter
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{s t : multiset α}
(h : s ≤ t) :
multiset.filter p s ≤ multiset.filter p t
@[simp]
theorem
multiset.filter_sub
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
[decidable_eq α]
(s t : multiset α) :
multiset.filter p (s - t) = multiset.filter p s - multiset.filter p t
@[simp]
theorem
multiset.filter_union
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
[decidable_eq α]
(s t : multiset α) :
multiset.filter p (s ∪ t) = multiset.filter p s ∪ multiset.filter p t
@[simp]
theorem
multiset.filter_inter
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
[decidable_eq α]
(s t : multiset α) :
multiset.filter p (s ∩ t) = multiset.filter p s ∩ multiset.filter p t
@[simp]
theorem
multiset.filter_filter
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{q : α → Prop}
[decidable_pred q]
(s : multiset α) :
multiset.filter p (multiset.filter q s) = multiset.filter (λ (a : α), p a ∧ q a) s
theorem
multiset.filter_add_filter
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{q : α → Prop}
[decidable_pred q]
(s : multiset α) :
multiset.filter p s + multiset.filter q s = multiset.filter (λ (a : α), p a ∨ q a) s + multiset.filter (λ (a : α), p a ∧ q a) s
theorem
multiset.filter_add_not
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
(s : multiset α) :
multiset.filter p s + multiset.filter (λ (a : α), ¬p a) s = s
def
multiset.filter_map
{α : Type u_1}
{β : Type u_2}
(f : α → option β)
(s : multiset α) :
multiset β
filter_map f s is a combination filter/map operation on s.
The function f : α → option β is applied to each element of s;
if f a is some b then b is added to the result, otherwise
a is removed from the resulting multiset.
Equations
- multiset.filter_map f s = quot.lift_on s (λ (l : list α), ↑(list.filter_map f l)) _
@[simp]
theorem
multiset.coe_filter_map
{α : Type u_1}
{β : Type u_2}
(f : α → option β)
(l : list α) :
multiset.filter_map f ↑l = ↑(list.filter_map f l)
@[simp]
theorem
multiset.filter_map_zero
{α : Type u_1}
{β : Type u_2}
(f : α → option β) :
multiset.filter_map f 0 = 0
@[simp]
theorem
multiset.filter_map_cons_none
{α : Type u_1}
{β : Type u_2}
{f : α → option β}
(a : α)
(s : multiset α)
(h : f a = none) :
multiset.filter_map f (a :: s) = multiset.filter_map f s
@[simp]
theorem
multiset.filter_map_cons_some
{α : Type u_1}
{β : Type u_2}
(f : α → option β)
(a : α)
(s : multiset α)
{b : β}
(h : f a = some b) :
multiset.filter_map f (a :: s) = b :: multiset.filter_map f s
theorem
multiset.filter_map_eq_map
{α : Type u_1}
{β : Type u_2}
(f : α → β) :
multiset.filter_map (some ∘ f) = multiset.map f
theorem
multiset.filter_map_filter_map
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
(f : α → option β)
(g : β → option γ)
(s : multiset α) :
multiset.filter_map g (multiset.filter_map f s) = multiset.filter_map (λ (x : α), (f x).bind g) s
theorem
multiset.map_filter_map
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
(f : α → option β)
(g : β → γ)
(s : multiset α) :
multiset.map g (multiset.filter_map f s) = multiset.filter_map (λ (x : α), option.map g (f x)) s
theorem
multiset.filter_map_map
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
(f : α → β)
(g : β → option γ)
(s : multiset α) :
multiset.filter_map g (multiset.map f s) = multiset.filter_map (g ∘ f) s
theorem
multiset.filter_filter_map
{α : Type u_1}
{β : Type u_2}
(f : α → option β)
(p : β → Prop)
[decidable_pred p]
(s : multiset α) :
multiset.filter p (multiset.filter_map f s) = multiset.filter_map (λ (x : α), option.filter p (f x)) s
theorem
multiset.filter_map_filter
{α : Type u_1}
{β : Type u_2}
(p : α → Prop)
[decidable_pred p]
(f : α → option β)
(s : multiset α) :
multiset.filter_map f (multiset.filter p s) = multiset.filter_map (λ (x : α), ite (p x) (f x) none) s
@[simp]
theorem
multiset.map_filter_map_of_inv
{α : Type u_1}
{β : Type u_2}
(f : α → option β)
(g : β → α)
(H : ∀ (x : α), option.map g (f x) = some x)
(s : multiset α) :
multiset.map g (multiset.filter_map f s) = s
theorem
multiset.filter_map_le_filter_map
{α : Type u_1}
{β : Type u_2}
(f : α → option β)
{s t : multiset α}
(h : s ≤ t) :
multiset.filter_map f s ≤ multiset.filter_map f t
countp
countp p s counts the number of elements of s (with multiplicity) that
satisfy p.
Equations
- multiset.countp p s = quot.lift_on s (list.countp p) _
@[simp]
theorem
multiset.coe_countp
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
(l : list α) :
multiset.countp p ↑l = list.countp p l
@[simp]
theorem
multiset.countp_zero
{α : Type u_1}
(p : α → Prop)
[decidable_pred p] :
multiset.countp p 0 = 0
@[simp]
theorem
multiset.countp_cons_of_pos
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{a : α}
(s : multiset α)
(a_1 : p a) :
multiset.countp p (a :: s) = multiset.countp p s + 1
@[simp]
theorem
multiset.countp_cons_of_neg
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{a : α}
(s : multiset α)
(a_1 : ¬p a) :
multiset.countp p (a :: s) = multiset.countp p s
theorem
multiset.countp_eq_card_filter
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
(s : multiset α) :
multiset.countp p s = (multiset.filter p s).card
@[simp]
theorem
multiset.countp_add
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
(s t : multiset α) :
multiset.countp p (s + t) = multiset.countp p s + multiset.countp p t
@[instance]
theorem
multiset.countp_pos
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{s : multiset α} :
0 < multiset.countp p s ↔ ∃ (a : α) (H : a ∈ s), p a
@[simp]
theorem
multiset.countp_sub
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
[decidable_eq α]
{s t : multiset α}
(h : t ≤ s) :
multiset.countp p (s - t) = multiset.countp p s - multiset.countp p t
theorem
multiset.countp_pos_of_mem
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{s : multiset α}
{a : α}
(h : a ∈ s)
(pa : p a) :
0 < multiset.countp p s
theorem
multiset.countp_le_of_le
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{s t : multiset α}
(h : s ≤ t) :
multiset.countp p s ≤ multiset.countp p t
@[simp]
theorem
multiset.countp_filter
{α : Type u_1}
{p : α → Prop}
[decidable_pred p]
{q : α → Prop}
[decidable_pred q]
(s : multiset α) :
multiset.countp p (multiset.filter q s) = multiset.countp (λ (a : α), p a ∧ q a) s
count a s is the multiplicity of a in s.
Equations
- multiset.count a = multiset.countp (eq a)
@[simp]
theorem
multiset.coe_count
{α : Type u_1}
[decidable_eq α]
(a : α)
(l : list α) :
multiset.count a ↑l = list.count a l
@[simp]
@[simp]
theorem
multiset.count_cons_self
{α : Type u_1}
[decidable_eq α]
(a : α)
(s : multiset α) :
multiset.count a (a :: s) = (multiset.count a s).succ
@[simp]
theorem
multiset.count_cons_of_ne
{α : Type u_1}
[decidable_eq α]
{a b : α}
(h : a ≠ b)
(s : multiset α) :
multiset.count a (b :: s) = multiset.count a s
theorem
multiset.count_le_of_le
{α : Type u_1}
[decidable_eq α]
(a : α)
{s t : multiset α}
(a_1 : s ≤ t) :
multiset.count a s ≤ multiset.count a t
theorem
multiset.count_le_count_cons
{α : Type u_1}
[decidable_eq α]
(a b : α)
(s : multiset α) :
multiset.count a s ≤ multiset.count a (b :: s)
theorem
multiset.count_singleton
{α : Type u_1}
[decidable_eq α]
(a : α) :
multiset.count a (a :: 0) = 1
@[simp]
theorem
multiset.count_add
{α : Type u_1}
[decidable_eq α]
(a : α)
(s t : multiset α) :
multiset.count a (s + t) = multiset.count a s + multiset.count a t
@[instance]
@[simp]
theorem
multiset.count_smul
{α : Type u_1}
[decidable_eq α]
(a : α)
(n : ℕ)
(s : multiset α) :
multiset.count a (n •ℕ s) = n * multiset.count a s
theorem
multiset.count_pos
{α : Type u_1}
[decidable_eq α]
{a : α}
{s : multiset α} :
0 < multiset.count a s ↔ a ∈ s
@[simp]
theorem
multiset.count_eq_zero_of_not_mem
{α : Type u_1}
[decidable_eq α]
{a : α}
{s : multiset α}
(h : a ∉ s) :
multiset.count a s = 0
theorem
multiset.count_eq_zero
{α : Type u_1}
[decidable_eq α]
{a : α}
{s : multiset α} :
multiset.count a s = 0 ↔ a ∉ s
theorem
multiset.count_ne_zero
{α : Type u_1}
[decidable_eq α]
{a : α}
{s : multiset α} :
multiset.count a s ≠ 0 ↔ a ∈ s
@[simp]
theorem
multiset.count_repeat_self
{α : Type u_1}
[decidable_eq α]
(a : α)
(n : ℕ) :
multiset.count a (multiset.repeat a n) = n
theorem
multiset.count_repeat
{α : Type u_1}
[decidable_eq α]
(a b : α)
(n : ℕ) :
multiset.count a (multiset.repeat b n) = ite (a = b) n 0
@[simp]
theorem
multiset.count_erase_self
{α : Type u_1}
[decidable_eq α]
(a : α)
(s : multiset α) :
multiset.count a (s.erase a) = (multiset.count a s).pred
@[simp]
theorem
multiset.count_erase_of_ne
{α : Type u_1}
[decidable_eq α]
{a b : α}
(ab : a ≠ b)
(s : multiset α) :
multiset.count a (s.erase b) = multiset.count a s
@[simp]
theorem
multiset.count_sub
{α : Type u_1}
[decidable_eq α]
(a : α)
(s t : multiset α) :
multiset.count a (s - t) = multiset.count a s - multiset.count a t
@[simp]
theorem
multiset.count_union
{α : Type u_1}
[decidable_eq α]
(a : α)
(s t : multiset α) :
multiset.count a (s ∪ t) = max (multiset.count a s) (multiset.count a t)
@[simp]
theorem
multiset.count_inter
{α : Type u_1}
[decidable_eq α]
(a : α)
(s t : multiset α) :
multiset.count a (s ∩ t) = min (multiset.count a s) (multiset.count a t)
theorem
multiset.count_sum
{α : Type u_1}
{β : Type u_2}
[decidable_eq α]
{m : multiset β}
{f : β → multiset α}
{a : α} :
multiset.count a (multiset.map f m).sum = (multiset.map (λ (b : β), multiset.count a (f b)) m).sum
theorem
multiset.count_bind
{α : Type u_1}
{β : Type u_2}
[decidable_eq α]
{m : multiset β}
{f : β → multiset α}
{a : α} :
multiset.count a (m.bind f) = (multiset.map (λ (b : β), multiset.count a (f b)) m).sum
theorem
multiset.le_count_iff_repeat_le
{α : Type u_1}
[decidable_eq α]
{a : α}
{s : multiset α}
{n : ℕ} :
n ≤ multiset.count a s ↔ multiset.repeat a n ≤ s
@[simp]
theorem
multiset.count_filter
{α : Type u_1}
[decidable_eq α]
{p : α → Prop}
[decidable_pred p]
{a : α}
{s : multiset α}
(h : p a) :
multiset.count a (multiset.filter p s) = multiset.count a s
theorem
multiset.ext
{α : Type u_1}
[decidable_eq α]
{s t : multiset α} :
s = t ↔ ∀ (a : α), multiset.count a s = multiset.count a t
@[ext]
theorem
multiset.ext'
{α : Type u_1}
[decidable_eq α]
{s t : multiset α}
(a : ∀ (a : α), multiset.count a s = multiset.count a t) :
s = t
@[simp]
theorem
multiset.le_iff_count
{α : Type u_1}
[decidable_eq α]
{s t : multiset α} :
s ≤ t ↔ ∀ (a : α), multiset.count a s ≤ multiset.count a t
@[instance]
Equations
- multiset.distrib_lattice = {sup := lattice.sup multiset.lattice, le := lattice.le multiset.lattice, lt := lattice.lt multiset.lattice, le_refl := _, le_trans := _, lt_iff_le_not_le := _, le_antisymm := _, le_sup_left := _, le_sup_right := _, sup_le := _, inf := lattice.inf multiset.lattice, inf_le_left := _, inf_le_right := _, le_inf := _, le_sup_inf := _}
@[instance]
Equations
- multiset.semilattice_sup_bot = {bot := 0, le := lattice.le multiset.lattice, lt := lattice.lt multiset.lattice, le_refl := _, le_trans := _, lt_iff_le_not_le := _, le_antisymm := _, bot_le := _, sup := lattice.sup multiset.lattice, le_sup_left := _, le_sup_right := _, sup_le := _}
inductive
multiset.rel
{α : Type u_1}
{β : Type u_2}
(r : α → β → Prop)
(a : multiset α)
(a_1 : multiset β) :
Prop
- zero : ∀ {α : Type u_1} {β : Type u_2} (r : α → β → Prop), multiset.rel r 0 0
- cons : ∀ {α : Type u_1} {β : Type u_2} (r : α → β → Prop) {a : α} {b : β} {as : multiset α} {bs : multiset β}, r a b → multiset.rel r as bs → multiset.rel r (a :: as) (b :: bs)
rel r s t -- lift the relation r between two elements to a relation between s and t,
s.t. there is a one-to-one mapping betweem elements in s and t following r.
theorem
multiset.rel_flip
{α : Type u_1}
{β : Type u_2}
{r : α → β → Prop}
{s : multiset β}
{t : multiset α} :
multiset.rel (flip r) s t ↔ multiset.rel r t s
theorem
multiset.rel.mono
{α : Type u_1}
{β : Type u_2}
{r p : α → β → Prop}
{s : multiset α}
{t : multiset β}
(h : ∀ (a : α) (b : β), r a b → p a b)
(hst : multiset.rel r s t) :
multiset.rel p s t
theorem
multiset.rel.add
{α : Type u_1}
{β : Type u_2}
{r : α → β → Prop}
{s : multiset α}
{t : multiset β}
{u : multiset α}
{v : multiset β}
(hst : multiset.rel r s t)
(huv : multiset.rel r u v) :
multiset.rel r (s + u) (t + v)
theorem
multiset.rel_flip_eq
{α : Type u_1}
{s t : multiset α} :
multiset.rel (λ (a b : α), b = a) s t ↔ s = t
@[simp]
theorem
multiset.rel_zero_left
{α : Type u_1}
{β : Type u_2}
{r : α → β → Prop}
{b : multiset β} :
multiset.rel r 0 b ↔ b = 0
@[simp]
theorem
multiset.rel_zero_right
{α : Type u_1}
{β : Type u_2}
{r : α → β → Prop}
{a : multiset α} :
multiset.rel r a 0 ↔ a = 0
theorem
multiset.rel_cons_left
{α : Type u_1}
{β : Type u_2}
{r : α → β → Prop}
{a : α}
{as : multiset α}
{bs : multiset β} :
multiset.rel r (a :: as) bs ↔ ∃ (b : β) (bs' : multiset β), r a b ∧ multiset.rel r as bs' ∧ bs = b :: bs'
theorem
multiset.rel_cons_right
{α : Type u_1}
{β : Type u_2}
{r : α → β → Prop}
{as : multiset α}
{b : β}
{bs : multiset β} :
multiset.rel r as (b :: bs) ↔ ∃ (a : α) (as' : multiset α), r a b ∧ multiset.rel r as' bs ∧ as = a :: as'
theorem
multiset.rel_add_left
{α : Type u_1}
{β : Type u_2}
{r : α → β → Prop}
{as₀ as₁ : multiset α}
{bs : multiset β} :
multiset.rel r (as₀ + as₁) bs ↔ ∃ (bs₀ bs₁ : multiset β), multiset.rel r as₀ bs₀ ∧ multiset.rel r as₁ bs₁ ∧ bs = bs₀ + bs₁
theorem
multiset.rel_add_right
{α : Type u_1}
{β : Type u_2}
{r : α → β → Prop}
{as : multiset α}
{bs₀ bs₁ : multiset β} :
multiset.rel r as (bs₀ + bs₁) ↔ ∃ (as₀ as₁ : multiset α), multiset.rel r as₀ bs₀ ∧ multiset.rel r as₁ bs₁ ∧ as = as₀ + as₁
theorem
multiset.rel_map_left
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
{r : α → β → Prop}
{s : multiset γ}
{f : γ → α}
{t : multiset β} :
multiset.rel r (multiset.map f s) t ↔ multiset.rel (λ (a : γ) (b : β), r (f a) b) s t
theorem
multiset.rel_map_right
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
{r : α → β → Prop}
{s : multiset α}
{t : multiset γ}
{f : γ → β} :
multiset.rel r s (multiset.map f t) ↔ multiset.rel (λ (a : α) (b : γ), r a (f b)) s t
theorem
multiset.rel_join
{α : Type u_1}
{β : Type u_2}
{r : α → β → Prop}
{s : multiset (multiset α)}
{t : multiset (multiset β)}
(h : multiset.rel (multiset.rel r) s t) :
multiset.rel r s.join t.join
theorem
multiset.rel_map
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
{δ : Type u_4}
{r : α → β → Prop}
{p : γ → δ → Prop}
{s : multiset α}
{t : multiset β}
{f : α → γ}
{g : β → δ}
(h : (r ⇒ p) f g)
(hst : multiset.rel r s t) :
multiset.rel p (multiset.map f s) (multiset.map g t)
theorem
multiset.rel_bind
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
{δ : Type u_4}
{r : α → β → Prop}
{p : γ → δ → Prop}
{s : multiset α}
{t : multiset β}
{f : α → multiset γ}
{g : β → multiset δ}
(h : (r ⇒ multiset.rel p) f g)
(hst : multiset.rel r s t) :
multiset.rel p (s.bind f) (t.bind g)
theorem
multiset.card_eq_card_of_rel
{α : Type u_1}
{β : Type u_2}
{r : α → β → Prop}
{s : multiset α}
{t : multiset β}
(h : multiset.rel r s t) :
theorem
multiset.exists_mem_of_rel_of_mem
{α : Type u_1}
{β : Type u_2}
{r : α → β → Prop}
{s : multiset α}
{t : multiset β}
(h : multiset.rel r s t)
{a : α}
(ha : a ∈ s) :
∃ (b : β) (H : b ∈ t), r a b
theorem
multiset.map_eq_map
{α : Type u_1}
{β : Type u_2}
{f : α → β}
(hf : function.injective f)
{s t : multiset α} :
multiset.map f s = multiset.map f t ↔ s = t
theorem
multiset.map_injective
{α : Type u_1}
{β : Type u_2}
{f : α → β}
(hf : function.injective f) :
theorem
multiset.map_mk_eq_map_mk_of_rel
{α : Type u_1}
{r : α → α → Prop}
{s t : multiset α}
(hst : multiset.rel r s t) :
multiset.map (quot.mk r) s = multiset.map (quot.mk r) t
theorem
multiset.exists_multiset_eq_map_quot_mk
{α : Type u_1}
{r : α → α → Prop}
(s : multiset (quot r)) :
∃ (t : multiset α), s = multiset.map (quot.mk r) t
theorem
multiset.induction_on_multiset_quot
{α : Type u_1}
{r : α → α → Prop}
{p : multiset (quot r) → Prop}
(s : multiset (quot r))
(a : ∀ (s : multiset α), p (multiset.map (quot.mk r) s)) :
p s
@[simp]
@[simp]
theorem
multiset.disjoint_map_map
{α : Type u_1}
{β : Type u_2}
{γ : Type u_3}
{f : α → γ}
{g : β → γ}
{s : multiset α}
{t : multiset β} :
(multiset.map f s).disjoint (multiset.map g t) ↔ ∀ (a : α), a ∈ s → ∀ (b : β), b ∈ t → f a ≠ g b
pairwise r m states that there exists a list of the elements s.t. r holds pairwise on this list.
Equations
- multiset.pairwise r m = ∃ (l : list α), m = ↑l ∧ list.pairwise r l
theorem
multiset.pairwise_coe_iff_pairwise
{α : Type u_1}
{r : α → α → Prop}
(hr : symmetric r)
{l : list α} :
multiset.pairwise r ↑l ↔ list.pairwise r l
def
multiset.choose_x
{α : Type u_1}
(p : α → Prop)
[decidable_pred p]
(l : multiset α)
(hp : ∃! (a : α), a ∈ l ∧ p a) :
Given a proof hp that there exists a unique a ∈ l such that p a, choose p l hp returns
that a.
Equations
- multiset.choose_x p l = quotient.rec_on l (λ (l' : list α) (ex_unique : ∃! (a : α), a ∈ ⟦l'⟧ ∧ p a), list.choose_x p l' _) _
def
multiset.choose
{α : Type u_1}
(p : α → Prop)
[decidable_pred p]
(l : multiset α)
(hp : ∃! (a : α), a ∈ l ∧ p a) :
α
Equations
- multiset.choose p l hp = ↑(multiset.choose_x p l hp)
theorem
multiset.choose_spec
{α : Type u_1}
(p : α → Prop)
[decidable_pred p]
(l : multiset α)
(hp : ∃! (a : α), a ∈ l ∧ p a) :
multiset.choose p l hp ∈ l ∧ p (multiset.choose p l hp)
theorem
multiset.choose_mem
{α : Type u_1}
(p : α → Prop)
[decidable_pred p]
(l : multiset α)
(hp : ∃! (a : α), a ∈ l ∧ p a) :
multiset.choose p l hp ∈ l
theorem
multiset.choose_property
{α : Type u_1}
(p : α → Prop)
[decidable_pred p]
(l : multiset α)
(hp : ∃! (a : α), a ∈ l ∧ p a) :
p (multiset.choose p l hp)
The equivalence between lists and multisets of a subsingleton type.
Equations
- multiset.subsingleton_equiv α = {to_fun := coe coe_to_lift, inv_fun := quot.lift id _, left_inv := _, right_inv := _}
theorem
monoid_hom.map_multiset_prod
{α : Type u_1}
{β : Type u_2}
[comm_monoid α]
[comm_monoid β]
(f : α →* β)
(s : multiset α) :
theorem
add_monoid_hom.map_multiset_sum
{α : Type u_1}
{β : Type u_2}
[add_comm_monoid α]
[add_comm_monoid β]
(f : α →+ β)
(s : multiset α) :