X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M-newcorr%2FCOMMON.TIME1;fp=source%2Funres%2Fsrc_MD-M-newcorr%2FCOMMON.TIME1;h=d6203a6d3722c3009dffb078bd77782e3f119c69;hb=d101c97dea752458d76055fdbae49c26fff03c1f;hp=0000000000000000000000000000000000000000;hpb=325eda160c9ad2982501e091ca40606a29043712;p=unres.git

diff --git a/source/unres/src_MD-M-newcorr/COMMON.TIME1 b/source/unres/src_MD-M-newcorr/COMMON.TIME1
new file mode 100644
index 0000000..d6203a6
--- /dev/null
+++ b/source/unres/src_MD-M-newcorr/COMMON.TIME1
@@ -0,0 +1,28 @@
+      DOUBLE PRECISION BATIME,TIMLIM,STIME,PREVTIM,SAFETY
+      DOUBLE PRECISION WALLTIME
+      INTEGER ISTOP
+c     FOUND_NAN - set by calcf to stop sumsl via stopx
+      logical FOUND_NAN
+      COMMON/TIME1/STIME,TIMLIM,BATIME,PREVTIM,SAFETY,WALLTIME
+      COMMON/STOPTIM/ISTOP
+      common /sumsl_flag/ FOUND_NAN
+      double precision t_init,t_MDsetup,t_langsetup,t_MD,
+     & t_enegrad,t_sdsetup,time_bcast,time_reduce,time_gather,
+     & time_sendrecv,time_barrier_e,time_barrier_g,time_scatter,
+     & t_eelecij,time_bcast7,time_bcastc,time_bcastw,time_allreduce,
+     & time_enecalc,time_sumene,time_lagrangian,time_cartgrad,
+     & time_sumgradient,time_intcartderiv,time_inttocart,time_intfcart,
+     & time_vec,time_mat,time_ginvmult,time_fricmatmult,time_fric,
+     & time_scatter_fmat,time_scatter_ginv,
+     & time_fsample,time_scatter_fmatmult,time_scatter_ginvmult,
+     & time_stoch,t_eshort,t_elong,t_etotal
+      common /timing/ t_init,t_MDsetup,t_langsetup,
+     & t_MD,t_enegrad,t_sdsetup,time_bcast,time_reduce,time_gather,
+     & time_sendrecv,time_scatter,time_barrier_e,time_barrier_g,
+     & time_bcast7,time_bcastc,time_bcastw,time_allreduce,
+     & t_eelecij,time_enecalc,time_sumene,time_lagrangian,time_cartgrad,
+     & time_sumgradient,time_intcartderiv,time_inttocart,time_intfcart,
+     & time_vec,time_mat,time_ginvmult,time_fricmatmult,time_fric,
+     & time_fsample,time_scatter_fmatmult,time_scatter_ginvmult,
+     & time_scatter_fmat,time_scatter_ginv,
+     & time_stoch,t_eshort,t_elong,t_etotal