diff --git a/src/geometry.F90 b/src/geometry.F90 index 24d3ef8b06..187a207fd9 100644 --- a/src/geometry.F90 +++ b/src/geometry.F90 @@ -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