Nuprl Lemma : memory-class3-fun-eq
∀[Info,B,A1,A2,A3:Type]. ∀[init:Id ─→ B]. ∀[tr1:Id ─→ A1 ─→ B ─→ B]. ∀[X1:EClass(A1)]. ∀[tr2:Id ─→ A2 ─→ B ─→ B].
∀[X2:EClass(A2)]. ∀[tr3:Id ─→ A3 ─→ B ─→ B]. ∀[X3:EClass(A3)]. ∀[es:EO+(Info)]. ∀[e:E].
(memory-class3(init;tr1;X1;tr2;X2;tr3;X3)(e)
= if first(e) then init loc(e)
if pred(e) ∈b X1 then tr1 loc(e) X1@pred(e) memory-class3(init;tr1;X1;tr2;X2;tr3;X3)(pred(e))
if pred(e) ∈b X2 then tr2 loc(e) X2@pred(e) memory-class3(init;tr1;X1;tr2;X2;tr3;X3)(pred(e))
if pred(e) ∈b X3 then tr3 loc(e) X3@pred(e) memory-class3(init;tr1;X1;tr2;X2;tr3;X3)(pred(e))
else memory-class3(init;tr1;X1;tr2;X2;tr3;X3)(pred(e))
fi
∈ B) supposing
(disjoint-classrel(es;A1;X1;A2;X2) and
disjoint-classrel(es;A1;X1;A3;X3) and
disjoint-classrel(es;A2;X2;A3;X3) and
single-valued-classrel(es;X1;A1) and
single-valued-classrel(es;X2;A2) and
single-valued-classrel(es;X3;A3))
Proof
Definitions occuring in Statement :
memory-class3: memory-class3(init;tr1;X1;tr2;X2;tr3;X3),
classfun-res: X@e,
classfun: X(e),
single-valued-classrel: single-valued-classrel(es;X;T),
disjoint-classrel: disjoint-classrel(es;A;X;B;Y),
member-eclass: e ∈b X,
eclass: EClass(A[eo; e]),
event-ordering+: EO+(Info),
es-first: first(e),
es-pred: pred(e),
es-loc: loc(e),
es-E: E,
Id: Id,
ifthenelse: if b then t else f fi ,
uimplies: b supposing a,
uall: ∀[x:A]. B[x],
apply: f a,
function: x:A ─→ B[x],
universe: Type,
equal: s = t ∈ T
Lemmas :
loop-class-memory-fun-eq,
parallel-class_wf,
eclass1_wf,
single-bag_wf,
bag_size_single_lemma,
false_wf,
single-valued-bag-single,
parallel-class-single-val,
eclass1-disjoint-classrel,
disjoint-classrel-symm,
parallel-class-disjoint-classrel,
eclass1-single-val,
es-first_wf2,
bool_wf,
eqtt_to_assert,
es-loc_wf,
eqff_to_assert,
equal_wf,
bool_cases_sqequal,
subtype_base_sq,
bool_subtype_base,
assert-bnot,
member-eclass_wf,
es-pred_wf,
classfun-res_wf,
classfun_wf,
memory-class3_wf,
memory-class3-functional,
iff_weakening_equal,
sv_bag_only_single_lemma,
member-parallel-class-bool,
disjoint-classrel_wf,
single-valued-classrel_wf,
es-E_wf,
event-ordering+_subtype,
event-ordering+_wf,
eclass_wf,
Id_wf,
member-eclass-eclass1,
classfun-res-parallel-class-left,
member-memory-class3,
assert_of_tt,
classfun-res-eclass1,
es-loc-pred,
classfun-res-parallel-class-right,
assert_of_bor,
assert_wf
Latex:
\mforall{}[Info,B,A1,A2,A3:Type]. \mforall{}[init:Id {}\mrightarrow{} B]. \mforall{}[tr1:Id {}\mrightarrow{} A1 {}\mrightarrow{} B {}\mrightarrow{} B]. \mforall{}[X1:EClass(A1)]. \mforall{}[tr2:Id
{}\mrightarrow{} A2
{}\mrightarrow{} B
{}\mrightarrow{} B].
\mforall{}[X2:EClass(A2)]. \mforall{}[tr3:Id {}\mrightarrow{} A3 {}\mrightarrow{} B {}\mrightarrow{} B]. \mforall{}[X3:EClass(A3)]. \mforall{}[es:EO+(Info)]. \mforall{}[e:E].
(memory-class3(init;tr1;X1;tr2;X2;tr3;X3)(e)
= if first(e) then init loc(e)
if pred(e) \mmember{}\msubb{} X1 then tr1 loc(e) X1@pred(e) memory-class3(init;tr1;X1;tr2;X2;tr3;X3)(pred(e))
if pred(e) \mmember{}\msubb{} X2 then tr2 loc(e) X2@pred(e) memory-class3(init;tr1;X1;tr2;X2;tr3;X3)(pred(e))
if pred(e) \mmember{}\msubb{} X3 then tr3 loc(e) X3@pred(e) memory-class3(init;tr1;X1;tr2;X2;tr3;X3)(pred(e))
else memory-class3(init;tr1;X1;tr2;X2;tr3;X3)(pred(e))
fi ) supposing
(disjoint-classrel(es;A1;X1;A2;X2) and
disjoint-classrel(es;A1;X1;A3;X3) and
disjoint-classrel(es;A2;X2;A3;X3) and
single-valued-classrel(es;X1;A1) and
single-valued-classrel(es;X2;A2) and
single-valued-classrel(es;X3;A3))
Date html generated:
2015_07_23-AM-11_30_03
Last ObjectModification:
2015_02_04-PM-04_44_32
Home
Index