Step
*
of Lemma
imax-bag_wf
∀[bs:bag(ℤ)]. imax-bag(bs) ∈ ℤ supposing 0 < #(bs)
BY
{ (Auto
   THEN newQuotD 1
   THEN Auto
   THEN Unfold `imax-bag` 0
   THEN All (Unfold `bag-size`)
   THEN BLemma `imax-list_functionality`
   THEN Auto) }
1
1. ℤ List ∈ Type
2. ∀as,b1:ℤ List.  (permutation(ℤ;as;b1) ∈ Type)
3. ∀as:ℤ List. permutation(ℤ;as;as)
4. a : Base
5. b : Base
6. c : a = b ∈ pertype(λas,bs. ((as ∈ ℤ List) ∧ (bs ∈ ℤ List) ∧ permutation(ℤ;as;bs)))
7. a ∈ ℤ List
8. b ∈ ℤ List
9. permutation(ℤ;a;b)
10. 0 < ||a||
⊢ set-equal(ℤ;a;b)
Latex:
Latex:
\mforall{}[bs:bag(\mBbbZ{})].  imax-bag(bs)  \mmember{}  \mBbbZ{}  supposing  0  <  \#(bs)
By
Latex:
(Auto
  THEN  newQuotD  1
  THEN  Auto
  THEN  Unfold  `imax-bag`  0
  THEN  All  (Unfold  `bag-size`)
  THEN  BLemma  `imax-list\_functionality`
  THEN  Auto)
Home
Index