1 DOUBLE PRECISION BATIME,TIMLIM,STIME,PREVTIM,SAFETY
2 DOUBLE PRECISION WALLTIME
4 c FOUND_NAN - set by calcf to stop sumsl via stopx
6 COMMON/TIME1/STIME,TIMLIM,BATIME,PREVTIM,SAFETY,WALLTIME
8 common /sumsl_flag/ FOUND_NAN
9 double precision t_init,t_MDsetup,t_langsetup,t_MD,
10 & t_enegrad,t_sdsetup,time_bcast,time_reduce,time_gather,
11 & time_sendrecv,time_barrier_e,time_barrier_g,time_scatter,
12 & t_eelecij,time_bcast7,time_bcastc,time_bcastw,time_allreduce,
13 & time_enecalc,time_sumene,time_lagrangian,time_cartgrad,
14 & time_sumgradient,time_intcartderiv,time_inttocart,time_intfcart,
15 & time_vec,time_mat,time_ginvmult,time_fricmatmult,time_fric,
16 & time_scatter_fmat,time_scatter_ginv,
17 & time_fsample,time_scatter_fmatmult,time_scatter_ginvmult,
18 & time_stoch,t_eshort,t_elong,t_etotal
19 common /timing/ t_init,t_MDsetup,t_langsetup,
20 & t_MD,t_enegrad,t_sdsetup,time_bcast,time_reduce,time_gather,
21 & time_sendrecv,time_scatter,time_barrier_e,time_barrier_g,
22 & time_bcast7,time_bcastc,time_bcastw,time_allreduce,
23 & t_eelecij,time_enecalc,time_sumene,time_lagrangian,time_cartgrad,
24 & time_sumgradient,time_intcartderiv,time_inttocart,time_intfcart,
25 & time_vec,time_mat,time_ginvmult,time_fricmatmult,time_fric,
26 & time_fsample,time_scatter_fmatmult,time_scatter_ginvmult,
27 & time_scatter_fmat,time_scatter_ginv,
28 & time_stoch,t_eshort,t_elong,t_etotal