operator (.complement.) Interface

private interface operator (.complement.)

Calculate the complement A / B


Contents

Module Procedures


Module Procedures

private pure function complement_integer_int64(A, B) result(D)

Return A / B Assume: 1. A and B are sorted. The result will be sorted.

Arguments

Type IntentOptional Attributes Name
integer(kind=int64), intent(in) :: A(:)
integer(kind=int64), intent(in) :: B(:)

Return Value integer(kind=int64), allocatable, (:)

private pure function complement_integer_int32(A, B) result(D)

Arguments

Type IntentOptional Attributes Name
integer(kind=int32), intent(in) :: A(:)
integer(kind=int32), intent(in) :: B(:)

Return Value integer(kind=int32), allocatable, (:)