Nuprl Lemma : three-cs-archive-invariant

[V:Type]
  ∀eq:EqDecider(V). ∀A:Id List. ∀t:ℕ+. ∀f:(V List) ─→ V.
    ((∀vs:V List. (f vs ∈ vs) supposing ||vs|| ≥ )
     (∀s:ts-reachable(three-consensus-ts(V;A;t;f)). ∀v:V. ∀a:{a:Id| (a ∈ A)} . ∀n:ℤ. ∀L:consensus-rcv(V;A) List.
          (L ≤ a
           archive-condition(V;A;t;f;n;v;L)
           (∃a∈A. (||s a|| ≥ ) ∧ (hd(s a) Init[v] ∈ consensus-rcv(V;A))))))


Proof




Definitions occuring in Statement :  three-consensus-ts: three-consensus-ts(V;A;t;f) archive-condition: archive-condition(V;A;t;f;n;v;L) cs-initial-rcv: Init[v] consensus-rcv: consensus-rcv(V;A) Id: Id deq: EqDecider(T) iseg: l1 ≤ l2 l_exists: (∃x∈L. P[x]) l_member: (x ∈ l) hd: hd(l) length: ||as|| list: List nat_plus: + uimplies: supposing a uall: [x:A]. B[x] ge: i ≥  all: x:A. B[x] implies:  Q and: P ∧ Q set: {x:A| B[x]}  apply: a function: x:A ─→ B[x] natural_number: $n int: universe: Type equal: t ∈ T ts-reachable: ts-reachable(ts)
Lemmas :  ge_wf length_wf l_member_wf hd_wf exists_wf Id_wf consensus-rcv_wf cs-initial-rcv_wf l_exists_iff l_exists_wf decidable__equal_Id subtype_base_sq atom2_subtype_base list_wf list-cases length_of_nil_lemma list_ind_nil_lemma length_of_cons_lemma reduce_hd_cons_lemma equal-wf-base-T product_subtype_list list_ind_cons_lemma append_wf cons_wf nil_wf length_nil non_neg_length length_wf_nil length_cons length_wf_nat length_append subtype_rel_list top_wf iff_weakening_equal member_wf and_wf equal_wf iseg_wf iseg-append-one sq_stable_from_decidable archive-condition_wf squash_wf true_wf nat_wf nat_plus_subtype_nat archive-condition-append-init subtype_rel_self sq_stable__l_member cons_neq_nil decidable__le false_wf not-ge-2 sq_stable__le condition-implies-le minus-add minus-one-mul add-swap add-associates add-commutes add_functionality_wrt_le add-zero le-add-cancel2 archive-condition-append-vote cs-rcv-vote_wf values-for-distinct_wf id-deq_wf subtype_rel-deq set_wf votes-from-inning_wf subtract_wf listp_properties assert_of_lt_int assert_wf lt_int_wf member-values-for-distinct2 member-votes-from-inning not-le-2 less-iff-le zero-add minus-minus le-add-cancel le_wf member_append member_singleton or_wf pi2_wf three-cs-vote-invariant
\mforall{}[V:Type]
    \mforall{}eq:EqDecider(V).  \mforall{}A:Id  List.  \mforall{}t:\mBbbN{}\msupplus{}.  \mforall{}f:(V  List)  {}\mrightarrow{}  V.
        ((\mforall{}vs:V  List.  (f  vs  \mmember{}  vs)  supposing  ||vs||  \mgeq{}  1  )
        {}\mRightarrow{}  (\mforall{}s:ts-reachable(three-consensus-ts(V;A;t;f)).  \mforall{}v:V.  \mforall{}a:\{a:Id|  (a  \mmember{}  A)\}  .  \mforall{}n:\mBbbZ{}.
                \mforall{}L:consensus-rcv(V;A)  List.
                    (L  \mleq{}  s  a
                    {}\mRightarrow{}  archive-condition(V;A;t;f;n;v;L)
                    {}\mRightarrow{}  (\mexists{}a\mmember{}A.  (||s  a||  \mgeq{}  1  )  \mwedge{}  (hd(s  a)  =  Init[v])))))



Date html generated: 2015_07_17-AM-11_53_15
Last ObjectModification: 2015_07_16-AM-10_12_24

Home Index