--- trunk/OOPSE/libmdtools/simulation_module.F90	2003/04/04 22:22:30	460
+++ trunk/OOPSE/libmdtools/simulation_module.F90	2003/04/08 17:16:22	480
@@ -104,12 +104,14 @@ contains
 
     call InitializeForceGlobals(natoms, thisStat)
     if (thisStat /= 0) then
+       write(default_error,*) "SimSetup: InitializeForceGlobals error"
        status = -1
        return
     endif
 
     call InitializeSimGlobals(thisStat)
     if (thisStat /= 0) then
+       write(default_error,*) "SimSetup: InitializeSimGlobals error"
        status = -1
        return
     endif
@@ -167,12 +169,6 @@ contains
     enddo
 #endif
 
-    !! Create neighbor lists
-    call expandNeighborList(nComponents, thisStat)
-    if (thisStat /= 0) then
-       status = -1
-       return
-    endif
 
 
     do i = 1, nExcludes_Local