Fortran INTENT attribute with an actual argument with vector subscript

3
votes

the document about intent attribute says

If an actual argument is an array section with a vector subscript, it cannot be associated with a dummy array that is defined or redefined (has intent OUT or INOUT).

How should I understand the description?

Does it mean that the following code is wrong?

subroutine sub(a)
    real, intent(out) :: a(:)
end subroutine sub

real :: arr(3,4)
call sub(arr(1,:))
1
fortranintel-fortran
@francescalus The link is updated. thanks. – Rubin

1 Answers

1
votes

That is fine, it is an array section rather than a vector subscript. The latter is where you use a rank one integer array expression for the subscripts. Extending your example:

subroutine sub(a)
    real, intent(out) :: a(:)
end subroutine sub

real :: arr(3,4)
call sub(arr(1,:))           ! Legal
call sub(arr(1,[ 1, 2, 4 ] ) ! Illegal