在module中定义:
[Fortran] syntaxhighlighter_viewsource syntaxhighlighter_copycode INTEGER DEMENSION(1,2) :: A
然后在子程序中:
[Fortran] syntaxhighlighter_viewsource syntaxhighlighter_copycode SUROUTINE TEST
INTEGER DEMENSION(:,:) :: A
END SUROUTINE TEST
这样仅仅是写在形参表中就会导致错误,但是如果定义的数组是一维的话则不会出错。
因为程序运行环境比较复杂,包的错误和MPI有关,因此不确定是环境的问题还是这样传递数组有问题。
|