From 3ab959cc3e9b9c9a3f90b6a96117fb1b032263a3 Mon Sep 17 00:00:00 2001
From: Paul Romano <paul.k.romano@gmail.com>
Date: Wed, 2 May 2018 15:23:48 -0500
Subject: [PATCH] Fix bug when no outer lattice universe is defined

---
 src/geometry.F90 | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/geometry.F90 b/src/geometry.F90
index 0bacd7b5d..e747b619a 100644
--- a/src/geometry.F90
+++ b/src/geometry.F90
@@ -355,9 +355,10 @@ contains
             else
               ! Particle is outside the lattice.
               if (lat % outer == NO_OUTER_UNIVERSE) then
-                call p % mark_as_lost("Particle " // trim(to_str(p %id)) &
+                call warning("Particle " // trim(to_str(p %id)) &
                      // " is outside lattice " // trim(to_str(lat % id)) &
                      // " but the lattice has no defined outer universe.")
+                found = .false.
                 return
               else
                 p % coord(j + 1) % universe = lat % outer