---

Step * 2 1 of Lemma remove_leading_property


1. [T] : Type
2. u : T
3. v : T List
4. ∀P:T ⟶ 𝔹. ∃xs:{x:T| ↑P[x]}  List. (v = (xs @ remove_leading(x.P[x];v)) ∈ (T List))
5. P : T ⟶ 𝔹
6. ↑P[u]
⊢ ∃xs:{x:T| ↑P[x]}  List. ([u / v] = (xs @ remove_leading(h.P[h];v)) ∈ (T List))
BY
{ ((InstHyp [⌜P⌝] (-3)⋅ THENA Auto) THEN ExRepD) }

1
1. [T] : Type
2. u : T
3. v : T List
4. ∀P:T ⟶ 𝔹. ∃xs:{x:T| ↑P[x]}  List. (v = (xs @ remove_leading(x.P[x];v)) ∈ (T List))
5. P : T ⟶ 𝔹
6. ↑P[u]
7. xs : {x:T| ↑P[x]}  List
8. v = (xs @ remove_leading(x.P[x];v)) ∈ (T List)
⊢ ∃xs:{x:T| ↑P[x]}  List. ([u / v] = (xs @ remove_leading(h.P[h];v)) ∈ (T List))

---

Latex:

---

Latex:

1.  [T]  :  Type
2.  u  :  T
3.  v  :  T  List
4.  \mforall{}P:T  {}\mrightarrow{}  \mBbbB{}.  \mexists{}xs:\{x:T|  \muparrow{}P[x]\}    List.  (v  =  (xs  @  remove\_leading(x.P[x];v)))
5.  P  :  T  {}\mrightarrow{}  \mBbbB{}
6.  \muparrow{}P[u]
\mvdash{}  \mexists{}xs:\{x:T|  \muparrow{}P[x]\}    List.  ([u  /  v]  =  (xs  @  remove\_leading(h.P[h];v)))


By

---

Latex:
((InstHyp  [\mkleeneopen{}P\mkleeneclose{}]  (-3)\mcdot{}  THENA  Auto)  THEN  ExRepD)

---

Home Index