---

Step * 1 of Lemma bag-member-lifting-loc-2


1. C : Type
2. B : Type
3. A : Type
4. f : Id ─→ A ─→ B ─→ C
5. as : bag(A)
6. bs : bag(B)
7. i : Id
8. c : C
9. c ↓∈ lifting-loc-2(f) i as bs
⊢ ↓∃a:A. ∃b:B. (a ↓∈ as ∧ b ↓∈ bs ∧ (c = (f i a b) ∈ C))
BY
{ (RepUR ``lifting-loc-2 lifting2-loc lifting-loc-gen-rev lifting-gen-rev`` (-1)
   THEN RepeatFor 3 ((RecUnfold `lifting-gen-list-rev` (-1) THEN Reduce (-1)))
   THEN RepeatFor 3 ((BagMemberD (-1) THEN SquashExRepD))
   THEN D 0
   THEN InstConcl [⌈x⌉;⌈x@0⌉]⋅
   THEN Auto) }

---

Latex:

---

Latex:

1.  C  :  Type
2.  B  :  Type
3.  A  :  Type
4.  f  :  Id  {}\mrightarrow{}  A  {}\mrightarrow{}  B  {}\mrightarrow{}  C
5.  as  :  bag(A)
6.  bs  :  bag(B)
7.  i  :  Id
8.  c  :  C
9.  c  \mdownarrow{}\mmember{}  lifting-loc-2(f)  i  as  bs
\mvdash{}  \mdownarrow{}\mexists{}a:A.  \mexists{}b:B.  (a  \mdownarrow{}\mmember{}  as  \mwedge{}  b  \mdownarrow{}\mmember{}  bs  \mwedge{}  (c  =  (f  i  a  b)))


By

---

Latex:
(RepUR  ``lifting-loc-2  lifting2-loc  lifting-loc-gen-rev  lifting-gen-rev``  (-1)
  THEN  RepeatFor  3  ((RecUnfold  `lifting-gen-list-rev`  (-1)  THEN  Reduce  (-1)))
  THEN  RepeatFor  3  ((BagMemberD  (-1)  THEN  SquashExRepD))
  THEN  D  0
  THEN  InstConcl  [\mkleeneopen{}x\mkleeneclose{};\mkleeneopen{}x@0\mkleeneclose{}]\mcdot{}
  THEN  Auto)

---

Home Index