:: deftheorem Def2 defines Submodule RMOD_2:def 2 :
for R being Ring
for V, b3 being RightMod of R holds
( b3 is Submodule of V iff ( the carrier of b3 c= the carrier of V & 0. b3 = 0. V & the addF of b3 = the addF of V | [: the carrier of b3, the carrier of b3:] & the rmult of b3 = the rmult of V | [: the carrier of b3, the carrier of R:] ) );