From 71364ca160e92dc388e231c5ed397e2eccfbcafa Mon Sep 17 00:00:00 2001 From: Paul Romano Date: Wed, 29 Aug 2012 17:29:47 -0400 Subject: [PATCH] Removed unused variables in input_xml module. --- src/input_xml.F90 | 4 ---- 1 file changed, 4 deletions(-) diff --git a/src/input_xml.F90 b/src/input_xml.F90 index 7084ea31fe..2697f16854 100644 --- a/src/input_xml.F90 +++ b/src/input_xml.F90 @@ -52,9 +52,6 @@ contains character(MAX_WORD_LEN) :: type character(MAX_LINE_LEN) :: filename - integer :: n_words ! number of words read - character(MAX_WORD_LEN) :: words(MAX_WORDS) - ! Display output message message = "Reading settings XML file..." call write_message(5) @@ -1171,7 +1168,6 @@ contains logical :: file_exists ! does tallies.xml file exist? character(MAX_LINE_LEN) :: filename character(MAX_WORD_LEN) :: word - character(MAX_WORD_LEN) :: words(MAX_WORDS) type(TallyObject), pointer :: t => null() type(StructuredMesh), pointer :: m => null()