Step
*
1
1
of Lemma
rsc4-validity-property
1. Cmd : {T:Type| valueall-type(T)}
2. cmdeq : EqDecider(Cmd)
3. locs : bag(Id)
4. clients : bag(Id)
5. coeff : {2...}
6. flrs : 
7. es : EO'
8. StandardAssumptions(rsc4_Main) es
9. e : E
10. 
e1:E
((e1 < e)
((v:
Cmd. (v 
rsc4_decided'base(Cmd)(e1) (
e':E. ((e' < e1) 
v rsc4_propose'base(Cmd)(e')))))
(v: Cmd Id
(v rsc4_vote'base(Cmd)(e1)
(e':E. ((e' < e1) <fst(fst(fst(v))), snd(fst(v))> rsc4_propose'base(Cmd)(e')))))
(v: Cmd
(v rsc4_retry'base(Cmd)(e1)
(e':E. ((e' < e1) <fst(fst(v)), snd(v)> rsc4_propose'base(Cmd)(e')))))
(e2:E
(e2 c
e1
(cs:Cmd List. L:Id List. n,rnd:. c:Cmd.
(<cs, L> rsc4_QuorumState(Cmd) <n, rnd>(e1)
(c cs)
(e':E. ((e' < e1) <n, c> rsc4_propose'base(Cmd)(e')))))))))
11. n :
12. c2 : Cmd
13. <n, c2> rsc4_decided'base(Cmd)(e)
14. e' : E
15. (e' < e)
16. loc(e') locs
17. loc(e) = loc(e')
18. e1 : {e1:E| e1 loc e' }
19. a :
20. a2 :
21. b2 : List
22. <a2, b2> Memory-class(rsc4_update_replica(Cmd);rsc4_init() <0, []>;rsc4_Proposal(Cmd))(e1)
23. (a2 < a) 
(a b2)
24. c1 : Cmd
25. True
26. <a, c1> Base([propose]; Cmd)(e1)
(b1:. b3:Id. <<<a, b1>, c1>, b3> Base(``rsc4 vote``; Cmd Id)(e1))
27. b1 :
28. cmd : Cmd
29. loc : Id
30. <<<n, b1>, cmd>, loc> Base(``rsc4 vote``; Cmd Id)(e')
31. cs : Cmd List
32. ||cs|| = (coeff * flrs)
33. (fst(poss-maj(cmdeq;[cmd / cs];cmd))) = ((coeff * flrs) + 1)
34. c2 = (snd(poss-maj(cmdeq;[cmd / cs];cmd)))
35. L : Id List
36. <cs, L> rsc4_QuorumState(Cmd) <a, 0>(e')
37. 
(rsc4_newvote(Cmd) <a, 0> <<<n, b1>, cmd>, loc> <cs, L>)
38. (no rsc4_Quorum(Cmd;cmdeq;coeff;flrs) <a, 0> between e1 and e')
e':E. ((e' < e) <n, c2> rsc4_propose'base(Cmd)(e'))
BY
{ (Assert (c2 = cmd) (c2 cs) BY
((InstLemma `poss-maj-member` [
Cmd
;cmdeq;[cmd / cs];cmd]
THENA Auto)
THEN (RWO "cons_member" (-1) THEN Auto)
THEN D -1
THEN Try (Complete ((OrLeft THEN Auto)))
THEN (RWO "cons_member" (-1) THEN Auto))) }
1
1. Cmd : {T:Type| valueall-type(T)}
2. cmdeq : EqDecider(Cmd)
3. locs : bag(Id)
4. clients : bag(Id)
5. coeff : {2...}
6. flrs :
7. es : EO'
8. StandardAssumptions(rsc4_Main) es
9. e : E
10. e1:E
((e1 < e)
((v: Cmd. (v rsc4_decided'base(Cmd)(e1) (e':E. ((e' < e1) v rsc4_propose'base(Cmd)(e')))))
(v: Cmd Id
(v rsc4_vote'base(Cmd)(e1)
(e':E. ((e' < e1) <fst(fst(fst(v))), snd(fst(v))> rsc4_propose'base(Cmd)(e')))))
(v: Cmd
(v rsc4_retry'base(Cmd)(e1)
(e':E. ((e' < e1) <fst(fst(v)), snd(v)> rsc4_propose'base(Cmd)(e')))))
(e2:E
(e2 c e1
(cs:Cmd List. L:Id List. n,rnd:. c:Cmd.
(<cs, L> rsc4_QuorumState(Cmd) <n, rnd>(e1)
(c cs)
(e':E. ((e' < e1) <n, c> rsc4_propose'base(Cmd)(e')))))))))
11. n :
12. c2 : Cmd
13. <n, c2> rsc4_decided'base(Cmd)(e)
14. e' : E
15. (e' < e)
16. loc(e') locs
17. loc(e) = loc(e')
18. e1 : {e1:E| e1 loc e' }
19. a :
20. a2 :
21. b2 : List
22. <a2, b2> Memory-class(rsc4_update_replica(Cmd);rsc4_init() <0, []>;rsc4_Proposal(Cmd))(e1)
23. (a2 < a) (a b2)
24. c1 : Cmd
25. True
26. <a, c1> Base([propose]; Cmd)(e1)
(b1:. b3:Id. <<<a, b1>, c1>, b3> Base(``rsc4 vote``; Cmd Id)(e1))
27. b1 :
28. cmd : Cmd
29. loc : Id
30. <<<n, b1>, cmd>, loc> Base(``rsc4 vote``; Cmd Id)(e')
31. cs : Cmd List
32. ||cs|| = (coeff * flrs)
33. (fst(poss-maj(cmdeq;[cmd / cs];cmd))) = ((coeff * flrs) + 1)
34. c2 = (snd(poss-maj(cmdeq;[cmd / cs];cmd)))
35. L : Id List
36. <cs, L> rsc4_QuorumState(Cmd) <a, 0>(e')
37. (rsc4_newvote(Cmd) <a, 0> <<<n, b1>, cmd>, loc> <cs, L>)
38. (no rsc4_Quorum(Cmd;cmdeq;coeff;flrs) <a, 0> between e1 and e')
39. (c2 = cmd) (c2 cs)
e':E. ((e' < e) <n, c2> rsc4_propose'base(Cmd)(e'))
1. Cmd : \{T:Type| valueall-type(T)\}
2. cmdeq : EqDecider(Cmd)
3. locs : bag(Id)
4. clients : bag(Id)
5. coeff : \{2...\}
6. flrs : \mBbbN{}
7. es : EO'
8. StandardAssumptions(rsc4\_Main) es
9. e : E
10. \mforall{}e1:E
((e1 < e)
{}\mRightarrow{} ((\mforall{}v:\mBbbZ{} \mtimes{} Cmd
(v \mmember{} rsc4\_decided'base(Cmd)(e1)
{}\mRightarrow{} (\mdownarrow{}\mexists{}e':E. ((e' < e1) \mwedge{} v \mmember{} rsc4\_propose'base(Cmd)(e')))))
\mwedge{} (\mforall{}v:\mBbbZ{} \mtimes{} \mBbbZ{} \mtimes{} Cmd \mtimes{} Id
(v \mmember{} rsc4\_vote'base(Cmd)(e1)
{}\mRightarrow{} (\mdownarrow{}\mexists{}e':E
((e' < e1) \mwedge{} <fst(fst(fst(v))), snd(fst(v))> \mmember{} rsc4\_propose'base(Cmd)(e')))))
\mwedge{} (\mforall{}v:\mBbbZ{} \mtimes{} \mBbbZ{} \mtimes{} Cmd
(v \mmember{} rsc4\_retry'base(Cmd)(e1)
{}\mRightarrow{} (\mdownarrow{}\mexists{}e':E. ((e' < e1) \mwedge{} <fst(fst(v)), snd(v)> \mmember{} rsc4\_propose'base(Cmd)(e')))))
\mwedge{} (\mforall{}e2:E
(e2 c\mleq{} e1
{}\mRightarrow{} (\mforall{}cs:Cmd List. \mforall{}L:Id List. \mforall{}n,rnd:\mBbbZ{}. \mforall{}c:Cmd.
(<cs, L> \mmember{} rsc4\_QuorumState(Cmd) <n, rnd>(e1)
{}\mRightarrow{} (c \mmember{} cs)
{}\mRightarrow{} (\mdownarrow{}\mexists{}e':E. ((e' < e1) \mwedge{} <n, c> \mmember{} rsc4\_propose'base(Cmd)(e')))))))))
11. n : \mBbbZ{}
12. c2 : Cmd
13. <n, c2> \mmember{} rsc4\_decided'base(Cmd)(e)
14. e' : E
15. (e' < e)
16. loc(e') \mdownarrow{}\mmember{} locs
17. loc(e) = loc(e')
18. e1 : \{e1:E| e1 \mleq{}loc e' \}
19. a : \mBbbZ{}
20. a2 : \mBbbZ{}
21. b2 : \mBbbZ{} List
22. <a2, b2> \mmember{} Memory-class(rsc4\_update\_replica(Cmd);rsc4\_init() ɘ, []>rsc4\_Proposal(Cmd))(e1)
23. (a2 < a) \mvee{} (a \mmember{} b2)
24. c1 : Cmd
25. True
26. <a, c1> \mmember{} Base([propose];\mBbbZ{} \mtimes{} Cmd)(e1)
\mvee{} (\mexists{}b1:\mBbbZ{}. \mexists{}b3:Id. <<<a, b1>, c1>, b3> \mmember{} Base(``rsc4 vote``;\mBbbZ{} \mtimes{} \mBbbZ{} \mtimes{} Cmd \mtimes{} Id)(e1))
27. b1 : \mBbbZ{}
28. cmd : Cmd
29. loc : Id
30. <<<n, b1>, cmd>, loc> \mmember{} Base(``rsc4 vote``;\mBbbZ{} \mtimes{} \mBbbZ{} \mtimes{} Cmd \mtimes{} Id)(e')
31. cs : Cmd List
32. ||cs|| = (coeff * flrs)
33. (fst(poss-maj(cmdeq;[cmd / cs];cmd))) = ((coeff * flrs) + 1)
34. c2 = (snd(poss-maj(cmdeq;[cmd / cs];cmd)))
35. L : Id List
36. <cs, L> \mmember{} rsc4\_QuorumState(Cmd) <a, 0>(e')
37. \muparrow{}(rsc4\_newvote(Cmd) <a, 0> <<<n, b1>, cmd>, loc> <cs, L>)
38. (no rsc4\_Quorum(Cmd;cmdeq;coeff;flrs) <a, 0> between e1 and e')
\mvdash{} \mdownarrow{}\mexists{}e':E. ((e' < e) \mwedge{} <n, c2> \mmember{} rsc4\_propose'base(Cmd)(e'))
By
(Assert (c2 = cmd) \mvee{} (c2 \mmember{} cs) BY
((InstLemma `poss-maj-member` [\mkleeneopen{}Cmd\mkleeneclose{};\mkleeneopen{}cmdeq\mkleeneclose{};\mkleeneopen{}[cmd / cs]\mkleeneclose{};\mkleeneopen{}cmd\mkleeneclose{}]\mcdot{} THENA Auto)
THEN (RWO "cons\_member" (-1) THEN Auto)
THEN D -1
THEN Try (Complete ((OrLeft THEN Auto)))
THEN (RWO "cons\_member" (-1) THEN Auto)\mcdot{}))
Home
Index