ESMF_DistGridMatch_FlagLE Function

private function ESMF_DistGridMatch_FlagLE(dgmt1, dgmt2)

Arguments

Type IntentOptional Attributes Name
type(ESMF_DistGridMatch_Flag), intent(in) :: dgmt1
type(ESMF_DistGridMatch_Flag), intent(in) :: dgmt2

Return Value logical


Source Code

  function ESMF_DistGridMatch_FlagLE(dgmt1, dgmt2)
! 
! !RETURN VALUE:
    logical :: ESMF_DistGridMatch_FlagLE

! !ARGUMENTS:
    type(ESMF_DistGridMatch_Flag), intent(in) :: dgmt1
    type(ESMF_DistGridMatch_Flag), intent(in) :: dgmt2

! !DESCRIPTION:
!
!EOPI
!-------------------------------------------------------------------------------

    ESMF_DistGridMatch_FlagLE = dgmt1%value .le. dgmt2%value

  end function ESMF_DistGridMatch_FlagLE