24小时热门版块排行榜    

查看: 1965  |  回复: 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 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿985,本科211,0817化学工程与技术319求调剂 +3 Liwangman 2026-03-15 3/150 2026-03-15 18:16 by JourneyLucky
[考研] 290求调剂 +3 孔志浩 2026-03-12 8/400 2026-03-15 15:30 by 孔志浩
[考研] 274求调剂 +4 时间点 2026-03-13 4/200 2026-03-15 15:29 by Rambo13
[考研] 085601材料工程315分求调剂 +3 yang_0104 2026-03-15 3/150 2026-03-15 10:58 by peike
[考研] 080500,材料学硕302分求调剂学校 +4 初识可乐 2026-03-14 5/250 2026-03-14 21:08 by peike
[考研] 材料工程327求调剂 +3 xiaohe12w 2026-03-11 3/150 2026-03-14 20:20 by ms629
[考研] 337一志愿华南理工材料求调剂(有希望2吗?) +3 mysdl 2026-03-09 3/150 2026-03-14 02:53 by JourneyLucky
[考研] 288求调剂 +14 王晓阳- 2026-03-09 19/950 2026-03-14 02:05 by JourneyLucky
[考研] 085600求调剂 +3 a邵星池 2026-03-09 3/150 2026-03-14 01:32 by JourneyLucky
[考研] 考研材料与化工,求调剂 +8 戏精丹丹丹 2026-03-09 8/400 2026-03-14 01:14 by JourneyLucky
[考研] 312求调剂 +6 陌宸希 2026-03-10 6/300 2026-03-14 00:40 by JourneyLucky
[考研] 0856材料与化工309分求调剂 +6 ZyZy…… 2026-03-10 6/300 2026-03-14 00:38 by JourneyLucky
[考研] 材料工程调剂 +9 咪咪空空 2026-03-12 9/450 2026-03-13 22:05 by 星空星月
[考研] 281求调剂 +9 Koxui 2026-03-12 11/550 2026-03-13 20:50 by Koxui
[考研] 310求调剂 +3 【上上签】 2026-03-11 3/150 2026-03-13 16:16 by JourneyLucky
[论文投稿] 投稿问题 5+4 星光灿烂xt 2026-03-12 6/300 2026-03-13 14:17 by god_tian
[考研] 0703一志愿211 285分求调剂 +4 ly3471z 2026-03-13 4/200 2026-03-13 13:00 by JourneyLucky
[考研] 070303一志愿西北大学学硕310找调剂 +3 d如愿上岸 2026-03-12 5/250 2026-03-13 10:56 by houyaoxu
[考博] 26读博 +4 Rui135246 2026-03-12 10/500 2026-03-13 07:15 by gaobiao
[考研] 293求调剂,一志愿陕师大生物学 +3 ??????.?.??? 2026-03-09 3/150 2026-03-11 10:02 by 学员8dgXkO
信息提示
请填处理意见