分兩部分討論
(A) 我不理解 為何 虛參應該要"繼承(or知道)"實參的下限 為宜, 我是持反對意見的
真有需要, 如下即可:
[Fortran] 纯文本查看 复制代码 REAL :: A(-100:100)
CALL B( A, -100)
CONTAINS
SUBROUTINE B( C, LB )
INTEGER :: LB
REAL :: C(LB:)
(B) 传递一个 pointer 就可以传递下标
POINTER - "deferred" shape, not "assumed" shape
題外話, Compaq->Intel, 對Fortran到底是好還是不好? NVIDIA買下PGI也是
除了runtime在CPU/GPU跑得快有錢賺, 可有心於Fortran語法發展的社會責任心 |