{ [es:EO]. [e,e':E].  [e, e'] ~ [e, pred(e')] @ [e'] supposing (e <loc e') }

{ Proof }



Definitions occuring in Statement :  es-interval: [e, e'],  es-locl: (e <loc e'),  es-pred: pred(e),  es-E: E,  event_ordering: EO,  append: as @ bs,  uimplies: b supposing a,  uall: [x:A]. B[x],  cons: [car / cdr],  nil: [],  sqequal: s ~ t
Definitions :  es-le: e loc e' ,  iff: P  Q,  le: A  B,  ge: i  j ,  less_than: a < b,  limited-type: LimitedType,  btrue: tt,  uiff: uiff(P;Q),  eq_bool: p =b q,  lt_int: i <z j,  le_int: i z j,  eq_int: (i = j),  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'),  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_id: a = b,  eq_lnk: a = b,  es-eq-E: e = e',  es-bless: e <loc e',  bimplies: p  q,  band: p  q,  bor: p q,  bnot: b,  int: ,  unit: Unit,  union: left + right,  guard: {T},  bfalse: ff,  subtype_rel: A r B,  sq_type: SQType(T),  bool: ,  void: Void,  implies: P  Q,  false: False,  decide: case b of inl(x) => s[x] | inr(y) => t[y],  ifthenelse: if b then t else f fi ,  es-before: before(e),  list: type List,  es-ble: e loc e',  lambda: x.A[x],  dep-isect: Error :dep-isect,  eq_atom: x =a y,  eq_atom: eq_atom$n(x;y),  record+: record+,  set: {x:A| B[x]} ,  apply: f a,  record-select: r.x,  infix_ap: x f y,  pair: <a, b>,  universe: Type,  Id: Id,  es-causl: (e < e'),  product: x:A  B[x],  and: P  Q,  es-pred: pred(e),  append: as @ bs,  nil: [],  cons: [car / cdr],  filter: filter(P;l),  es-interval: [e, e'],  function: x:A  B[x],  all: x:A. B[x],  equal: s = t,  event_ordering: EO,  prop: ,  es-locl: (e <loc e'),  sqequal: s ~ t,  uall: [x:A]. B[x],  es-E: E,  uimplies: b supposing a,  isect: x:A. B[x],  member: t  T,  Try: Error :Try,  CollapseTHEN: Error :CollapseTHEN,  THENL_cons: Error :THENL_nil,  THENL_cons: Error :THENL_cons,  es-first: first(e),  assert: b,  not: A,  CollapseTHENA: Error :CollapseTHENA,  THENL_v2: Error :THENL,  tactic: Error :tactic,  strong-subtype: strong-subtype(A;B),  or: P  Q,  MaAuto: Error :MaAuto
Lemmas :  es-le_weakening,  assert_wf,  false_wf,  not_wf,  bnot_wf,  bool_wf,  es-first_wf,  assert_of_bnot,  eqff_to_assert,  uiff_transitivity,  eqtt_to_assert,  es-E_wf,  es-locl-first,  bool_subtype_base,  subtype_base_sq,  es-pred_wf,  es-before_wf,  es-ble_wf,  filter_append,  event_ordering_wf,  es-locl_wf,  btrue_neq_bfalse,  assert_elim,  es-le_wf,  iff_transitivity,  iff_weakening_uiff,  assert-es-ble,  not_functionality_wrt_iff

\mforall{}[es:EO].  \mforall{}[e,e':E].    [e,  e']  \msim{}  [e,  pred(e')]  @  [e']  supposing  (e  <loc  e')


Date html generated: 2011_08_16-AM-10_40_16
Last ObjectModification: 2011_06_18-AM-09_18_40

Home Index