---

Step * 1 of Lemma compat-iff-common-iseg


1. [T] : Type
2. l1 : T List@i
3. l2 : T List@i
4. l1 || l2@i
⊢ ∃l:T List. (l1 ≤ l ∧ l2 ≤ l)
BY
{ (((D (-1)) THENL [(InstConcl [⌜l2⌝])⋅; (InstConcl [⌜l1⌝])⋅]) THEN Auto THEN BLemma `iseg_weakening` THEN Auto) }

---

Latex:

---

Latex:

1.  [T]  :  Type
2.  l1  :  T  List@i
3.  l2  :  T  List@i
4.  l1  ||  l2@i
\mvdash{}  \mexists{}l:T  List.  (l1  \mleq{}  l  \mwedge{}  l2  \mleq{}  l)


By

---

Latex:
(((D  (-1))  THENL  [(InstConcl  [\mkleeneopen{}l2\mkleeneclose{}])\mcdot{};  (InstConcl  [\mkleeneopen{}l1\mkleeneclose{}])\mcdot{}])
  THEN  Auto
  THEN  BLemma  `iseg\_weakening`
  THEN  Auto)

---

Home Index