Step
*
of Lemma
list-diff-cons
∀[T:Type]. ∀[eq:EqDecider(T)]. ∀[as,bs:T List]. ∀[x:T].
  ([x / as]-bs = if x ∈b bs then as-bs else [x / as-bs] fi  ∈ (T List))
BY
{ (Unfold `list-diff` 0 THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[eq:EqDecider(T)].  \mforall{}[as,bs:T  List].  \mforall{}[x:T].
    ([x  /  as]-bs  =  if  x  \mmember{}\msubb{}  bs  then  as-bs  else  [x  /  as-bs]  fi  )
By
Latex:
(Unfold  `list-diff`  0  THEN  Auto)
Home
Index