Classes and methods used to compute elasped wall time
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| character(len=*), | public, | parameter | :: | ENCOUNTER_PLPL_TIMER_LOG_OUT | = | "encounter_check_plpl_timer.log" |
Name of log file for recording results of encounter check method timing |
| character(len=*), | public, | parameter | :: | ENCOUNTER_PLTP_TIMER_LOG_OUT | = | "encounter_check_pltp_timer.log" |
Name of log file for recording results of encounter check method timing |
| integer(kind=I4B), | public | :: | INTERACTION_TIMER_CADENCE | = | 1000 |
Minimum number of steps to wait before timing an interaction loop in ADAPTIVE mode |
|
| character(len=*), | public, | parameter | :: | INTERACTION_TIMER_LOG_OUT | = | "interaction_timer.log" |
Name of log file for recording results of interaction loop timing |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(walltimer), | intent(inout) | :: | self |
Walltimer object |
||
| character(len=*), | intent(in) | :: | message |
Message to prepend to the wall time terminal output |
||
| integer(kind=I4B), | intent(in) | :: | unit |
Output file unit for report text to be directed |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(walltimer), | intent(inout) | :: | self |
Walltimer object |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(walltimer), | intent(inout) | :: | self |
Walltimer object |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(walltimer), | intent(inout) | :: | self |
Walltimer object |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(walltimer), | intent(inout) | :: | self |
Walltimer object |
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer(kind=I8B), | public | :: | count_max |
Maximum value of the clock ticker |
|||
| integer(kind=I8B), | public | :: | count_pause |
Value of the clock ticker at the end of a timed step |
|||
| integer(kind=I8B), | public | :: | count_rate |
Rate at wich the clock ticks |
|||
| integer(kind=I8B), | public | :: | count_start_main |
Value of the clock ticker at when the timer is first called |
|||
| integer(kind=I8B), | public | :: | count_start_step |
Value of the clock ticker at the start of a timed step |
|||
| integer(kind=I8B), | public | :: | count_stop_step |
Value of the clock ticker at the end of a timed step |
|||
| logical, | public | :: | is_paused | = | .false. |
Logical flag indicating whether or not the timer is paused |
|
| logical, | public | :: | main_is_started | = | .false. |
Logical flag indicating whether or not the main timer has been reset or not |
|
| integer(kind=I4B), | public | :: | nsubsteps |
Number of substeps in an interval (number of times the timer is turned off and back on again) |
|||
| real(kind=DP), | public | :: | wall_main |
Value of the main clock elapsed time |
|||
| real(kind=DP), | public | :: | wall_per_substep |
Value of time per substep |
|||
| real(kind=DP), | public | :: | wall_step |
Value of the step elapsed time |
| procedure, public :: report => walltime_report | Prints the elapsed time information to the terminal |
| procedure, public :: reset => walltime_reset | Resets the clock ticker, settting main_start to the current ticker value |
| procedure, public :: start => walltime_start | Starts or resumes the step timer |
| procedure, public :: start_main => walltime_start_main | Starts the main timer |
| procedure, public :: stop => walltime_stop | Pauses the step timer |