---

Step * of Lemma pscm-swap_wf

No Annotations
∀[C:SmallCategory]. ∀[G:ps_context{j:l}(C)]. ∀[A,B:{G ⊢ _}].
  (pscm-swap(G;A;B) ∈ psc_map{[i | j]:l}(C; G.A.(B)p; G.B.(A)p))
BY
{ (ProveWfLemma
   THEN (InstLemma `pscm-ap-term_wf` [⌜parm{i}⌝;⌜parm{i|j}⌝;⌜C⌝;⌜G.A.(B)p⌝;⌜G.A⌝;⌜(A)p⌝;⌜p⌝;⌜q⌝]⋅ THENA Auto)
   THEN (Subst' ((A)p)p+ ~ ((A)p)p 0 THENA PscmUnfolding)
   THEN Auto) }

---

Latex:

---

Latex:
No  Annotations
\mforall{}[C:SmallCategory].  \mforall{}[G:ps\_context\{j:l\}(C)].  \mforall{}[A,B:\{G  \mvdash{}  \_\}].
    (pscm-swap(G;A;B)  \mmember{}  psc\_map\{[i  |  j]:l\}(C;  G.A.(B)p;  G.B.(A)p))


By

---

Latex:
(ProveWfLemma
  THEN  (InstLemma  `pscm-ap-term\_wf`  [\mkleeneopen{}parm\{i\}\mkleeneclose{};\mkleeneopen{}parm\{i|j\}\mkleeneclose{};\mkleeneopen{}C\mkleeneclose{};\mkleeneopen{}G.A.(B)p\mkleeneclose{};\mkleeneopen{}G.A\mkleeneclose{};\mkleeneopen{}(A)p\mkleeneclose{};\mkleeneopen{}p\mkleeneclose{};\mkleeneopen{}q\mkleeneclose{}]\mcdot{}
              THENA  Auto
              )
  THEN  (Subst'  ((A)p)p+  \msim{}  ((A)p)p  0  THENA  PscmUnfolding)
  THEN  Auto)

---

Home Index