24小时热门版块排行榜    

Znn3bq.jpeg
查看: 1984  |  回复: 4

stone1985

铁杆木虫 (著名写手)

[求助] 一个主程序,一个subroutine程序,要如何将两个程序组合在fortran里运行

书上有个两个程序,一个主程序,一个subroutine程序,要如何将两个程序组合在fortran里运行
这两个程序见附件
如果单独运行两个程序,主程序提示
C:\fortran4.0\fortran4\Projects\DUCT\DUCT.FOR(115): warning FOR4265: symbol QLX referenced but not set
subroutine程序(计算QLX用)没问题
但是QLX结果为0
回复此楼

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : DUCT.DAT
  • 2012-05-23 20:24:32, 26 bytes
  • 附件 2 : DUCT.FOR
  • 2012-05-23 20:24:33, 2.64 K
  • 附件 3 : sub.FOR
  • 2012-05-23 20:24:33, 510 bytes

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

士不可以不弘毅,任重而道远。仁以为己任,不亦重乎!死而后已,不亦远乎!
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

★ ★ ★ ★ ★
感谢参与,应助指数 +1
stone1985: 金币+5, 有帮助 2012-05-25 12:29:36
你主程序没有调用子程序,你当然不会有什么结果了……
2楼2012-05-24 13:29:23
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

stone1985

铁杆木虫 (著名写手)

引用回帖:
2楼: Originally posted by snoopyzhao at 2012-05-24 14:29:23
你主程序没有调用子程序,你当然不会有什么结果了……

需要怎么调用呢?麻烦给个代码
或者需要怎么运行?
谢谢
士不可以不弘毅,任重而道远。仁以为己任,不亦重乎!死而后已,不亦远乎!
3楼2012-05-25 12:29:22
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

你至少应该在主程序中 call 你的子程序啊……

自己去找本书看一下,或者在网上随便找个文档,基本的就行
4楼2012-05-25 13:58:25
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

freeheart2006

金虫 (小有名气)

【答案】应助回帖

★ ★ ★ ★ ★
stone1985: 金币+5, ★★★很有帮助 2012-05-31 18:20:39
这个很容易做到,就是VF中可使用多个文件:把子程序放入主程序所在的那个project之中,这样就可以运算出结果了。你参考一下彭国伦那本书的第216页,说得非常清楚。
非宁静无以致远,非淡泊无以明志
5楼2012-05-30 15:43:16
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 stone1985 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿厦大生物学332求调剂 +8 池池池池池池 2026-04-08 8/400 2026-04-09 09:53 by 天籁战国策
[考研] 考研调剂 +12 冰冰,,, 2026-04-07 12/600 2026-04-09 09:04 by 5268321
[考研] 调剂 +10 月@163.com 2026-04-08 10/500 2026-04-09 08:38 by 5268321
[考研] 324求调剂 +17 想上学求调 2026-04-03 17/850 2026-04-08 20:04 by 我减肥1
[考研] 287求调剂 +6 Fnhc 2026-04-07 6/300 2026-04-08 10:05 by xingguangj
[考研] 338求调剂 +8 wxygxsaaaaa 2026-04-06 8/400 2026-04-08 06:58 by 无际的草原
[考研] 323求调剂 +3 林zlu 2026-04-07 4/200 2026-04-07 23:21 by lbsjt
[考研] 085602调剂 初试总分335 +3 19123253302 2026-04-06 3/150 2026-04-07 18:00 by jp9609
[考研] 生物学363调剂求助 +7 fanzhang6666 2026-04-06 9/450 2026-04-07 17:37 by lijunpoly
[考研] 一志愿华中农业大学0710(A)初试329分 求调剂 +5 一名26考研生 2026-04-04 5/250 2026-04-07 08:54 by 18828373951
[考研] 一志愿武汉理工大学080200机械工程308分,求调剂 +4 终不似从前 2026-04-05 4/200 2026-04-06 11:46 by 考研学校招点人
[考研] 308求调剂 +3 终不似从前 2026-04-05 3/150 2026-04-05 22:23 by hemengdong
[考研] 材料调剂 +13 一样YWY 2026-04-03 14/700 2026-04-05 18:20 by 蓝云思雨
[考研] 348求调剂 +6 wukira 2026-04-04 6/300 2026-04-05 18:11 by 猪会飞
[考研] 复试调剂 +6 范根培 2026-04-04 6/300 2026-04-04 14:27 by 土木硕士招生
[考研] 281求调剂 +10 aaawhy 2026-04-03 10/500 2026-04-03 21:42 by lbsjt
[考研] 数二英二348求调剂 +4 hxdzj1 2026-04-03 5/250 2026-04-03 21:25 by zhq0425
[考研] 335求调剂 +7 沈清璃 2026-04-03 7/350 2026-04-03 18:55 by lijunpoly
[考研] 一志愿华中农业071010,总分320求调剂 +7 困困困困坤坤 2026-04-02 7/350 2026-04-03 17:26 by Yuena_Wang
[考研] 320求调剂 +5 振—TZ 2026-04-02 5/250 2026-04-03 14:42 by fxue1114
信息提示
请填处理意见