{ [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