---

Step * 2 2 2 2 of Lemma simple-loc-comb-3-concat-es-sv


1. Info : Type
2. es : EO+(Info)
3. A : Type
4. B : Type
5. C : Type
6. F : Id ─→ A ─→ B ─→ C ─→ bag(Top)
7. X : EClass(A)
8. Y : EClass(B)
9. Z : EClass(C)
10. ∀i:Id. ∀a:A. ∀b:B. ∀c:C.  (#(F i a b c) ≤ 1)
11. ∀e:E. (#(X es e) ≤ 1)
12. ∀e:E. (#(Y es e) ≤ 1)
13. ∀e:E. (#(Z es e) ≤ 1)
14. e : E@i
15. #(X es e) ≤ 1
16. #(X es e) = 1 ∈ ℤ
17. single-valued-bag(X es e;A)
18. X es e ~ {only(X es e)}
19. #(Y es e) ≤ 1
20. #(Y es e) = 1 ∈ ℤ
21. single-valued-bag(Y es e;B)
22. Y es e ~ {only(Y es e)}
23. #(Z es e) ≤ 1
24. #(Z es e) = 1 ∈ ℤ
25. single-valued-bag(Z es e;C)
26. Z es e ~ {only(Z es e)}
27. #(F loc(e) only(X es e) only(Y es e) only(Z es e)) ≤ 1
28. #(F loc(e) only(X es e) only(Y es e) only(Z es e)) = 1 ∈ ℤ
⊢ #(bag-union({F loc(e) only(X es e) only(Y es e) only(Z es e)})) ≤ 1
BY
{ ((FLemma `bag-size-one` [-1] THENA Auto)
   THEN RWO "-1" 0
   THEN RepUR ``single-bag bag-union concat bag-size`` 0
   THEN Auto)⋅ }

---

Latex:

---

Latex:

1.  Info  :  Type
2.  es  :  EO+(Info)
3.  A  :  Type
4.  B  :  Type
5.  C  :  Type
6.  F  :  Id  {}\mrightarrow{}  A  {}\mrightarrow{}  B  {}\mrightarrow{}  C  {}\mrightarrow{}  bag(Top)
7.  X  :  EClass(A)
8.  Y  :  EClass(B)
9.  Z  :  EClass(C)
10.  \mforall{}i:Id.  \mforall{}a:A.  \mforall{}b:B.  \mforall{}c:C.    (\#(F  i  a  b  c)  \mleq{}  1)
11.  \mforall{}e:E.  (\#(X  es  e)  \mleq{}  1)
12.  \mforall{}e:E.  (\#(Y  es  e)  \mleq{}  1)
13.  \mforall{}e:E.  (\#(Z  es  e)  \mleq{}  1)
14.  e  :  E@i
15.  \#(X  es  e)  \mleq{}  1
16.  \#(X  es  e)  =  1
17.  single-valued-bag(X  es  e;A)
18.  X  es  e  \msim{}  \{only(X  es  e)\}
19.  \#(Y  es  e)  \mleq{}  1
20.  \#(Y  es  e)  =  1
21.  single-valued-bag(Y  es  e;B)
22.  Y  es  e  \msim{}  \{only(Y  es  e)\}
23.  \#(Z  es  e)  \mleq{}  1
24.  \#(Z  es  e)  =  1
25.  single-valued-bag(Z  es  e;C)
26.  Z  es  e  \msim{}  \{only(Z  es  e)\}
27.  \#(F  loc(e)  only(X  es  e)  only(Y  es  e)  only(Z  es  e))  \mleq{}  1
28.  \#(F  loc(e)  only(X  es  e)  only(Y  es  e)  only(Z  es  e))  =  1
\mvdash{}  \#(bag-union(\{F  loc(e)  only(X  es  e)  only(Y  es  e)  only(Z  es  e)\}))  \mleq{}  1


By

---

Latex:
((FLemma  `bag-size-one`  [-1]  THENA  Auto)
  THEN  RWO  "-1"  0
  THEN  RepUR  ``single-bag  bag-union  concat  bag-size``  0
  THEN  Auto)\mcdot{}

---

Home Index