Step * of Lemma l-union-subset

[T:Type]. ∀[eq:EqDecider(T)]. ∀[as,bs:T List].  as ⋃ bs as supposing bs ⊆ as
BY
((UnivCD THENA Auto) THEN Unfold `l-union` 0) }

1
1. Type
2. eq EqDecider(T)
3. as List
4. bs List
5. bs ⊆ as
⊢ reduce(λa,L. insert(a;L);as;bs) as


Latex:


Latex:
\mforall{}[T:Type].  \mforall{}[eq:EqDecider(T)].  \mforall{}[as,bs:T  List].    as  \mcup{}  bs  \msim{}  as  supposing  bs  \msubseteq{}  as


By


Latex:
((UnivCD  THENA  Auto)  THEN  Unfold  `l-union`  0)




Home Index