X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc-HCD-5D%2Freadpdb.F;h=943d67d12d31201e2ec5d5c68660f72dc78b02f8;hb=c711143ad3fffb04d27b55aa823f399b8343c4c5;hp=78d0d98d6df0285c5c66f9430bf3ee018a110f6c;hpb=76ef494efde78d2d85d0e72d936c13166961256c;p=unres.git

diff --git a/source/unres/src-HCD-5D/readpdb.F b/source/unres/src-HCD-5D/readpdb.F
index 78d0d98..943d67d 100644
--- a/source/unres/src-HCD-5D/readpdb.F
+++ b/source/unres/src-HCD-5D/readpdb.F
@@ -11,7 +11,7 @@ C geometry.
       include 'COMMON.GEO'
       include 'COMMON.NAMES'
       include 'COMMON.CONTROL'
-      include 'COMMON.DISTFIT'
+      include 'COMMON.FRAG'
       include 'COMMON.SETUP'
       include 'COMMON.SBRIDGE'
       character*3 seq,atom,res
@@ -588,7 +588,7 @@ C and convert the peptide geometry into virtual-chain geometry.
       include 'COMMON.GEO'
       include 'COMMON.NAMES'
       include 'COMMON.CONTROL'
-      include 'COMMON.DISTFIT'
+      include 'COMMON.FRAG'
       include 'COMMON.SETUP'
       integer i,j,k,ibeg,ishift1,ires,iii,ires_old,ishift,ity,
      &  ishift_pdb,ires_ca