:: deftheorem defEMLat defines EMLat ZMODLAT2:def 4 :
for L being Z_Lattice
for b2 being strict Z_Lattice holds
( b2 = EMLat L iff ( the carrier of b2 = rng (MorphsZQ L) & the ZeroF of b2 = zeroCoset L & the addF of b2 = (addCoset L) || (rng (MorphsZQ L)) & the lmult of b2 = (lmultCoset L) | [: the carrier of INT.Ring,(rng (MorphsZQ L)):] & the scalar of b2 = ScProductEM L ) );