From 6d3199b7ab37ad5664ca3b810f1031d381e41f1f Mon Sep 17 00:00:00 2001
From: Paul Romano <paul.k.romano@gmail.com>
Date: Fri, 4 Sep 2015 12:34:03 +0700
Subject: [PATCH] Get rid of unused read_source routine in state_point module

---
 src/state_point.F90 | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/src/state_point.F90 b/src/state_point.F90
index aca6fafb75..0267ed4ecb 100644
--- a/src/state_point.F90
+++ b/src/state_point.F90
@@ -1089,8 +1089,4 @@ contains
 
   end subroutine read_source_bank
 
-  subroutine read_source
-! TODO write this routine
-! TODO what if n_particles does not match source bank
-  end subroutine read_source
 end module state_point