xdrf2pdb D amino

[unres.git] / source / xdrfpdb / src-M / xdrf2pdb.F

diff --git a/source/xdrfpdb/src-M/xdrf2pdb.F b/source/xdrfpdb/src-M/xdrf2pdb.F
index c87e9ff..503d7d7 100644 (file)
--- 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)