记错了,抱歉!!
是不是这个样子,主程序,和子程序的数组不是一一对应的关系,有点错位
其实数据已经改变了
program test
integer v(1:20)
integer i
do 10 i=1,20
10 v(i)=1
print *,v(10)
call f(v)
print *,v(10)
end program
subroutine f(v)
integer v(0:10)
v(10)=10
end subroutine
给出代码。检查实参虚参,类型,属性,精度是否一致?