English
Repeated: for lists l1,l2, the product via multisets equals the multiset of list product: (l1 : Multiset α) ×ˢ (l2 : Multiset β) = (l1 ×ˢ l2).
Русский
Повторение: для списков l1,l2 произведение через множества равняется множеству произведения списков: (l1 : Multiset α) ×ˢ (l2 : Multiset β) = (l1 ×ˢ l2).
LaTeX
$$$(l_1 : \mathrm{Multiset}\ \alpha) \times^{\mathrm{SProd}} (l_2 : \mathrm{Multiset}\ \beta) = (l_1 \times^{\mathrm{SProd}} l_2)$$$
Lean4
protected theorem product : Nodup s → Nodup t → Nodup (s ×ˢ t) :=
Quotient.inductionOn₂ s t fun l₁ l₂ d₁ d₂ => by simp [List.Nodup.product d₁ d₂]