From e8eb0f3d17fe272c1ce5ca327078650307f71f50 Mon Sep 17 00:00:00 2001
From: Sterling Harper <sterlingmharper@gmail.com>
Date: Fri, 26 Sep 2014 00:30:30 -0400
Subject: [PATCH] Removed uneccesary hex_lattice assignments

---
 src/geometry.F90 | 2 --
 1 file changed, 2 deletions(-)

diff --git a/src/geometry.F90 b/src/geometry.F90
index e8cc03cf27..d4406b0bb7 100644
--- a/src/geometry.F90
+++ b/src/geometry.F90
@@ -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