Rona 发表于 2022-2-21 18:39:07

求助：怎么解决 error #7983

求助：怎么解决 error #7983: The storage extent of the dummy argument exceeds that of the actual argument.   

vvt 发表于 2022-2-22 08:30:34

实参比虚参少~~
实参的长度，必须等于或大于虚参的长度。

Rona 发表于 2022-2-23 11:05:21

vvt 发表于 2022-2-22 08:30
实参比虚参少~~
实参的长度，必须等于或大于虚参的长度。

可以说的更具体一点吗，小白不懂{:4_117:}

vvt 发表于 2022-2-23 15:39:34

本帖最后由 vvt 于 2022-2-23 15:44 编辑

比如
subroutine build_team(a)
real :: a(7)
end subroutine build_team

program main
real :: x(6)
call build_team(x)
end program main
实参 x 大小为6，虚参 a 大小为 7。显然 6 < 7。
一般实参是可以比虚参大的，但不能比虚参小。

你可以这样理解，build_team函数用来组建一个球队，它需要7个人（虚参 a ）。
如果某个队伍 x（实参）想要组建一个球队，它必须大于等于7个人。

Rona 发表于 2022-2-28 14:45:58

vvt 发表于 2022-2-23 15:39
比如
subroutine build_team(a)
real :: a(7)


明白，感谢感谢:-handshake
页: [1]
查看完整版本: 求助：怎么解决 error #7983