Defines vars and procs for cpu timing of code sections.
More...
|
subroutine | tim_construct (this) |
| Static constructor (procedure public for type tim )
|
|
subroutine | tim_destroy (this) |
| Static destructor (procedure public for type tim ).
|
|
subroutine | tim_print (this, lun, add_msg, add_msg1, add_msg2) |
| Info procedure (public procedure for type tim ).
|
|
subroutine | tim_set (this, code) |
| Set procedure (public procedure for type tim ). Sets the values of var of type tim .
|
|
Defines vars and procs for cpu timing of code sections.
◆ tim_construct()
subroutine timing::tim_construct |
( |
class(tim), intent(out) | this | ) |
|
Static constructor (procedure public for type tim
)
Instantiate (allocate if necessary) and initilize (by also reading from input file) variable of type tim
.
- Parameters
-
[out] | this | Object of type tim calling the constructor |
◆ tim_destroy()
subroutine timing::tim_destroy |
( |
class(tim), intent(inout) | this | ) |
|
|
private |
Static destructor (procedure public for type tim
).
◆ tim_print()
subroutine timing::tim_print |
( |
class(tim), intent(in) | this, |
|
|
integer, intent(in) | lun, |
|
|
character(len=*), intent(in), optional | add_msg, |
|
|
character(len=*), intent(in), optional | add_msg1, |
|
|
character(len=*), intent(in), optional | add_msg2 ) |
|
private |
Info procedure (public procedure for type tim
).
Prints content of a variable of type tim
.
- Parameters
-
[in] | lun | integer. output unit |
[in] | add_msg | character, optional. additional message to be printed. |
[in] | add_msg1 | character, optional. additional message to be printed. |
[in] | add_msg2 | character, optional. additional message to be printed. |
◆ tim_set()
subroutine timing::tim_set |
( |
class(tim), intent(inout) | this, |
|
|
character(len=*), intent(in), optional | code ) |
|
private |
Set procedure (public procedure for type tim
). Sets the values of var of type tim
.
- Parameters
-
[in] | code | character, optional. Commands to start/stop/reset/accumulate stopwatch. If the variable is not given, the value of status will be used. Admissible values for code are two up to now are:
start : starts stopwatch.
stop : stops stopwatch and accumulates measured timing.
|