Step
*
1
3
of Lemma
member-votes-from-inning
1. V : Type
2. A : Id List@i
3. L : consensus-rcv(V;A) List@i
4. i : ℕ@i
5. b : Id@i
6. (b ∈ A)@i
7. v : V@i
8. -any : (<b, v> ∈ mapfilter(λr.let a,j,v = rcvd-vote(r) in <a, v>λr.inning(r) =z i;L))@i
9. ∀x:consensus-rcv(V;A). ((x ∈ L) c∧ (↑inning(x) =z i) ∈ Type)
10. r : consensus-rcv(V;A)@i
11. (r ∈ L) c∧ (↑inning(r) =z i)@i
⊢ let a,j,v = rcvd-vote(r) in 
  <a, v> ∈ {b:Id| (b ∈ A)}  × V
BY
{ (D -1
   THEN DVar `r'⋅
   THEN All (RepUR ``rcvd-inning-eq rcv-vote? rcvd-vote``)
   THEN Try (Trivial)
   THEN RepeatFor 2 (D (-3))
   THEN All Reduce
   THEN Auto) }
Latex:
1.  V  :  Type
2.  A  :  Id  List@i
3.  L  :  consensus-rcv(V;A)  List@i
4.  i  :  \mBbbN{}@i
5.  b  :  Id@i
6.  (b  \mmember{}  A)@i
7.  v  :  V@i
8.  -any  :  (<b,  v>  \mmember{}  mapfilter(\mlambda{}r.let  a,j,v  =  rcvd-vote(r)  in  <a,  v>\mlambda{}r.inning(r)  =\msubz{}  i;L))@i
9.  \mforall{}x:consensus-rcv(V;A).  ((x  \mmember{}  L)  c\mwedge{}  (\muparrow{}inning(x)  =\msubz{}  i)  \mmember{}  Type)
10.  r  :  consensus-rcv(V;A)@i
11.  (r  \mmember{}  L)  c\mwedge{}  (\muparrow{}inning(r)  =\msubz{}  i)@i
\mvdash{}  let  a,j,v  =  rcvd-vote(r)  in 
    <a,  v>  \mmember{}  \{b:Id|  (b  \mmember{}  A)\}    \mtimes{}  V
By
(D  -1
  THEN  DVar  `r'\mcdot{}
  THEN  All  (RepUR  ``rcvd-inning-eq  rcv-vote?  rcvd-vote``)
  THEN  Try  (Trivial)
  THEN  RepeatFor  2  (D  (-3))
  THEN  All  Reduce
  THEN  Auto)
Home
Index