--- trunk/OOPSE-2.0/src/UseTheForce/notifyCutoffs.F90	2005/01/12 22:41:40	1930
+++ trunk/OOPSE-2.0/src/UseTheForce/notifyCutoffs.F90	2005/01/14 20:31:16	1948
@@ -116,13 +116,3 @@ contains
     end subroutine cutoffNotify
 
   end module notifyCutoffs
-  
-  subroutine notifyFortranCutoffs(this_rcut, this_rsw, this_rlist )
-    use notifyCutoffs
-    use definitions, ONLY : dp
-    
-    real(kind=dp), intent(in) :: this_rcut, this_rsw, this_rlist
-    
-    call cutoffNotify(this_rcut, this_rsw, this_rlist )
-    
-  end subroutine