Nuprl Lemma : eo-forward-pred?

[Info:Type]. ∀[eo:EO+(Info)]. ∀[e:E].
  ∀e1:E. (es-pred?(eo.e;e1) if es-eq(eo) e1 then inr ⋅  else es-pred?(eo;e1) fi  ∈ (E?))


Proof




Definitions occuring in Statement :  eo-forward: eo.e event-ordering+: EO+(Info) es-pred?: es-pred?(es;e) es-eq: es-eq(es) es-E: E ifthenelse: if then else fi  it: uall: [x:A]. B[x] all: x:A. B[x] unit: Unit apply: a inr: inr  union: left right universe: Type equal: t ∈ T
Lemmas :  eo-forward-E-subtype es-first_wf2 bool_wf eqtt_to_assert eqff_to_assert equal_wf bool_cases_sqequal subtype_base_sq bool_subtype_base assert-bnot es-E_wf eo-forward_wf event-ordering+_subtype event-ordering+_wf es-eq-E_wf assert-es-eq-E-2 it_wf eo-forward-first eq_id_wf es-loc_wf assert_wf bnot_wf not_wf Id_wf bool_cases assert-eq-id iff_transitivity iff_weakening_uiff assert_of_bnot assert-es-eq-E unit_wf2 eo-forward-pred es-pred_wf iff_weakening_equal eo-forward-loc and_wf eo-forward-E-member es-locl-first assert_elim btrue_neq_bfalse
\mforall{}[Info:Type].  \mforall{}[eo:EO+(Info)].  \mforall{}[e:E].
    \mforall{}e1:E.  (es-pred?(eo.e;e1)  =  if  es-eq(eo)  e1  e  then  inr  \mcdot{}    else  es-pred?(eo;e1)  fi  )



Date html generated: 2015_07_17-PM-00_04_13
Last ObjectModification: 2015_02_04-PM-05_40_47

Home Index