From a6a007e7f7f3c5fbfb2073dc005b98ecfc1b4f56 Mon Sep 17 00:00:00 2001 From: Sterling Harper Date: Wed, 28 Oct 2015 21:16:01 -0400 Subject: [PATCH] Fix material filter bug --- src/tally.F90 | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/tally.F90 b/src/tally.F90 index 0586860191..fcd6dfdd9b 100644 --- a/src/tally.F90 +++ b/src/tally.F90 @@ -1728,7 +1728,9 @@ contains p % coord(p % n_coord) % universe, i_tally) case (FILTER_MATERIAL) - if (p % material /= MATERIAL_VOID) then + if (p % material == MATERIAL_VOID) then + matching_bins(i) = NO_BIN_FOUND + else matching_bins(i) = get_next_bin(FILTER_MATERIAL, & p % material, i_tally) endif