X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?p=unres.git;a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2Funres.F;h=642b3618851018c7bc1fe680e817fbc0792c908c;hp=4903ec0d7112ba2289cb908bb50588159a372441;hb=0c5fb524ca994d617a32adfb678302e2f3dcef1e;hpb=ffd0e6dcc64b1ef30773e02b4ef72c1b2455fea5 diff --git a/source/unres/src_MD-M/unres.F b/source/unres/src_MD-M/unres.F index 4903ec0..642b361 100644 --- a/source/unres/src_MD-M/unres.F +++ b/source/unres/src_MD-M/unres.F @@ -196,23 +196,12 @@ c--------------------------------------------------------------------------- double precision energy(0:n_ene) double precision energy_long(0:n_ene),energy_short(0:n_ene) double precision varia(maxvar) -<<<<<<< HEAD - if (indpdb.eq.0) call chainbuild - time00=MPI_Wtime() - print *,'dc',c(1,1) - if (indpdb.ne.0) then - dc(1,0)=c(1,1) - dc(2,0)=c(2,1) - dc(3,0)=c(3,1) - endif -======= if (indpdb.eq.0) call chainbuild #ifdef MPI time00=MPI_Wtime() #else time00=tcpu() #endif ->>>>>>> f5379d3246c4bd95e946c4d35d4a1c13e329c4cb call chainbuild_cart print *,'dc',dc(1,0),dc(2,0),dc(3,0) if (split_ene) then