24小时热门版块排行榜    

查看: 1966  |  回复: 14

nono2009

超级版主 (文学泰斗)

No gains, no pains.

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

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

不清楚。如果有这样的好工具,我也想要一个
11楼2013-01-12 08:34:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

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的语法,养成良好的编程风格,不但自己赏心悦目也方便了后面维护程序的人。
12楼2013-01-15 14:52:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hfj1988

新虫 (小有名气)

引用回帖:
12楼: Originally posted by shmech at 2013-01-15 14:52:43
可能Fortran77程序里没有加implicit none?在fortran 90里直接调用fortran 77没有任何问题,不需要格式转换。这也是fortran在科学计算界仍然占据主流的一个重要原因:对于40年前的老程序只要将其包装在一个subrout ...

谢谢!
13楼2013-01-16 17:28:34
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

gxqlp

铁杆木虫 (正式写手)

请问楼主的问题是怎么解决的啊?我现在也遇到了同样的问题,有没有write语句,第一步算出来的值就开始有差别了,导致算了很多步之后,差别就越来越明显了。
理想很丰满,现实很骨感!努力。。。
14楼2013-10-20 21:07:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hfj1988

新虫 (小有名气)

引用回帖:
14楼: Originally posted by gxqlp at 2013-10-20 21:07:47
请问楼主的问题是怎么解决的啊?我现在也遇到了同样的问题,有没有write语句,第一步算出来的值就开始有差别了,导致算了很多步之后,差别就越来越明显了。

不好意思,我忘记了怎么解决的了。总之编程序要严谨。implicit none 一定要用,数组一要确定要不越界,以免发生无法解释的错误。
15楼2014-10-31 18:51:12
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 hfj1988 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考博] 请问大家,我有希望进浙大普博么 +5 高艺文 2024-09-28 8/400 2024-09-29 00:08 by 小红豆
[硕博家园] 希望有师兄师姐帮忙引荐申博 +6 zhanyaqian 2024-09-25 11/550 2024-09-28 22:24 by 自强2019
[硕博家园] 毕业论文的数据能否再发小论文 +6 20081002 2024-09-28 7/350 2024-09-28 22:20 by 鱼翔浅底1
[教师之家] 东南大学电气学院电力电子方向招收硕士博士 +4 蜡笔小鑫1989 2024-09-26 7/350 2024-09-28 21:16 by 伍文童
[教师之家] 开心!国庆前发个小财~ +15 zjjxzh 2024-09-26 15/750 2024-09-28 19:54 by bear2007
[论文投稿] 求推荐医学类杂志 35+4 wshxtim1 2024-09-25 4/200 2024-09-28 13:56 by Wormaciae
[基金申请] 山东省基金公示结束 +6 ishow19 2024-09-24 14/700 2024-09-28 12:20 by ishow19
[论文投稿] 想跟大家聊聊对国产SCI期刊的看法 +14 wleizl 2024-09-26 17/850 2024-09-28 11:59 by wleizl
[教师之家] 西湖大学教授:我可以自由地选择讲课的方式, 讲授的角度 +4 zju2000 2024-09-22 4/200 2024-09-28 09:40 by bio-polymer
[考博] 材料/电信/生物-2025普博生自荐-985本双非硕一区一作 +4 enowei0127 2024-09-23 8/400 2024-09-27 22:40 by enowei0127
[论文投稿] Journal of colloid and interface science期刊 10+4 1821588220 2024-09-24 10/500 2024-09-27 20:37 by 1821588220
[基金申请] 请问大家的计划书填写列表中状态更新了吗? +7 Laker610 2024-09-25 9/450 2024-09-27 16:36 by 田田hj
[硕博家园] 当前读博士还有性价比吗? +8 苏东坡二世 2024-09-23 8/400 2024-09-27 11:39 by 半生梦君
[考博] 数学博导 +4 学术霸王 2024-09-25 6/300 2024-09-27 11:14 by 青古
[有机交流] 二氯甲烷的去除 +3 cgsa吧 2024-09-24 8/400 2024-09-27 10:55 by bear2007
[考博] 有机转材料申博难度 30+3 昕散 2024-09-22 10/500 2024-09-26 22:42 by 824282658
[有机交流] 请问胺的盐酸盐中氯化氢的氢会在核磁氢谱中出峰吗? +3 rommel1975 2024-09-25 4/200 2024-09-26 13:07 by 091602
[论文投稿] laser physics期刊投稿 5+3 mengxiangcz 2024-09-23 6/300 2024-09-25 15:08 by mengxiangcz
[有机交流] chemdraw结构式复制到word变形 +5 笑看人生1993 2024-09-22 11/550 2024-09-25 14:44 by 冰蓝夜游神
[论文投稿] SCI投稿状态 25+4 jorden8 2024-09-23 6/300 2024-09-25 10:24 by jorden8
信息提示
请填处理意见