Nuprl Lemma : aa_data_wrapleaf-val_wf
[T:Type]. 
[x:aa_data_wrapper(T)].  aa_data_wrapleaf-val(x) 
 T supposing 
aa_data_wrapleaf?(x)
Proof
Definitions occuring in Statement : 
aa_data_wrapleaf-val: aa_data_wrapleaf-val(x), 
aa_data_wrapleaf?: aa_data_wrapleaf?(x), 
aa_data_wrapper: aa_data_wrapper(T), 
assert:
b, 
uimplies: b supposing a, 
uall:
[x:A]. B[x], 
member: t 
 T, 
universe: Type
Definitions : 
uall:
[x:A]. B[x], 
uimplies: b supposing a, 
assert:
b, 
aa_data_wrapleaf?: aa_data_wrapleaf?(x), 
member: t 
 T, 
aa_data_wrapleaf-val: aa_data_wrapleaf-val(x), 
implies: P 
 Q, 
bfalse: ff, 
btrue: tt, 
ifthenelse: if b then t else f fi , 
aa_data_wrapper: aa_data_wrapper(T), 
false: False, 
aa_data_wrapnode: aa_data_wrapnode(nd), 
prop:
, 
aa_data_wrapleaf: aa_data_wrapleaf(val), 
guard: {T}
Lemmas : 
false_wf, 
true_wf, 
assert_wf, 
aa_data_wrapleaf?_wf, 
aa_data_wrapper_wf, 
subtype_rel_self
\mforall{}[T:Type].  \mforall{}[x:aa\_data\_wrapper(T)].    aa\_data\_wrapleaf-val(x)  \mmember{}  T  supposing  \muparrow{}aa\_data\_wrapleaf?(x)
Date html generated:
2013_03_20-AM-11_02_52
Last ObjectModification:
2012_11_27-AM-10_33_27
Home
Index