---

Step * 1 1 of Lemma or-latest-val


1. Info : Type
2. es : EO+(Info)
3. A : Type
4. B : Type
5. X : EClass(A)
6. Y : EClass(B)
7. e : E
8. ¬↑e ∈b Y
9. (↑e ∈b X) ∨ False
10. Singlevalued(X)
11. Singlevalued(Y)
12. ↑e ∈b X
⊢ only(if (#(if e ∈b Prior(Y) then {<only(X es e), only(Prior(Y) es e)>} else {} fi ) =z 1)
then {inl only(if e ∈b Prior(Y) then {<only(X es e), only(Prior(Y) es e)>} else {} fi )}
else {inr (inl only(X es e)) }
fi )
= only(if (#((Y)' es e) =z 1) then {oobboth(<X(e), only((Y)' es e)>)} else {oobleft(X(e))} fi )
∈ one_or_both(A;B)
BY
{ (Fold `in-eclass` 0 THEN RepeatFor 2 (AutoSplit)) }

1
1. Info : Type
2. es : EO+(Info)
3. A : Type
4. B : Type
5. X : EClass(A)
6. Y : EClass(B)
7. e : E
8. ¬↑e ∈b Y
9. (↑e ∈b X) ∨ False
10. Singlevalued(X)
11. Singlevalued(Y)
12. ↑e ∈b X
13. ↑e ∈b Prior(Y)
14. ↑e ∈b (Y)'
⊢ (inl <only(X es e), only(Prior(Y) es e)>) = oobboth(<X(e), only((Y)' es e)>) ∈ one_or_both(A;B)

2
1. Info : Type
2. es : EO+(Info)
3. A : Type
4. B : Type
5. X : EClass(A)
6. Y : EClass(B)
7. e : E
8. ¬↑e ∈b (Y)'
9. ¬↑e ∈b Y
10. (↑e ∈b X) ∨ False
11. Singlevalued(X)
12. Singlevalued(Y)
13. ↑e ∈b X
14. ↑e ∈b Prior(Y)
⊢ (inl <only(X es e), only(Prior(Y) es e)>) = oobleft(X(e)) ∈ one_or_both(A;B)

3
1. Info : Type
2. es : EO+(Info)
3. A : Type
4. B : Type
5. X : EClass(A)
6. Y : EClass(B)
7. e : E
8. ¬↑e ∈b Prior(Y)
9. ¬↑e ∈b Y
10. (↑e ∈b X) ∨ False
11. Singlevalued(X)
12. Singlevalued(Y)
13. ↑e ∈b X
14. ↑e ∈b (Y)'
⊢ (inr (inl only(X es e)) ) = oobboth(<X(e), only((Y)' es e)>) ∈ one_or_both(A;B)

---

Latex:

---

Latex:

1.  Info  :  Type
2.  es  :  EO+(Info)
3.  A  :  Type
4.  B  :  Type
5.  X  :  EClass(A)
6.  Y  :  EClass(B)
7.  e  :  E
8.  \mneg{}\muparrow{}e  \mmember{}\msubb{}  Y
9.  (\muparrow{}e  \mmember{}\msubb{}  X)  \mvee{}  False
10.  Singlevalued(X)
11.  Singlevalued(Y)
12.  \muparrow{}e  \mmember{}\msubb{}  X
\mvdash{}  only(if  (\#(if  e  \mmember{}\msubb{}  Prior(Y)  then  \{<only(X  es  e),  only(Prior(Y)  es  e)>\}  else  \{\}  fi  )  =\msubz{}  1)
then  \{inl  only(if  e  \mmember{}\msubb{}  Prior(Y)  then  \{<only(X  es  e),  only(Prior(Y)  es  e)>\}  else  \{\}  fi  )\}
else  \{inr  (inl  only(X  es  e))  \}
fi  )
=  only(if  (\#((Y)'  es  e)  =\msubz{}  1)  then  \{oobboth(<X(e),  only((Y)'  es  e)>)\}  else  \{oobleft(X(e))\}  fi  )


By

---

Latex:
(Fold  `in-eclass`  0  THEN  RepeatFor  2  (AutoSplit))

---

Home Index