Step
*
of Lemma
remove-alist_wf
∀[A,T:Type]. ∀[eq:EqDecider(T)]. ∀[x:T]. ∀[L:(T × A) List].  (remove-alist(eq;L;x) ∈ (T × A) List)
BY
{ (Auto THEN Unfold `remove-alist` 0 THEN (ListInd (-1) THEN Reduce 0) THEN Try (CpltAuto)) }
Latex:
Latex:
\mforall{}[A,T:Type].  \mforall{}[eq:EqDecider(T)].  \mforall{}[x:T].  \mforall{}[L:(T  \mtimes{}  A)  List].    (remove-alist(eq;L;x)  \mmember{}  (T  \mtimes{}  A)  List)
By
Latex:
(Auto  THEN  Unfold  `remove-alist`  0  THEN  (ListInd  (-1)  THEN  Reduce  0)  THEN  Try  (CpltAuto))
Home
Index