Step
*
of Lemma
val-union-l-union
∀[T:Type]. ∀[eq:EqDecider(T)]. ∀[as,bs:T List].  val-union(eq;as;bs) ~ as ⋃ bs supposing valueall-type(T)
BY
{ (Auto THEN Unfolds ``val-union l-union`` 0 THEN RepeatFor 2 ((CallByValueReduce 0 THENA Auto)) THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[eq:EqDecider(T)].  \mforall{}[as,bs:T  List].
    val-union(eq;as;bs)  \msim{}  as  \mcup{}  bs  supposing  valueall-type(T)
By
Latex:
(Auto
  THEN  Unfolds  ``val-union  l-union``  0
  THEN  RepeatFor  2  ((CallByValueReduce  0  THENA  Auto))
  THEN  Auto)
Home
Index