Step * 1 1 1 1 1 1 of Lemma poset_functor_extend-extends

.....wf..... 
1. SmallCategory
2. Cname List
3. name-morph(I;[]) ⟶ cat-ob(C)
4. i:nameset(I) ⟶ c:{c:name-morph(I;[])| (c i) 0 ∈ ℕ2}  ⟶ (cat-arrow(C) (L c) (L flip(c;i)))
5. nameset(I)
6. name-morph(I;[])
7. (c i) 0 ∈ ℕ2
8. filter(λx.((c =z 0) ∧b (flip(c;i) =z 1));I) ∈ {x:nameset(I)| ↑((c =z 0) ∧b (flip(c;i) =z 1))}  List
9. filter(λx.((c =z 0) ∧b (flip(c;i) =z 1));I) [] ∈ ({x:nameset(I)| ↑((c =z 0) ∧b (flip(c;i) =z 1))}  List)
⊢ I ∈ nameset(I) List
BY
(Unfold `nameset` THEN Auto) }


Latex:


Latex:
.....wf..... 
1.  C  :  SmallCategory
2.  I  :  Cname  List
3.  L  :  name-morph(I;[])  {}\mrightarrow{}  cat-ob(C)
4.  E  :  i:nameset(I)  {}\mrightarrow{}  c:\{c:name-morph(I;[])|  (c  i)  =  0\}    {}\mrightarrow{}  (cat-arrow(C)  (L  c)  (L  flip(c;i)))
5.  i  :  nameset(I)
6.  c  :  name-morph(I;[])
7.  (c  i)  =  0
8.  filter(\mlambda{}x.((c  x  =\msubz{}  0)  \mwedge{}\msubb{}  (flip(c;i)  x  =\msubz{}  1));I)  \mmember{}  \{x:nameset(I)| 
                                                                                                            \muparrow{}((c  x  =\msubz{}  0)  \mwedge{}\msubb{}  (flip(c;i)  x  =\msubz{}  1))\}    List
9.  filter(\mlambda{}x.((c  x  =\msubz{}  0)  \mwedge{}\msubb{}  (flip(c;i)  x  =\msubz{}  1));I)  =  []
\mvdash{}  I  \mmember{}  nameset(I)  List


By


Latex:
(Unfold  `nameset`  0  THEN  Auto)




Home Index