Step
*
1
3
1
of Lemma
lnk-decl-cap
1. l : IdLnk
2. dt : tg:Id fp-> Type
3. tg : Id
4. T : Type
5. ↑tg ∈ dom(dt)
⊢ ↑rcv(l,tg) ∈ dom(lnk-decl(l;dt))
BY
{ (D 2 THEN (All (\h. (Unfolds ``lnk-decl fpf-dom`` h THEN Reduce h THEN RWO "assert-deq-member" h THEN Auto)))⋅) }
Latex:
1.  l  :  IdLnk
2.  dt  :  tg:Id  fp->  Type
3.  tg  :  Id
4.  T  :  Type
5.  \muparrow{}tg  \mmember{}  dom(dt)
\mvdash{}  \muparrow{}rcv(l,tg)  \mmember{}  dom(lnk-decl(l;dt))
By
(D  2
  THEN  (All  (\mbackslash{}h.  (Unfolds  ``lnk-decl  fpf-dom``  h
                                  THEN  Reduce  h
                                  THEN  RWO  "assert-deq-member"  h
                                  THEN  Auto)))\mcdot{}
  )
Home
Index