get_vertical_dimension_name_from_field Function

public function get_vertical_dimension_name_from_field(field, rc) result(dim_name)

Arguments

Type IntentOptional Attributes Name
type(ESMF_Field), intent(in) :: field
integer, intent(out), optional :: rc

Return Value character(len=:), allocatable


Calls

proc~~get_vertical_dimension_name_from_field~~CallsGraph proc~get_vertical_dimension_name_from_field get_vertical_dimension_name_from_field interface~get_vertical_dim_spec_name get_vertical_dim_spec_name proc~get_vertical_dimension_name_from_field->interface~get_vertical_dim_spec_name proc~get_vertical_dimension_name get_vertical_dimension_name proc~get_vertical_dimension_name_from_field->proc~get_vertical_dimension_name proc~mapl_return MAPL_Return proc~get_vertical_dimension_name_from_field->proc~mapl_return proc~mapl_verify MAPL_Verify proc~get_vertical_dimension_name_from_field->proc~mapl_verify at at proc~mapl_return->at insert insert proc~mapl_return->insert proc~mapl_throw_exception MAPL_throw_exception proc~mapl_return->proc~mapl_throw_exception proc~mapl_verify->proc~mapl_throw_exception

Called by

proc~~get_vertical_dimension_name_from_field~~CalledByGraph proc~get_vertical_dimension_name_from_field get_vertical_dimension_name_from_field proc~add_variable~2 add_variable proc~add_variable~2->proc~get_vertical_dimension_name_from_field proc~add_variables add_variables proc~add_variables->proc~add_variable~2 proc~bundle_to_metadata bundle_to_metadata proc~bundle_to_metadata->proc~add_variables

Source Code

   function get_vertical_dimension_name_from_field(field, rc) result(dim_name)
      character(len=:), allocatable :: dim_name
      type(ESMF_Field), intent(in) :: field
      integer, intent(out), optional :: rc
      integer :: status
      character(len=:), allocatable :: dim_spec_name

      dim_spec_name = get_vertical_dim_spec_name(field, _RC)
      dim_name = get_vertical_dimension_name(dim_spec_name)
      _RETURN(_SUCCESS)

   end function get_vertical_dimension_name_from_field