---

Step * 1 2 1 1 of Lemma countable-p-union_wf


1. p : FinProbSpace
2. A : ℕ ─→ {C:(n:ℕ × (ℕn ─→ Outcome)) ─→ ℕ2| ∀s:ℕ ─→ Outcome. ∀j:ℕ. ∀i:ℕj.  ((C <i, s>) ≤ (C <j, s>))} 
3. n : ℕ@i
4. p2 : ℕn ─→ Outcome@i
5. ¬(n = 0 ∈ ℤ)
⊢ (∃b∈map(λi.(A[i] <n, p2>);upto(n)). 0 ≤ b)
BY
{ ((BLemma `l_exists_iff` THENA Auto) THEN InstConcl [⌈A[0] <n, p2>⌉]⋅ THEN Auto') }

1
1. p : FinProbSpace
2. A : ℕ ─→ {C:(n:ℕ × (ℕn ─→ Outcome)) ─→ ℕ2| ∀s:ℕ ─→ Outcome. ∀j:ℕ. ∀i:ℕj.  ((C <i, s>) ≤ (C <j, s>))} 
3. n : ℕ@i
4. p2 : ℕn ─→ Outcome@i
5. ¬(n = 0 ∈ ℤ)
⊢ (A[0] <n, p2> ∈ map(λi.(A[i] <n, p2>);upto(n)))

---

Latex:



1.  p  :  FinProbSpace
2.  A  :  \mBbbN{}  {}\mrightarrow{}  \{C:(n:\mBbbN{}  \mtimes{}  (\mBbbN{}n  {}\mrightarrow{}  Outcome))  {}\mrightarrow{}  \mBbbN{}2|  \mforall{}s:\mBbbN{}  {}\mrightarrow{}  Outcome.  \mforall{}j:\mBbbN{}.  \mforall{}i:\mBbbN{}j.    ((C  <i,  s>)  \mleq{}  (C  <j,  s>\000C))\} 
3.  n  :  \mBbbN{}@i
4.  p2  :  \mBbbN{}n  {}\mrightarrow{}  Outcome@i
5.  \mneg{}(n  =  0)
\mvdash{}  (\mexists{}b\mmember{}map(\mlambda{}i.(A[i]  <n,  p2>);upto(n)).  0  \mleq{}  b)


By

((BLemma  `l\_exists\_iff`  THENA  Auto)  THEN  InstConcl  [\mkleeneopen{}A[0]  <n,  p2>\mkleeneclose{}]\mcdot{}  THEN  Auto')

---

Home Index