ESMF_RHandleDynamicMaskingEx Program

Variables

Type Attributes Name Initial
character(len=ESMF_MAXSTR) :: failMsg
character(len=ESMF_MAXSTR) :: testname
integer :: finalrc
integer :: i
integer :: localPet
integer :: petCount
integer :: rc
integer :: result
integer :: srcTermProcessing
real(kind=ESMF_KIND_R4) :: dstMaskValueR4 = -888.d0
real(kind=ESMF_KIND_R4), pointer :: farrayPtrR4(:,:)
real(kind=ESMF_KIND_R4) :: srcMaskValueR4 = -777.d0
real(kind=ESMF_KIND_R8) :: dstMaskValue = -888.d0
real(kind=ESMF_KIND_R8), pointer :: farrayPtr(:,:)
real(kind=ESMF_KIND_R8), pointer :: farrayPtr3d(:,:,:)
real(kind=ESMF_KIND_R8) :: srcMaskValue = -777.d0
type(ESMF_DynamicMask) :: dynamicMask
type(ESMF_Field) :: dstField
type(ESMF_Field) :: srcField
type(ESMF_Grid) :: dstGrid
type(ESMF_Grid) :: srcGrid
type(ESMF_RouteHandle) :: routehandle
type(ESMF_VM) :: vm