terrain_build_contents Subroutine

private subroutine terrain_build_contents(self, viewer, group)

The map, made for the viewer showing the body (none headless or without Rocky).

Type Bound

TerrainBody

Arguments

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

a window's viewer handle (null: headless)

type(c_ptr), intent(in) :: group

the group node to build under


Calls

proc~~terrain_build_contents~~CallsGraph proc~terrain_build_contents TerrainBody%terrain_build_contents proc~make_map make_map proc~terrain_build_contents->proc~make_map proc~name ReferenceFrame%name proc~terrain_build_contents->proc~name proc~rocky_available rocky_available proc~terrain_build_contents->proc~rocky_available proc~make_map->proc~name interface~vkf_node_add_child vkf_node_add_child proc~make_map->interface~vkf_node_add_child interface~vkf_rocky_map_create vkf_rocky_map_create proc~make_map->interface~vkf_rocky_map_create proc~apply_layer apply_layer proc~make_map->proc~apply_layer proc~apply_settings apply_settings proc~make_map->proc~apply_settings interface~vkf_rocky_available vkf_rocky_available proc~rocky_available->interface~vkf_rocky_available proc~apply_layer->proc~name interface~vkf_rocky_add_elevation vkf_rocky_add_elevation proc~apply_layer->interface~vkf_rocky_add_elevation interface~vkf_rocky_add_image vkf_rocky_add_image proc~apply_layer->interface~vkf_rocky_add_image proc~find_data_file find_data_file proc~apply_layer->proc~find_data_file proc~apply_settings->proc~name interface~vkf_rocky_map_settings vkf_rocky_map_settings proc~apply_settings->interface~vkf_rocky_map_settings proc~color~2 ReferenceFrame%color proc~apply_settings->proc~color~2 proc~find_in_dirs find_in_dirs proc~find_data_file->proc~find_in_dirs

Source Code

    subroutine terrain_build_contents(self, viewer, group)
        class(TerrainBody), intent(inout) :: self
        type(c_ptr), intent(in) :: viewer   !! a window's viewer handle (null: headless)
        type(c_ptr), intent(in) :: group    !! the group node to build under
        if (.not. c_associated(viewer)) return
        if (.not. rocky_available()) then
            write(*, '(a)') 'vkframes: TerrainBody '//self%name()//': vkframes was built without Rocky ' // &
                            '(pixi run -e rocky rocky-build, then run in the rocky environment)'
            return
        end if
        self%map_group = group
        call make_map(self, viewer)
    end subroutine terrain_build_contents