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

Fixing off-by-one error in material/temp indexing when crossing surfaces in DAGMC.

Browse source
This commit is contained in:
Patrick Shriwise 2019-01-21 13:57:11 -06:00
parent 747bde1558
commit 69a77caf1b
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/tracking.F90
View file

@ -498,8 +498,8 @@ contains
! set new cell value
p % coord(1) % cell = i_cell-1 ! decrement for C++ indexing
p % cell_instance = 1
p % material = cells(i_cell) % material(1)
p % sqrtKT = cells(i_cell) % sqrtKT(1)
p % material = cells(i_cell) % material(0)
p % sqrtKT = cells(i_cell) % sqrtKT(0)
return
end if
#endif