---

Step * 2 1 of Lemma filter-equals

.....truecase..... 
1. [T] : Type
2. P : T ⟶ 𝔹
3. u : T
4. v : T List
5. ∀L2:T List
     (filter(P;v) = L2 ∈ (T List)
        ⇐⇒ (∀x:T. ((x ∈ L2) ⇐⇒ (x ∈ v) ∧ (↑(P x)))) ∧ (∀x,y:T.  (x before y ∈ L2 ⇒ x before y ∈ v))) supposing 
        (no_repeats(T;L2) and 
        no_repeats(T;v))
6. ↑(P u)
⊢ ∀L2:T List
    ([u / filter(P;v)] = L2 ∈ (T List)
       ⇐⇒ (∀x:T. ((x ∈ L2) ⇐⇒ (x ∈ [u / v]) ∧ (↑(P x))))
           ∧ (∀x,y:T.  (x before y ∈ L2 ⇒ x before y ∈ [u / v]))) supposing 
       (no_repeats(T;L2) and 
       no_repeats(T;[u / v]))
BY
{ ((D 0 THENA Auto) THEN (D (-1)))⋅ }

1
1. [T] : Type
2. P : T ⟶ 𝔹
3. u : T
4. v : T List
5. ∀L2:T List
     (filter(P;v) = L2 ∈ (T List)
        ⇐⇒ (∀x:T. ((x ∈ L2) ⇐⇒ (x ∈ v) ∧ (↑(P x)))) ∧ (∀x,y:T.  (x before y ∈ L2 ⇒ x before y ∈ v))) supposing 
        (no_repeats(T;L2) and 
        no_repeats(T;v))
6. ↑(P u)
⊢ ([u / filter(P;v)] = [] ∈ (T List)
     ⇐⇒ (∀x:T. ((x ∈ []) ⇐⇒ (x ∈ [u / v]) ∧ (↑(P x))))
         ∧ (∀x,y:T.  (x before y ∈ [] ⇒ x before y ∈ [u / v]))) supposing 
     (no_repeats(T;[]) and 
     no_repeats(T;[u / v]))

2
1. [T] : Type
2. P : T ⟶ 𝔹
3. u : T
4. v : T List
5. ∀L2:T List
     (filter(P;v) = L2 ∈ (T List)
        ⇐⇒ (∀x:T. ((x ∈ L2) ⇐⇒ (x ∈ v) ∧ (↑(P x)))) ∧ (∀x,y:T.  (x before y ∈ L2 ⇒ x before y ∈ v))) supposing 
        (no_repeats(T;L2) and 
        no_repeats(T;v))
6. ↑(P u)
7. u1 : T
8. v1 : T List
⊢ ([u / filter(P;v)] = [u1 / v1] ∈ (T List)
     ⇐⇒ (∀x:T. ((x ∈ [u1 / v1]) ⇐⇒ (x ∈ [u / v]) ∧ (↑(P x))))
         ∧ (∀x,y:T.  (x before y ∈ [u1 / v1] ⇒ x before y ∈ [u / v]))) supposing 
     (no_repeats(T;[u1 / v1]) and 
     no_repeats(T;[u / v]))

---

Latex:

---

Latex:
.....truecase..... 
1.  [T]  :  Type
2.  P  :  T  {}\mrightarrow{}  \mBbbB{}
3.  u  :  T
4.  v  :  T  List
5.  \mforall{}L2:T  List
          (filter(P;v)  =  L2
                \mLeftarrow{}{}\mRightarrow{}  (\mforall{}x:T.  ((x  \mmember{}  L2)  \mLeftarrow{}{}\mRightarrow{}  (x  \mmember{}  v)  \mwedge{}  (\muparrow{}(P  x))))
                        \mwedge{}  (\mforall{}x,y:T.    (x  before  y  \mmember{}  L2  {}\mRightarrow{}  x  before  y  \mmember{}  v)))  supposing 
                (no\_repeats(T;L2)  and 
                no\_repeats(T;v))
6.  \muparrow{}(P  u)
\mvdash{}  \mforall{}L2:T  List
        ([u  /  filter(P;v)]  =  L2
              \mLeftarrow{}{}\mRightarrow{}  (\mforall{}x:T.  ((x  \mmember{}  L2)  \mLeftarrow{}{}\mRightarrow{}  (x  \mmember{}  [u  /  v])  \mwedge{}  (\muparrow{}(P  x))))
                      \mwedge{}  (\mforall{}x,y:T.    (x  before  y  \mmember{}  L2  {}\mRightarrow{}  x  before  y  \mmember{}  [u  /  v])))  supposing 
              (no\_repeats(T;L2)  and 
              no\_repeats(T;[u  /  v]))


By

---

Latex:
((D  0  THENA  Auto)  THEN  (D  (-1)))\mcdot{}

---

Home Index