grid_parameters Subroutine

private pure subroutine grid_parameters(self, radius_x, radius_y, radius_z, lat_spacing, lon_spacing)

The ellipsoid's semi-axes and the line spacings, as OpenFrames' getParameters.

Type Bound

LatLonGrid

Arguments

Type IntentOptional Attributes Name
class(LatLonGrid), intent(in) :: self
real(kind=wp), intent(out) :: radius_x

scene units
real(kind=wp), intent(out) :: radius_y

scene units
real(kind=wp), intent(out) :: radius_z

scene units
real(kind=wp), intent(out) :: lat_spacing

radians
real(kind=wp), intent(out) :: lon_spacing

radians

Source Code

    pure subroutine grid_parameters(self, radius_x, radius_y, radius_z, lat_spacing, lon_spacing)
        class(LatLonGrid), intent(in) :: self
        real(wp), intent(out) :: radius_x, radius_y, radius_z  !! scene units
        real(wp), intent(out) :: lat_spacing, lon_spacing   !! radians
        radius_x = self%radii_(1)
        radius_y = self%radii_(2)
        radius_z = self%radii_(3)
        lat_spacing = self%lat_spacing
        lon_spacing = self%lon_spacing
    end subroutine grid_parameters