set_view_frame Subroutine

private subroutine set_view_frame(self, root, frame, frame_type)

View frame (in the tree of root) with base frame_type (default RELATIVE_FRAME).

Type Bound

View

Arguments

Type IntentOptional Attributes Name
class(View), intent(inout) :: self
class(ReferenceFrame), intent(in), target :: root

the tree's root; the viewed frame (not owned)
class(ReferenceFrame), intent(in), target :: frame

the tree's root; the viewed frame (not owned)
integer, intent(in), optional :: frame_type

ABSOLUTE_FRAME or RELATIVE_FRAME

Called by

proc~~set_view_frame~~CalledByGraph proc~set_view_frame View%set_view_frame proc~place_camera place_camera proc~place_camera->proc~set_view_frame proc~frame WindowProxy%frame proc~frame->proc~place_camera proc~resize WindowProxy%resize proc~resize->proc~frame proc~run WindowProxy%run proc~run->proc~frame

Source Code

    subroutine set_view_frame(self, root, frame, frame_type)
        class(View), intent(inout) :: self
        class(ReferenceFrame), intent(in), target :: root, frame !! the tree's root; the viewed frame (not owned)
        integer, intent(in), optional :: frame_type         !! ABSOLUTE_FRAME or RELATIVE_FRAME
        self%root => root
        self%frame => frame
        self%lookat => null()
        self%frame_type = RELATIVE_FRAME
        if (present(frame_type)) self%frame_type = frame_type
    end subroutine set_view_frame