get_ungridded_dims_bundle_info Function

public function get_ungridded_dims_bundle_info(info, rc) result(vec)

Arguments

Type IntentOptional Attributes Name
type(ESMF_Info), intent(in) :: info(:)
integer, intent(out), optional :: rc

Return Value type(UngriddedDimVector)


Calls

proc~~get_ungridded_dims_bundle_info~~CallsGraph proc~get_ungridded_dims_bundle_info get_ungridded_dims_bundle_info ESMF_InfoCreate ESMF_InfoCreate proc~get_ungridded_dims_bundle_info->ESMF_InfoCreate ESMF_InfoDestroy ESMF_InfoDestroy proc~get_ungridded_dims_bundle_info->ESMF_InfoDestroy ESMF_InfoGet ESMF_InfoGet proc~get_ungridded_dims_bundle_info->ESMF_InfoGet ESMF_InfoGetAlloc ESMF_InfoGetAlloc proc~get_ungridded_dims_bundle_info->ESMF_InfoGetAlloc ESMF_InfoGetCharAlloc ESMF_InfoGetCharAlloc proc~get_ungridded_dims_bundle_info->ESMF_InfoGetCharAlloc ESMF_InfoPrint ESMF_InfoPrint proc~get_ungridded_dims_bundle_info->ESMF_InfoPrint interface~mapl_assert MAPL_Assert proc~get_ungridded_dims_bundle_info->interface~mapl_assert none~add_dim UngriddedDims%add_dim proc~get_ungridded_dims_bundle_info->none~add_dim none~ftn_begin~18 UngriddedDimVector%ftn_begin proc~get_ungridded_dims_bundle_info->none~ftn_begin~18 none~ftn_end~18 UngriddedDimVector%ftn_end proc~get_ungridded_dims_bundle_info->none~ftn_end~18 none~get_ith_dim_spec UngriddedDims%get_ith_dim_spec proc~get_ungridded_dims_bundle_info->none~get_ith_dim_spec none~get_name~15 UngriddedDim%get_name proc~get_ungridded_dims_bundle_info->none~get_name~15 none~get_num_ungridded UngriddedDims%get_num_ungridded proc~get_ungridded_dims_bundle_info->none~get_num_ungridded none~next~48 UngriddedDimVectorIterator%next proc~get_ungridded_dims_bundle_info->none~next~48 none~of~93 UngriddedDimVectorIterator%of proc~get_ungridded_dims_bundle_info->none~of~93 none~push_back~21 UngriddedDimVector%push_back proc~get_ungridded_dims_bundle_info->none~push_back~21 proc~make_dim_key make_dim_key proc~get_ungridded_dims_bundle_info->proc~make_dim_key proc~mapl_return MAPL_Return proc~get_ungridded_dims_bundle_info->proc~mapl_return proc~mapl_verify MAPL_Verify proc~get_ungridded_dims_bundle_info->proc~mapl_verify none~add_dim->interface~mapl_assert none~add_dim->none~get_name~15 none~add_dim->none~get_num_ungridded none~add_dim->none~push_back~21 none~add_dim->proc~mapl_return none~get_ith_dim_spec->proc~mapl_return none~get_ith_dim_spec->proc~mapl_verify none~at~97 UngriddedDimVector%at none~get_ith_dim_spec->none~at~97 none~vector_iter_of_offset_size_kind~8 UngriddedDimVectorIterator%vector_iter_of_offset_size_kind none~of~93->none~vector_iter_of_offset_size_kind~8 none~capacity~121 UngriddedDimVector%capacity none~push_back~21->none~capacity~121 none~resize~42 UngriddedDimVector%resize none~push_back~21->none~resize~42 proc~make_dim_key->interface~mapl_assert proc~make_dim_key->proc~mapl_return 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 none~of_size_kind~8 UngriddedDimVector%of_size_kind none~at~97->none~of_size_kind~8 none~resize_size_kind~8 UngriddedDimVector%resize_size_kind none~resize~42->none~resize_size_kind~8 none~reserve~42 UngriddedDimVector%reserve none~resize_size_kind~8->none~reserve~42

Called by

proc~~get_ungridded_dims_bundle_info~~CalledByGraph proc~get_ungridded_dims_bundle_info get_ungridded_dims_bundle_info proc~test_get_ungridded_dims test_get_ungridded_dims proc~test_get_ungridded_dims->proc~get_ungridded_dims_bundle_info

Source Code

   function get_ungridded_dims_bundle_info(info, rc) result(vec)
      type(UngriddedDimVector) :: vec
      type(ESMF_Info), intent(in) :: info(:)
      integer, optional, intent(out) :: rc
      integer :: status
      integer :: i
      type(UngriddedDims) :: dims

      do i=1, size(info)
         dims = make_ungridded_dims(info(i), _RC)
         call push_ungridded_dims(vec, dims, rc)
      end do
      _RETURN(_SUCCESS)

   end function get_ungridded_dims_bundle_info