24小时热门版块排行榜    

查看: 2222  |  回复: 7

princeado

金虫 (正式写手)

[交流] Fortran中子程序与函数的区别 已有5人参与

大家好,我是学Fortran的新手,最近看到子程序与函数部分,想请教大家子程序与自定义函数的区别是什么啊?什么时候合适用子程序,什么时候适合用自定义函数啊?谢谢啦
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ioadong

木虫 (著名写手)

★ ★ ★
小木虫(金币+0.5):给个红包,谢谢回帖
余泽成(金币+2): 谢谢参与应助!欢迎常来程序语言版! 2011-11-08 18:05:41
子程序没有返回值,函数有返回值.
要返回值时用函数,不需要返回值时用子程序.
以科学的理性代替天然的非理性。
2楼2011-11-08 08:42:36
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

princeado

金虫 (正式写手)

引用回帖:
2楼: Originally posted by ioadong at 2011-11-08 08:42:36:
子程序没有返回值,函数有返回值.
要返回值时用函数,不需要返回值时用子程序.

还有别的区别吗?
3楼2011-11-08 09:00:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ioadong

木虫 (著名写手)


小木虫(金币+0.5):给个红包,谢谢回帖
好像是没有了,我学的是f77
以科学的理性代替天然的非理性。
4楼2011-11-08 09:06:12
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

huruiusst

木虫 (小有名气)

★ ★
小木虫(金币+0.5):给个红包,谢谢回帖
余泽成(金币+1): 谢谢参与应助!欢迎常来程序语言版! 2011-11-08 18:05:58
感觉子程序应用广泛一些
SLS,MD,HRSG
5楼2011-11-08 10:02:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

★ ★ ★
小木虫(金币+0.5):给个红包,谢谢回帖
xzhdty: O(∩_∩)O谢谢参与 2011-11-08 13:37:00
余泽成(金币+2): 谢谢参与应助! 2011-11-08 18:06:10
原则上,在不改变程序中各变量值、需要获得一个返回值的情况下,使用 function,另外,function 可以直接用在赋值语句中……

如果需要改变调用参数的值,全局变量的值等情况下,使用 subroutine。
6楼2011-11-08 10:14:31
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

stephenliu89

银虫 (小有名气)

★ ★
小木虫(金币+0.5):给个红包,谢谢回帖
余泽成(金币+1): 谢谢参与应助! 2011-11-08 18:06:19
需要返回值就用函数,不需要返回值就用子程序
Email:stephenliu1989@163.com
7楼2011-11-08 11:37:46
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

holmescn

金虫 (正式写手)

★ ★
小木虫(金币+0.5):给个红包,谢谢回帖
jjdg(金币+1): 感谢参与 2011-11-10 13:06:12
jjdg:编辑内容 2011-11-10 13:06
初学者可以一律都使用Function。不写result就行了。

这两个东西其实只在使用的时候有区别,比如

a = f(x) + b

这里的f(x)要定义为函数。

如果是独立的功能比如初始化矩阵(系数矩阵),可以这样

call init_coefficient_matrix(A)

显然你也可以用函数

A = init_coefficient_matrix()

[ Last edited by jjdg on 2011-11-10 at 13:06 ]
8楼2011-11-10 11:54:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 princeado 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 小木虫没落了,除了祈祷帖子,几乎看不到有价值的帖子 +9 botar 2026-07-14 9/450 2026-07-15 14:50 by Vivilian
[基金申请] 会评 +3 无名者登山 2026-07-15 3/150 2026-07-15 14:45 by Vivilian
[基金申请] E口青C会评结束了吗? 60+3 小小书虫c 2026-07-14 7/350 2026-07-15 14:45 by Bowerbird
[基金申请] 生命口C13面上会评时间 +6 luckinging 2026-07-14 9/450 2026-07-15 14:39 by 雨冰共舞
[教师之家] 内心匮乏 +13 水冰月月野兔 2026-07-12 13/650 2026-07-15 14:21 by jiduquegai
[文学芳草园] 你可曾有过这种感受? +3 Jeanya 2026-07-09 6/300 2026-07-15 11:07 by mbtwt
[论文投稿] 农业机械学报投稿周期 +3 G0DLIN 2026-07-14 7/350 2026-07-15 09:26 by xs74101122
[基金申请] 国自然面上D口祈祷 +4 monkeynana 2026-07-14 4/200 2026-07-15 09:14 by 白水煮
[论文投稿] 跨出版社商投稿 20+4 倪好520 2026-07-13 4/200 2026-07-15 08:35 by bobvan
[基金申请] 没收到消息,再次陪跑 +3 天空星辰fly 2026-07-14 3/150 2026-07-14 19:14 by 6543yes
[基金申请] E口会评 +8 布布和一二 2026-07-13 10/500 2026-07-14 18:17 by 旋风马1987
[基金申请] 不要再数国自然申请书的 filecode 的分隔符个数了 +13 sadpencil 2026-07-12 20/1000 2026-07-14 13:12 by 杠就是你对
[基金申请] 明天E口面上会评 +8 布布和一二 2026-07-12 9/450 2026-07-13 22:59 by QTSorange
[论文投稿] MSER送审了还被拒稿 +4 S778950906 2026-07-08 6/300 2026-07-13 16:22 by tfang
[基金申请] 祈祷青基必中 50+6 hadengry 2026-07-09 16/800 2026-07-12 20:31 by 登山虫虫
[考博] 27届辽宁大学应届毕业生申博 +3 可乐微风大海 2026-07-09 3/150 2026-07-10 21:23 by 贪玩的研究僧
[基金申请] 关于如何从代码看上不上会 +17 且听虎啸 2026-07-09 23/1150 2026-07-10 19:51 by sdfapple719
[基金申请] b口会评 +6 当空照 2026-07-08 6/300 2026-07-09 20:49 by tonyliu0401
[考研] 在职考研 +6 wu5d 2026-07-08 7/350 2026-07-09 16:40 by 化工小霸王呀
[基金申请] 化学口会评?应用基础研究和基础研究,希望能分开 +3 Tide man 2026-07-08 3/150 2026-07-09 11:36 by dede5556
信息提示
请填处理意见