ESMF_DELayoutNE Function

private impure elemental function ESMF_DELayoutNE(delayout1, delayout2)

Arguments

Type IntentOptional Attributes Name
type(ESMF_DELayout), intent(in) :: delayout1
type(ESMF_DELayout), intent(in) :: delayout2

Return Value logical


Calls

proc~~esmf_delayoutne~~CallsGraph proc~esmf_delayoutne ESMF_DELayoutNE proc~esmf_delayouteq ESMF_DELayoutEQ proc~esmf_delayoutne->proc~esmf_delayouteq proc~esmf_delayoutgetinit ESMF_DELayoutGetInit proc~esmf_delayouteq->proc~esmf_delayoutgetinit

Called by

proc~~esmf_delayoutne~~CalledByGraph proc~esmf_delayoutne ESMF_DELayoutNE interface~operator(SLASH=)~16 operator(/=) interface~operator(SLASH=)~16->proc~esmf_delayoutne

Source Code

  impure elemental function ESMF_DELayoutNE(delayout1, delayout2)
! 
! !RETURN VALUE:
    logical :: ESMF_DELayoutNE

! !ARGUMENTS:
    type(ESMF_DELayout), intent(in) :: delayout1
    type(ESMF_DELayout), intent(in) :: delayout2

! !DESCRIPTION:
!   Test if both {\tt delayout1} and {\tt delayout2} alias the same
!   ESMF DELayout object.
!
!EOPI
!-------------------------------------------------------------------------------

    ESMF_DELayoutNE = .not.ESMF_DELayoutEQ(delayout1, delayout2)

  end function ESMF_DELayoutNE