From 49c36b2e950fa057185abd52c5a315a6628caa81 Mon Sep 17 00:00:00 2001
From: Paul Romano <paul.k.romano@gmail.com>
Date: Thu, 21 Mar 2013 14:02:29 -0400
Subject: [PATCH] Don't convert surface ids if surface filter is for current
 tallies. Closes #157 on github.

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

diff --git a/src/initialize.F90 b/src/initialize.F90
index ff3a2090f0..869c63ac06 100644
--- a/src/initialize.F90
+++ b/src/initialize.F90
@@ -540,6 +540,9 @@ contains
 
         case (FILTER_SURFACE)
 
+          ! Check if this is a surface filter only for surface currents
+          if (any(t % score_bins == SCORE_CURRENT)) cycle FILTER_LOOP
+
           do k = 1, t % filters(j) % n_bins
             id = t % filters(j) % int_bins(k)
             if (surface_dict % has_key(id)) then