{ [Info,T:Type].
    es:EO+(Info). X:EClass(T).
      [P:E(X)  T  ]
        ((e:E(X)
            (P[e;X(e)] supposing e  (X)'
             P[prior(X)(e);(X)'(e)]  P[e;X(e)] supposing e  (X)'))
         (e:E(X). P[e;X(e)])) }

{ Proof }



Definitions occuring in Statement :  es-prior-val: (X)',  es-prior-interface: prior(X),  es-E-interface: E(X),  eclass-val: X(e),  in-eclass: e  X,  eclass: EClass(A[eo; e]),  event-ordering+: EO+(Info),  assert: b,  uimplies: b supposing a,  uall: [x:A]. B[x],  prop: ,  so_apply: x[s1;s2],  all: x:A. B[x],  not: A,  implies: P  Q,  and: P  Q,  function: x:A  B[x],  universe: Type
Definitions :  uall: [x:A]. B[x],  all: x:A. B[x],  member: t  T,  so_lambda: x y.t[x; y],  prop: ,  implies: P  Q,  and: P  Q,  uimplies: b supposing a,  not: A,  assert: b,  so_apply: x[s1;s2],  so_lambda: x.t[x],  btrue: tt,  ifthenelse: if b then t else f fi ,  true: True,  false: False,  top: Top,  cand: A c B,  eclass-val: X(e),  es-prior-val: (X)',  do-apply: do-apply(f;x),  outl: outl(x),  bfalse: ff,  es-E-interface: E(X),  so_apply: x[s],  sq_type: SQType(T),  guard: {T},  iff: P  Q,  rev_implies: P  Q,  bool: ,  unit: Unit,  subtype: S  T,  it:
Lemmas :  prior-interface-induction,  eclass_wf,  es-E_wf,  event-ordering+_inc,  event-ordering+_wf,  es-E-interface_wf,  es-interface-top,  eclass-val_wf,  subtype_base_sq,  bool_wf,  bool_subtype_base,  assert_wf,  in-eclass_wf,  es-prior-interface_wf,  es-interface-subtype_rel2,  top_wf,  not_wf,  assert_witness,  eclass-val_wf2,  es-interface-val_wf2,  assert_elim,  is-prior-val,  is-prior-interface,  es-prior-val_wf,  iff_weakening_uiff,  eqtt_to_assert,  uiff_transitivity,  bnot_wf,  eqff_to_assert,  assert_of_bnot

\mforall{}[Info,T:Type].
    \mforall{}es:EO+(Info).  \mforall{}X:EClass(T).
        \mforall{}[P:E(X)  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}]
            ((\mforall{}e:E(X)
                    (P[e;X(e)]  supposing  \mneg{}\muparrow{}e  \mmember{}\msubb{}  (X)'
                    \mwedge{}  P[prior(X)(e);(X)'(e)]  {}\mRightarrow{}  P[e;X(e)]  supposing  \muparrow{}e  \mmember{}\msubb{}  (X)'))
            {}\mRightarrow{}  (\mforall{}e:E(X).  P[e;X(e)]))


Date html generated: 2011_08_16-PM-05_09_26
Last ObjectModification: 2011_06_20-AM-01_12_19

Home Index