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

fixed check_source finds

Browse source
This commit is contained in:
Adam Nelson 2016-02-12 06:23:23 -05:00
parent 02a9441522
commit 8a14d600b0
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/input_xml.F90
View file

@ -2051,8 +2051,8 @@ contains
! Check to ensure material has at least one nuclide
if (.not. check_for_node(node_mat, "nuclide") .and. &
.not. check_for_node(node_mat, "element") .and. &
.not. check_for_node(node_mat, "macroscopic")) then
.not. check_for_node(node_mat, "element") .and. &
.not. check_for_node(node_mat, "macroscopic")) then
call fatal_error("No macroscopic data, nuclides or natural elements &
&specified on material " // trim(to_str(mat % id)))
end if