{ 
[l:IdLnk]. 
[dt:tg:Id fp-> Type]. 
[a:Id].
    (locl(a) 
 dom(lnk-decl(l;dt)) ~ ff) }
{ Proof }
Definitions occuring in Statement : 
lnk-decl: lnk-decl(l;dt), 
fpf-dom: x 
 dom(f), 
fpf: a:A fp-> B[a], 
Kind-deq: KindDeq, 
locl: locl(a), 
IdLnk: IdLnk, 
Id: Id, 
bfalse: ff, 
uall:
[x:A]. B[x], 
universe: Type, 
sqequal: s ~ t
Definitions : 
uall:
[x:A]. B[x], 
fpf-dom: x 
 dom(f), 
lnk-decl: lnk-decl(l;dt), 
member: t 
 T, 
pi1: fst(t), 
so_lambda: 
x.t[x], 
bfalse: ff, 
iff: P 

 Q, 
assert:
b, 
and: P 
 Q, 
implies: P 
 Q, 
rev_implies: P 
 Q, 
ifthenelse: if b then t else f fi , 
fpf: a:A fp-> B[a], 
sq_type: SQType(T), 
uimplies: b supposing a, 
all:
x:A. B[x], 
guard: {T}, 
so_apply: x[s], 
exists:
x:A. B[x], 
false: False, 
prop:
, 
not:
A
Lemmas : 
subtype_base_sq, 
bool_wf, 
bool_subtype_base, 
Id_wf, 
fpf_wf, 
IdLnk_wf, 
iff_imp_equal_bool, 
deq-member_wf, 
Knd_wf, 
Kind-deq_wf, 
map_wf, 
rcv_wf, 
locl_wf, 
bfalse_wf, 
assert-deq-member, 
member_map, 
assert_wf, 
btrue_neq_bfalse, 
assert_elim, 
not_locl_rcv
\mforall{}[l:IdLnk].  \mforall{}[dt:tg:Id  fp->  Type].  \mforall{}[a:Id].    (locl(a)  \mmember{}  dom(lnk-decl(l;dt))  \msim{}  ff)
Date html generated:
2011_08_10-AM-08_10_31
Last ObjectModification:
2011_06_18-AM-08_26_26
Home
Index