Nuprl Lemma : tagged-messages_wf
∀[S,V:Type]. ∀[M:IdLnk ─→ Id ─→ Type]. ∀[l:IdLnk]. ∀[s:S]. ∀[v:V]. ∀[L:(t:Id × (S ─→ V ─→ (M[l;t] List))) List].
(tagged-messages(l;s;v;L) ∈ {m:Msg(M)| mlnk(m) = l ∈ IdLnk} List)
Proof
Definitions occuring in Statement :
tagged-messages: tagged-messages(l;s;v;L),
mlnk: mlnk(m),
Msg: Msg(M),
IdLnk: IdLnk,
Id: Id,
list: T List,
uall: ∀[x:A]. B[x],
so_apply: x[s1;s2],
member: t ∈ T,
set: {x:A| B[x]} ,
function: x:A ─→ B[x],
product: x:A × B[x],
universe: Type,
equal: s = t ∈ T
Lemmas :
map_wf,
mlnk_wf,
tagged-list-messages_wf,
list_wf,
Id_wf,
IdLnk_wf
\mforall{}[S,V:Type]. \mforall{}[M:IdLnk {}\mrightarrow{} Id {}\mrightarrow{} Type]. \mforall{}[l:IdLnk]. \mforall{}[s:S]. \mforall{}[v:V].
\mforall{}[L:(t:Id \mtimes{} (S {}\mrightarrow{} V {}\mrightarrow{} (M[l;t] List))) List].
(tagged-messages(l;s;v;L) \mmember{} \{m:Msg(M)| mlnk(m) = l\} List)
Date html generated:
2015_07_17-AM-09_12_44
Last ObjectModification:
2015_01_28-AM-07_57_37
Home
Index