Mathematica 6 has immediately available more than 35 properties of standard lattices in any number of dimensions. This shows the Bravais lattices.

Show[LatticeData[#, "Image"], ImageSize -> 80] & /@ 

 LatticeData["Bravais"]