Nuprl Lemma : atmFrc_prog_wf
∀[K:dl_KripkeStructure]. ∀[s,t:worlds(K)]. ∀[a:ℕ].  (atmFrc_prog(K;a;s;t) ∈ ℙ)
Proof
Definitions occuring in Statement : 
dl_KripkeStructure: dl_KripkeStructure, 
atmFrc_prog: atmFrc_prog(k;a;r;s), 
worlds: worlds(k), 
nat: ℕ, 
uall: ∀[x:A]. B[x], 
prop: ℙ, 
member: t ∈ T
Definitions unfolded in proof : 
uall: ∀[x:A]. B[x], 
member: t ∈ T, 
dl_KripkeStructure: dl_KripkeStructure, 
worlds: worlds(k), 
record+: record+, 
record-select: r.x, 
subtype_rel: A ⊆r B, 
eq_atom: x =a y, 
ifthenelse: if b then t else f fi , 
btrue: tt, 
so_lambda: λ2x.t[x], 
so_apply: x[s], 
prop: ℙ, 
atmFrc_prog: atmFrc_prog(k;a;r;s)
Lemmas referenced : 
subtype_rel_self, 
record-select_wf, 
top_wf, 
istype-atom, 
nat_wf, 
istype-nat, 
worlds_wf, 
dl_KripkeStructure_wf
Rules used in proof : 
sqequalSubstitution, 
sqequalTransitivity, 
computationStep, 
sqequalReflexivity, 
isect_memberFormation_alt, 
introduction, 
cut, 
sqequalHypSubstitution, 
sqequalRule, 
dependentIntersectionElimination, 
dependentIntersectionEqElimination, 
thin, 
hypothesis, 
applyEquality, 
tokenEquality, 
instantiate, 
extract_by_obid, 
isectElimination, 
universeEquality, 
functionEquality, 
cumulativity, 
lambdaEquality_alt, 
equalityTransitivity, 
equalitySymmetry, 
hypothesisEquality, 
axiomEquality, 
isect_memberEquality_alt, 
isectIsTypeImplies, 
inhabitedIsType, 
universeIsType
Latex:
\mforall{}[K:dl\_KripkeStructure].  \mforall{}[s,t:worlds(K)].  \mforall{}[a:\mBbbN{}].    (atmFrc\_prog(K;a;s;t)  \mmember{}  \mBbbP{})
Date html generated:
2020_05_20-AM-09_01_23
Last ObjectModification:
2019_11_27-PM-02_04_58
Theory : dynamic!logic
Home
Index