theorem ThRatLat1: :: ZMODLAT3:48
for L being Z_Lattice
for I being Basis of L st ( for v, u being Vector of L st v in I & u in I holds
<;v,u;> in RAT ) holds
L is RATional