let F be Field; :: thesis: 0. F is_a_unity_wrt the addF of F

now

let x be Element of F; :: thesis: ( the addF of F . ((0. F),x) = x & the addF of F . (x,(0. F)) = x )
thus the addF of F . ((0. F),x) = x + (0. F) by RLVECT_1:5
.= x by RLVECT_1:10 ; :: thesis: the addF of F . (x,(0. F)) = x
thus the addF of F . (x,(0. F)) = x + (0. F)
.= x by RLVECT_1:10 ; :: thesis: verum

end;

hence 0. F is_a_unity_wrt the addF of F by BINOP_1:11; :: thesis: verum