let K be Field; :: thesis: for m being Element of NAT
for A, C being Matrix of K st width A > 0 & len A > 0 holds
A * (0. K,(width A),m) = 0. K,(len A),m

let m be Element of NAT ; :: thesis: for A, C being Matrix of K st width A > 0 & len A > 0 holds
A * (0. K,(width A),m) = 0. K,(len A),m

let A, C be Matrix of K; :: thesis: ( width A > 0 & len A > 0 implies A * (0. K,(width A),m) = 0. K,(len A),m )
assume A1: ( width A > 0 & len A > 0 ) ; :: thesis: A * (0. K,(width A),m) = 0. K,(len A),m
A2: len (0. K,(width A),m) = width A by MATRIX_1:def 3;
then A3: width (0. K,(width A),m) = m by A1, MATRIX_1:20;
A4: ( m = width (0. K,(width A),m) & len (0. K,(width A),m) > 0 & width A > 0 & len A > 0 ) by A1, A2, MATRIX_1:20;
A5: len (A * (0. K,(width A),m)) = len A by A2, MATRIX_3:def 4;
A6: width (A * (0. K,(width A),m)) = m by A2, A4, MATRIX_3:def 4;
(A * (0. K,(width A),m)) + (A * (0. K,(width A),m)) = A * ((0. K,(width A),m) + (0. K,(width A),m)) by A1, A2, A3, MATRIX_4:62
.= A * (0. K,(width A),m) by MATRIX_3:6 ;
hence A * (0. K,(width A),m) = 0. K,(len A),m by A5, A6, MATRIX_4:6; :: thesis: verum