Step
*
1
of Lemma
iseg-append-one
1. [T] : Type
2. L1 : T List
3. L2 : T List
4. x : T
5. L1 ≤ L2 @ [x]
⊢ L1 ≤ L2 ∨ (L1 = (L2 @ [x]) ∈ (T List))
BY
{ ((RWO "iseg_append_iff" (-1) THENA Auto) THEN ParallelLast THEN ExRepD) }
1
1. T : Type
2. L1 : T List
3. L2 : T List
4. x : T
5. l : T List
6. 0 < ||l||
7. L1 = (L2 @ l) ∈ (T List)
8. l ≤ [x]
⊢ L1 = (L2 @ [x]) ∈ (T List)
Latex:
Latex:
1.  [T]  :  Type
2.  L1  :  T  List
3.  L2  :  T  List
4.  x  :  T
5.  L1  \mleq{}  L2  @  [x]
\mvdash{}  L1  \mleq{}  L2  \mvee{}  (L1  =  (L2  @  [x]))
By
Latex:
((RWO  "iseg\_append\_iff"  (-1)  THENA  Auto)  THEN  ParallelLast  THEN  ExRepD)
Home
Index