Nuprl Lemma : consensus-refinement4

[V:Type]
  ((v1,v2:V.  Dec(v1 = v2))
   (v,v':V. ((v = v')))
   (A:Id List. W:{a:Id| (a  A)}  List List.
        (((1 < ||W||)  two-intersection(A;W))
         ts-refinement(consensus-ts4(V;A;W);consensus-ts5(V;A;W);s.(fst(s))))))


Proof not projected




Definitions occuring in Statement :  consensus-ts5: consensus-ts5(V;A;W),  two-intersection: two-intersection(A;W),  consensus-ts4: consensus-ts4(V;A;W),  Id: Id,  length: ||as||,  decidable: Dec(P),  uall: [x:A]. B[x],  pi1: fst(t),  all: x:A. B[x],  exists: x:A. B[x],  not: A,  implies: P  Q,  and: P  Q,  less_than: a < b,  set: {x:A| B[x]} ,  lambda: x.A[x],  list: type List,  natural_number: $n,  universe: Type,  equal: s = t,  l_member: (x  l),  ts-refinement: ts-refinement(ts1;ts2;f)
Definitions :  uall: [x:A]. B[x],  implies: P  Q,  all: x:A. B[x],  and: P  Q,  ts-refinement: ts-refinement(ts1;ts2;f),  member: t  T,  prop: ,  so_lambda: x.t[x],  consensus-ts4: consensus-ts4(V;A;W),  ts-rel: ts-rel(ts),  ts-init: ts-init(ts),  pi1: fst(t),  consensus-ts5: consensus-ts5(V;A;W),  pi2: snd(t),  btrue: tt,  bfalse: ff,  reduce: reduce(f;k;as),  deq-member: deq-member(eq;x;L),  ifthenelse: if b then t else f fi ,  consensus-state4: ConsensusState,  eqof: eqof(d),  guard: {T},  bor: p q,  Id: Id,  exists: x:A. B[x],  infix_ap: x f y,  consensus-rel: CR[x,y],  fpf-empty: ,  cs-inning: Inning(s;a),  cs-estimate: Estimate(s;a),  or: P  Q,  fpf-domain: fpf-domain(f),  cand: A c B,  top: Top,  ts-type: ts-type(ts),  true: True,  uimplies: b supposing a,  squash: T,  subtype: S  T,  cs-knowledge: Knowledge(x;a),  iff: P  Q,  rev_implies: P  Q,  so_apply: x[s],  unit: Unit,  bool: ,  false: False,  decidable: Dec(P),  uiff: uiff(P;Q),  sq_type: SQType(T),  not: A,  l_contains: A  B,  consensus-rel-add-knowledge-step: consensus-rel-add-knowledge-step(V;A;W;x1;x2;y1;y2;a),  consensus-rel-knowledge-archive-step: consensus-rel-knowledge-archive-step(V;A;W;x1;x2;y1;y2;a),  consensus-rel-knowledge-inning-step: consensus-rel-knowledge-inning-step(V;A;W;x1;x2;y1;y2;a),  consensus-rel-knowledge-step: consensus-rel-knowledge-step(V;A;W;x1;x2;y1;y2;a),  consensus-rel-knowledge: consensus-rel-knowledge(V;A;W;x;y),  ts-reachable: ts-reachable(ts),  cs-knowledge-precondition: may consider v in inning i based on knowledge (s),  le: A  B,  it: ,  eq_id: a = b
Lemmas :  and_wf,  less_than_wf,  length_wf,  Id_wf,  l_member_wf,  two-intersection_wf,  exists_wf,  not_wf,  equal_wf,  all_wf,  decidable_wf,  l_contains_wf,  not_functionality_wrt_iff,  assert_of_bnot,  eqff_to_assert,  assert-deq-member,  eqtt_to_assert,  iff_weakening_uiff,  iff_transitivity,  bnot_wf,  assert_wf,  bool_wf,  id-deq_wf,  deq-member_wf,  consensus-rel_wf,  fpf-empty_wf,  consensus-state4_wf,  rel_star_weakening,  nil_member,  l_contains_cons,  rel_star_transitivity,  ifthenelse_wf,  fpf_wf,  bor_wf,  eqof_wf,  decidable__l_member,  decidable__equal_Id,  eq_id_wf,  not_functionality_wrt_uiff,  assert-eq-id,  uiff_transitivity,  atom2_subtype_base,  subtype_base_sq,  rel_rel_star,  pi1_wf_top,  top_wf,  or_wf,  strong-subtype-deq-subtype,  strong-subtype-set3,  strong-subtype-self,  list-set-type2,  cs-precondition_wf,  fpf-join_wf,  fpf-single_wf,  int-deq_wf,  band_wf,  assert_of_bor,  or_functionality_wrt_iff,  assert_functionality_wrt_uiff,  bnot_thru_bor,  assert_of_band,  and_functionality_wrt_iff,  l_contains_weakening,  rel_star_wf,  ts-type_wf,  ts-reachable_wf,  consensus-ts5_wf,  ts-rel_wf,  subtype-top,  subtype-fpf2,  cs-estimate_wf,  fpf-domain_wf,  cs-inning_wf,  int_subtype_base,  false_wf,  assert_witness,  subtype_rel_simple_product,  subtype_rel_self,  subtype_rel_function,  fpf-dom_wf,  le_wf,  fpf-ap_wf,  consensus-ts5-true-knowledge,  true_wf,  squash_wf,  member_wf,  Error :pi2_wf,  pair_wf,  mk_fpf_wf,  pair_eta_rw

\mforall{}[V:Type]
    ((\mforall{}v1,v2:V.    Dec(v1  =  v2))
    {}\mRightarrow{}  (\mexists{}v,v':V.  (\mneg{}(v  =  v')))
    {}\mRightarrow{}  (\mforall{}A:Id  List.  \mforall{}W:\{a:Id|  (a  \mmember{}  A)\}    List  List.
                (((1  <  ||W||)  \mwedge{}  two-intersection(A;W))
                {}\mRightarrow{}  ts-refinement(consensus-ts4(V;A;W);consensus-ts5(V;A;W);\mlambda{}s.(fst(s))))))


Date html generated: 2012_01_23-PM-12_06_45
Last ObjectModification: 2011_12_31-AM-11_09_42

Home Index