{ [M:Type  Type]
    n2m:  pMsg(P.M[P]). l2m:Id  pMsg(P.M[P]). S:System(P.M[P]).
    env:pEnvType(P.M[P]). x:Id. n,m:.
      (run-event-state-when(pRun(S;env;n2m;l2m);<n, x>)
        run-event-state-when(pRun(S;env;n2m;l2m);<m, x>)) supposing 
         ((a:runEvents(pRun(S;env;n2m;l2m))
             ((n  run-event-step(a))  (run-event-step(a) < m)) 
             supposing run-event-loc(a) = x) and 
         (n  m)) 
    supposing Continuous+(P.M[P]) }

{ Proof }



Definitions occuring in Statement :  run-event-step: run-event-step(e) run-event-loc: run-event-loc(e) run-event-state-when: run-event-state-when(r;e) runEvents: runEvents(r) pRun: pRun(S0;env;nat2msg;loc2msg) pEnvType: pEnvType(T.M[T]) System: System(P.M[P]) pMsg: pMsg(P.M[P]) Process: Process(P.M[P]) Id: Id strong-type-continuous: Continuous+(T.F[T]) nat_plus: nat: uimplies: b supposing a uall: [x:A]. B[x] so_apply: x[s] le: A  B all: x:A. B[x] not: A and: P  Q less_than: a < b function: x:A  B[x] pair: <a, b> universe: Type equal: s = t l_contains: A  B
Definitions :  void: Void fpf-dom: x  dom(f) false: False guard: {T} pInTransit: pInTransit(P.M[P]) unit: Unit int: subtype: S  T tag-by: zT rev_implies: P  Q or: P  Q iff: P  Q labeled-graph: LabeledGraph(T) record+: record+ record: record(x.T[x]) fset: FSet{T} isect2: T1  T2 b-union: A  B union: left + right top: Top true: True fpf: a:A fp-B[a] fpf-sub: f  g deq: EqDecider(T) ma-state: State(ds) class-program: ClassProgram(T) es-E-interface: E(X) eclass: EClass(A[eo; e]) fpf-cap: f(x)?z strong-subtype: strong-subtype(A;B) ge: i  j  uiff: uiff(P;Q) ldag: LabeledDAG(T) list: type List atom: Atom$n pEnvType: pEnvType(T.M[T]) System: System(P.M[P]) pMsg: pMsg(P.M[P]) apply: f a lambda: x.A[x] subtype_rel: A r B ext-eq: A  B prop: strong-type-continuous: Continuous+(T.F[T]) set: {x:A| B[x]}  exists: x:A. B[x] l_member: (x  l) l_all: (xL.P[x]) universe: Type uall: [x:A]. B[x] function: x:A  B[x] uimplies: b supposing a isect: x:A. B[x] product: x:A  B[x] so_lambda: x.t[x] fulpRunType: fulpRunType(T.M[T]) add: n + m pair: <a, b> pRun: pRun(S0;env;nat2msg;loc2msg) run-event-state-when: run-event-state-when(r;e) so_apply: x[s] Process: Process(P.M[P]) l_contains: A  B run-event-step: run-event-step(e) less_than: a < b le: A  B and: P  Q not: A run-event-loc: run-event-loc(e) Id: Id equal: s = t implies: P  Q runEvents: runEvents(r) all: x:A. B[x] nat_plus: nat: MaAuto: Error :MaAuto,  CollapseTHEN: Error :CollapseTHEN,  pRunType: pRunType(T.M[T]) member: t  T AssertBY: Error :AssertBY,  Auto: Error :Auto,  CollapseTHENA: Error :CollapseTHENA,  RepeatFor: Error :RepeatFor,  subtract: n - m grp_car: |g| int_nzero: real: limited-type: LimitedType natural_number: $n minus: -n sq_type: SQType(T) sqequal: s ~ t Subst': Error :Subst',  tactic: Error :tactic,  length: ||as|| rationals: ParallelOp: Error :ParallelOp,  BHyp: Error :BHyp,  pi1: fst(t) eq_id: a = b pi2: snd(t) mapfilter: mapfilter(f;P;L) deliver-msg: deliver-msg(t;m;x;Cs;L) spread: spread def assert: b component: component(P.M[P]) is-dag: is-dag(g) tl: tl(l) hd: hd(l) cons: [car / cdr] map: map(f;as) in-eclass: e  X eq_knd: a = b filter: filter(P;l) decide: case b of inl(x) =s[x] | inr(y) =t[y] ifthenelse: if b then t else f fi  corec: corec(T.F[T]) process: process(P.M[P];P.E[P]) bool: nil: [] append: as @ bs intensional-universe: IType pExt: pExt(P.M[P]) so_lambda: x y.t[x; y] listp: A List combination: Combination(n;T) Com: Com(P.M[P]) add-cause: add-cause(ev;ext) lg-append: lg-append(g1;g2) Process-apply: Process-apply(P;m) list_accum: list_accum(x,a.f[x; a];y;l) lt_int: i <z j le_int: i z j bfalse: ff btrue: tt eq_lnk: a = b es-eq-E: e = e' bimplies: p  q band: p  q bor: p q bnot: b deliver-msg-to-comp: deliver-msg-to-comp(t;m;x;S;C) cand: A c B atom: Atom int_seg: {i..j} quotient: x,y:A//B[x; y] divides: b | a assoced: a ~ b set_car: |p| set_leq: a  b set_lt: a <p b grp_lt: a < b rng_car: |r| inject: Inj(A;B;f) reducible: reducible(a) prime: prime(a) squash: T l_exists: (xL. P[x]) fun-connected: y is f*(x) qle: r  s qless: r < s q-rel: q-rel(r;x) i-finite: i-finite(I) i-closed: i-closed(I) p-outcome: Outcome dstype: dstype(TypeNames; d; a) fset-member: a  s f-subset: xs  ys fset-closed: (s closed under fs) string: Error :string,  IdLnk: IdLnk Knd: Knd MaName: MaName l_disjoint: l_disjoint(T;l1;l2) consensus-state3: consensus-state3(T) cs-not-completed: in state s, a has not completed inning i cs-archived: by state s, a archived v in inning i cs-passed: by state s, a passed inning i without archiving a value cs-inning-committed: in state s, inning i has committed v cs-inning-committable: in state s, inning i could commit v  cs-archive-blocked: in state s, ws' blocks ws from archiving v in inning i cs-precondition: state s may consider v in inning i consensus-rcv: consensus-rcv(V;A) infix_ap: x f y es-E: E es-le: e loc e'  es-causle: e c e' existse-before: e<e'.P[e] existse-le: ee'.P[e] alle-lt: e<e'.P[e] alle-le: ee'.P[e] alle-between1: e[e1,e2).P[e] existse-between1: e[e1,e2).P[e] alle-between2: e[e1,e2].P[e] existse-between2: e[e1,e2].P[e] existse-between3: e(e1,e2].P[e] es-fset-loc: i  locs(s) es-r-immediate-pred: es-r-immediate-pred(es;R;e';e) same-thread: same-thread(es;p;e;e') collect-event: collect-event(es;X;n;v.num[v];L.P[L];e) cut-order: a (X;f) b path-goes-thru: x-f*-y thru i lg-edge: lg-edge(g;a;b) decidable: Dec(P) es-locl: (e <loc e') es-causl: (e < e') last: last(L) remove-repeats: remove-repeats(eq;L) select: l[i] primrec: primrec(n;b;c) it: is-run-event: is-run-event(r;t;x) decision: Decision pCom: pCom(P.M[P]) lg-size: lg-size(g) inr: inr x  lg-remove: lg-remove(g;n) comm-create: comm-create(c) create-component: create-component(t;P;x;Cs;L) comm-msg: comm-msg(c) inl: inl x  token: "$token" com-kind: com-kind(c) let: let lg-label: lg-label(g;x) eq_bool: p =b q lg-is-source: lg-is-source(g;i) lelt: i  j < k do-chosen-command: do-chosen-command(nat2msg;loc2msg;t;S;n;m;nm) outl: outl(x) spreadn: spread3 isl: isl(x) eq_atom: x =a y null: null(as) set_blt: a < b grp_blt: a < b dcdr-to-bool: [d] bl-all: (xL.P[x])_b bl-exists: (xL.P[x])_b b-exists: (i<n.P[i])_b eq_type: eq_type(T;T') eq_atom: eq_atom$n(x;y) qeq: qeq(r;s) q_less: q_less(r;s) q_le: q_le(r;s) deq-member: deq-member(eq;x;L) deq-disjoint: deq-disjoint(eq;as;bs) deq-all-disjoint: deq-all-disjoint(eq;ass;bs) eq_str: Error :eq_str,  eq_int: (i = j) RepUR: Error :RepUR,  Try: Error :Try,  Repeat: Error :Repeat,  SplitOn: Error :SplitOn,  D: Error :D,  Complete: Error :Complete,  Unfold: Error :Unfold
Lemmas :  isl_wf bfalse_wf band_wf eq_int_wf assert_of_eq_int pRun_wf2 int_seg_wf nat_plus_properties int_seg_properties lg-is-source_wf_dag lg-label_wf_dag lg-size_wf_dag bool_cases bool_subtype_base assert_of_lt_int assert_functionality_wrt_uiff bnot_of_lt_int assert_of_le_int lt_int_wf le_int_wf assert_elim assert_of_eq_atom com-kind_wf eq_atom_wf create-component_wf comm-create_wf lg-remove_wf_dag deliver-msg_wf comm-msg_wf mapfilter-contains pi1_wf atom2_subtype_base is-run-event_wf true_wf pi2_wf pExt_wf append_assoc_sq Com_wf primrec_wf isect_subtype_base member_singleton rev_implies_wf iff_wf or_functionality_wrt_iff member_append iff_transitivity l_member_subtype cons_member decidable__l_member bnot_wf assert-eq-id not_functionality_wrt_uiff assert_of_bnot uiff_transitivity eqff_to_assert iff_weakening_uiff eqtt_to_assert btrue_neq_bfalse eq_id_self btrue_wf not_assert_elim map_wf list-subtype deliver-msg-to-comp_wf list_accum_wf Process-apply_wf lg-append_wf_dag add-cause_wf bool_wf append_wf intensional-universe_wf append-nil pi1_wf_top mapfilter_wf uiff_inversion filter_wf ifthenelse_wf assert_wf eq_id_wf component_wf false_wf l_contains_transitivity subtype_base_sq int_subtype_base l_contains_weakening run-event-state-when_wf ge_wf nat_properties l_member_wf l_all_wf runEvents_wf nat_plus_wf run-event-step_wf run-event-loc_wf nat_ind_tp pRun_wf Id_wf not_wf le_wf l_contains_wf Process_wf System_wf pMsg_wf nat_wf strong-type-continuous_wf uall_wf pEnvType_wf pRunType_wf fulpRunType_wf subtype_rel_wf member_wf pInTransit_wf ldag_wf top_wf unit_wf subtype_rel_function subtype_rel_self subtype_rel_simple_product

\mforall{}[M:Type  {}\mrightarrow{}  Type]
    \mforall{}n2m:\mBbbN{}  {}\mrightarrow{}  pMsg(P.M[P]).  \mforall{}l2m:Id  {}\mrightarrow{}  pMsg(P.M[P]).  \mforall{}S:System(P.M[P]).  \mforall{}env:pEnvType(P.M[P]).  \mforall{}x:Id.
    \mforall{}n,m:\mBbbN{}\msupplus{}.
        (run-event-state-when(pRun(S;env;n2m;l2m);<n,  x>)  \msubseteq{}  run-event-state-when(pRun(S;env;n2m;l2m);<m
          ,  x
          >))  supposing 
              ((\mforall{}a:runEvents(pRun(S;env;n2m;l2m))
                      \mneg{}((n  \mleq{}  run-event-step(a))  \mwedge{}  (run-event-step(a)  <  m))  supposing  run-event-loc(a)  =  x)  and 
              (n  \mleq{}  m)) 
    supposing  Continuous+(P.M[P])


Date html generated: 2011_08_16-PM-07_02_16
Last ObjectModification: 2011_06_18-AM-11_15_56

Home Index