Step * 2 of Lemma Wleq-Wadd3


1. [A] Type
2. [B] A ⟶ Type
3. zero A ⟶ 𝔹
4. ∀a:A. (¬↑(zero a) ⇐⇒ B[a])
5. A
6. B[a] ⟶ W(A;a.B[a])
7. ∀b:B[a]. ∀w2:W(A;a.B[a]).  ((f b) ≤  (f w2))
8. a@0 A
9. ¬↑(zero a@0)
10. f@0 B[a@0] ⟶ W(A;a.B[a])
11. ∀b:B[a@0]. ∀x:B[a].  ((f x) <  (Wsup(a;f) f@0 b))
12. B[a]
⊢ ∃x@0:B[a@0]. ((f x) ≤  (Wsup(a;f) f@0 x@0))
BY
Assert ⌜B[a@0]⌝⋅ }

1
.....assertion..... 
1. [A] Type
2. [B] A ⟶ Type
3. zero A ⟶ 𝔹
4. ∀a:A. (¬↑(zero a) ⇐⇒ B[a])
5. A
6. B[a] ⟶ W(A;a.B[a])
7. ∀b:B[a]. ∀w2:W(A;a.B[a]).  ((f b) ≤  (f w2))
8. a@0 A
9. ¬↑(zero a@0)
10. f@0 B[a@0] ⟶ W(A;a.B[a])
11. ∀b:B[a@0]. ∀x:B[a].  ((f x) <  (Wsup(a;f) f@0 b))
12. B[a]
⊢ B[a@0]

2
1. [A] Type
2. [B] A ⟶ Type
3. zero A ⟶ 𝔹
4. ∀a:A. (¬↑(zero a) ⇐⇒ B[a])
5. A
6. B[a] ⟶ W(A;a.B[a])
7. ∀b:B[a]. ∀w2:W(A;a.B[a]).  ((f b) ≤  (f w2))
8. a@0 A
9. ¬↑(zero a@0)
10. f@0 B[a@0] ⟶ W(A;a.B[a])
11. ∀b:B[a@0]. ∀x:B[a].  ((f x) <  (Wsup(a;f) f@0 b))
12. B[a]
13. B[a@0]
⊢ ∃x@0:B[a@0]. ((f x) ≤  (Wsup(a;f) f@0 x@0))


Latex:


Latex:

1.  [A]  :  Type
2.  [B]  :  A  {}\mrightarrow{}  Type
3.  zero  :  A  {}\mrightarrow{}  \mBbbB{}
4.  \mforall{}a:A.  (\mneg{}\muparrow{}(zero  a)  \mLeftarrow{}{}\mRightarrow{}  B[a])
5.  a  :  A
6.  f  :  B[a]  {}\mrightarrow{}  W(A;a.B[a])
7.  \mforall{}b:B[a].  \mforall{}w2:W(A;a.B[a]).    ((f  b)  \mleq{}    (f  b  +  w2))
8.  a@0  :  A
9.  \mneg{}\muparrow{}(zero  a@0)
10.  f@0  :  B[a@0]  {}\mrightarrow{}  W(A;a.B[a])
11.  \mforall{}b:B[a@0].  \mforall{}x:B[a].    ((f  x)  <    (Wsup(a;f)  +  f@0  b))
12.  x  :  B[a]
\mvdash{}  \mexists{}x@0:B[a@0].  ((f  x)  \mleq{}    (Wsup(a;f)  +  f@0  x@0))


By


Latex:
Assert  \mkleeneopen{}B[a@0]\mkleeneclose{}\mcdot{}




Home Index