is_paused Function

private recursive function is_paused(self)

True if the simulation time is paused.

Type Bound

SimulationClock

Arguments

Type IntentOptional Attributes Name
class(SimulationClock), intent(in) :: self

Return Value logical


Called by

proc~~is_paused~~CalledByGraph proc~is_paused SimulationClock%is_paused proc~is_paused->proc~is_paused proc~is_time_paused WindowProxy%is_time_paused proc~is_time_paused->proc~is_paused proc~synchronize SimulationClock%synchronize proc~synchronize->proc~is_paused proc~synchronize->proc~synchronize

Source Code

    recursive logical function is_paused(self)
        class(SimulationClock), intent(in) :: self
        if (associated(self%sync)) then
            is_paused = self%sync%is_paused()
        else
            is_paused = self%paused_
        end if
    end function is_paused