changes
[unres.git] / source / unres / src-HCD-5D / dfa.F
index 3982b6d..1af0b44 100644 (file)
@@ -368,6 +368,7 @@ 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