reconsider e = FuncUnit X as Element of (Ring_of_BoundedLinearOperators X) ;
take e ; :: according to GROUP_1:def 1 :: thesis: for b1 being Element of the carrier of (Ring_of_BoundedLinearOperators X) holds
( b1 * e = b1 & e * b1 = b1 )

thus for b1 being Element of the carrier of (Ring_of_BoundedLinearOperators X) holds
( b1 * e = b1 & e * b1 = b1 ) by Lm1; :: thesis: verum