Fortran矩阵的尺寸为0,0，即使它已用尺寸5,5初始化

Question

这是什么原因？

27  recursive subroutine svd_jacobi(A, m, n, U, S, V)
28  
29    implicit none
30  
31    real(8) :: A(m,n)
32    real(8) :: B(n,n)
33    real(8) :: U(m,m)
34    real(8) :: S(m,n)
(gdb) p n 
$25 = 5
(gdb) whatis B
type = real(kind=8) (0,0)
(gdb) whatis n
type = integer(kind=8)
(gdb)

Answer 1

您的gdb版本很可能无法完全理解Fortran数组描述符。 gdb Archer分支有一些改进，AFAIK尚未与trunk合并。