Adam's wham update
[unres.git] / source / wham / src-HCD / read_constr_homology.F
index fa81b80..03d7968 100644 (file)
@@ -259,8 +259,8 @@ c    &                       constr_homology
               endif
               sigma_odl(k,ii)=1.0d0/(sigma_odl(k,ii)*sigma_odl(k,ii)) 
             else
-              ii=ii+1
-              l_homo(k,ii)=.false.
+c              ii=ii+1
+c              l_homo(k,ii)=.false.
             endif
             enddo
           enddo