{ [V:Type]. [A:Id List]. [t:]. [f:V List  V]. [v0:V].
  [L:consensus-rcv(V;A) List].
    (consensus-rcvs-to-consensus-events(f;t;v0;L)
     consensus-event(V;A) List  (consensus-rcv(V;A) List)) }

{ Proof }



Definitions occuring in Statement :  consensus-rcvs-to-consensus-events: consensus-rcvs-to-consensus-events(f;t;v0;L) consensus-rcv: consensus-rcv(V;A) consensus-event: consensus-event(V;A) Id: Id nat_plus: uall: [x:A]. B[x] member: t  T function: x:A  B[x] product: x:A  B[x] list: type List universe: Type
Definitions :  uall: [x:A]. B[x] member: t  T consensus-rcvs-to-consensus-events: consensus-rcvs-to-consensus-events(f;t;v0;L) so_lambda: x y.t[x; y] spreadn: let a,b,c,d,e = u in v[a; b; c; d; e] bfalse: ff append: as @ bs ifthenelse: if b then t else f fi  spreadn: spread3 prop: all: x:A. B[x] implies: P  Q btrue: tt and: P  Q nat: int_seg: {i..j} le: A  B not: A false: False lelt: i  j < k top: Top subtype: S  T so_apply: x[s1;s2] nat_plus: bool: unit: Unit iff: P  Q uimplies: b supposing a it:
Lemmas :  list_accum_wf consensus-event_wf consensus-rcv_wf nat_plus_wf Id_wf bool_wf l_member_wf append_wf bfalse_wf consensus-accum-num_wf nat_plus_properties rcv-vote?_wf iff_weakening_uiff assert_wf eqtt_to_assert rcvd-vote_wf consensus-message_wf nat_properties le_wf unit_wf ifthenelse_wf null_wf3 top_wf archive-event_wf inning-event_wf map_wf int_seg_wf length_wf1 filter_wf is-inning-event_wf upto_wf not_wf uiff_transitivity bnot_wf eqff_to_assert assert_of_bnot

\mforall{}[V:Type].  \mforall{}[A:Id  List].  \mforall{}[t:\mBbbN{}\msupplus{}].  \mforall{}[f:V  List  {}\mrightarrow{}  V].  \mforall{}[v0:V].  \mforall{}[L:consensus-rcv(V;A)  List].
    (consensus-rcvs-to-consensus-events(f;t;v0;L)
    \mmember{}  consensus-event(V;A)  List  \mtimes{}  (consensus-rcv(V;A)  List))


Date html generated: 2011_08_16-AM-10_18_16
Last ObjectModification: 2011_06_18-AM-09_07_22

Home Index