X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fcluster%2Fwham%2Fsrc%2Fenergy_p_new.F;h=1d9dda432732b9cbdd61e9b37a7fc996ed40f62a;hb=ffd307c4e80731e67fad817fc591b52a4bb9c1f3;hp=1b69eb358ecee26b9d81ee9a66a11d0772cb2f57;hpb=663f6b722c0739f92d479a91a682405e9bda53fe;p=unres.git

diff --git a/source/cluster/wham/src/energy_p_new.F b/source/cluster/wham/src/energy_p_new.F
index 1b69eb3..1d9dda4 100644
--- a/source/cluster/wham/src/energy_p_new.F
+++ b/source/cluster/wham/src/energy_p_new.F
@@ -336,7 +336,7 @@ C
       implicit real*8 (a-h,o-z)
       include 'DIMENSIONS'
       include 'sizesclu.dat'
-      include "DIMENSIONS.COMPAR"
+c      include "DIMENSIONS.COMPAR"
       parameter (accur=1.0d-10)
       include 'COMMON.GEO'
       include 'COMMON.VAR'
@@ -497,7 +497,7 @@ C
       implicit real*8 (a-h,o-z)
       include 'DIMENSIONS'
       include 'sizesclu.dat'
-      include "DIMENSIONS.COMPAR"
+c      include "DIMENSIONS.COMPAR"
       include 'COMMON.GEO'
       include 'COMMON.VAR'
       include 'COMMON.LOCAL'
@@ -586,7 +586,7 @@ C
       implicit real*8 (a-h,o-z)
       include 'DIMENSIONS'
       include 'sizesclu.dat'
-      include "DIMENSIONS.COMPAR"
+c      include "DIMENSIONS.COMPAR"
       include 'COMMON.GEO'
       include 'COMMON.VAR'
       include 'COMMON.LOCAL'
@@ -713,7 +713,7 @@ C
       implicit real*8 (a-h,o-z)
       include 'DIMENSIONS'
       include 'sizesclu.dat'
-      include "DIMENSIONS.COMPAR"
+c      include "DIMENSIONS.COMPAR"
       include 'COMMON.GEO'
       include 'COMMON.VAR'
       include 'COMMON.LOCAL'
@@ -844,7 +844,7 @@ C
       implicit real*8 (a-h,o-z)
       include 'DIMENSIONS'
       include 'sizesclu.dat'
-      include "DIMENSIONS.COMPAR"
+c      include "DIMENSIONS.COMPAR"
       include 'COMMON.GEO'
       include 'COMMON.VAR'
       include 'COMMON.LOCAL'