{ 
[da1,da2:x:Knd fp-> Type].
(Normal(da1 
da2)) supposing (Normal(da2) and Normal(da1)) }
{ Proof }
Definitions occuring in Statement :
normal-da: Normal(da),
fpf-join: f g,
fpf: a:A fp-> B[a],
Kind-deq: KindDeq,
Knd: Knd,
uimplies: b supposing a,
uall: [x:A]. B[x],
universe: Type
Definitions :
uall: [x:A]. B[x],
uimplies: b supposing a,
normal-da: Normal(da),
member: t 
T,
true: True,
so_lambda: 
x.t[x],
so_apply: x[s],
prop: 
Lemmas :
normal-da_wf,
fpf_wf,
Knd_wf
\mforall{}[da1,da2:x:Knd fp-> Type]. (Normal(da1 \moplus{} da2)) supposing (Normal(da2) and Normal(da1))
Date html generated:
2011_08_10-AM-08_13_03
Last ObjectModification:
2011_06_18-AM-08_28_01
Home
Index