debugging 5Dia
[unres4.git] / source / unres / unres.f90
index eea3923..12368af 100644 (file)
       print *,'Start MD'
       call alloc_MD_arrays
       print *,'After MD alloc'
-!      if (me.eq.king .or. .not. out1file) &
-!         write (iout,*) "Calling chainbuild"
-!      call chainbuild
+      if (me.eq.king .or. .not. out1file) &
+         write (iout,*) "Calling chainbuild"
+      call chainbuild
       call MD
       return
       end subroutine exec_MD