{ 
[A:Type]. [B,C:A 
Type]. [f:a:A fp-> B[a]]. [g:
a:A. (B[a] C[a])].
(g o f 
a:A fp-> C[a]) }
{ Proof }
Definitions occuring in Statement :
fpf-compose: g o f,
fpf: a:A fp-> B[a],
uall: [x:A]. B[x],
so_apply: x[s],
member: t T,
isect: x:A. B[x],
function: x:A B[x],
universe: Type
Definitions :
uall: [x:A]. B[x],
fpf: a:A fp-> B[a],
so_apply: x[s],
member: t T,
fpf-compose: g o f,
pi1: fst(t),
pi2: snd(t),
so_lambda: 
x.t[x],
compose: f o g,
all: x:A. B[x],
implies: P 
Q,
prop: 
Lemmas :
l_member_wf,
fpf_wf
\mforall{}[A:Type]. \mforall{}[B,C:A {}\mrightarrow{} Type]. \mforall{}[f:a:A fp-> B[a]]. \mforall{}[g:\mcap{}a:A. (B[a] {}\mrightarrow{} C[a])]. (g o f \mmember{} a:A fp-> C[a])
Date html generated:
2011_08_10-AM-08_04_57
Last ObjectModification:
2011_06_18-AM-08_22_54
Home
Index