Step
*
of Lemma
sub-bag_transitivity
∀[T:Type]. ∀[as,bs,cs:bag(T)].  (sub-bag(T;as;bs) 
⇒ sub-bag(T;bs;cs) 
⇒ sub-bag(T;as;cs))
BY
{ ((Unfold `sub-bag` 0 THEN Auto) THEN ExRepD THEN RenameVar `c2' (-2) THEN With ⌜c1 + c2⌝ (D 0)⋅ THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[as,bs,cs:bag(T)].    (sub-bag(T;as;bs)  {}\mRightarrow{}  sub-bag(T;bs;cs)  {}\mRightarrow{}  sub-bag(T;as;cs))
By
Latex:
((Unfold  `sub-bag`  0  THEN  Auto)
  THEN  ExRepD
  THEN  RenameVar  `c2'  (-2)
  THEN  With  \mkleeneopen{}c1  +  c2\mkleeneclose{}  (D  0)\mcdot{}
  THEN  Auto)
Home
Index