LMDZ
yomgstats.F90 File Reference

Go to the source code of this file.

Modules

module  yomgstats
 

Variables

logical yomgstats::lstats = .TRUE.
 
logical yomgstats::lstats_omp = .FALSE.
 
logical yomgstats::lstats_comms = .FALSE.
 
logical yomgstats::lstats_mem = .FALSE.
 
logical yomgstats::lstats_alloc = .FALSE.
 
logical yomgstats::lstatscpu = .TRUE.
 
logical yomgstats::lsyncstats = .FALSE.
 
logical yomgstats::ldetailed_stats = .TRUE.
 
logical yomgstats::lbarrier_stats = .FALSE.
 
logical yomgstats::ltrace_stats = .FALSE.
 
logical yomgstats::lgstats_label = .FALSE.
 
integer(kind=jpim), parameter yomgstats::jpmaxstat =2500
 
integer(kind=jpim), parameter yomgstats::jpobcount_base =201
 
integer(kind=jpim) yomgstats::ntrace_stats =0
 
integer(kind=jpim), dimension(0:jpmaxstat) yomgstats::ncalls
 
integer(kind=jpim) yomgstats::ncalls_total =0
 
integer(kind=jpim), dimension(:), allocatable yomgstats::ncall_trace
 
real(kind=jprb), dimension(0:jpmaxstat) yomgstats::timesum
 
real(kind=jprb), dimension(0:jpmaxstat) yomgstats::timesqsum
 
real(kind=jprb), dimension(0:jpmaxstat) yomgstats::timemax
 
real(kind=jprb), dimension(0:jpmaxstat) yomgstats::timesumb
 
real(kind=jprb), dimension(0:jpmaxstat) yomgstats::timelcall
 
real(kind=jprb), dimension(0:jpmaxstat) yomgstats::ttcpusum
 
real(kind=jprb), dimension(0:jpmaxstat) yomgstats::tvcpusum
 
real(kind=jprb), dimension(0:jpmaxstat) yomgstats::thistime
 
real(kind=jprb), dimension(0:jpmaxstat) yomgstats::thistcpu
 
real(kind=jprb), dimension(0:jpmaxstat) yomgstats::thisvcpu
 
real(kind=jprb), dimension(0:jpmaxstat) yomgstats::ttcpulcall
 
real(kind=jprb), dimension(0:jpmaxstat) yomgstats::tvcpulcall
 
real(kind=jprb) yomgstats::time_last_call
 
real(kind=jprb), dimension(:), allocatable yomgstats::time_start
 
real(kind=jprb), dimension(:), allocatable yomgstats::time_trace
 
integer(kind=jpim), parameter yomgstats::jperr =0
 
integer(kind=jpim), parameter yomgstats::jptagstat =20555
 
character *50, dimension(0:jpmaxstat) yomgstats::ccdesc = ""
 
character *3, dimension(0:jpmaxstat) yomgstats::cctype = ""
 
integer(kind=jpim) yomgstats::nproc_stats = 1
 
integer(kind=jpim) yomgstats::myproc_stats = 1
 
integer(kind=jpim), dimension(:), allocatable yomgstats::nprcids_stats
 
integer(kind=jpim), dimension(0:jpmaxstat, 5) yomgstats::ntmem
 
integer(kind=jpim) yomgstats::nstats_mem =0
 
integer(kind=jpim) yomgstats::nprnt_stats =3