X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2FMREMD.F90;h=341652627d5e293c9e60edd7b5f6650dbd395da6;hb=d4033f3ee5e94f3f22692d69fea70e36f231ebd1;hp=75062ede2e03d1566e18db4b8cd0a9a20efc18c0;hpb=f2b6c10194606cb27a4c4ceb30a82e6614d7e82a;p=unres4.git diff --git a/source/unres/MREMD.F90 b/source/unres/MREMD.F90 index 75062ed..3416526 100644 --- a/source/unres/MREMD.F90 +++ b/source/unres/MREMD.F90 @@ -616,7 +616,7 @@ ugamma_cache(i,ntwx_cache)=ugamma(i) uscdiff_cache(i,ntwx_cache)=uscdiff(i) enddo -! call returnbox + call returnbox do i=1,nres*2 do j=1,3 c_cache(j,i,ntwx_cache)=c(j,i)