ESMF_FileModeNe Function

private impure elemental function ESMF_FileModeNe(FileMode1, FileMode2)

Arguments

Type IntentOptional Attributes Name
type(ESMF_FileMode_Flag), intent(in) :: FileMode1
type(ESMF_FileMode_Flag), intent(in) :: FileMode2

Return Value logical


Called by

proc~~esmf_filemodene~~CalledByGraph proc~esmf_filemodene ESMF_FileModeNe interface~operator (SLASH=)~4 operator (/=) interface~operator (SLASH=)~4->proc~esmf_filemodene

Source Code

impure elemental function ESMF_FileModeNe(FileMode1, FileMode2)

  logical :: ESMF_FileModeNe

  type (ESMF_FileMode_Flag), intent(in) :: FileMode1, FileMode2

  ESMF_FileModeNe = (FileMode1%filemode /= FileMode2%filemode)

end function ESMF_FileModeNe