get_field Subroutine

public subroutine get_field(state, field, rc)

Arguments

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

Calls

proc~~get_field~~CallsGraph proc~get_field get_field anyexceptions anyexceptions proc~get_field->anyexceptions assert_that assert_that proc~get_field->assert_that esmf_stateget esmf_stateget proc~get_field->esmf_stateget sourcelocation sourcelocation proc~get_field->sourcelocation

Called by

proc~~get_field~~CalledByGraph proc~get_field get_field proc~destroy_objects destroy_objects proc~destroy_objects->proc~get_field proc~test_invalidate test_invalidate proc~test_invalidate->proc~get_field proc~test_invalidate->proc~destroy_objects proc~test_invalidate~2 test_invalidate proc~test_invalidate~2->proc~get_field proc~test_invalidate~2->proc~destroy_objects proc~test_update test_update proc~test_update->proc~get_field proc~test_update->proc~destroy_objects proc~test_accumulate test_accumulate proc~test_accumulate->proc~destroy_objects proc~test_accumulate_mean_r4 test_accumulate_mean_R4 proc~test_accumulate_mean_r4->proc~destroy_objects proc~test_accumulate_r4 test_accumulate_R4 proc~test_accumulate_r4->proc~destroy_objects proc~test_accumulate_with_undef_some_steps test_accumulate_with_undef_some_steps proc~test_accumulate_with_undef_some_steps->proc~destroy_objects proc~test_calculate_mean_r4 test_calculate_mean_R4 proc~test_calculate_mean_r4->proc~destroy_objects proc~test_clear test_clear proc~test_clear->proc~destroy_objects proc~test_clear~2 test_clear proc~test_clear~2->proc~destroy_objects proc~test_initialize test_initialize proc~test_initialize->proc~destroy_objects proc~test_initialize~2 test_initialize proc~test_initialize~2->proc~destroy_objects proc~test_max_accumulate_r4 test_max_accumulate_R4 proc~test_max_accumulate_r4->proc~destroy_objects proc~test_min_accumulate_r4 test_min_accumulate_R4 proc~test_min_accumulate_r4->proc~destroy_objects

Source Code

   subroutine get_field(state, field, rc)
      type(ESMF_State), intent(inout) :: state
      type(ESMF_Field), intent(inout) :: field
      integer, optional, intent(out) :: rc

      integer :: status
      character(len=ESMF_MAXSTR) :: itemNameList(1)

      call ESMF_StateGet(state, itemNameList=itemNameList, _RC)
      call ESMF_StateGet(state, itemName=itemNameList(1), field=field, _RC)
      _RETURN(_SUCCESS)

   end subroutine get_field