:: deftheorem DefA5 defines Subgroup GROUP_1A:def 15 :
for G, b2 being non empty addGroup-like addMagma holds
( b2 is Subgroup of G iff ( the carrier of b2 c= the carrier of G & the addF of b2 = the addF of G || the carrier of b2 ) );