From 4b60230935ea2ac5b23b32d344405bf622f0f9ed Mon Sep 17 00:00:00 2001
From: Sterling Harper <smharper@mit.edu>
Date: Thu, 7 Feb 2019 10:22:00 -0500
Subject: [PATCH] Avoid decay-rate segfault with non-fissionable nuc

---
 src/tallies/tally.F90 | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/tallies/tally.F90 b/src/tallies/tally.F90
index 9038d1dd8e..fd123c8729 100644
--- a/src/tallies/tally.F90
+++ b/src/tallies/tally.F90
@@ -736,6 +736,9 @@ contains
           ! Check if tally is on a single nuclide
           if (i_nuclide > 0) then
 
+            ! Ignore non-fissionable nuclides
+            if (.not. nuclides(i_nuclide) % fissionable) cycle SCORE_LOOP
+
             ! Check if the delayed group filter is present
             if (dg_filter > 0) then
               select type(filt => filters(t % filter(dg_filter)) % obj)