ESMF_RHandleFromRHandleEx Program

Variables

Type Attributes Name Initial
character(len=ESMF_MAXSTR) :: failMsg
character(len=ESMF_MAXSTR) :: testname
integer(kind=ESMF_KIND_I4), pointer :: testArray(:)
integer :: finalrc
integer :: i
integer, allocatable :: originPetList(:)
integer :: petCount
integer :: petCountA
integer :: petCountB1
integer :: petCountR
integer, allocatable :: petListA(:)
integer, allocatable :: petListB1(:)
integer, allocatable :: petListB2(:)
integer :: rc
integer :: result
integer, allocatable :: targetPetList(:)
integer :: urc
type(ESMF_Field) :: fieldA
type(ESMF_Field) :: fieldB1
type(ESMF_Field) :: fieldB2
type(ESMF_GridComp) :: compA
type(ESMF_GridComp) :: compB1
type(ESMF_GridComp) :: compB2
type(ESMF_RouteHandle) :: rh1
type(ESMF_RouteHandle) :: rh2
type(ESMF_State) :: stateAB1
type(ESMF_State) :: stateAB2
type(ESMF_VM) :: vm