Nuprl Lemma : prior-class-when-val
∀[Info:Type]. ∀[es:EO+(Info)]. ∀[X,Y:EClass(Top)]. ∀[d:Top]. ∀[e:E].
  (X'?d) when Y(e) ~ <Y(e), if e ∈b (X)' then (X)'(e) else d fi > supposing ↑e ∈b (X'?d) when Y
Proof
Definitions occuring in Statement : 
es-prior-class-when: (X'?d) when Y, 
es-prior-val: (X)', 
eclass-val: X(e), 
in-eclass: e ∈b X, 
eclass: EClass(A[eo; e]), 
event-ordering+: EO+(Info), 
es-E: E, 
assert: ↑b, 
ifthenelse: if b then t else f fi , 
uimplies: b supposing a, 
uall: ∀[x:A]. B[x], 
top: Top, 
pair: <a, b>, 
universe: Type, 
sqequal: s ~ t
Lemmas : 
in-eclass_wf, 
bool_wf, 
eqtt_to_assert, 
bag_size_single_lemma, 
bag_only_single_lemma, 
true_wf, 
eqff_to_assert, 
equal_wf, 
bool_cases_sqequal, 
subtype_base_sq, 
bool_subtype_base, 
assert-bnot, 
bag_size_empty_lemma, 
false_wf, 
assert_wf, 
es-prior-class-when_wf, 
top_wf, 
es-interface-subtype_rel2, 
es-E_wf, 
event-ordering+_subtype, 
event-ordering+_wf, 
subtype_top, 
eclass_wf
Latex:
\mforall{}[Info:Type].  \mforall{}[es:EO+(Info)].  \mforall{}[X,Y:EClass(Top)].  \mforall{}[d:Top].  \mforall{}[e:E].
    (X'?d)  when  Y(e)  \msim{}  <Y(e),  if  e  \mmember{}\msubb{}  (X)'  then  (X)'(e)  else  d  fi  >  supposing  \muparrow{}e  \mmember{}\msubb{}  (X'?d)  when  Y
 Date html generated: 
2015_07_21-PM-03_49_00
 Last ObjectModification: 
2015_01_27-PM-06_02_25
Home
Index