Step * 2 1 1 of Lemma lnk-decls-compatible


1. l1 IdLnk
2. l2 IdLnk
3. Id List
4. d3 tg:{tg:Id| (tg ∈ d)}  ─→ Type
5. d4 Id List
6. d5 tg:{tg:Id| (tg ∈ d4)}  ─→ Type
7. (l1 l2 ∈ IdLnk)  <d, d3> || <d4, d5>
8. Knd@i
9. Id
10. (y ∈ d)
11. rcv(l1,y) ∈ Knd
12. y1 Id
13. (y1 ∈ d4)
14. rcv(l2,y1) ∈ Knd
⊢ l1 l2 ∈ IdLnk
BY
((HypSubst' (-4) (-1)) THEN (FLemma `rcv_one_one` [(-1)]) THEN Auto) }


Latex:



1.  l1  :  IdLnk
2.  l2  :  IdLnk
3.  d  :  Id  List
4.  d3  :  tg:\{tg:Id|  (tg  \mmember{}  d)\}    {}\mrightarrow{}  Type
5.  d4  :  Id  List
6.  d5  :  tg:\{tg:Id|  (tg  \mmember{}  d4)\}    {}\mrightarrow{}  Type
7.  (l1  =  l2)  {}\mRightarrow{}  <d,  d3>  ||  <d4,  d5>
8.  x  :  Knd@i
9.  y  :  Id
10.  (y  \mmember{}  d)
11.  x  =  rcv(l1,y)
12.  y1  :  Id
13.  (y1  \mmember{}  d4)
14.  x  =  rcv(l2,y1)
\mvdash{}  l1  =  l2


By

((HypSubst'  (-4)  (-1))  THEN  (FLemma  `rcv\_one\_one`  [(-1)])  THEN  Auto)




Home Index