---

Step * of Lemma compat-iseg-cases

∀[T:Type]. ∀L1,L2:T List.  (L1 || L2 ⇐⇒ L1 < L2 ∨ L2 < L1 ∨ (L1 = L2 ∈ (T List)))
BY
{ ((UnivCD THENA Auto)
   THEN (RWO "proper-iseg-length" 0 THENA Auto)
   THEN (Unfold `compat` 0 THEN Auto)
   THEN SplitOrHyps
   THEN Auto) }

1
1. [T] : Type
2. L1 : T List@i
3. L2 : T List@i
4. L1 ≤ L2@i
⊢ (L1 ≤ L2 ∧ ||L1|| < ||L2||) ∨ (L2 ≤ L1 ∧ ||L2|| < ||L1||) ∨ (L1 = L2 ∈ (T List))

2
1. [T] : Type
2. L1 : T List@i
3. L2 : T List@i
4. L2 ≤ L1@i
⊢ (L1 ≤ L2 ∧ ||L1|| < ||L2||) ∨ (L2 ≤ L1 ∧ ||L2|| < ||L1||) ∨ (L1 = L2 ∈ (T List))

---

Latex:

---

Latex:
\mforall{}[T:Type].  \mforall{}L1,L2:T  List.    (L1  ||  L2  \mLeftarrow{}{}\mRightarrow{}  L1  <  L2  \mvee{}  L2  <  L1  \mvee{}  (L1  =  L2))


By

---

Latex:
((UnivCD  THENA  Auto)
  THEN  (RWO  "proper-iseg-length"  0  THENA  Auto)
  THEN  (Unfold  `compat`  0  THEN  Auto)
  THEN  SplitOrHyps
  THEN  Auto)

---

Home Index