previous_view Subroutine

private subroutine previous_view(self, duration)

Show the previous view (wrapping around); duration as select_view's.

Type Bound

WindowProxy

Arguments

Type IntentOptional Attributes Name
class(WindowProxy), intent(inout) :: self
real(kind=wp), intent(in), optional :: duration

s, as select_view's

Calls

proc~~previous_view~~CallsGraph proc~previous_view WindowProxy%previous_view proc~select_view WindowProxy%select_view proc~previous_view->proc~select_view

Called by

proc~~previous_view~~CalledByGraph proc~previous_view WindowProxy%previous_view proc~default_key default_key proc~default_key->proc~previous_view proc~dispatch_event dispatch_event proc~dispatch_event->proc~default_key proc~dispatch_events dispatch_events proc~dispatch_events->proc~dispatch_event proc~frame WindowProxy%frame proc~frame->proc~dispatch_events proc~resize WindowProxy%resize proc~resize->proc~frame proc~run WindowProxy%run proc~run->proc~frame

Source Code

    subroutine previous_view(self, duration)
        class(WindowProxy), intent(inout) :: self
        real(wp), intent(in), optional :: duration          !! s, as select_view's
        if (self%n_views > 0) call self%select_view(modulo(self%current - 2, self%n_views) + 1, duration)
    end subroutine previous_view