Nuprl Lemma : l_tree_leaf-val_wf

∀[L,T:Type]. ∀[v:l_tree(L;T)].  l_tree_leaf-val(v) ∈ L supposing ↑l_tree_leaf?(v)


Proof




Definitions occuring in Statement :  l_tree_leaf-val: l_tree_leaf-val(v),  l_tree_leaf?: l_tree_leaf?(v),  l_tree: l_tree(L;T),  assert: ↑b,  uimplies: b supposing a,  uall: ∀[x:A]. B[x],  member: t ∈ T,  universe: Type
Lemmas :  l_tree-ext,  eq_atom_wf,  bool_wf,  eqtt_to_assert,  assert_of_eq_atom,  subtype_base_sq,  atom_subtype_base,  eqff_to_assert,  equal_wf,  bool_cases_sqequal,  bool_subtype_base,  assert-bnot,  neg_assert_of_eq_atom,  assert_wf,  l_tree_leaf?_wf,  l_tree_wf
\mforall{}[L,T:Type].  \mforall{}[v:l\_tree(L;T)].    l\_tree\_leaf-val(v)  \mmember{}  L  supposing  \muparrow{}l\_tree\_leaf?(v)



Date html generated: 2015_07_17-AM-07_41_31
Last ObjectModification: 2015_01_27-AM-09_31_05

Home Index