Nuprl Lemma : three-cs-safety1

∀[V:Type]. ∀[eq:EqDecider(V)]. ∀[A:Id List]. ∀[t:ℕ+].
  (∀[f:(V List) ⟶ V]
     ∀[v,w:V]. ∀[s,s':ts-reachable(three-consensus-ts(V;A;t;f))].
       (v = w ∈ V) supposing 
          (three-cs-decided(V;A;t;f;s';w) and 
          three-cs-decided(V;A;t;f;s;v) and 
          (s (ts-rel(three-consensus-ts(V;A;t;f))^*) s')) 
     supposing ∀vs:V List. ∀v:V.
                 ((||vs|| = ((2 * t) + 1) ∈ ℤ)
                 ⇒ ((t + 1) ≤ ||filter(λx.(eqof(eq) x v);vs)||)
                 ⇒ ((f vs) = v ∈ V))) supposing 
     ((||A|| = ((3 * t) + 1) ∈ ℤ) and 
     no_repeats(Id;A))


Proof




Definitions occuring in Statement :  three-cs-decided: three-cs-decided(V;A;t;f;s;v),  three-consensus-ts: three-consensus-ts(V;A;t;f),  Id: Id,  no_repeats: no_repeats(T;l),  length: ||as||,  filter: filter(P;l),  list: T List,  eqof: eqof(d),  deq: EqDecider(T),  rel_star: R^*,  nat_plus: ℕ+,  uimplies: b supposing a,  uall: ∀[x:A]. B[x],  infix_ap: x f y,  le: A ≤ B,  all: ∀x:A. B[x],  implies: P ⇒ Q,  apply: f a,  lambda: λx.A[x],  function: x:A ⟶ B[x],  multiply: n * m,  add: n + m,  natural_number: $n,  int: ℤ,  universe: Type,  equal: s = t ∈ T,  ts-reachable: ts-reachable(ts),  ts-rel: ts-rel(ts),  ts-type: ts-type(ts)
Definitions unfolded in proof :  uall: ∀[x:A]. B[x],  member: t ∈ T,  uimplies: b supposing a,  all: ∀x:A. B[x],  subtype_rel: A ⊆r B,  ts-reachable: ts-reachable(ts),  three-consensus-ts: three-consensus-ts(V;A;t;f),  ts-type: ts-type(ts),  pi1: fst(t),  prop: ℙ,  so_lambda: λ2x.t[x],  so_apply: x[s],  implies: P ⇒ Q,  nat_plus: ℕ+,  infix_ap: x f y,  three-cs-decided: three-cs-decided(V;A;t;f;s;v),  exists: ∃x:A. B[x],  and: P ∧ Q,  cand: A c∧ B,  l_all: (∀x∈L.P[x]),  int_seg: {i..j-},  guard: {T},  iff: P ⇐⇒ Q,  rev_implies: P ⇐ Q,  lelt: i ≤ j < k,  decidable: Dec(P),  or: P ∨ Q,  satisfiable_int_formula: satisfiable_int_formula(fmla),  false: False,  not: ¬A,  top: Top,  so_lambda: λ2x y.t[x; y],  so_apply: x[s1;s2],  refl: Refl(T;x,y.E[x; y]),  trans: Trans(T;x,y.E[x; y]),  label: ...$L... t,  iseg: l1 ≤ l2,  ts-rel: ts-rel(ts),  rel_implies: R1 => R2,  pi2: snd(t),  nat: ℕ,  Id: Id,  sq_type: SQType(T),  ts-stable-rel: ts-stable-rel(ts;x,y.R[x; y]),  ge: i ≥ j ,  less_than: a < b,  squash: ↓T,  less_than': less_than'(a;b),  cons: [a / b],  archive-condition: archive-condition(V;A;t;f;n;v;L),  le: A ≤ B,  subtract: n - m,  eqof: eqof(d),  uiff: uiff(P;Q),  deq: EqDecider(T),  inject: Inj(A;B;f),  sq_stable: SqStable(P),  no_repeats: no_repeats(T;l),  true: True,  two-intersection: two-intersection(A;W),  compat: l1 || l2

Latex:
\mforall{}[V:Type].  \mforall{}[eq:EqDecider(V)].  \mforall{}[A:Id  List].  \mforall{}[t:\mBbbN{}\msupplus{}].
    (\mforall{}[f:(V  List)  {}\mrightarrow{}  V]
          \mforall{}[v,w:V].  \mforall{}[s,s':ts-reachable(three-consensus-ts(V;A;t;f))].
              (v  =  w)  supposing 
                    (three-cs-decided(V;A;t;f;s';w)  and 
                    three-cs-decided(V;A;t;f;s;v)  and 
                    (s  (ts-rel(three-consensus-ts(V;A;t;f))\^{}*)  s')) 
          supposing  \mforall{}vs:V  List.  \mforall{}v:V.
                                  ((||vs||  =  ((2  *  t)  +  1))
                                  {}\mRightarrow{}  ((t  +  1)  \mleq{}  ||filter(\mlambda{}x.(eqof(eq)  x  v);vs)||)
                                  {}\mRightarrow{}  ((f  vs)  =  v)))  supposing 
          ((||A||  =  ((3  *  t)  +  1))  and 
          no\_repeats(Id;A))



Date html generated: 2016_05_16-PM-00_47_51
Last ObjectModification: 2016_01_17-PM-08_02_35

Theory : event-ordering


Home Index