Step
*
1
1
2
of Lemma
bag-parts-no-repeats
1. T : Type
2. valueall-type(T)
3. eq : EqDecider(T)
4. n : ℕ
5. ∀n:ℕn. ∀bs:bag(T).  ((#(bs) ≤ n) 
⇒ bag-no-repeats(bag(T) List+;bag-parts(eq;bs)))
6. u : T
7. v : T List
8. (#(v) ≤ n) 
⇒ bag-no-repeats(bag(T) List+;bag-parts(eq;v))
⊢ (#(u.v) ≤ n) 
⇒ bag-no-repeats(bag(T) List+;bag-parts(eq;u.v))
BY
{ (Auto THEN D -2) }
1
.....antecedent..... 
1. T : Type
2. valueall-type(T)
3. eq : EqDecider(T)
4. n : ℕ
5. ∀n:ℕn. ∀bs:bag(T).  ((#(bs) ≤ n) 
⇒ bag-no-repeats(bag(T) List+;bag-parts(eq;bs)))
6. u : T
7. v : T List
8. #(u.v) ≤ n
⊢ #(v) ≤ n
2
1. T : Type
2. valueall-type(T)
3. eq : EqDecider(T)
4. n : ℕ
5. ∀n:ℕn. ∀bs:bag(T).  ((#(bs) ≤ n) 
⇒ bag-no-repeats(bag(T) List+;bag-parts(eq;bs)))
6. u : T
7. v : T List
8. #(u.v) ≤ n
9. bag-no-repeats(bag(T) List+;bag-parts(eq;v))
⊢ bag-no-repeats(bag(T) List+;bag-parts(eq;u.v))
Latex:
Latex:
1.  T  :  Type
2.  valueall-type(T)
3.  eq  :  EqDecider(T)
4.  n  :  \mBbbN{}
5.  \mforall{}n:\mBbbN{}n.  \mforall{}bs:bag(T).    ((\#(bs)  \mleq{}  n)  {}\mRightarrow{}  bag-no-repeats(bag(T)  List\msupplus{};bag-parts(eq;bs)))
6.  u  :  T
7.  v  :  T  List
8.  (\#(v)  \mleq{}  n)  {}\mRightarrow{}  bag-no-repeats(bag(T)  List\msupplus{};bag-parts(eq;v))
\mvdash{}  (\#(u.v)  \mleq{}  n)  {}\mRightarrow{}  bag-no-repeats(bag(T)  List\msupplus{};bag-parts(eq;u.v))
By
Latex:
(Auto  THEN  D  -2)
Home
Index