add_elevation_layer Subroutine

private subroutine add_elevation_layer(self, uri, source, encoding)

Add an elevation layer: uri of a source kind (LAYER_; default LAYER_TMS), heights in meters or encoding (ELEVATION_; default ELEVATION_HEIGHTS).

Type Bound

TerrainBody

Arguments

Type IntentOptional Attributes Name
class(TerrainBody), intent(inout) :: self
character(len=*), intent(in) :: uri

a URL, URL template or file
integer, intent(in), optional :: source

a LAYER_* constant (default LAYER_TMS)
integer, intent(in), optional :: encoding

an ELEVATION_* constant (default ELEVATION_HEIGHTS)

Calls

proc~~add_elevation_layer~~CallsGraph proc~add_elevation_layer TerrainBody%add_elevation_layer proc~add_layer add_layer proc~add_elevation_layer->proc~add_layer proc~apply_layer apply_layer proc~add_layer->proc~apply_layer 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~name ReferenceFrame%name proc~apply_layer->proc~name proc~find_in_dirs find_in_dirs proc~find_data_file->proc~find_in_dirs

Source Code

    subroutine add_elevation_layer(self, uri, source, encoding)
        class(TerrainBody), intent(inout) :: self
        character(len=*), intent(in) :: uri             !! a URL, URL template or file
        integer, intent(in), optional :: source         !! a LAYER_* constant (default LAYER_TMS)
        integer, intent(in), optional :: encoding       !! an ELEVATION_* constant (default ELEVATION_HEIGHTS)
        type(MapLayer) :: layer
        layer%elevation = .true.
        layer%uri = uri
        if (present(source)) layer%source = source
        if (present(encoding)) layer%encoding = encoding
        call add_layer(self, layer)
    end subroutine add_elevation_layer