X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fconform_compar.F90;h=cffdb48583e9eb5cacd47d24b2f43269d1212113;hb=bc23440fbe68672d430f71f22f46b11265f003db;hp=1d3a632afc15d28dae135d52488ef34212cb6ea2;hpb=19eb6797997afd83690e2dc4314882fe511fd44f;p=unres4.git

diff --git a/source/wham/conform_compar.F90 b/source/wham/conform_compar.F90
index 1d3a632..cffdb48 100644
--- a/source/wham/conform_compar.F90
+++ b/source/wham/conform_compar.F90
@@ -1009,6 +1009,10 @@
           it1=itype(i1,1)
           it2=itype(i2,1)
           if (mnum.eq.0) mnum=1
+          if ((it1.eq.0).or.(it2.eq.0)) then 
+          it1=1
+          it2=1
+          endif
           print *,"CONTACT",i1,i2,mnum,it1,it2
           write (iout,'(i3,2x,a,i4,2x,a,i4,5f8.3,3f10.5)') &
            i,restyp(it1,mnum),i1,restyp(it2,mnum),i2,cscore(i),&