Step
*
of Lemma
fset-size_wf
∀[T:Type]. ∀[eq:EqDecider(T)]. ∀[s:fset(T)].  (||s|| ∈ ℕ)
BY
{ ((UnivCD THENA Auto) THEN (D -1 THENA Auto) THEN Try ((D 0 THEN Auto)) THEN Unfold `fset-size` 0) }
1
1. T : Type
2. eq : EqDecider(T)
3. s : Base
4. s1 : Base
5. s = s1 ∈ pertype(λx,y. ((x ∈ T List) ∧ (y ∈ T List) ∧ set-equal(T;x;y)))
6. s ∈ T List
7. s1 ∈ T List
8. set-equal(T;s;s1)
⊢ ||remove-repeats(eq;s)|| = ||remove-repeats(eq;s1)|| ∈ ℕ
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[eq:EqDecider(T)].  \mforall{}[s:fset(T)].    (||s||  \mmember{}  \mBbbN{})
By
Latex:
((UnivCD  THENA  Auto)  THEN  (D  -1  THENA  Auto)  THEN  Try  ((D  0  THEN  Auto))  THEN  Unfold  `fset-size`  0)
Home
Index