Problem at Line ~1680

Depending on number of lines of code below the ELSE, the code gives
different numbers of failed particles and failed TRISO layers.