---

Step * 1 1 of Lemma compact-union


1. [T] : Type
2. [S] : Type
3. ∀p:S ⟶ 𝔹. ((∃x:S. p x = ff) ∨ (∀x:S. p x = tt))
4. p : (T + S) ⟶ 𝔹
5. ∀x:T. p (inl x) = tt
⊢ (∃x:T + S. p x = ff) ∨ (∀x:T + S. p x = tt)
BY
{ ((With ⌜λs.(p (inr s ))⌝ (D 3)⋅ THENA Auto) THEN Reduce (-1) THEN D -1 THEN ExRepD THEN Auto) }

1
1. [T] : Type
2. [S] : Type
3. p : (T + S) ⟶ 𝔹
4. ∀x:T. p (inl x) = tt
5. ∀x:S. p (inr x ) = tt
⊢ (∃x:T + S. p x = ff) ∨ (∀x:T + S. p x = tt)

---

Latex:

---

Latex:

1.  [T]  :  Type
2.  [S]  :  Type
3.  \mforall{}p:S  {}\mrightarrow{}  \mBbbB{}.  ((\mexists{}x:S.  p  x  =  ff)  \mvee{}  (\mforall{}x:S.  p  x  =  tt))
4.  p  :  (T  +  S)  {}\mrightarrow{}  \mBbbB{}
5.  \mforall{}x:T.  p  (inl  x)  =  tt
\mvdash{}  (\mexists{}x:T  +  S.  p  x  =  ff)  \mvee{}  (\mforall{}x:T  +  S.  p  x  =  tt)


By

---

Latex:
((With  \mkleeneopen{}\mlambda{}s.(p  (inr  s  ))\mkleeneclose{}  (D  3)\mcdot{}  THENA  Auto)  THEN  Reduce  (-1)  THEN  D  -1  THEN  ExRepD  THEN  Auto)

---

Home Index