X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fxdrfpdb%2Fsrc-M%2Fxdrf2pdb.F;h=503d7d7736dc31387a931ea3cb69a52d887d84bd;hb=8240250d17b6fe7bc28f03d503d5f9c6ad935297;hp=c87e9ffa9312bdd02eb23b8cfd0f06662a9f67af;hpb=c71a905b2a21b14efa07284b5feeb3a05828e44a;p=unres.git

diff --git a/source/xdrfpdb/src-M/xdrf2pdb.F b/source/xdrfpdb/src-M/xdrf2pdb.F
index c87e9ff..503d7d7 100644
--- a/source/xdrfpdb/src-M/xdrf2pdb.F
+++ b/source/xdrfpdb/src-M/xdrf2pdb.F
@@ -88,9 +88,9 @@
       endif
       open(9,file=pdbfile)
       nnt = 1
-      if (itype(1).eq.21) nnt = 2
+      if (itype(1).eq.ntyp1) nnt = 2
       nct=nres
-      if (itype(nres).eq.21) nct = nres-1
+      if (itype(nres).eq.ntyp1) nct = nres-1
       print *,"nnt",nnt," nct",nct
       print *,"file",arg
       call xdrfopen(ixdrf,arg, "r", iret)