Nuprl Lemma : kindcase-rcv
∀[k:Knd]. ∀[f,g:Top]. kindcase(k;a.f[a];l,t.g[l;t]) ~ g[lnk(k);tag(k)] supposing ¬↑islocal(k)
Proof
Definitions occuring in Statement :
kindcase: kindcase(k;a.f[a];l,t.g[l; t]),
tagof: tag(k),
lnk: lnk(k),
islocal: islocal(k),
Knd: Knd,
assert: ↑b,
uimplies: b supposing a,
uall: ∀[x:A]. B[x],
top: Top,
so_apply: x[s1;s2],
so_apply: x[s],
not: ¬A,
sqequal: s ~ t
Definitions unfolded in proof :
uall: ∀[x:A]. B[x],
member: t ∈ T,
Knd: Knd,
tagof: tag(k),
lnk: lnk(k),
kindcase: kindcase(k;a.f[a];l,t.g[l; t]),
islocal: islocal(k),
isl: isl(x),
outl: outl(x),
bnot: ¬bb,
ifthenelse: if b then t else f fi ,
btrue: tt,
pi1: fst(t),
pi2: snd(t),
assert: ↑b,
bfalse: ff,
actof: act(k),
outr: outr(x),
uimplies: b supposing a,
prop: ℙ,
not: ¬A,
implies: P ⇒ Q,
true: True,
false: False
Latex:
\mforall{}[k:Knd]. \mforall{}[f,g:Top]. kindcase(k;a.f[a];l,t.g[l;t]) \msim{} g[lnk(k);tag(k)] supposing \mneg{}\muparrow{}islocal(k)
Date html generated:
2016_05_16-AM-10_55_28
Last ObjectModification:
2015_12_29-AM-09_08_25
Theory : event-ordering
Home
Index