13
5
0
入门
微信图片_20200701173642.png (12.52 KB, 下载次数: 332)
下载附件
2020-7-1 17:37 上传
微信图片_20200701174644.png (18.59 KB, 下载次数: 358)
2020-7-1 17:47 上传
微信图片_20200701174033.png (9.54 KB, 下载次数: 331)
2020-7-1 17:40 上传
微信图片_20200701174033.png (9.54 KB, 下载次数: 346)
2020-7-1 17:46 上传
微信图片_20200701174033.png (9.54 KB, 下载次数: 339)
微信图片_20200701174203.png (21.18 KB, 下载次数: 330)
2020-7-1 17:42 上传
微信图片_20200701173934.png (6.26 KB, 下载次数: 326)
2020-7-1 17:39 上传
使用道具 举报
250
2
宗师
臭石头雪球
2015
12
论坛跑堂
Subroutine mpp_start( localComm ) Bind(C,Name="mpp_start") Integer , value :: localComm !... End Subroutine mpp_start
fcode 发表于 2020-7-2 11:14 [mw_shl_code=fortran,true]Subroutine mpp_start( localComm ) Bind(C,Name="mpp_start") Integer , val ...
大橙子cqx 发表于 2020-7-2 13:40 localComm应该是必须有OPTIONAL的 因为下面有PRESENT(localComm) 但是OPTIONAL和value好像不能共存。。 ...
Subroutine c_mpp_start( localComm ) Bind(C,Name="mpp_start") Integer , value :: localComm call mpp_start(localComm) End Subroutine c_mpp_start Subroutine mpp_start( localComm ) Integer , optional , intent(IN) :: localComm End Subroutine mpp_start
大橙子cqx 发表于 2020-7-2 15:01 您好,我自己创建了一个简单的Fortran文件测试,当该文件只有一个subroutine的时候是可以链接的 但是如果 ...
fcode 发表于 2020-7-2 17:56 上代码
本版积分规则 发表回复 回帖后跳转到最后一页
颁发给完成“有规有矩”任务的网友
颁发给在娱乐版上传了真实照片的女性网友
颁发给论坛热心帮助他人的网友
颁发给经认证的具有特殊贡献和地位的名人
颁发给注册后积极发言的新人
颁发给对本站有突出贡献的朋友
颁发给本站版主和管理
颁发给在娱乐版上传了真实照片的男性网友
颁发给为Fcode网站捐赠的网友
颁发给论坛注册3年以上的网友
颁发给发帖量超过一定数量的坛友
捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )
GMT+8, 2024-11-15 06:55
Powered by Tencent X3.4
© 2013-2024 Tencent