Fortran Coder

查看: 560|回复: 4
打印 上一主题 下一主题

[子程序] 数组传递

[复制链接]

1967

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1370 元
贡献
581 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

楼主
发表于 2023-12-14 08:40:52 | 显示全部楼层
这个不好说,需要更多的代码才好判断。

你可以检查一下 TmpiSubblocks 数组的大小,是否和子程序中 sbtmp 的一致?
尝试用假定形状传递方式?

1967

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1370 元
贡献
581 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

沙发
发表于 2023-12-14 21:40:47 | 显示全部楼层
试试传入真实的数组大小。
认真检查实参数组的大小,虚参数组的大小,是否一致。比如 write(*,*) shape(tmpiSubblocks)
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-5-14 10:44

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表