X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc-M%2Freadpdb.f;h=8762ebb5a10975530c93536cc8a48f927e2ca9ac;hb=e51900fbfd051455bc2983ff8d287899ec47822f;hp=3e7ecb33bf149218a80e2369d58a96493bf82e86;hpb=11a30d63a53082c984f22fcf36766666cbec2cc1;p=unres.git diff --git a/source/wham/src-M/readpdb.f b/source/wham/src-M/readpdb.f index 3e7ecb3..8762ebb 100644 --- a/source/wham/src-M/readpdb.f +++ b/source/wham/src-M/readpdb.f @@ -337,7 +337,7 @@ c--------------------------------------------------------------------------- if (iti.ne.ntyp1 .and. itype(i+1).ne.ntyp1 .and. & (dist(i,i+1).lt.2.0D0 .or. dist(i,i+1).gt.5.0D0)) then write (iout,'(a,i4)') 'Bad Cartesians for residue',i - stop +c stop endif vbld(i+1)=dist(i,i+1) vbld_inv(i+1)=1.0d0/vbld(i+1)