From cf22a36bfd6284781b4e9e80202e9ad81f56a3b5 Mon Sep 17 00:00:00 2001
From: Paul Romano <paul.k.romano@gmail.com>
Date: Sat, 20 Dec 2014 15:30:49 -0500
Subject: [PATCH] Prevent error relating to histogram interpolation.

---
 src/physics.F90 | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/physics.F90 b/src/physics.F90
index b472b36ca0..963db74e39 100644
--- a/src/physics.F90
+++ b/src/physics.F90
@@ -1680,6 +1680,8 @@ contains
         ! call write_particle_restart(p)
         call fatal_error("Multiple interpolation regions not supported while &
              &attempting to sample continuous tabular distribution.")
+      else
+        histogram_interp = .false.
       end if
 
       ! find energy bin and calculate interpolation factor -- if the energy is