From 49ec9136a7d4323b42eac5ea102fce0bbc11851d Mon Sep 17 00:00:00 2001
From: Paul Romano <paul.k.romano@gmail.com>
Date: Wed, 11 Mar 2015 08:46:53 -0400
Subject: [PATCH] Change array to read rotation angles to real(8)

---
 src/input_xml.F90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/input_xml.F90 b/src/input_xml.F90
index 5bf4f41236..4c1f3c244c 100644
--- a/src/input_xml.F90
+++ b/src/input_xml.F90
@@ -904,8 +904,8 @@ contains
     integer :: universe_num
     integer :: n_cells_in_univ
     integer :: coeffs_reqd
-    integer :: temp_double_array3(3)
     integer, allocatable :: temp_int_array(:)
+    real(8) :: temp_double_array3(3)
     real(8) :: phi, theta, psi
     logical :: file_exists
     logical :: boundary_exists