---

Step * 1 1 1 2 1 1 1 1 of Lemma consensus-refinement4


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. 1 < ||W||@i
7. two-intersection(A;W)@i
8. u : Id@i
9. v : Id List@i
10. (u ∈ A)
11. v ⊆ A
12. (u ∈ v)
⊢ (λa.if a ∈b v then <0, ⊗> else <-1, ⊗> fi ) = (λa.if u = a ∨ba ∈b v then <0, ⊗> else <-1, ⊗> fi ) ∈ ConsensusState
BY
{ ((Unfold `consensus-state4` 0 THEN EqCD THEN Auto)
   THEN AutoBoolCase ⌜u = a⌝⋅
   THEN DVar `a'
   THEN SplitOnConclITE
   THEN Auto) }

---

Latex:

---

Latex:

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.  1  <  ||W||@i
7.  two-intersection(A;W)@i
8.  u  :  Id@i
9.  v  :  Id  List@i
10.  (u  \mmember{}  A)
11.  v  \msubseteq{}  A
12.  (u  \mmember{}  v)
\mvdash{}  (\mlambda{}a.if  a  \mmember{}\msubb{}  v  then  ɘ,  \motimes{}>  else  <-1,  \motimes{}>  fi  )  =  (\mlambda{}a.if  u  =  a  \mvee{}\msubb{}a  \mmember{}\msubb{}  v  then  ɘ,  \motimes{}>  else  <-1,  \motimes{}>  fi  )


By

---

Latex:
((Unfold  `consensus-state4`  0  THEN  EqCD  THEN  Auto)
  THEN  AutoBoolCase  \mkleeneopen{}u  =  a\mkleeneclose{}\mcdot{}
  THEN  DVar  `a'
  THEN  SplitOnConclITE
  THEN  Auto)

---

Home Index