drawable_build_contents Subroutine

private subroutine drawable_build_contents(self, viewer, group)

Build the artists' nodes under group (viewer, may be null: those made later are compiled if not null).

Type Bound

DrawableTrajectory

Arguments

Type IntentOptional Attributes Name
class(DrawableTrajectory), intent(inout) :: self
type(c_ptr), intent(in) :: viewer

compiles nodes made later (may be null); the parent group
type(c_ptr), intent(in) :: group

compiles nodes made later (may be null); the parent group

Calls

proc~~drawable_build_contents~~CallsGraph proc~drawable_build_contents DrawableTrajectory%drawable_build_contents proc~build_artist build_artist proc~drawable_build_contents->proc~build_artist build build proc~build_artist->build interface~vkf_compile_node vkf_compile_node proc~build_artist->interface~vkf_compile_node interface~vkf_node_add_child vkf_node_add_child proc~build_artist->interface~vkf_node_add_child interface~vkf_switch_create vkf_switch_create proc~build_artist->interface~vkf_switch_create interface~vkf_viewer_any vkf_viewer_any proc~build_artist->interface~vkf_viewer_any proc~check_status check_status proc~build_artist->proc~check_status

Source Code

    subroutine drawable_build_contents(self, viewer, group)
        class(DrawableTrajectory), intent(inout) :: self
        type(c_ptr), intent(in) :: viewer, group            !! compiles nodes made later (may be null); the parent group
        integer :: k
        self%shown = c_associated(viewer)
        self%contents_group = group
        do k = 1, self%n_artists
            call build_artist(self, k, compile=.false.)
        end do
    end subroutine drawable_build_contents