Step * 2 1 2 1 1 1 of Lemma lconnects-transitive


1. IdLnk@i
2. IdLnk List@i
3. ∀q:IdLnk List. ∀i,j,k:Id.  (∃r:IdLnk List. lconnects(r;i;k)) supposing (lconnects(q;j;k) and lconnects(v;i;j))@i
4. IdLnk List@i
5. Id@i
6. Id@i
7. Id@i
8. lpath([u v])
9. ((||v|| 1) 0 ∈ ℤ (i j ∈ Id)
10. lconnects(q;j;k)
11. source(u) ∈ Id
12. destination(last([u v])) ∈ Id
13. lpath([])
14. (0 0 ∈ ℤ (destination(u) k ∈ Id)
15. (0 0 ∈ ℤ))  ((destination(u) source(hd([])) ∈ Id) ∧ (k destination(last([])) ∈ Id))
⊢ lpath([u])
BY
(Unfold `lpath` THEN Reduce THEN Auto) }


Latex:



1.  u  :  IdLnk@i
2.  v  :  IdLnk  List@i
3.  \mforall{}q:IdLnk  List.  \mforall{}i,j,k:Id.
          (\mexists{}r:IdLnk  List.  lconnects(r;i;k))  supposing  (lconnects(q;j;k)  and  lconnects(v;i;j))@i
4.  q  :  IdLnk  List@i
5.  i  :  Id@i
6.  j  :  Id@i
7.  k  :  Id@i
8.  lpath([u  /  v])
9.  ((||v||  +  1)  =  0)  {}\mRightarrow{}  (i  =  j)
10.  lconnects(q;j;k)
11.  i  =  source(u)
12.  j  =  destination(last([u  /  v]))
13.  lpath([])
14.  (0  =  0)  {}\mRightarrow{}  (destination(u)  =  k)
15.  (\mneg{}(0  =  0))  {}\mRightarrow{}  ((destination(u)  =  source(hd([])))  \mwedge{}  (k  =  destination(last([]))))
\mvdash{}  lpath([u])


By

(Unfold  `lpath`  0  THEN  Reduce  0  THEN  Auto)




Home Index