X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc-HCD-5D%2Finitialize_p.F;fp=source%2Fwham%2Fsrc-HCD-5D%2Finitialize_p.F;h=0cf093ae98fb897f582ce3d6495bce95a158026a;hb=d02292725c202ff9c2749beac934bf1630f9017e;hp=8217663079b3a41588b218d32217b92338bfec53;hpb=6260e60062f93c75d71ad18219a28f1ab5611dec;p=unres.git diff --git a/source/wham/src-HCD-5D/initialize_p.F b/source/wham/src-HCD-5D/initialize_p.F index 8217663..0cf093a 100644 --- a/source/wham/src-HCD-5D/initialize_p.F +++ b/source/wham/src-HCD-5D/initialize_p.F @@ -22,6 +22,7 @@ C include "COMMON.NAMES" include "COMMON.TIME1" include "COMMON.TORCNSTR" + include "COMMON.SETUP" C C The following is just to define auxiliary variables used in angle conversion C @@ -237,6 +238,7 @@ C Set timers and counters for the respective routines n_viol = 0 n_gviol = 0 n_map = 0 + nfgtasks = 1 #ifndef SPLITELE nprint_ene=nprint_ene-1 #endif