Fortran77子程序传递数组

vvt

有 Allocatable 就不算是 77 的程序，至少是 90 的。

ALLOCATABLE A(:)   这是定义一个可以分配的数组 A
ALLOCATE A(MSIZE)  这是给可以分配的数组 A 分配大小，大小是 MSIZE
DIMENSION A(*)     这是不负责任的定义 A 是一个数组（仅针对虚参），大小我不知道，你们要操作这个数组的话，自己看着办
INTEGER A(*)       差不多同上，但它强调了 A 是整数类型

vvt

是一维的。看到有疑问的代码，请给出来。

vvt

你说得非常模糊。
1. 定义 STORAG 是如何定义的？
2. 有一个subroutine调用了A（2），这什么意思？听不懂
3. 如果有函数调用，那么属于数组传递的问题。需要给出虚参的定义和对应实参的定义。