Nuprl Lemma : cubical-app_wf-csm
∀[X:j⊢]. ∀[A:{X ⊢ _}]. ∀[B:{X.A ⊢ _}]. ∀[w:{X ⊢ _:ΠA B}]. ∀[H:j⊢]. ∀[tau:H j⟶ X]. ∀[u:{H ⊢ _:(A)tau}].
(app((w)tau; u) ∈ {H ⊢ _:((B)tau+)[u]})
Proof
Definitions occuring in Statement :
cubical-app: app(w; u),
cubical-pi: ΠA B,
csm+: tau+,
csm-id-adjoin: [u],
cube-context-adjoin: X.A,
csm-ap-term: (t)s,
cubical-term: {X ⊢ _:A},
csm-ap-type: (AF)s,
cubical-type: {X ⊢ _},
cube_set_map: A ⟶ B,
cubical_set: CubicalSet,
uall: ∀[x:A]. B[x],
member: t ∈ T
Definitions unfolded in proof :
uall: ∀[x:A]. B[x],
member: t ∈ T,
cubical_set: CubicalSet,
cube-context-adjoin: X.A,
psc-adjoin: X.A,
I_cube: A(I),
I_set: A(I),
cubical-type-at: A(a),
presheaf-type-at: A(a),
cube-set-restriction: f(s),
psc-restriction: f(s),
cubical-type-ap-morph: (u a f),
presheaf-type-ap-morph: (u a f),
cubical-pi: ΠA B,
presheaf-pi: ΠA B,
cubical-pi-family: cubical-pi-family(X;A;B;I;a),
presheaf-pi-family: presheaf-pi-family(C; X; A; B; I; a),
cube-cat: CubeCat,
all: ∀x:A. B[x],
cc-adjoin-cube: (v;u),
psc-adjoin-set: (v;u),
cube_set_map: A ⟶ B,
csm-ap-type: (AF)s,
pscm-ap-type: (AF)s,
csm-ap: (s)x,
pscm-ap: (s)x,
csm+: tau+,
pscm+: tau+,
csm-adjoin: (s;u),
pscm-adjoin: (s;u),
csm-comp: G o F,
pscm-comp: G o F,
cc-fst: p,
psc-fst: p,
cc-snd: q,
psc-snd: q,
csm-id-adjoin: [u],
pscm-id-adjoin: [u],
csm-id: 1(X),
pscm-id: 1(X),
cubical-app: app(w; u),
presheaf-app: app(w; u),
csm-ap-term: (t)s,
pscm-ap-term: (t)s
Lemmas referenced :
presheaf-app_wf-pscm,
cube-cat_wf,
cubical-type-sq-presheaf-type,
cat_ob_pair_lemma,
cat_arrow_triple_lemma,
cat_comp_tuple_lemma,
cubical-term-sq-presheaf-term,
cat_id_tuple_lemma
Rules used in proof :
cut,
introduction,
extract_by_obid,
sqequalHypSubstitution,
sqequalSubstitution,
sqequalTransitivity,
computationStep,
sqequalReflexivity,
isectElimination,
thin,
hypothesis,
sqequalRule,
Error :memTop,
dependent_functionElimination
Latex:
\mforall{}[X:j\mvdash{}]. \mforall{}[A:\{X \mvdash{} \_\}]. \mforall{}[B:\{X.A \mvdash{} \_\}]. \mforall{}[w:\{X \mvdash{} \_:\mPi{}A B\}]. \mforall{}[H:j\mvdash{}]. \mforall{}[tau:H j{}\mrightarrow{} X].
\mforall{}[u:\{H \mvdash{} \_:(A)tau\}].
(app((w)tau; u) \mmember{} \{H \mvdash{} \_:((B)tau+)[u]\})
Date html generated:
2020_05_20-PM-02_25_42
Last ObjectModification:
2020_04_03-PM-08_35_52
Theory : cubical!type!theory
Home
Index