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

Merge pull request #299 from paulromano/plane-distance-fix

Browse source 
Fix distance-to-surface calculation for general plane surface
This commit is contained in:
Bryan Herman 2014-08-01 08:50:15 -04:00
commit aba19aba77
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/geometry.F90
View file

@ -892,7 +892,7 @@ contains
if (on_surface .or. tmp == ZERO) then
d = INFINITY
else
d = -(A*x + B*y + C*w - D)/tmp
d = -(A*x + B*y + C*z - D)/tmp
if (d < ZERO) d = INFINITY
end if