corrections of max... ranges of arrays

[unres4.git] / source / wham / io_database.f90

diff --git a/source/wham/io_database.f90 b/source/wham/io_database.f90
index 13d4f37..c501d9f 100644 (file)
--- a/source/wham/io_database.f90
+++ b/source/wham/io_database.f90
@@ -4,7 +4,8 @@
       use wham_data
       use io_units
       use io_base, only:ilen
-      use energy_data, only:nnt,nct,nss,ihpb,jhpb,iset
+      use energy_data, only:nnt,nct,nss,ihpb,jhpb
+      use MD_data, only:iset
       use geometry_data, only:nres,c
 #ifdef MPI
       use MPI_data