Removed uneccesary hex_lattice assignments

This commit is contained in:
Sterling Harper 2014-09-26 00:30:30 -04:00
parent 34f89ae724
commit e8eb0f3d17

View file

@ -1373,8 +1373,6 @@ contains
type is (HexLattice) LAT_TYPE
! Copy local coordinates.
x = coord % xyz(1)
y = coord % xyz(2)
z = coord % xyz(3)
i_xyz(1) = coord % lattice_x
i_xyz(2) = coord % lattice_y