Step
*
of Lemma
member-fset-remove
∀[T:Type]. ∀[eq:EqDecider(T)]. ∀[s:fset(T)]. ∀[x,y:T].  uiff(x ∈ fset-remove(eq;y;s);x ∈ s ∧ (¬(x = y ∈ T)))
BY
{ ((UnivCD THENA Auto)
   THEN Unfold `fset-remove` 0
   THEN (RWO "member-fset-filter" 0 THENM (Unfold `guard` 0 THEN RW assert_pushdownC 0))
   THEN Auto
   THEN Unfold `eqof` 0
   THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[eq:EqDecider(T)].  \mforall{}[s:fset(T)].  \mforall{}[x,y:T].
    uiff(x  \mmember{}  fset-remove(eq;y;s);x  \mmember{}  s  \mwedge{}  (\mneg{}(x  =  y)))
By
Latex:
((UnivCD  THENA  Auto)
  THEN  Unfold  `fset-remove`  0
  THEN  (RWO  "member-fset-filter"  0  THENM  (Unfold  `guard`  0  THEN  RW  assert\_pushdownC  0))
  THEN  Auto
  THEN  Unfold  `eqof`  0
  THEN  Auto)
Home
Index