{ 
[X:Type]. 
[eq:EqDecider(X)]. 
[f,g:x:X fp-> Type]. 
[x:X].
    f(x)?Void 
r g(x)?Top supposing f || g }
{ Proof }
Definitions occuring in Statement : 
fpf-compatible: f || g, 
fpf-cap: f(x)?z, 
fpf: a:A fp-> B[a], 
subtype_rel: A 
r B, 
uimplies: b supposing a, 
uall:
[x:A]. B[x], 
top: Top, 
void: Void, 
universe: Type, 
deq: EqDecider(T)
Definitions : 
member: t 
 T, 
top: Top, 
so_lambda: 
x.t[x], 
prop:
, 
all:
x:A. B[x], 
uall:
[x:A]. B[x], 
uimplies: b supposing a, 
fpf-cap: f(x)?z, 
ifthenelse: if b then t else f fi , 
implies: P 
 Q, 
btrue: tt, 
bfalse: ff, 
and: P 
 Q, 
so_apply: x[s], 
bool:
, 
unit: Unit, 
iff: P 

 Q, 
fpf-compatible: f || g, 
it:
Lemmas : 
fpf-dom_wf, 
fpf-trivial-subtype-top, 
bool_wf, 
assert_wf, 
fpf-ap_wf, 
not_wf, 
bnot_wf, 
iff_weakening_uiff, 
eqtt_to_assert, 
uiff_transitivity, 
eqff_to_assert, 
assert_of_bnot, 
fpf-cap_wf, 
top_wf, 
fpf-compatible_wf, 
fpf_wf, 
deq_wf
\mforall{}[X:Type].  \mforall{}[eq:EqDecider(X)].  \mforall{}[f,g:x:X  fp->  Type].  \mforall{}[x:X].    f(x)?Void  \msubseteq{}r  g(x)?Top  supposing  f  ||  g
Date html generated:
2011_08_10-AM-07_58_33
Last ObjectModification:
2011_06_18-AM-08_18_28
Home
Index