let F be Field; :: thesis: for V being VectSp of F
for W being Subspace of V
for L being Linear_Compl of W holds W is Linear_Compl of L

let V be VectSp of F; :: thesis: for W being Subspace of V
for L being Linear_Compl of W holds W is Linear_Compl of L

let W be Subspace of V; :: thesis: for L being Linear_Compl of W holds W is Linear_Compl of L
let L be Linear_Compl of W; :: thesis: W is Linear_Compl of L
V is_the_direct_sum_of L,W by Def5;
then V is_the_direct_sum_of W,L by Lm17;
hence W is Linear_Compl of L by Def5; :: thesis: verum