crp/OpenMC
1
0
Fork 0
mirror of https://github.com/openmc-dev/openmc.git synced 2026-07-28 14:15:42 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

If "current" score is specified, make sure a mesh filter is also

Browse source 
specified. Closes #322 on github.
This commit is contained in:
Paul Romano 2014-09-25 21:29:07 -04:00
parent 9cd04862bb
commit 2a95ef7a42
1 changed files with 6 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/input_xml.F90
View file

@ -2647,6 +2647,12 @@ contains
! Get index of mesh filter
k = t % find_filter(FILTER_MESH)
! Check to make sure mesh filter was specified
if (k == 0) then
message = "Cannot tally surface current without a mesh filter."
call fatal_error()
end if
! Get pointer to mesh
i_mesh = t % filters(k) % int_bins(1)
m => meshes(i_mesh)