let V be RealLinearSpace; for W1, W2 being Subspace of V st V is_the_direct_sum_of W1,W2 holds
for v, v1, v2 being VECTOR of V st v |-- (W1,W2) = [v1,v2] holds
( v1 in W1 & v2 in W2 )
let W1, W2 be Subspace of V; ( V is_the_direct_sum_of W1,W2 implies for v, v1, v2 being VECTOR of V st v |-- (W1,W2) = [v1,v2] holds
( v1 in W1 & v2 in W2 ) )
assume A1:
V is_the_direct_sum_of W1,W2
; for v, v1, v2 being VECTOR of V st v |-- (W1,W2) = [v1,v2] holds
( v1 in W1 & v2 in W2 )
let v, v1, v2 be VECTOR of V; ( v |-- (W1,W2) = [v1,v2] implies ( v1 in W1 & v2 in W2 ) )
assume
v |-- (W1,W2) = [v1,v2]
; ( v1 in W1 & v2 in W2 )
then
( (v |-- (W1,W2)) `1 = v1 & (v |-- (W1,W2)) `2 = v2 )
;
hence
( v1 in W1 & v2 in W2 )
by A1, RLSUB_2:def 6; verum