correction for gfortran

[unres4.git] / source / cluster / io_clust.f90

diff --git a/source/cluster/io_clust.f90 b/source/cluster/io_clust.f90
index 7570389..1e24794 100644 (file)
--- a/source/cluster/io_clust.f90
+++ b/source/cluster/io_clust.f90
@@ -1357,7 +1357,8 @@
                  indpdb
       use geometry, only: chainbuild,alloc_geo_arrays
       use energy, only: alloc_ener_arrays
-      use control, only: rescode,setup_var,init_int_table
+      use io_base, only: rescode
+      use control, only: setup_var,init_int_table
       use conform_compar, only: contact
 !      implicit none
 !      include 'DIMENSIONS'