set_camera_throw Subroutine

private subroutine set_camera_throw(self, enabled)

Whether the camera keeps moving (turning, zooming, panning) after a drag is released while the mouse moves (default true, VSG's and OSG's throw); false: it stops where it is released.

Type Bound

WindowProxy

Arguments

Type IntentOptional Attributes Name
class(WindowProxy), intent(inout) :: self
logical, intent(in) :: enabled

true: keeps moving; false: stops where released

Calls

proc~~set_camera_throw~~CallsGraph proc~set_camera_throw WindowProxy%set_camera_throw proc~apply_camera_controls apply_camera_controls proc~set_camera_throw->proc~apply_camera_controls interface~vkf_viewer_set_camera_controls vkf_viewer_set_camera_controls proc~apply_camera_controls->interface~vkf_viewer_set_camera_controls

Source Code

    subroutine set_camera_throw(self, enabled)
        class(WindowProxy), intent(inout) :: self
        logical, intent(in) :: enabled                      !! true: keeps moving; false: stops where released
        self%camera_throw_ = enabled
        call apply_camera_controls(self)
    end subroutine set_camera_throw