--- trunk/OOPSE_old/src/mdtools/libmdCode/calc_LJ_FF.F90	2003/03/21 15:07:14	375
+++ trunk/OOPSE_old/src/mdtools/libmdCode/calc_LJ_FF.F90	2003/03/21 15:24:37	376
@@ -2,7 +2,7 @@
 !! Corresponds to the force field defined in lj_FF.cpp 
 !! @author Charles F. Vardeman II
 !! @author Matthew Meineke
-!! @version $Id: calc_LJ_FF.F90,v 1.14 2003-03-21 15:07:14 chuckv Exp $, $Date: 2003-03-21 15:07:14 $, $Name: not supported by cvs2svn $, $Revision: 1.14 $
+!! @version $Id: calc_LJ_FF.F90,v 1.15 2003-03-21 15:24:37 chuckv Exp $, $Date: 2003-03-21 15:24:37 $, $Name: not supported by cvs2svn $, $Revision: 1.15 $
 
 module lj
   use definitions
@@ -195,7 +195,7 @@ contains
     real( kind = dp ) :: t12
     real( kind = dp ) :: delta
 
-    write(*,*) "Doing lj pair"
+
     if (rij.lt.LJ_rcut)  then
 
        ! Look up the correct parameters in the mixing matrix
@@ -266,7 +266,6 @@ contains
        endif
        
     endif
-    write(*,*) "potential at end of do_lj_pair: ", pot
     return    
        
   end subroutine do_lj_pair