{ [T,Info:Type]. [X:EClass(T)]. [es:EO+(Info)]. [e:E]. [v:T].
    uiff(v  Prior(X)(e);e':E
                           ((es-p-local-pred(es;e'.(w:T. w  X(e'))) e e')
                            v  X(e'))) }

{ Proof }



Definitions occuring in Statement :  primed-class: Prior(X) classrel: v  X(e) eclass: EClass(A[eo; e]) event-ordering+: EO+(Info) es-p-local-pred: es-p-local-pred(es;P) es-E: E uiff: uiff(P;Q) uall: [x:A]. B[x] exists: x:A. B[x] squash: T and: P  Q apply: f a lambda: x.A[x] universe: Type
Definitions :  isect: x:A. B[x] uall: [x:A]. B[x] universe: Type so_lambda: x y.t[x; y] eclass: EClass(A[eo; e]) event-ordering+: EO+(Info) event_ordering: EO es-E: E primed-class: Prior(X) classrel: v  X(e) product: x:A  B[x] exists: x:A. B[x] squash: T es-p-local-pred: es-p-local-pred(es;P) apply: f a and: P  Q uiff: uiff(P;Q) so_lambda: x.t[x] uimplies: b supposing a set: {x:A| B[x]}  member: t  T equal: s = t lambda: x.A[x] union: left + right top: Top es-local-pred: last(P) lt_int: i <z j natural_number: $n bag-size: bag-size(bs) inl: inl x  function: x:A  B[x] bag: bag(T) quotient: x,y:A//B[x; y] record+: record+ dep-isect: Error :dep-isect,  prop: bag-member: bag-member(T;x;bs) true: True all: x:A. B[x] subtype_rel: A r B less_than: a < b not: A ge: i  j  le: A  B strong-subtype: strong-subtype(A;B) assert: b ifthenelse: if b then t else f fi  decide: case b of inl(x) =s[x] | inr(y) =t[y] eq_atom: eq_atom$n(x;y) eq_atom: x =a y record-select: r.x subtype: S  T cand: A c B or: P  Q sq_exists: x:{A| B[x]} implies: P  Q es-locl: (e <loc e') nat: int: grp_car: |g| real: bool: fpf: a:A fp-B[a] es-causl: (e < e') infix_ap: x f y void: Void pair: <a, b> tactic: Error :tactic,  CollapseTHENA: Error :CollapseTHENA,  CollapseTHEN: Error :CollapseTHEN,  Unfold: Error :Unfold,  Auto: Error :Auto,  inhabited-classrel: inhabited-classrel(eo;T;X;e)
Lemmas :  es-local-pred-iff-es-p-local-pred bool_wf bag_wf nat_wf bag-size_wf lt_int_wf member_wf es-locl_wf not_wf assert_wf es-local-pred_wf top_wf prior-classrel uall_wf eclass_wf event-ordering+_inc event-ordering+_wf es-p-local-pred_wf es-E_wf squash_wf primed-class_wf classrel_wf uiff_wf

\mforall{}[T,Info:Type].  \mforall{}[X:EClass(T)].  \mforall{}[es:EO+(Info)].  \mforall{}[e:E].  \mforall{}[v:T].
    uiff(v  \mmember{}  Prior(X)(e);\mdownarrow{}\mexists{}e':E.  ((es-p-local-pred(es;\mlambda{}e'.(\mdownarrow{}\mexists{}w:T.  w  \mmember{}  X(e')))  e  e')  \mwedge{}  v  \mmember{}  X(e')))


Date html generated: 2011_08_17-PM-06_23_28
Last ObjectModification: 2011_06_11-AM-01_49_47

Home Index