Nuprl Lemma : local-class-output-agree
∀[Info,A:Type]. ∀[X:EClass(A)]. ∀[P:LocalClass(X)]. ∀[eo1,eo2:EO+(Info)]. ∀[e1:E]. ∀[e2:E].
(X(e1) = X(e2) ∈ bag(A)) supposing (eo-local-agree(Info;eo1;eo2;e1;e2) and (loc(e1) = loc(e2) ∈ Id))
Proof
Definitions occuring in Statement :
eo-local-agree: eo-local-agree(Info;eo1;eo2;e1;e2)
,
local-class: LocalClass(X)
,
class-ap: X(e)
,
eclass: EClass(A[eo; e])
,
event-ordering+: EO+(Info)
,
es-loc: loc(e)
,
es-E: E
,
Id: Id
,
uimplies: b supposing a
,
uall: ∀[x:A]. B[x]
,
universe: Type
,
equal: s = t ∈ T
,
bag: bag(T)
Lemmas :
map_append_sq,
map_cons_lemma,
map_nil_lemma,
general-append-cancellation,
map_wf,
es-E_wf,
event-ordering+_subtype,
es-info_wf,
es-before_wf,
cons_wf,
nil_wf,
length_of_cons_lemma,
length_wf,
equal_wf,
and_wf,
Id_wf,
hdataflow_wf,
iterate-hdataflow_wf,
hdf-ap_wf,
bag_wf,
pi2_wf,
squash_wf,
true_wf,
reduce_hd_cons_lemma,
hd_wf,
ge_wf,
listp_properties,
cons_wf_listp
\mforall{}[Info,A:Type]. \mforall{}[X:EClass(A)]. \mforall{}[P:LocalClass(X)]. \mforall{}[eo1,eo2:EO+(Info)]. \mforall{}[e1:E]. \mforall{}[e2:E].
(X(e1) = X(e2)) supposing (eo-local-agree(Info;eo1;eo2;e1;e2) and (loc(e1) = loc(e2)))
Date html generated:
2015_07_17-PM-00_32_45
Last ObjectModification:
2015_01_27-PM-11_34_04
Home
Index