operator (==) Interface

private interface operator (==)

Module Procedures

private recursive function ESMF_sreq(sr1, sr2) result(sreq)

Arguments

Type IntentOptional Attributes Name
type(ESMF_ServiceReply_Flag), intent(in) :: sr1
type(ESMF_ServiceReply_Flag), intent(in) :: sr2

Return Value logical