Step
*
2
of Lemma
psc-fst_wf
1. C : SmallCategory
2. Gamma : ps_context{j:l}(C)
3. A : {Gamma ⊢ _}
4. I : cat-ob(C)
5. J : cat-ob(C)
6. g : cat-arrow(C) J I
⊢ (λs.g(fst(s))) = (λs.(fst(g(s)))) ∈ (Gamma.A(I) ⟶ Gamma(J))
BY
{ ((EqCD THEN Auto THEN Reduce 0) THEN RepUR ``psc-adjoin`` -1 THEN Auto) }
Latex:
Latex:
1.  C  :  SmallCategory
2.  Gamma  :  ps\_context\{j:l\}(C)
3.  A  :  \{Gamma  \mvdash{}  \_\}
4.  I  :  cat-ob(C)
5.  J  :  cat-ob(C)
6.  g  :  cat-arrow(C)  J  I
\mvdash{}  (\mlambda{}s.g(fst(s)))  =  (\mlambda{}s.(fst(g(s))))
By
Latex:
((EqCD  THEN  Auto  THEN  Reduce  0)  THEN  RepUR  ``psc-adjoin``  -1  THEN  Auto)
Home
Index