Step * 1 1 2 1 1 1 of Lemma in-hull-sorted

.....wf..... 
1. OrientedPlane
2. xs {xs:Point List| geo-general-position(g;xs)} 
3. : ℕ||xs||
4. : ℕ||xs||
5. ¬(i j ∈ ℤ)
6. ij ∈ Hull(xs)
7. hull-cmp(g;xs;i;j) ∈ comparison({k:ℕ||xs||| (k i ∈ ℤ)) ∧ (k j ∈ ℤ))} )
8. {k:ℕ||xs||| (k i ∈ ℤ)) ∧ (k j ∈ ℤ))}  List
9. filter(λk.((¬b(k =z i)) ∧b b(k =z j)));upto(||xs||)) L ∈ ({k:ℕ||xs||| (k i ∈ ℤ)) ∧ (k j ∈ ℤ))}  List)
10. {k:ℕ||xs||| (k i ∈ ℤ)) ∧ (k j ∈ ℤ))}  List
11. sorted-by(λx,y. (0 ≤ (hull-cmp(g;xs;i;j) y));v)
12. comparison-sort(hull-cmp(g;xs;i;j);L)
v
∈ {srtd:{k:ℕ||xs||| (k i ∈ ℤ)) ∧ (k j ∈ ℤ))}  List| sorted-by(λx,y. (0 ≤ (hull-cmp(g;xs;i;j) y));srtd)} 
13. permutation({k:ℕ||xs||| (k i ∈ ℤ)) ∧ (k j ∈ ℤ))} ;v;L)
⊢ λx,y. ((¬(x y ∈ ℤ))  (↑yi)) ∈ {x:{k:ℕ||xs||| (k i ∈ ℤ)) ∧ (k j ∈ ℤ))} (x ∈ v)} 
  ⟶ {x:{k:ℕ||xs||| (k i ∈ ℤ)) ∧ (k j ∈ ℤ))} (x ∈ v)} 
  ⟶ ℙ
BY
(RepeatFor ((MemCD THENA Auto)) THEN RepeatFor (DSetVars) THEN Auto) }


Latex:


Latex:
.....wf..... 
1.  g  :  OrientedPlane
2.  xs  :  \{xs:Point  List|  geo-general-position(g;xs)\} 
3.  i  :  \mBbbN{}||xs||
4.  j  :  \mBbbN{}||xs||
5.  \mneg{}(i  =  j)
6.  ij  \mmember{}  Hull(xs)
7.  hull-cmp(g;xs;i;j)  \mmember{}  comparison(\{k:\mBbbN{}||xs|||  (\mneg{}(k  =  i))  \mwedge{}  (\mneg{}(k  =  j))\}  )
8.  L  :  \{k:\mBbbN{}||xs|||  (\mneg{}(k  =  i))  \mwedge{}  (\mneg{}(k  =  j))\}    List
9.  filter(\mlambda{}k.((\mneg{}\msubb{}(k  =\msubz{}  i))  \mwedge{}\msubb{}  (\mneg{}\msubb{}(k  =\msubz{}  j)));upto(||xs||))  =  L
10.  v  :  \{k:\mBbbN{}||xs|||  (\mneg{}(k  =  i))  \mwedge{}  (\mneg{}(k  =  j))\}    List
11.  sorted-by(\mlambda{}x,y.  (0  \mleq{}  (hull-cmp(g;xs;i;j)  x  y));v)
12.  comparison-sort(hull-cmp(g;xs;i;j);L)  =  v
13.  permutation(\{k:\mBbbN{}||xs|||  (\mneg{}(k  =  i))  \mwedge{}  (\mneg{}(k  =  j))\}  ;v;L)
\mvdash{}  \mlambda{}x,y.  ((\mneg{}(x  =  y))  {}\mRightarrow{}  (\muparrow{}x  L  yi))  \mmember{}  \{x:\{k:\mBbbN{}||xs|||  (\mneg{}(k  =  i))  \mwedge{}  (\mneg{}(k  =  j))\}  |  (x  \mmember{}  v)\} 
    {}\mrightarrow{}  \{x:\{k:\mBbbN{}||xs|||  (\mneg{}(k  =  i))  \mwedge{}  (\mneg{}(k  =  j))\}  |  (x  \mmember{}  v)\} 
    {}\mrightarrow{}  \mBbbP{}


By


Latex:
(RepeatFor  2  ((MemCD  THENA  Auto))  THEN  RepeatFor  2  (DSetVars)  THEN  Auto)




Home Index