int4_and_int4 Function

public function int4_and_int4(a, b) result(r)

Bitwise 'AND' over two integer of kind 4

Arguments

Type IntentOptional AttributesName
integer(kind=4), intent(in) :: a
integer(kind=4), intent(in) :: b

Return Value integer(kind=4)


Called by

proc~~int4_and_int4~~CalledByGraph proc~int4_and_int4 int4_and_int4 interface~operator(.and.) operator(.and.) interface~operator(.and.)->proc~int4_and_int4

Contents

Source Code


Source Code

        function int4_and_int4(a, b) result(r)
          !< Bitwise 'AND' over two integer of kind 4
            implicit none
            integer(kind=4), intent(in) :: a
            integer(kind=4), intent(in) :: b
            integer(kind=4) :: r
            r = iand(a, b)
        end function int4_and_int4