set f = the carrier of X --> (0. Y);

reconsider f = the carrier of X --> (0. Y) as Function of X,Y ;

take f ; :: thesis: ( f is additive & f is homogeneous )

reconsider f = the carrier of X --> (0. Y) as Function of X,Y ;

take f ; :: thesis: ( f is additive & f is homogeneous )

hereby :: according to VECTSP_1:def 19 :: thesis: f is homogeneous

let x, y be VECTOR of X; :: thesis: f . (x + y) = (f . x) + (f . y)

thus f . (x + y) = 0. Y by FUNCOP_1:7

.= (0. Y) + (0. Y) by RLVECT_1:4

.= (f . x) + (0. Y) by FUNCOP_1:7

.= (f . x) + (f . y) by FUNCOP_1:7 ; :: thesis: verum

end;thus f . (x + y) = 0. Y by FUNCOP_1:7

.= (0. Y) + (0. Y) by RLVECT_1:4

.= (f . x) + (0. Y) by FUNCOP_1:7

.= (f . x) + (f . y) by FUNCOP_1:7 ; :: thesis: verum

hereby :: according to CLOPBAN1:def 3 :: thesis: verum

let x be VECTOR of X; :: thesis: for c being Complex holds f . (c * x) = c * (f . x)

let c be Complex; :: thesis: f . (c * x) = c * (f . x)

thus f . (c * x) = 0. Y by FUNCOP_1:7

.= c * (0. Y) by CLVECT_1:1

.= c * (f . x) by FUNCOP_1:7 ; :: thesis: verum

end;let c be Complex; :: thesis: f . (c * x) = c * (f . x)

thus f . (c * x) = 0. Y by FUNCOP_1:7

.= c * (0. Y) by CLVECT_1:1

.= c * (f . x) by FUNCOP_1:7 ; :: thesis: verum