Step
*
of Lemma
bag-in-subtype2
∀[A,B:Type].  ∀[b:bag(B)]. b ∈ bag(A) supposing ∀x:B. (x ↓∈ b 
⇒ (∃a:bag(A). x ↓∈ a)) supposing strong-subtype(A;B)
BY
{ (InstLemma `bag-in-subtype` [] THEN RepeatFor 7 (ParallelLast') THEN Auto) }
1
1. A : Type
2. B : Type
3. strong-subtype(A;B)
4. b : bag(B)
5. x : B
6. x ↓∈ b
7. ∃a:bag(A). x ↓∈ a
⊢ x ∈ A
Latex:
Latex:
\mforall{}[A,B:Type].
    \mforall{}[b:bag(B)].  b  \mmember{}  bag(A)  supposing  \mforall{}x:B.  (x  \mdownarrow{}\mmember{}  b  {}\mRightarrow{}  (\mexists{}a:bag(A).  x  \mdownarrow{}\mmember{}  a)) 
    supposing  strong-subtype(A;B)
By
Latex:
(InstLemma  `bag-in-subtype`  []  THEN  RepeatFor  7  (ParallelLast')  THEN  Auto)
Home
Index