请教fortran程序里的一个很奇怪的现象

Gskygao

一个子程序我在调用它之前计算得到的数据，在调用这个子程序之后就都是零了，就是在这个子程序之前的数组明明有值在调用这个子程序之后数组的值就都变成零了，这可能是什么原因。这个子程序跟前面的数组毫无关系。

GWinston

一般都是数组内存分配方面的错误。检查所有数组大小，尤其是传递到子程序中的数组，主程序和子程序里面定义的大小是否相同。

Gskygao

非常感谢，我检查一下。