应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 专业学科区 » 物理 » 统计、非线性&软物质 » fortran call语句
61/1返回列表
查看: 1580  |  回复: 5
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

wangxinling

新虫 (小有名气)

[求助] fortran call语句

编了一个速度小程序，大程序里要用，怎么把他们联系起来？用call语句还是直接把速度部分放进来？谢谢各位大侠。
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
木虫好友，太热情了，谢谢。
1楼 2012-07-09 11:50:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
回帖置顶 ( 共有1个 )

wlscj

木虫之王 (文坛精英)

【答案】应助回帖

★
感谢参与，应助指数 +1
wangxinling: 金币+1, ★有帮助 2012-07-14 10:08:50
wangxinling: 回帖置顶 2012-07-14 10:09:39
example

subroute velo(v,x)
implicit none
real v,x
v=x*x
end subroute
赞一下 回复此楼
4楼2012-07-11 08:31:21
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通回帖

wjy3004

至尊木虫 (著名写手)

天下兵马大元帅

【答案】应助回帖

★
感谢参与，应助指数 +1
wangxinling: 金币+1, ★有帮助 2012-07-10 21:04:32
小程序 subroute    ABCD(带参，或者不带参)
                ......
               ......
               ......
               ......

大程序   ...
             .....
              ....
            call   ABCD(带参，或者不带参)
           .....
            ....
            ....
赞一下 回复此楼
淡泊明志，宁静致远。
2楼2012-07-10 09:30:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wangxinling

新虫 (小有名气)
夕阳西下: 带参数，参数可以传递。不带参数，这直接调用该子程序的内容 2012-07-11 07:22:34
引用回帖:
2楼: Originally posted by wjy3004 at 2012-07-10 09:30:43
小程序 subroute    ABCD(带参，或者不带参)
                ......
               ......
               ......
               ......

大程序   ...
             .....
              ....
       ...

如果带参，我不懂怎么写参数？
赞一下 回复此楼
木虫好友，太热情了，谢谢。
3楼2012-07-10 21:04:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wjy3004

至尊木虫 (著名写手)

天下兵马大元帅
引用回帖:
4楼: Originally posted by wlscj at 2012-07-11 08:31:21
example

subroute velo(v,x)
implicit none
real v,x
v=x*x
end subroute

subroute velo(x,y,z)
x=....
y=....
z=....
v=....
end subroute
....
....
....
call velo(10,15,20)
赞一下 回复此楼
淡泊明志，宁静致远。
5楼2012-07-11 09:10:35
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wangxinling

新虫 (小有名气)
引用回帖:
5楼: Originally posted by wjy3004 at 2012-07-11 09:10:35
subroute velo(x,y,z)
x=....
y=....
z=....
v=....
end subroute
....
....
....
call velo(10,15,20)...

谢谢
回复此楼
木虫好友，太热情了，谢谢。
6楼2012-07-14 10:09:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 wangxinling 的主题更新
61/1返回列表
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 今天系统多次维护，明天很可能放榜！ +5 zju2000 2026-08-16 5/250 2026-08-16 23:23 by Haru815
[基金申请] 欢迎发来filecode的Mz6后的代码验证其规律 +32 医学老男孩 2026-08-13 74/3700 2026-08-16 21:05 by 医学老男孩
[论文投稿] 岩土工程学报什么时候才能终审完呐 25+3 yeager111 2026-08-10 4/200 2026-08-16 20:42 by tfang
[基金申请] 时间戳又变了8-15 +13 archvillain 2026-08-15 25/1250 2026-08-16 20:13 by zhaosm1982
[基金申请] 2027广东省杰青 +3 奶牛小黑 2026-08-15 6/300 2026-08-16 20:07 by 奶牛小黑
[基金申请] 哪位老哥知道今年的国自然具体哪一天放榜？ +9 Ldrop2023 2026-08-13 9/450 2026-08-16 13:24 by wukun_007
[基金申请] 咱们一起用铁证分析2026国家社科基金中标与否 +7 启萌科技 2026-08-12 26/1300 2026-08-16 12:35 by 启萌科技
[基金申请] 我的国基提前知道中了，可是同事的操作让我实在接受不了，怎么会有这样的人 +11 家与远方 2026-08-10 16/800 2026-08-16 10:28 by ray43
[精细化工] 招聘 金属平磨液，抛光液研发工程师 +3 小天0311 2026-08-14 3/150 2026-08-16 07:31 by H9PLUS
[基金申请] 各位道友，我要去昆明玩几天，回来见。 +7 Tide man 2026-08-14 8/400 2026-08-15 01:11 by arzu_hma
[基金申请] 奇怪，两个人的filecode固定段从头到尾一模一样 +8 布布和一二 2026-08-10 11/550 2026-08-14 14:58 by Equinoxhua
[硕博家园] 读博的好处 +4 lnee 2026-08-11 4/200 2026-08-14 10:20 by ahsoarli
[基金申请] filecode +15 documentary 2026-08-10 17/850 2026-08-14 10:08 by kissu88
[基金申请] FileCode能看出啥？ +10 要乐观耀哥 2026-08-10 32/1600 2026-08-14 09:37 by 要乐观耀哥
[基金申请] Filecode 又变了，巨变 +3 WH3796 2026-08-12 4/200 2026-08-13 14:13 by 小木虫6752397
[基金申请] 分享一下我之前已中青C的计划书的filecode +4 布布和一二 2026-08-11 5/250 2026-08-13 12:56 by cratir
[基金申请] 帮忙看看fileCode +7 wwncly 2026-08-10 13/650 2026-08-11 19:36 by 冰心玉壶晴
[基金申请] 什么时候出结果，有咨询渠道？？？ +3 Tide man 2026-08-11 3/150 2026-08-11 17:54 by kudofaye
[基金申请] 确定了，国自然21号放榜 +6 布布和一二 2026-08-10 7/350 2026-08-10 19:15 by 2000zf36392
[基金申请] 据悉今年马上要出结果了 +7 瞬息宇宙 2026-08-10 8/400 2026-08-10 12:42 by Vivilian
信息提示
关闭
请填处理意见
关闭