Step * of Lemma update-alist_wf

[A,T:Type]. ∀[eq:EqDecider(T)]. ∀[x:T]. ∀[L:(T × A) List]. ∀[z:A]. ∀[f:A ⟶ A].
  (update-alist(eq;L;x;z;v.f[v]) ∈ (T × A) List)
BY
(Auto THEN Unfold `update-alist` THEN (ListInd (-3) THEN Reduce 0) THEN Try (D -3) THEN Reduce THEN Auto) }


Latex:


Latex:
\mforall{}[A,T:Type].  \mforall{}[eq:EqDecider(T)].  \mforall{}[x:T].  \mforall{}[L:(T  \mtimes{}  A)  List].  \mforall{}[z:A].  \mforall{}[f:A  {}\mrightarrow{}  A].
    (update-alist(eq;L;x;z;v.f[v])  \mmember{}  (T  \mtimes{}  A)  List)


By


Latex:
(Auto
  THEN  Unfold  `update-alist`  0
  THEN  (ListInd  (-3)  THEN  Reduce  0)
  THEN  Try  (D  -3)
  THEN  Reduce  0
  THEN  Auto)




Home Index