Adam's unres update
[unres.git] / source / unres / src-HCD-5D / dfa.F
index 1af0b44..3982b6d 100644 (file)
@@ -368,7 +368,6 @@ C     END OF BETA RESTRAINT
       edfadis=0
       gdfad=0.0d0
 
-c      write (2,*) "edfad",idfadis_start,idfadis_end
       do i=idfadis_start,idfadis_end
 
          iatm1=idislis(1,i)+ishiftca