{ 
[Info:Type]. 
[es:EO+(Info)]. 
[e:E]. 
[n:
]. 
[Z:EClass(
)].
    uiff(if e 
 ((maximum x 
 0 with x from Z))'
    then ((maximum x 
 0 with x from Z))'(e)
    else -1
    fi  
 n;
[e':E(Z)]. Z(e') 
 n supposing e' 
loc e ) 
    supposing 
e 
 Z }
{ Proof }
Definitions occuring in Statement : 
es-prior-val: (X)', 
imax-class: (maximum f[v] 
 lb with v from X), 
es-E-interface: E(X), 
eclass-val: X(e), 
in-eclass: e 
 X, 
eclass: EClass(A[eo; e]), 
event-ordering+: EO+(Info), 
es-le: e 
loc e' , 
es-E: E, 
assert:
b, 
ifthenelse: if b then t else f fi , 
nat:
, 
uiff: uiff(P;Q), 
uimplies: b supposing a, 
uall:
[x:A]. B[x], 
le: A 
 B, 
not:
A, 
minus: -n, 
natural_number: $n, 
universe: Type
Definitions : 
fpf: a:A fp-> B[a], 
strong-subtype: strong-subtype(A;B), 
record-select: r.x, 
eq_atom: x =a y, 
eq_atom: eq_atom$n(x;y), 
decide: case b of inl(x) => s[x] | inr(y) => t[y], 
ifthenelse: if b then t else f fi , 
dep-isect: Error :dep-isect, 
record+: record+, 
ge: i 
 j , 
less_than: a < b, 
product: x:A 
 B[x], 
and: P 
 Q, 
uiff: uiff(P;Q), 
subtype_rel: A 
r B, 
implies: P 
 Q, 
false: False, 
le: A 
 B, 
int:
, 
set: {x:A| B[x]} , 
top: Top, 
in-eclass: e 
 X, 
prop:
, 
assert:
b, 
not:
A, 
uimplies: b supposing a, 
lambda:
x.A[x], 
so_lambda: 
x y.t[x; y], 
eclass: EClass(A[eo; e]), 
subtype: S 
 T, 
universe: Type, 
es-E: E, 
all:
x:A. B[x], 
function: x:A 
 B[x], 
uall:
[x:A]. B[x], 
isect:
x:A. B[x], 
member: t 
 T, 
equal: s = t, 
event_ordering: EO, 
event-ordering+: EO+(Info), 
Auto: Error :Auto, 
so_lambda: 
x.t[x], 
nat:
, 
CollapseTHEN: Error :CollapseTHEN, 
tactic: Error :tactic
Lemmas : 
event-ordering+_wf, 
es-E_wf, 
event-ordering+_inc, 
not_wf, 
assert_wf, 
in-eclass_wf, 
member_wf, 
eclass_wf, 
subtype_rel_wf, 
es-interface-top, 
prior-imax-class-lb2, 
nat_wf
\mforall{}[Info:Type].  \mforall{}[es:EO+(Info)].  \mforall{}[e:E].  \mforall{}[n:\mBbbN{}].  \mforall{}[Z:EClass(\mBbbN{})].
    uiff(if  e  \mmember{}\msubb{}  ((maximum  x  \mgeq{}  0  with  x  from  Z))'
    then  ((maximum  x  \mgeq{}  0  with  x  from  Z))'(e)
    else  -1
    fi    \mleq{}  n;\mforall{}[e':E(Z)].  Z(e')  \mleq{}  n  supposing  e'  \mleq{}loc  e  ) 
    supposing  \mneg{}\muparrow{}e  \mmember{}\msubb{}  Z
Date html generated:
2011_08_16-PM-05_20_29
Last ObjectModification:
2011_06_20-AM-01_21_27
Home
Index