:: deftheorem defDualLat defines DualLat ZMODLAT3:def 10 :
for L being positive-definite RATional Z_Lattice
for b2 being strict Z_Lattice holds
( b2 = DualLat L iff ( the carrier of b2 = DualSet L & 0. b2 = 0. (DivisibleMod L) & the addF of b2 = the addF of (DivisibleMod L) || the carrier of b2 & the lmult of b2 = the lmult of (DivisibleMod L) | [: the carrier of INT.Ring, the carrier of b2:] & the scalar of b2 = (ScProductDM L) || the carrier of b2 ) );