Step * 3 of Lemma cubical-term-subtype-cubical-subset

.....wf..... 
1. fset(β„•)
2. psi : π”½(I)
3. {formal-cube(I) βŠ’ _}
4. I@0:fset(β„•) βŸΆ a:formal-cube(I)(I@0) βŸΆ T(a)
5. βˆ€I@0,J:fset(β„•). βˆ€f:J βŸΆ I@0. βˆ€a:formal-cube(I)(I@0).  ((x I@0 f) (x f(a)) βˆˆ T(f(a)))
6. I@0:fset(β„•) βŸΆ a:I,psi(I@0) βŸΆ T(a)
⊒ βˆ€I@0,J:fset(β„•). βˆ€f:J βŸΆ I@0. βˆ€a:I,psi(I@0).  ((u I@0 f) (u f(a)) βˆˆ T(f(a))) βˆˆ Type
BY
((Assert βŒœ{formal-cube(I) βŠ’ _} βŠ†{I,psi βŠ’ _}βŒβ‹… THENA Auto)
   THEN MoveToConcl (-2)
   THEN (GenConcl βŒœX βˆˆ {I,psi βŠ’ _}βŒβ‹… THENA Auto)
   THEN Thin (-1)
   THEN MoveToConcl (-1)
   THEN (GenConcl βŒœI,psi Y βˆˆ CubicalSetβŒβ‹… THENA Auto)
   THEN All Thin
   THEN Auto) }


Latex:


Latex:
.....wf..... 
1.  I  :  fset(\mBbbN{})
2.  psi  :  \mBbbF{}(I)
3.  T  :  \{formal-cube(I)  \mvdash{}  \_\}
4.  x  :  I@0:fset(\mBbbN{})  {}\mrightarrow{}  a:formal-cube(I)(I@0)  {}\mrightarrow{}  T(a)
5.  \mforall{}I@0,J:fset(\mBbbN{}).  \mforall{}f:J  {}\mrightarrow{}  I@0.  \mforall{}a:formal-cube(I)(I@0).    ((x  I@0  a  a  f)  =  (x  J  f(a)))
6.  u  :  I@0:fset(\mBbbN{})  {}\mrightarrow{}  a:I,psi(I@0)  {}\mrightarrow{}  T(a)
\mvdash{}  \mforall{}I@0,J:fset(\mBbbN{}).  \mforall{}f:J  {}\mrightarrow{}  I@0.  \mforall{}a:I,psi(I@0).    ((u  I@0  a  a  f)  =  (u  J  f(a)))  \mmember{}  Type


By


Latex:
((Assert  \mkleeneopen{}\{formal-cube(I)  \mvdash{}  \_\}  \msubseteq{}r  \{I,psi  \mvdash{}  \_\}\mkleeneclose{}\mcdot{}  THENA  Auto)
  THEN  MoveToConcl  (-2)
  THEN  (GenConcl  \mkleeneopen{}T  =  X\mkleeneclose{}\mcdot{}  THENA  Auto)
  THEN  Thin  (-1)
  THEN  MoveToConcl  (-1)
  THEN  (GenConcl  \mkleeneopen{}I,psi  =  Y\mkleeneclose{}\mcdot{}  THENA  Auto)
  THEN  All  Thin
  THEN  Auto)




Home Index