MPI shield

[unres4.git] / source / unres / data / energy_data.f90

diff --git a/source/unres/data/energy_data.f90 b/source/unres/data/energy_data.f90
index 4077472..5f340cf 100644 (file)
--- a/source/unres/data/energy_data.f90
+++ b/source/unres/data/energy_data.f90
@@ -14,6 +14,7 @@
 !-----------------------------------------------------------------------------
 ! Max. number of contacts per residue
       integer :: maxconts
+      integer,parameter :: maxcontsshi=50
 !-----------------------------------------------------------------------------
 ! Max. number of SC contacts
       integer :: maxcont