set_draw_axes Subroutine

private subroutine set_draw_axes(self, axes)

Which axes to draw: an ior of X_AXIS, Y_AXIS, Z_AXIS.

Type Bound

CoordinateAxes

Arguments

Type IntentOptional Attributes Name
class(CoordinateAxes), intent(inout) :: self
integer, intent(in) :: axes

an ior of X_AXIS, Y_AXIS, Z_AXIS

Calls

proc~~set_draw_axes~~CallsGraph proc~set_draw_axes CoordinateAxes%set_draw_axes proc~make_axes make_axes proc~set_draw_axes->proc~make_axes interface~vkf_switch_create vkf_switch_create proc~make_axes->interface~vkf_switch_create proc~add add proc~make_axes->proc~add proc~append append proc~make_axes->proc~append proc~color~2 ReferenceFrame%color proc~make_axes->proc~color~2 proc~line_node line_node proc~make_axes->proc~line_node proc~marker_node marker_node proc~make_axes->proc~marker_node proc~replace ShapeNodes%replace proc~make_axes->proc~replace interface~vkf_node_add_child vkf_node_add_child proc~add->interface~vkf_node_add_child interface~vkf_node_delete vkf_node_delete proc~add->interface~vkf_node_delete proc~check_status check_status proc~add->proc~check_status interface~vkf_line_create vkf_line_create proc~line_node->interface~vkf_line_create proc~line_node->proc~check_status proc~line_set_points line_set_points proc~line_node->proc~line_set_points proc~line_set_segments line_set_segments proc~line_node->proc~line_set_segments proc~line_set_style line_set_style proc~line_node->proc~line_set_style interface~vkf_marker_create vkf_marker_create proc~marker_node->interface~vkf_marker_create proc~marker_node->proc~check_status proc~marker_node->proc~line_set_points proc~marker_set_style marker_set_style proc~marker_node->proc~marker_set_style interface~vkf_compile_node vkf_compile_node proc~replace->interface~vkf_compile_node proc~replace->interface~vkf_node_add_child proc~replace->interface~vkf_node_delete interface~vkf_node_remove_child vkf_node_remove_child proc~replace->interface~vkf_node_remove_child proc~replace->proc~check_status interface~vkf_line_points vkf_line_points proc~line_set_points->interface~vkf_line_points interface~vkf_line_points_changed vkf_line_points_changed proc~line_set_points->interface~vkf_line_points_changed interface~vkf_line_style vkf_line_style proc~line_set_segments->interface~vkf_line_style interface~vkf_line_style_changed vkf_line_style_changed proc~line_set_segments->interface~vkf_line_style_changed proc~line_set_style->interface~vkf_line_style proc~line_set_style->interface~vkf_line_style_changed proc~marker_set_style->interface~vkf_line_style proc~marker_set_style->interface~vkf_line_style_changed

Source Code

    subroutine set_draw_axes(self, axes)
        class(CoordinateAxes), intent(inout) :: self
        integer, intent(in) :: axes                         !! an ior of X_AXIS, Y_AXIS, Z_AXIS
        self%drawn = axes
        call make_axes(self)
    end subroutine set_draw_axes