Step
*
of Lemma
eclass1-disjoint-classrel
∀[Info,A,B,C:Type]. ∀[Y:EClass(A)]. ∀[X:EClass(B)]. ∀[f:Id ─→ B ─→ C]. ∀[es:EO+(Info)].
  (disjoint-classrel(es;B;X;A;Y) 
⇒ disjoint-classrel(es;C;(f o X);A;Y))
BY
{ ((UnivCD THENA Auto)
   THEN All(Unfold `disjoint-classrel`)
   THEN Auto
   THEN (InstHyp [⌈e⌉] (-2)⋅ THENA Auto)
   THEN D (-1)
   THEN Try (Complete ((OrRight THEN Auto)))
   THEN OrLeft
   THEN Auto
   THEN (D 0 THENA Auto)
   THEN MaUseClassRel (-1)
   THEN InstHyp [⌈b⌉] (-5)⋅
   THEN Auto) }
Latex:
\mforall{}[Info,A,B,C:Type].  \mforall{}[Y:EClass(A)].  \mforall{}[X:EClass(B)].  \mforall{}[f:Id  {}\mrightarrow{}  B  {}\mrightarrow{}  C].  \mforall{}[es:EO+(Info)].
    (disjoint-classrel(es;B;X;A;Y)  {}\mRightarrow{}  disjoint-classrel(es;C;(f  o  X);A;Y))
By
((UnivCD  THENA  Auto)
  THEN  All(Unfold  `disjoint-classrel`)
  THEN  Auto
  THEN  (InstHyp  [\mkleeneopen{}e\mkleeneclose{}]  (-2)\mcdot{}  THENA  Auto)
  THEN  D  (-1)
  THEN  Try  (Complete  ((OrRight  THEN  Auto)))
  THEN  OrLeft
  THEN  Auto
  THEN  (D  0  THENA  Auto)
  THEN  MaUseClassRel  (-1)
  THEN  InstHyp  [\mkleeneopen{}b\mkleeneclose{}]  (-5)\mcdot{}
  THEN  Auto)
Home
Index