org.eclipse.photran.core.vpg.tests/refactoring-test-code/add-subroutine-parameter/test7-basicarray/add_subroutine_parameter_7.f90.result

program basicarray ! Tests that arrays can be passed.

end program basicarray
subroutine sub(y,z) !<<<<< 4, 1, 4, 5, integer; intent(in); dimension(2) :: y, 0, (/ 2; 3 /), pass
    integer, intent(in), dimension(2) :: y
    integer, intent(in) :: z
end subroutine