24小时热门版块排行榜    

查看: 2550  |  回复: 28

wxy尘埃

银虫 (小有名气)

[求助] 如何改变fortran的浮点精度

上面的程序是90年代用fortran语言编写的程序,,改变这个程序里边的一些参数,浮点精度与现在的计算机相匹配,望各位高手指点,不胜感激!
回复此楼
微笑吧,为你的曾经拥有~~~
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

★ ★
余泽成(金币+2): 谢谢参与应助! 2011-09-26 21:41:41
wxy尘埃(金币+20): 2011-09-28 09:13:25
大概看了一下,基本上也都是用了最高的精度了,即所谓的 double precision...
如果你觉得不保险的话,可以在每个子程序的第一行加上 implicit double precision (a-H,o-z) 啥的

或者使用编译器提供的一些选项,如 gfortran  中的 -fdefault-real-8 啥的?
话说,你想要啥样的精度?90 年代的 fortran  不算很古老吧……
2楼2011-09-26 18:33:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxy尘埃

银虫 (小有名气)

jjdg: 你只要用编译器编成exe即可,再老都可以用的 2011-09-27 00:35:04
有人说老,硬是下任务要改!
很谢谢你的一如既往的应助!
微笑吧,为你的曾经拥有~~~
3楼2011-09-26 22:12:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖


余泽成(金币+1): 谢谢参与应助! 2011-09-28 10:35:59
内容已删除
4楼2011-09-27 00:51:02
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxy尘埃

银虫 (小有名气)

上传的文件中contin.exe是修改了程序的(具体如何修改的不知道)
当用matlab来运行时出了一定的错误,第三个图无法成功运行以及die.txt结果无输出,这怎么解决
微笑吧,为你的曾经拥有~~~
5楼2011-09-27 10:43:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖


余泽成(金币+1): 谢谢参与应助! 2011-09-28 10:36:12
引用回帖:
5楼: Originally posted by wxy尘埃 at 2011-09-27 10:43:47:
上传的文件中contin.exe是修改了程序的(具体如何修改的不知道)
当用matlab来运行时出了一定的错误,第三个图无法成功运行以及die.txt结果无输出,这怎么解决

俺不懂 matlab,所以,不知道你说的这是个什么情况……

对我来说,首先要确保你的 Fortran 程序可以运行,并能得到你想要的结果,至于其它的便与该程序没有关系了……
6楼2011-09-27 14:53:18
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxy尘埃

银虫 (小有名气)

如果按源程序编译的话,运行出来的结果是不完善的(与上面5楼给的contin.exe(不知道是谁改进的)比较,),得不想要的结果,不知道问题出在哪里
微笑吧,为你的曾经拥有~~~
7楼2011-09-27 15:24:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxy尘埃

银虫 (小有名气)

这两个文件是分别用源程序编译的结果与改进后运行的结果,差别很大(我需要的结果是要得到粒径分布),请问该怎么解决?
微笑吧,为你的曾经拥有~~~
8楼2011-09-27 15:41:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

你用了相同的输入文件?修改后的程序的源文件你有吗?把输入文件、修改后的程序的源文件啥的传上来看看……
9楼2011-09-27 15:49:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wxy尘埃

银虫 (小有名气)

就是没有修改后的代码(只有.exe),只有源代码,确定输入文件是一致的
微笑吧,为你的曾经拥有~~~
10楼2011-09-27 16:41:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 wxy尘埃 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +4 gy1nBQXYQJqL 2026-08-29 5/250 2026-08-31 01:27 by hZiFeudZyoGR
[找工作] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +6 gy1nBQXYQJqL 2026-08-29 9/450 2026-08-31 01:16 by hZiFeudZyoGR
[硕博家园] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +4 gy1nBQXYQJqL 2026-08-29 8/400 2026-08-31 00:45 by hZiFeudZyoGR
[公派出国] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +7 ASdOkHsho7FD 2026-08-28 10/500 2026-08-31 00:42 by hZiFeudZyoGR
[基金申请] 能否申诉? +4 echo8914667 2026-08-30 5/250 2026-08-30 21:11 by echo8914667
[公派出国] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 4FFAWE8HcgUD 2026-08-29 4/200 2026-08-30 20:21 by hZiFeudZyoGR
[考研] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 jCd0dEvKHShX 2026-08-29 5/250 2026-08-30 19:37 by hZiFeudZyoGR
[考博] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 jCd0dEvKHShX 2026-08-29 3/150 2026-08-30 19:26 by hZiFeudZyoGR
[考研] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +5 G6APbkg8SA6w 2026-08-29 6/300 2026-08-30 19:02 by hZiFeudZyoGR
[硕博家园] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 G6APbkg8SA6w 2026-08-29 4/200 2026-08-30 18:53 by hZiFeudZyoGR
[硕博家园] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +5 gy1nBQXYQJqL 2026-08-29 6/300 2026-08-30 18:17 by hZiFeudZyoGR
[考研] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +4 gy1nBQXYQJqL 2026-08-29 6/300 2026-08-30 17:47 by hZiFeudZyoGR
[考博] 找导师 +6 yuanjiabao 2026-08-29 7/350 2026-08-30 14:40 by 生科新手
[找工作] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 gy1nBQXYQJqL 2026-08-29 8/400 2026-08-30 12:03 by l0VvVHGBGRLv
[基金申请] 29号明天会评吗 +3 笨笨唐 2026-08-28 3/150 2026-08-30 09:29 by cww8181
[基金申请] 怎么查啊 +6 huang1991js 2026-08-26 6/300 2026-08-28 08:42 by winsaint
[基金申请] 怎么看青基中了没有啊 +5 叶九微 2026-08-26 5/250 2026-08-27 10:35 by l_zh2008
[基金申请] 我不理解! +15 Edward_pc 2026-08-26 23/1150 2026-08-26 20:34 by zzuzxg
[基金申请] 为什么国自然不能直接公布 +4 bjdxyxy 2026-08-26 4/200 2026-08-26 13:12 by qingmu1201
[基金申请] 国合现在查不到了吗? +10 chengyan1220 2026-08-24 20/1000 2026-08-26 08:57 by peasantsprig
信息提示
请填处理意见