Nuprl Lemma : pscm-adjoin-id-adjoin
∀[B,xx,s,X,Y,Z:Top].  (((B)(s o p;q))[xx] ~ (B)(s;xx))
Proof
Definitions occuring in Statement : 
pscm-id-adjoin: [u]
, 
pscm-adjoin: (s;u)
, 
psc-snd: q
, 
psc-fst: p
, 
pscm-ap-type: (AF)s
, 
pscm-comp: G o F
, 
uall: ∀[x:A]. B[x]
, 
top: Top
, 
sqequal: s ~ t
Definitions unfolded in proof : 
uall: ∀[x:A]. B[x]
, 
pscm-ap-type: (AF)s
, 
so_lambda: so_lambda(x,y,z,w.t[x; y; z; w])
, 
member: t ∈ T
, 
so_apply: x[s1;s2;s3;s4]
, 
so_lambda: λ2x y.t[x; y]
, 
top: Top
, 
so_apply: x[s1;s2]
, 
uimplies: b supposing a
, 
pscm-ap: (s)x
, 
pscm-adjoin: (s;u)
, 
pscm-comp: G o F
, 
compose: f o g
, 
psc-fst: p
, 
pi1: fst(t)
, 
pscm-id-adjoin: [u]
, 
pscm-id: 1(X)
, 
psc-snd: q
, 
pi2: snd(t)
Lemmas referenced : 
lifting-strict-spread, 
strict4-spread, 
top_wf
Rules used in proof : 
sqequalSubstitution, 
sqequalTransitivity, 
computationStep, 
sqequalReflexivity, 
isect_memberFormation, 
sqequalRule, 
cut, 
introduction, 
extract_by_obid, 
sqequalHypSubstitution, 
isectElimination, 
thin, 
baseClosed, 
isect_memberEquality, 
voidElimination, 
voidEquality, 
independent_isectElimination, 
hypothesis, 
because_Cache
Latex:
\mforall{}[B,xx,s,X,Y,Z:Top].    (((B)(s  o  p;q))[xx]  \msim{}  (B)(s;xx))
Date html generated:
2018_05_23-AM-08_14_04
Last ObjectModification:
2018_05_20-PM-09_53_15
Theory : presheaf!models!of!type!theory
Home
Index