---

Step * of Lemma iseg_single

∀[T:Type]. ∀L:T List. ∀x:T.  (L ≤ [x] ⇐⇒ (↑null(L)) ∨ (L = [x] ∈ (T List)))
BY
{ ((UnivCD THENA Auto)
   THEN (InstLemma `iseg_append_single` [⌜T⌝;⌜L⌝;⌜[]⌝;⌜x⌝]⋅ THENA Auto)
   THEN Reduce (-1)
   THEN (RWO "-1" 0 THENA Auto)
   THEN (RWO "iseg_nil" 0 THENA Auto)
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[T:Type].  \mforall{}L:T  List.  \mforall{}x:T.    (L  \mleq{}  [x]  \mLeftarrow{}{}\mRightarrow{}  (\muparrow{}null(L))  \mvee{}  (L  =  [x]))


By

---

Latex:
((UnivCD  THENA  Auto)
  THEN  (InstLemma  `iseg\_append\_single`  [\mkleeneopen{}T\mkleeneclose{};\mkleeneopen{}L\mkleeneclose{};\mkleeneopen{}[]\mkleeneclose{};\mkleeneopen{}x\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  Reduce  (-1)
  THEN  (RWO  "-1"  0  THENA  Auto)
  THEN  (RWO  "iseg\_nil"  0  THENA  Auto)
  THEN  Auto)

---

Home Index