From d7a7d0f45c26d41dd772de204490b47bec2e27c5 Mon Sep 17 00:00:00 2001 From: Paul Romano Date: Thu, 17 Apr 2014 17:09:04 -0400 Subject: [PATCH] Fix bug with specifying xs attribute. Closes #269 on github. --- src/input_xml.F90 | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/input_xml.F90 b/src/input_xml.F90 index 76b1f696f..b6ac4ae6c 100644 --- a/src/input_xml.F90 +++ b/src/input_xml.F90 @@ -1520,7 +1520,9 @@ contains call get_node_value(node_ele, "name", name) ! Check for cross section - if (.not.check_for_node(node_ele, "xs")) then + if (check_for_node(node_ele, "xs")) then + call get_node_value(node_ele, "xs", temp_str) + else if (default_xs == '') then message = "No cross section specified for nuclide in material " & // trim(to_str(mat % id))