X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc-HCD-5D%2Fnewconf.f;h=979155530cc84f85392fa8d2f5e1dcd21e75ef2f;hb=c711143ad3fffb04d27b55aa823f399b8343c4c5;hp=5f93b95097bac1db3472d5e89a8d458f0eccd7cc;hpb=76ef494efde78d2d85d0e72d936c13166961256c;p=unres.git diff --git a/source/unres/src-HCD-5D/newconf.f b/source/unres/src-HCD-5D/newconf.f index 5f93b95..9791555 100644 --- a/source/unres/src-HCD-5D/newconf.f +++ b/source/unres/src-HCD-5D/newconf.f @@ -10,7 +10,7 @@ ccccccccccccccccccccccccccccccccccccccccccccccccc include 'COMMON.INTERACT' include 'COMMON.HAIRPIN' include 'COMMON.VAR' - include 'COMMON.DISTFIT' + include 'COMMON.FRAG' include 'COMMON.GEO' include 'COMMON.CONTROL' logical nicht_getan,nicht_getan1,fail,lfound @@ -2299,7 +2299,7 @@ ccccccccccccccccccccccccccccccccccccccccccccccccc include 'COMMON.GEO' include 'COMMON.VAR' include 'COMMON.HAIRPIN' - include 'COMMON.DISTFIT' + include 'COMMON.FRAG' character*50 linia integer isec(maxres)