---

Step * 1 1 1 of Lemma consensus-reachable

.....assertion..... 
1. [V] : Type
2. ∀v1,v2:V.  Dec(v1 = v2 ∈ V)@i
3. {∃v,v':V. (¬(v = v' ∈ V))}@i
4. A : Id List@i
5. W : {a:Id| (a ∈ A)}  List List@i
6. three-intersection(A;W)@i
7. two-intersection(A;W)
8. one-intersection(A;W)
9. ws : {a:Id| (a ∈ A)}  List@i
10. (ws ∈ W)@i
11. ∃a:{a:Id| (a ∈ A)} . (a ∈ ws)
12. 0 < ||ws||
13. x : ts-reachable(consensus-ts4(V;A;W))@i
14. x ∈ ConsensusState
⊢ ∃i:ℤ
   ∃x':ConsensusState
    ((x ((λx,y. CR(in ws)[x, y] )^*) x')
    ∧ (∀a:{a:Id| (a ∈ A)} . ((a ∈ ws) ⇒ ((Inning(x';a) = i ∈ ℤ) ∧ (¬(i ∈ fpf-domain(Estimate(x';a))))))))
BY
{ ((InstLemma `imax-list_wf` [⌈map(λa.Inning(x;a);ws)⌉]⋅ THENA (Auto THEN RWO "length-map" 0 THEN Auto))
   THEN (InstConcl[⌈imax-list(map(λa.Inning(x;a);ws)) + 1⌉]⋅ THENA Auto)
   ) }

1
1. [V] : Type
2. ∀v1,v2:V.  Dec(v1 = v2 ∈ V)@i
3. {∃v,v':V. (¬(v = v' ∈ V))}@i
4. A : Id List@i
5. W : {a:Id| (a ∈ A)}  List List@i
6. three-intersection(A;W)@i
7. two-intersection(A;W)
8. one-intersection(A;W)
9. ws : {a:Id| (a ∈ A)}  List@i
10. (ws ∈ W)@i
11. ∃a:{a:Id| (a ∈ A)} . (a ∈ ws)
12. 0 < ||ws||
13. x : ts-reachable(consensus-ts4(V;A;W))@i
14. x ∈ ConsensusState
15. imax-list(map(λa.Inning(x;a);ws)) ∈ ℤ
⊢ ∃x':ConsensusState
   ((x ((λx,y. CR(in ws)[x, y] )^*) x')
   ∧ (∀a:{a:Id| (a ∈ A)} 
        ((a ∈ ws)
        ⇒ ((Inning(x';a) = (imax-list(map(λa.Inning(x;a);ws)) + 1) ∈ ℤ)
           ∧ (¬(imax-list(map(λa.Inning(x;a);ws)) + 1 ∈ fpf-domain(Estimate(x';a))))))))

---

Latex:


.....assertion..... 
1.  [V]  :  Type
2.  \mforall{}v1,v2:V.    Dec(v1  =  v2)@i
3.  \{\mexists{}v,v':V.  (\mneg{}(v  =  v'))\}@i
4.  A  :  Id  List@i
5.  W  :  \{a:Id|  (a  \mmember{}  A)\}    List  List@i
6.  three-intersection(A;W)@i
7.  two-intersection(A;W)
8.  one-intersection(A;W)
9.  ws  :  \{a:Id|  (a  \mmember{}  A)\}    List@i
10.  (ws  \mmember{}  W)@i
11.  \mexists{}a:\{a:Id|  (a  \mmember{}  A)\}  .  (a  \mmember{}  ws)
12.  0  <  ||ws||
13.  x  :  ts-reachable(consensus-ts4(V;A;W))@i
14.  x  \mmember{}  ConsensusState
\mvdash{}  \mexists{}i:\mBbbZ{}
      \mexists{}x':ConsensusState
        ((x  rel\_star(ConsensusState;  \mlambda{}x,y.  CR(in  ws)[x,  y]  )  x')
        \mwedge{}  (\mforall{}a:\{a:Id|  (a  \mmember{}  A)\} 
                  ((a  \mmember{}  ws)  {}\mRightarrow{}  ((Inning(x';a)  =  i)  \mwedge{}  (\mneg{}(i  \mmember{}  fpf-domain(Estimate(x';a))))))))


By

((InstLemma  `imax-list\_wf`  [\mkleeneopen{}map(\mlambda{}a.Inning(x;a);ws)\mkleeneclose{}]\mcdot{}
    THENA  (Auto  THEN  RWO  "length-map"  0  THEN  Auto)
    )
  THEN  (InstConcl[\mkleeneopen{}imax-list(map(\mlambda{}a.Inning(x;a);ws))  +  1\mkleeneclose{}]\mcdot{}  THENA  Auto)
  )

---

Home Index