Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(ESMF_HConfig), | intent(in) | :: | HConfig1 | |||
type(ESMF_HConfig), | intent(in) | :: | HConfig2 |
function ESMF_HConfigNE(HConfig1, HConfig2) ! ! !RETURN VALUE: logical :: ESMF_HConfigNE ! !ARGUMENTS: type(ESMF_HConfig), intent(in) :: HConfig1 type(ESMF_HConfig), intent(in) :: HConfig2 ! !DESCRIPTION: ! Test if both {\tt HConfig1} and {\tt HConfig2} alias the same ! ESMF HConfig object. ! !EOPI !------------------------------------------------------------------------------- ESMF_HConfigNE = .not.ESMF_HConfigEQ(HConfig1, HConfig2) end function ESMF_HConfigNE