Step
*
2
of Lemma
cu-filler-cases
1. I : Cname List
2. J : nameset(I) List
3. K : Cname List
4. x : nameset(I)
5. f : name-morph(I-[x];K)
6. i : ℕ2
7. box : open_box(c𝕌;I;J;x;i)
8. J ∈ nameset(J) List
⊢ nameset(J) ⊆r nameset(I-[x])
BY
{ TACTIC:(DVar `box'
          THEN (D 0 THENA Auto)
          THEN D -1
          THEN MemTypeCD
          THEN Try ((RW ListC 0 THEN Auto))
          THEN Auto
          THEN RW ListC 0
          THEN Auto) }
Latex:
Latex:
1.  I  :  Cname  List
2.  J  :  nameset(I)  List
3.  K  :  Cname  List
4.  x  :  nameset(I)
5.  f  :  name-morph(I-[x];K)
6.  i  :  \mBbbN{}2
7.  box  :  open\_box(c\mBbbU{};I;J;x;i)
8.  J  \mmember{}  nameset(J)  List
\mvdash{}  nameset(J)  \msubseteq{}r  nameset(I-[x])
By
Latex:
TACTIC:(DVar  `box'
                THEN  (D  0  THENA  Auto)
                THEN  D  -1
                THEN  MemTypeCD
                THEN  Try  ((RW  ListC  0  THEN  Auto))
                THEN  Auto
                THEN  RW  ListC  0
                THEN  Auto)
Home
Index