From 0323c3911ef0839c55d290c6ec776cb2442fe0c0 Mon Sep 17 00:00:00 2001 From: Patrick Shriwise Date: Thu, 31 Jan 2019 13:19:32 -0600 Subject: [PATCH] Returning location of geometry read. --- 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 07ed09aaf0..7cdb19a110 100644 --- a/src/input_xml.F90 +++ b/src/input_xml.F90 @@ -124,9 +124,9 @@ contains type(VectorReal), allocatable :: sab_temps(:) ! List of T to read for each S(a,b) call read_settings_xml() - call read_geometry_xml() call read_cross_sections_xml() call read_materials_xml() + call read_geometry_xml() ! Convert user IDs -> indices, assign temperatures call finalize_geometry(nuc_temps, sab_temps)