Merge branch 'devel' of mmka.chem.univ.gda.pl:unres into devel

[unres.git] / source / unres / src_MD / map.f

diff --git a/source/unres/src_MD/map.f b/source/unres/src_MD/map.f
index 6ea2632..9dbe64e 100644 (file)
--- a/source/unres/src_MD/map.f
+++ b/source/unres/src_MD/map.f
@@ -56,6 +56,7 @@ Cd      write (iout,*) i,iii,(nn(j),j=1,nmap)
           enddo ! k
         enddo ! j
         call chainbuild
+        call int_from_cart1(.false.)
         if (minim) then 
          call geom_to_var(nvar,x)
          call minimize(etot,x,iretcode,nfun)