Fortran Coder

查看: 23780|回复: 9
打印 上一主题 下一主题

[子程序] 怎么把一个子程序单独摘出来运行?

[复制链接]

70

帖子

25

主题

0

精华

专家

F 币
263 元
贡献
176 点
跳转到指定楼层
楼主
发表于 2018-5-10 09:32:27 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
请问怎么把一个子程序单独摘出来运行?
分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

1958

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1339 元
贡献
565 点

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

沙发
发表于 2018-5-10 12:25:46 | 只看该作者
子程序无法单独运行

70

帖子

25

主题

0

精华

专家

F 币
263 元
贡献
176 点
板凳
 楼主| 发表于 2018-5-10 15:58:42 | 只看该作者
fcode 发表于 2018-5-10 12:25
子程序无法单独运行

请问能不能说详细点,,我导师说让我配个假的主程序还是参量什么的,他说可以运行的

1958

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1339 元
贡献
565 点

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

地板
发表于 2018-5-10 22:01:48 | 只看该作者
子程序必须要有主程序才能运行。

主程序没有“真假”之说,只有“凑合写的”和“认真写的”

47

帖子

3

主题

0

精华

大师

F 币
1634 元
贡献
119 点

规矩勋章

5#
发表于 2018-5-12 08:18:44 | 只看该作者
fcode 发表于 2018-5-10 22:01
子程序必须要有主程序才能运行。

主程序没有“真假”之说,只有“凑合写的”和“认真写的” ...


这可真是真相了!

还可以分成   写了以后要用的   预计就测这一次的

796

帖子

2

主题

0

精华

大宗师

F 币
3787 元
贡献
2266 点
6#
发表于 2018-5-12 12:17:09 | 只看该作者
我猜测你的主程序中调用了多个子程序,现在仅需要对其中一个进行调试或计算。可以只调用该子程序,只要你给定正确的实参。
program test
real a,b,c
a=1
b=2
c=3
call sub(a,b,c)
end program

70

帖子

25

主题

0

精华

专家

F 币
263 元
贡献
176 点
7#
 楼主| 发表于 2018-5-15 11:07:44 | 只看该作者
fcode 发表于 2018-5-10 22:01
子程序必须要有主程序才能运行。

主程序没有“真假”之说,只有“凑合写的”和“认真写的” ...

恩恩,好的

70

帖子

25

主题

0

精华

专家

F 币
263 元
贡献
176 点
8#
 楼主| 发表于 2018-5-15 11:38:08 | 只看该作者
li913 发表于 2018-5-12 12:17
我猜测你的主程序中调用了多个子程序,现在仅需要对其中一个进行调试或计算。可以只调用该子程序,只要你给 ...

恩恩,多谢!

490

帖子

4

主题

0

精华

大宗师

F 币
3298 元
贡献
1948 点

水王勋章元老勋章热心勋章

9#
发表于 2018-5-15 14:42:45 | 只看该作者
本帖最后由 pasuka 于 2018-5-15 14:47 编辑

目的是单元测试的话,可以参考这个回答
https://stackoverflow.com/questi ... d-of-fortran-itself
或者试试
https://github.com/Goddard-Fortran-Ecosystem/pFUnit

70

帖子

25

主题

0

精华

专家

F 币
263 元
贡献
176 点
10#
 楼主| 发表于 2018-5-15 22:09:24 | 只看该作者
pasuka 发表于 2018-5-15 14:42
目的是单元测试的话,可以参考这个回答
https://stackoverflow.com/questi ... d-of-fortran-itself
或者试 ...

谢谢大神!
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

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

GMT+8, 2024-4-19 16:23

Powered by Tencent X3.4

© 2013-2024 Tencent

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