Definition of a time control.
The control is active in the range of time between min and max. It will trigger its action after a time interval specified in interval. For all time definitions always the one that occurs first is being used.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(tem_time_type), | private | :: | min | Minimal point in time, from where on, this control should be active. Whichever time definition happens first will be used. |
|||
type(tem_time_type), | private | :: | max | Maximal point in time, after which the control should not be active anymore. Whichever time definition happens first will be used. |
|||
type(tem_time_type), | private | :: | interval | A regular interval at which an action should be triggered between min and max. |
|||
type(tem_time_type), | private | :: | trigger | Keep track of the next point in time, at which an action should be triggered by this control. |
|||
logical, | private | :: | delay_check | = | .false. | Configuration flag, whether to use nonblocking allreduces to determine whether an event has triggered across all processes. Note that this delays the reaction on the trigger by one check interval (given by check_iter in number of iterations). |
|
integer, | private | :: | check_iter | = | 1 | Trigger checking can involve communication and is potentially hurting the performance. With this setting, the iteration interval at which these trigger updates should be done, can be controlled. Per default each iteration a check is done, but if this is too frequent, it can be increased here. However, it should be noted, that all trigger checks are only done every check_iter iteration. |
|
integer, | private | :: | check_request | = | MPI_REQUEST_NULL | IAllreduce request handle |
|
logical, | private | :: | globally_triggered | Flag to indicate whether trigger was globally activated |
|||
logical, | private | :: | needs_reduce | Flag to indicate if this control object needs a MPI_reduce to determine trigger status. |
|||
logical, | private | :: | min_reached | = | .false. | Flag that indicates whether the minimal point in time specified in min has already been reached. |