{ 
[Info:Type]. 
[es:EO+(Info)]. 
[X:EClass(Top)]. 
[b:Top]. 
[e:E].
    (Prior(X)?b es e ~ if first(e) then b loc(e)
    if 0 <z bag-size(X es pred(e)) then X es pred(e)
    else Prior(X)?b es pred(e)
    fi ) }
{ Proof }
Definitions occuring in Statement : 
primed-class-opt: Prior(X)?b, 
eclass: EClass(A[eo; e]), 
event-ordering+: EO+(Info), 
es-pred: pred(e), 
es-first: first(e), 
es-loc: loc(e), 
es-E: E, 
lt_int: i <z j, 
ifthenelse: if b then t else f fi , 
uall:
[x:A]. B[x], 
top: Top, 
apply: f a, 
natural_number: $n, 
universe: Type, 
sqequal: s ~ t, 
bag-size: bag-size(bs)
Lemmas : 
es-E_wf, 
nat_wf, 
ge_wf, 
nat_properties, 
event-ordering+_inc, 
es-causl-swellfnd, 
event-ordering+_wf, 
top_wf, 
eclass_wf, 
subtype_base_sq, 
bag_wf, 
primed-class-opt_wf, 
le_wf, 
member_wf, 
es-causl_wf, 
bool_wf, 
eqtt_to_assert, 
assert_wf, 
not_wf, 
uiff_transitivity, 
eqff_to_assert, 
assert_of_bnot, 
bnot_wf, 
es-first_wf, 
es-local-pred_wf, 
es-locl_wf, 
ifthenelse_wf, 
assert_of_lt_int, 
bag-size_wf, 
es-pred_wf, 
assert_functionality_wrt_uiff, 
bnot_of_lt_int, 
assert_of_le_int, 
le_int_wf, 
lt_int_wf, 
es-loc_wf, 
Id_wf, 
atom2_subtype_base, 
es-loc-pred, 
es-base-E_wf, 
subtype_rel_self
\mforall{}[Info:Type].  \mforall{}[es:EO+(Info)].  \mforall{}[X:EClass(Top)].  \mforall{}[b:Top].  \mforall{}[e:E].
    (Prior(X)?b  es  e  \msim{}  if  first(e)  then  b  loc(e)
    if  0  <z  bag-size(X  es  pred(e))  then  X  es  pred(e)
    else  Prior(X)?b  es  pred(e)
    fi  )
Date html generated:
2011_08_16-PM-05_03_50
Last ObjectModification:
2011_07_22-PM-11_35_10
Home
Index