Step * 2 of Lemma apply-alist-count-repeats


1. Type
2. eq EqDecider(T)
3. T
⊢ apply-alist(eq;count-repeats([],eq);x) if x ∈b [] then inl ||filter(λy.(eq x);[])|| else inr ⋅  fi  ∈ (ℕ+?)
BY
(RepUR ``count-repeats apply-alist`` THEN Auto)⋅ }


Latex:


Latex:

1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  x  :  T
\mvdash{}  apply-alist(eq;count-repeats([],eq);x)
=  if  x  \mmember{}\msubb{}  []  then  inl  ||filter(\mlambda{}y.(eq  y  x);[])||  else  inr  \mcdot{}    fi 


By


Latex:
(RepUR  ``count-repeats  apply-alist``  0  THEN  Auto)\mcdot{}




Home Index