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

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 专业学科区 » 数学 » 计算数学 » fortran 程序有write和没有write两种情况计算的结果为什么会不一样?
北京石油化工学院2026年研究生招生接收调剂公告
151/2返回列表12下一页
查看: 2594  |  回复: 14
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

hfj1988

新虫 (小有名气)

[求助] fortran 程序有write和没有write两种情况计算的结果为什么会不一样?

fortran 程序在调试的时候我加了几个write（*，*）语句，发现计算的结果和不加不一样（在小数点后几位不一样），这是为什么？

在subroutine 中：intel 的fortran 编译器是否不检查数组大小？数组越界了也能算，但是就是计算错的，为什么？比如在某个子程序中：real(8) a(1000) 运行时候发现用到a(1200),却不报错。
回复此楼

» 收录本帖的淘帖专辑推荐

悠悠

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2013-01-11 19:58:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
回帖支持 ( 显示支持度最高的前 50 名 )

shmech

木虫 (小有名气)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
hfj1988: 金币+15 2013-01-16 17:28:45
引用回帖:
10楼: Originally posted by hfj1988 at 2013-01-11 21:55:26
我是稍微修改了别人的fortran 77 的老程序，里面变量不声明也能用，感觉很不安全，我自己写的程序是用的fortran 90，是不是这两种结合起来可能错？如果我把fortran 77的老程序都转变成fortran 90 工作量很大啊，有 ...

可能Fortran77程序里没有加implicit none？在fortran 90里直接调用fortran 77没有任何问题，不需要格式转换。这也是fortran在科学计算界仍然占据主流的一个重要原因：对于40年前的老程序只要将其包装在一个subroutine或function里面就可以在最新格式的程序调用，重用性极强。

如果你编译fortran 77的时候发现有问题，如上面提到的数组越界等，可以通过指定编译器选项在编译时进行检查，ifort提供的选项是-check bounds.

fortran 77最应该避免的一个语法是goto，它会导致你在看老程序的时候产生毁灭世界的冲动。
fortran 77转换到fortran 90的工具有一些，免费的如Alan Miller网页上提供的to_f90.f90，链接
http://jblevins.org/mirror/amiller/to_f90.f90
这个程序好像也不能完全转换goto。另外nag的windows版fortran也提供转换功能，但更有限。另外有个软件记不清名字了，它有免费和商业版两种，格式转换做得非常好，不过免费版的不提供转换goto语句的功能。

写程序时尽量避免fortran 77的语法，养成良好的编程风格，不但自己赏心悦目也方便了后面维护程序的人。
赞一下(1人) 回复此楼
12楼2013-01-15 14:52:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通回帖

hfj1988

新虫 (小有名气)
还有为什么程序无缘无故的在不该终止的地方终止，但是我没用 stop 语句
赞一下 回复此楼
2楼2013-01-11 20:02:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxdongmeng

新虫 (初入文坛)

【答案】应助回帖

感谢参与，应助指数 +1
应该是有段错误 有段错误时结果就会不稳定
赞一下 回复此楼
3楼2013-01-11 20:31:29
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hfj1988

新虫 (小有名气)
引用回帖:
3楼: Originally posted by wxdongmeng at 2013-01-11 20:31:29
应该是有段错误 有段错误时结果就会不稳定

什么叫段错误？
回复此楼
4楼2013-01-11 20:32:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxdongmeng

新虫 (初入文坛)

【答案】应助回帖

在C语言里一般是指针方面的错误 我不知道fortran里有没有指针 也可能你某个变量没有赋初值 系统随机给你赋了值 你可以把上面出现的结果都write出来 一点点检查 这种错误很隐蔽 找起来得花点时间
赞一下 回复此楼
5楼2013-01-11 20:39:30
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hfj1988

新虫 (小有名气)
引用回帖:
5楼: Originally posted by wxdongmeng at 2013-01-11 20:39:30
在C语言里一般是指针方面的错误 我不知道fortran里有没有指针 也可能你某个变量没有赋初值 系统随机给你赋了值 你可以把上面出现的结果都write出来 一点点检查 这种错误很隐蔽 找起来得花点时间

我没有用指针啊，也不是没赋初值的原因
赞一下 回复此楼
6楼2013-01-11 20:52:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

nono2009

超级版主 (文学泰斗)

No gains, no pains.

优秀区长优秀区长优秀区长优秀区长优秀版主

【答案】应助回帖

感谢参与，应助指数 +1
这种问题应该是程序某些地方写得不严格造成的，例如变量类型、数组维数等，在子程序调用时很容易出现这种错误。
赞一下 回复此楼
7楼2013-01-11 21:04:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

王虫木

铁虫 (著名写手)

【答案】应助回帖

感谢参与，应助指数 +1
应该是在某些程序地方写得不严格造成的，在子程序调用时很容易出现这种错误。
赞一下 回复此楼
我叫王虫木，我爱爬山！
8楼2013-01-11 21:47:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hfj1988

新虫 (小有名气)
引用回帖:
7楼: Originally posted by nono2009 at 2013-01-11 21:04:51
这种问题应该是程序某些地方写得不严格造成的，例如变量类型、数组维数等，在子程序调用时很容易出现这种错误。

我是稍微修改了别人的fortran 77 的老程序，里面变量不声明也能用，感觉很不安全，我自己写的程序是用的fortran 90，是不是这两种结合起来可能错？如果我把fortran 77的老程序都转变成fortran 90 工作量很大啊，有没有什么自动转换的工具，谢谢！
赞一下 回复此楼
9楼2013-01-11 21:55:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hfj1988

新虫 (小有名气)
引用回帖:
8楼: Originally posted by 王虫木 at 2013-01-11 21:47:04
应该是在某些程序地方写得不严格造成的，在子程序调用时很容易出现这种错误。

我是稍微修改了别人的fortran 77 的老程序，里面变量不声明也能用，感觉很不安全，我自己写的程序是用的fortran 90，是不是这两种结合起来可能错？如果我把fortran 77的老程序都转变成fortran 90 工作量很大啊，有没有什么自动转换的工具，谢谢！
赞一下 回复此楼
10楼2013-01-11 21:55:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 hfj1988 的主题更新
151/2返回列表12下一页
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 085600，321分求调剂 +13 大馋小子 2026-04-04 14/700 2026-04-06 12:47 by barlinike
[考研] 08600生物与医药-327 +8 18755400796 2026-04-05 8/400 2026-04-06 11:59 by lijunpoly
[考研] 301求调剂 +7 细胞相关蛋白 2026-04-03 7/350 2026-04-06 11:47 by lijunpoly
[考研] 化学0703-一志愿211-338分求调剂 +8 vants 2026-04-05 8/400 2026-04-06 06:17 by houyaoxu
[考研] 求调剂求调剂 +8 121. 2026-04-02 8/400 2026-04-05 20:15 by lys0704
[考研] 266分，一志愿电气工程，本科材料，求材料专业调剂 +8 哇呼哼呼哼 2026-04-02 9/450 2026-04-05 17:14 by lbsjt
[考研] 一志愿北交大材料工程总分358求调剂 +6 cs0106 2026-04-05 6/300 2026-04-05 16:34 by imissbao
[考研] 材料工程085601数二英一335求调剂 +6 双马尾痞老板2 2026-03-31 6/300 2026-04-04 22:29 by hemengdong
[考研] 材料调剂 +18 一样YWY 2026-04-02 19/950 2026-04-04 22:14 by hemengdong
[考研] 考研调剂 +4 zybz冲冲冲 2026-04-03 6/300 2026-04-04 13:08 by zybz冲冲冲
[考研] 26调剂 086003 +6 失活的细胞 2026-04-04 6/300 2026-04-04 09:50 by zhangdingwa
[考研] 265求调剂 +20 梁梁校校 2026-04-01 21/1050 2026-04-04 00:38 by userper
[考研] 303求调剂 +9 DLkz1314. 2026-03-30 9/450 2026-04-03 18:34 by ls刘帅
[考研] 一志愿北京交通大学材料工程总分358 +4 cs0106 2026-04-03 4/200 2026-04-03 13:41 by 百灵童888
[考研] 315分 085602 求调剂 +15 26考研上岸版26 2026-04-02 15/750 2026-04-03 12:45 by xingguangj
[考研] 求调剂22408 288分 +5 new382 2026-04-02 5/250 2026-04-03 09:13 by 醉在风里
[考研] 260求调剂 +6 朱芷琳 2026-04-02 6/300 2026-04-02 20:27 by 6781022
[考研] 求调剂 302分初试 0854 +5 伶可乐 2026-04-02 5/250 2026-04-02 17:53 by 笔落锦州
[考研] 265求调剂 +11 yelck 2026-04-01 12/600 2026-04-01 19:12 by 549790059
[考研] 福建理工大学材料学院先进合金团队招收考研调剂学生 +3 大华金商都 2026-03-30 4/200 2026-03-31 01:04 by 方英俊602
信息提示
关闭
请填处理意见
关闭