crp/OpenMC
1
0
Fork 0
mirror of https://github.com/openmc-dev/openmc.git synced 2026-07-27 13:45:36 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

Removed unused variables in input_xml module.

Browse source
This commit is contained in:
Paul Romano 2012-08-29 17:29:47 -04:00
parent 42afe5c5b5
commit 71364ca160
1 changed files with 0 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/input_xml.F90
View file

@ -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()