tem_stringKVP_notEquals Function

private pure function tem_stringKVP_notEquals(me, other) result(res)

Indicates whether this instance and a specified object are equal.

Arguments

Type IntentOptional AttributesName
type(tem_stringKeyValuePair_type), intent(in) :: me

THe current instance.

type(tem_stringKeyValuePair_type), intent(in) :: other

The instance to compare with the current instance.

Return Value logical

.true. when both instances are equal, otherwise .false.


Calls

proc~~tem_stringkvp_notequals~~CallsGraph proc~tem_stringkvp_notequals tem_stringKVP_notEquals proc~tem_stringkvp_equals tem_stringKVP_equals proc~tem_stringkvp_notequals->proc~tem_stringkvp_equals

Called by

proc~~tem_stringkvp_notequals~~CalledByGraph proc~tem_stringkvp_notequals tem_stringKVP_notEquals interface~operator (SLASH=) operator (/=) interface~operator (SLASH=)->proc~tem_stringkvp_notequals

Contents


Source Code

  pure function tem_stringKVP_notEquals(me, other) result (res)
    ! ---------------------------------------------------------------------------
    !> THe current instance.
    type(tem_stringKeyValuePair_type), intent(in) :: me
    !> The instance to compare with the current instance.
    type(tem_stringKeyValuePair_type), intent(in) :: other
    !> .true. when both instances are equal, otherwise .false.
    logical :: res
    ! ---------------------------------------------------------------------------

    res = .not. tem_stringKVP_equals(me, other)

  end function tem_stringKVP_notEquals